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


macro square_width_put
{
local .no_put_to_screen
local .next_color_put
local .vertical_width_put
local .horizontal_width_put
 
	mov ebx,[ReserveArray]
	mov eax,[ebx]
	test eax,eax
	jz .no_put_to_screen
	mov ecx,[ebx]
	add ebx,4
	xor ebp,ebp
 
	.next_color_put:
	;put saved pixels in ReserveArray
	push ecx
	mov [counter2],5
	mov edi,[ebx]
	push edi
	.vertical_width_put:
		mov [counter],5
 
		.horizontal_width_put:
			mov edx,[ebx+4807*4+ebp]
			;and edx,0xffffff
			mov [edi],dx
			shr edx,16
			mov [edi+2],dl
 
		add edi,3
		add ebp,4
		dec [counter]
		jnz .horizontal_width_put
 
		mov ecx,[Picture_SizeX]
		sub ecx,5
		lea ecx,[ecx+ecx*2]
		add edi,ecx
	dec [counter2]
	jnz .vertical_width_put
	pop edi
	pop ecx
 
	add ebx,4
	dec ecx
	jnz .next_color_put
 
	.no_put_to_screen:
}
 
macro square_width_save
{
local .next_color_save
local .vertical_width_save
local .horizontal_width_save
	mov ebx,[ReserveArray]
	mov [ebx],eax
	mov ecx,eax
	add ebx,4
	xor ebp,ebp
 
	.next_color_save:
	;save color of pixel in ReserveArray
	push ecx
	mov [counter2],5
	mov edi,[ebx]
	.vertical_width_save:
		mov [counter],5
 
		.horizontal_width_save:
			mov eax,edi
			mov edx,[eax]
			;and edx,0xffffff
			mov [ebx+4807*4+ebp],dx
			shr edx,16
			mov [ebx+4807*4+2+ebp],dl
 
		add edi,3
		add ebp,4
		dec [counter]
		jnz .horizontal_width_save
 
		mov ecx,[Picture_SizeX]
		sub ecx,5
		lea ecx,[ecx+ecx*2]
		add edi,ecx
	dec [counter2]
	jnz .vertical_width_save
	pop ecx
 
	add ebx,4
	dec ecx
	jnz .next_color_save
}
 
macro draw_calc_pixels brush
{
local .next_pixel_put
local .vertical_width
local .horizontal_width
local .no_draw_pixel
 
	mov ebx,[ReserveArray]
	mov ecx,[ebx]
	mov edx,[Color]
	mov esi,[Color]
	shr edx,16
	add ebx,4
	mov edi,[line_width]
	dec edi
	imul edi,25
	add edi,brush
	.next_pixel_put:
 
	mov eax,[ebx]
	push eax
	push ecx
	xor ebp,ebp
	mov [counter2],5
 
	.vertical_width:
		mov [counter],5
 
		.horizontal_width:
		xor ecx,ecx
		mov cl,byte[edi+ebp]
		test cl,cl
		jz .no_draw_pixel
			mov [eax],si
			mov [eax+2],dl
		.no_draw_pixel:
		add eax,3
		inc ebp
		dec [counter]
		jnz .horizontal_width
 
		mov ecx,[Picture_SizeX]
		sub ecx,5
		lea ecx,[ecx+ecx*2]
		add eax,ecx
	dec [counter2]
	jnz .vertical_width
 
	pop ecx
	pop eax
	add ebx,4
	dec ecx
	jnz .next_pixel_put
}
 
;-----------------------------------------------------------
;-----instruments of panel(icon's instruments)--------------
;-----------------------------------------------------------
TakeButtonInstruments:
 
	mov eax,[Current_instrument]
 
	;*************************brush 1***********************
	cmp eax,40
	jne no_brush1
 
	mov [Brush_SizeX],4
	mov [Brush_SizeY],4
	mov [Number_Brush],0
	mov ebx,[Last_instrument]
	mov [Current_instrument],ebx
 
	mov [line_width],1
 
	jmp still
	no_brush1:
 
	;*************************brush 2***********************
	cmp eax,41
	jne no_brush2
 
	mov [Brush_SizeX],6
	mov [Brush_SizeY],4
	mov [Number_Brush],1
	mov ebx,[Last_instrument]
	mov [Current_instrument],ebx
 
	mov [line_width],2
 
	jmp still
	no_brush2:
 
	;*************************brush 3***********************
	cmp eax,42
	jne no_brush3
 
	mov [Brush_SizeX],8
	mov [Brush_SizeY],7
	mov [Number_Brush],2
	mov ebx,[Last_instrument]
	mov [Current_instrument],ebx
 
	mov [line_width],3
 
	jmp still
	no_brush3:
 
	;*************************brush 4***********************
	cmp eax,43
	jne no_brush4
 
	mov [Brush_SizeX],14
	mov [Brush_SizeY],14
	mov [Number_Brush],3
	mov ebx,[Last_instrument]
	mov [Current_instrument],ebx
 
	mov [line_width],4
 
	jmp still
	no_brush4:
 
	;*************************brush 5***********************
	cmp eax,44
	jne no_brush5
 
	mov [Brush_SizeX],6
	mov [Brush_SizeY],6
	mov [Number_Brush],4
	mov ebx,[Last_instrument]
	mov [Current_instrument],ebx
 
	mov [line_width],5
 
	jmp still
	no_brush5:
 
	;*************************pensil************************
	cmp eax,10
	jne no_pensil
 
	mov al,[exit_from_work_arrea]
 
	test al,al
	jz no_exit_from_work_arrea
 
	and [Activate_instrument],0
	and [exit_from_work_arrea],0
 
	no_exit_from_work_arrea:
 
	mov al,[Activate_instrument]
 
	test al,al
	jnz no_activated_later
 
	call GetScreenCordinats
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [OldX],eax
	mov [OldY],ebx
 
	no_activated_later:
 
;	mov eax,[MaxWorkScreen_SizeX] ???
;	mov ebx,[MaxWorkScreen_SizeY] ???
 
	mov eax,[PointerToPicture]
	mov ebx,[ReserveArray]
	mov ecx,[Picture_SizeX]
	mov edx,[OldX]
	shl edx,16
	add edx,[OldY]
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
	call calculate_line
 
	mov ecx,eax
	mov edx,[Color]
	mov esi,[Color]
	shr edx,16
	xor ebx,ebx
	mov eax,[ReserveArray]
 
	pensil_next_pixel_draw:
 
	  mov ebx,[eax]
	  mov [ebx],si
	  mov [ebx+2],dl
	  add eax,4
 
	dec ecx
	jnz pensil_next_pixel_draw
 
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [OldX],eax
	mov [OldY],ebx
 
	call MovePictureToWorkScreen
	mov [Activate_instrument],1
	jmp still
	no_pensil:
 
	;*************************pipetka***********************
	cmp eax,15
	jne no_pipetka
 
	mov eax,[ScreenY]
	mov ebx,[Picture_SizeX]
	add eax,[PosY]
	imul eax,ebx
	add eax,[ScreenX]
	add eax,[PosX]
	lea eax,[eax+eax*2]
	add eax,[PointerToPicture]
	mov ebx,[eax]
	and ebx,0xffffff
	mov [Color],ebx
 
	mcall SF_DRAW_RECT, 136*65536+20, 65*65536+21, [Color]
 
	jmp still
	no_pipetka:
 
	;*************************draw brush********************
	cmp eax,11
	jne no_brush
 
	mov [Last_instrument],eax
 
	jmp no_lastik_
 
	lastik_in:
	mov eax,[Color]
	mov [SColor],eax
	mov [Color],0xffffff
	no_lastik_:
 
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	mov ecx,[Brush_SizeX]
	mov edx,[Brush_SizeY]
	add eax,[PosX]
	add ebx,[PosY]
	add eax,ecx
	add ebx,edx
 
	cmp eax,[Picture_SizeX]
	jl no_max_pos_x
	mov eax,[Picture_SizeX]
	no_max_pos_x:
 
	cmp ebx,[Picture_SizeY]
	jl no_max_pos_y
	mov ebx,[Picture_SizeY]
	no_max_pos_y:
 
	cmp eax,ecx
	ja no_min_pos_x
	mov eax,[Brush_SizeX]
	no_min_pos_x:
 
	cmp ebx,edx
	ja no_min_pos_y
	mov ebx,[Brush_SizeY]
	no_min_pos_y:
 
	sub eax,[Brush_SizeX]
	sub ebx,[Brush_SizeY]
 
	mov [x],eax
	mov [y],ebx
 
	mov al,[exit_from_work_arrea]
	test al,al
	jz no_exit_from_work_arrea_brush
	and [Activate_instrument],0
	and [exit_from_work_arrea],0
	no_exit_from_work_arrea_brush:
 
	mov al,[Activate_instrument]
	test al,al
	jnz no_new_brush_xy
	mov eax,[x]
	mov ebx,[y]
	mov [OldX],eax
	mov [OldY],ebx
	mov [Activate_instrument],1
	no_new_brush_xy:
 
	mov eax,[PointerToPicture]
	mov ebx,[ReserveArray]
	add ebx,4
	mov ecx,[Picture_SizeX]
	mov edx,[OldX]
	shl edx,16
	add edx,[OldY]
	mov esi,[x]
	mov edi,[y]
 
	call calculate_line
 
	mov ebx,[ReserveArray]
	mov [ebx],eax
 
	;procedure drawing of brush
	mov ebx,[ReserveArray]
	mov ecx,[ebx]
	mov edx,[Color]
	mov esi,[Color]
	shr edx,16
	add ebx,4
	mov edi,[Number_Brush]
	imul edi,20*20
 
	next_pixel_put_brush:
 
	mov eax,[ebx]
	push eax
	push ecx
	xor ebp,ebp
	and [counter2],0
 
	vertical_width_brush:
	   and [counter],0
 
	   horizontal_width_brush:
	   xor ecx,ecx
	   mov cl,byte[Brush_color+edi+ebp]
	   test cl,cl
	     jz no_draw_pixel_brush
	      mov [eax],si
	      mov [eax+2],dl
	     no_draw_pixel_brush:
	   add eax,3
	   inc ebp
	   inc [counter]
	   cmp [counter],20
	   jne horizontal_width_brush
 
	   mov ecx,[Picture_SizeX]
	   sub ecx,20
	   lea ecx,[ecx+ecx*2]
	   add eax,ecx
	inc [counter2]
	cmp [counter2],20
	jne vertical_width_brush
 
	pop ecx
	pop eax
	add ebx,4
	dec ecx
	jnz next_pixel_put_brush
 
	mov eax,[x]
	mov ebx,[y]
	mov [OldX],eax
	mov [OldY],ebx
 
	mov al,[lastik_is_active]
	test al,al
	jz no_lastik_active
 
	mov eax,[SColor]
	mov [Color],eax
	and [lastik_is_active],0
	no_lastik_active:
 
	call MovePictureToWorkScreen
	mov eax,[Current_instrument]
	mov [Last_instrument],eax
 
	jmp still
	no_brush:
 
	;************************Flood Fill*********************
	cmp eax,14
	jne no_FloodFill
 
	mov eax,[PointerToPicture]
	mov ebx,[PointerToEditBufer]
 
	mov ecx,[Picture_SizeX]
	imul ecx,[Picture_SizeY]
	lea ecx,[ecx+ecx*2]
	shl ecx,1
 
	cmp ecx,mem_flood_f
	ja normal_size_of_bufer
 
	mov ebx,[ReserveArray]
 
	normal_size_of_bufer:
 
	add ebx,4
	mov ecx,[Picture_SizeX]
	mov edx,[ScreenX]
	add edx,[PosX]
	shl edx,16
	add edx,[ScreenY]
	add edx,[PosY]
	mov esi,[Picture_SizeX]
	dec esi
	shl esi,16
	add esi,[Picture_SizeY]
	dec esi
	mov edi,[Color]
 
	call flood_fill
	call MovePictureToWorkScreen
 
	jmp still
	no_FloodFill:
 
	;************************lastik*************************
	cmp eax,13
	jne no_lastik
 
	 mov [Last_instrument],eax
	 mov [lastik_is_active],1
	jmp lastik_in
 
	no_lastik:
 
	;*******************************************************
	cmp eax,12
	jne  no_spray
 
	cmp [Activate_instrument],0
	jne no_null_spray
	mov [Activate_instrument],1
	jmp still
	no_null_spray:
 
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	mov ecx,[Brush_SizeX]
	mov edx,[Brush_SizeY]
	add eax,[PosX]
	add ebx,[PosY]
	add eax,ecx
	add ebx,edx
 
	cmp eax,[Picture_SizeX]
	jl no_max_pos_x_spray
	mov eax,[Picture_SizeX]
	no_max_pos_x_spray:
 
	cmp ebx,[Picture_SizeY]
	jl no_max_pos_y_spray
	mov ebx,[Picture_SizeY]
	no_max_pos_y_spray:
 
	cmp eax,ecx
	ja no_min_pos_x_spray
	mov eax,[Brush_SizeX]
	no_min_pos_x_spray:
 
	cmp ebx,edx
	ja no_min_pos_y_spray
	mov ebx,[Brush_SizeY]
	no_min_pos_y_spray:
 
	sub eax,[Brush_SizeX]
	sub ebx,[Brush_SizeY]
	mov edi,0;[Number_Brush]
	imul edi,20*20
 
	mov [x],eax
	mov [y],ebx
	mov ebp,[Picture_SizeX]
	xor edx,edx
	brush_y_spray:
	  xor ecx,ecx
	  brush_x_spray:
	   ;calculate position in array of spray
	   mov esi,edx
	   lea esi,[esi+esi*4] ;esi=esi*5
	   shl esi,2	       ;esi=(esi*3)*4
	   add esi,ecx
	   add esi,edi
	   ;read byte from array
	   xor eax,eax
	   mov al,[Spray_color+esi]
	   test eax,eax
	   jz no_color_spray
	   mov eax,[x]
	   mov ebx,[y]
	   add eax,ecx
	   add ebx,edx
	   imul ebx,ebp; ebp=[Picture_SizeX]
	   add eax,ebx
	   lea eax,[eax+eax*2]
	   add eax,[PointerToPicture]
	   mov ebx,[Color]
	   mov [eax],bx
	   shr ebx,16
	   mov [eax+2],bl
	   no_color_spray:
	   inc ecx
	   cmp ecx,20
	  jl brush_x_spray
	inc edx
	cmp edx,20
	jl brush_y_spray
 
	call MovePictureToWorkScreen
	jmp still
 
	no_spray:
 
	;************************palette************************
	cmp eax,51
	jne no_palette
 
	mov eax,20
	mov ebx,100
	mov ecx,32*10+32*5+7
	mov edx,8*10+7*10
	mov  esi,1
	call draw_volume_rectangle
	mov [x],20+5
	mov [y],100+10
	mov edi,256
	xor esi,esi
	next_rectangle:
	mov ebx,[x]
	mov ecx,[y]
	mov edx,[palitra+esi]
	and edx,0xffffff
	shl ebx,16
	shl ecx,16
	add ebx,13
	add ecx,13
	mcall SF_DRAW_RECT
	add [x],15
	cmp [x],20+15*32
	jl no_new_line
	mov [x],20+5
	add [y],15
	no_new_line:
	add esi,4
	dec edi
	jnz next_rectangle
 
	wait_events:
	call event
 
	cmp eax,1
	je still
 
	cmp eax,2
	jne no_keys
 
	mcall SF_GET_KEY
 
	no_keys:
 
	cmp eax,3
	jne no_buttons
	mcall SF_GET_BUTTON
 
	no_buttons:
 
	cmp eax,6
	jne wait_events
 
	call GetMouseClick
 
	test eax,eax
	jz wait_events
	call GetMouseCoordinats
	mov [x],20+5
	mov [y],100+10
	mov [counter],0
	next_rectangle_column:
	mov eax,[x]
	mov ebx,[y]
	mov ecx,[MouseX]
	mov edx,[MouseY]
	mov esi,13
	mov edi,13
	call columnus
	test eax,eax
	jz no_columnus_color
 
	mov eax,[counter]
	shl eax,2
	mov ebx,[palitra+eax]
	and ebx,0xffffff
	mov [Color],ebx
	no_columnus_color:
 
	add [x],15
 
	cmp [x],20+15*32
	jl no_new_line_column
 
	mov [x],20+5
	add [y],15
	no_new_line_column:
 
	inc [counter]
 
	cmp [counter],257
	jne next_rectangle_column
 
	mcall SF_SLEEP,10
 
	call drawwin
 
	mov eax,[Last_instrument]
	mov [Current_instrument],eax
 
	jmp still
	no_palette:
 
	;************************draw line**********************
	cmp eax,16
	jne no_line
 
	mov [Last_instrument],eax
 
	mov al,[Activate_instrument]
	test al,al
	jnz no_new_line_xy
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [OldX],eax
	mov [OldY],ebx
	mov [Activate_instrument],1
	xor eax,eax
	mov ecx,mem_flood_f/4
	mov edi,[ReserveArray]
	rep stosd
	jmp still
	no_new_line_xy:
 
	;put saved pixels
	square_width_put
 
	;calculate line
	mov ebx,[ReserveArray]
	add ebx,4
	mov eax,[PointerToPicture]
	mov ecx,[Picture_SizeX]
	mov edx,[OldX]
	shl edx,16
	add edx,[OldY]
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
 
	mov ebp,[Picture_SizeX]
	sub ebp,[line_width]
	cmp esi,ebp
	jl no_minimum_x_line
	mov esi,ebp
	no_minimum_x_line:
 
	mov ebp,[Picture_SizeY]
	sub ebp,[line_width]
	cmp edi,ebp
	jl no_minimum_y_line
	mov edi,ebp
	no_minimum_y_line:
 
	call calculate_line
 
	;save color pixels in ReserveArray
	square_width_save
 
	;draw calculated pixels on work arrea
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	draw_calc_pixels width_pixels
 
 
	call MovePictureToWorkScreen
	jmp still
	no_line:
 
	;************************draw rectangle*****************
	cmp eax,17
	jne no_rectangle
 
	mov [Last_instrument],eax
 
	mov al,[Activate_instrument]
	test al,al
	jnz no_new_rectangle_xy
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [OldX],eax
	mov [OldY],ebx
	mov [Activate_instrument],1
	xor eax,eax
	mov ecx,mem_flood_f/4
	mov edi,[ReserveArray]
	rep stosd
	jmp still
	no_new_rectangle_xy:
 
	;put saved pixels
	square_width_put
 
	;calculate line
	mov ebx,[ReserveArray]
	add ebx,4
	mov eax,[PointerToPicture]
	mov ecx,[Picture_SizeX]
	mov edx,[OldX]
	shl edx,16
	add edx,[OldY]
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
 
	mov ebp,[Picture_SizeX]
	sub ebp,[line_width]
	cmp esi,ebp
	jl no_minimum_x_rectangle
	mov esi,ebp
	no_minimum_x_rectangle:
 
	mov ebp,[Picture_SizeY]
	sub ebp,[line_width]
	cmp edi,ebp
	jl no_minimum_y_rectangle
	mov edi,ebp
	no_minimum_y_rectangle:
 
	call calculate_rectangle
 
	;save color pixels in ReserveArray
	square_width_save
 
	;draw calculated pixels on work arrea
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	draw_calc_pixels width_pixels_rectangle
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	call MovePictureToWorkScreen
	jmp still
	no_rectangle:
 
	;************************draw circle********************
	cmp eax,18
	jne no_circle
 
	mov [Last_instrument],eax
 
	mov al,[Activate_instrument]
	test al,al
	jnz no_new_circle_xy
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [OldX],eax
	mov [OldY],ebx
	mov [Activate_instrument],1
	xor eax,eax
	mov ecx,mem_flood_f/4
	mov edi,[ReserveArray]
	rep stosd
	jmp still
	no_new_circle_xy:
 
	;put saved pixels
	square_width_put
 
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
 
	sub esi,[OldX]
	jns no_sign_x_circle
	neg esi
	shr esi,1
	neg esi
	add esi,[OldX]
	jmp no_plus_sign_x_circle
	no_sign_x_circle:
 
	shr esi,1
	add esi,[OldX]
	no_plus_sign_x_circle:
 
	sub edi,[OldY]
	jns no_sign_y_circle
	neg edi
	shr edi,1
	neg edi
	add edi,[OldY]
	jmp no_plus_sign_y_circle
	no_sign_y_circle:
 
	shr edi,1
	add edi,[OldY]
	no_plus_sign_y_circle:
 
	mov [x],esi
	mov [y],edi
 
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
 
	sub esi,[OldX]
	jns no_sign_x_circle_r
	neg esi
	no_sign_x_circle_r:
 
	sub edi,[OldY]
	jns no_sign_y_circle_r
	neg edi
	no_sign_y_circle_r:
 
	mov [Dx_],esi
	mov [Dy_],edi
 
	;finit
	fild [Dx_]
	fmul st0,st0
	fild [Dy_]
	fmul st0,st0
	fadd st0,st1
	fsqrt
	fistp [Radius]
	fistp [Icon_X]
	mov esi,[Radius]
	shr esi,1
	cmp esi,0
	jne no_null_radius
	mov [Radius],1
	no_null_radius:
 
	mov [Radius],esi
 
	mov edi,[x]
	mov ebp,[y]
	add edi,esi
	add ebp,esi
 
	mov edx,[Picture_SizeX]
	sub edx,[line_width]
	cmp edi,edx
	jl no_limit_x_circle
	sub edi,edx
	sub [Radius],edi
	no_limit_x_circle:
 
	mov edx,[Picture_SizeY]
	sub edx,[line_width]
	cmp ebp,edx
	jl no_limit_y_circle
	sub ebp,edx
	sub [Radius],ebp
	no_limit_y_circle:
 
 
	mov edi,[x]
	mov ebp,[y]
 
	sub edi,[Radius]
	jns no_minimum_x_circle
	add [Radius],edi
	no_minimum_x_circle:
 
	sub ebp,[Radius]
	jns no_minimum_y_circle
	add [Radius],ebp
	no_minimum_y_circle:
 
	;calculate circle
	mov ebx,[ReserveArray]
	add ebx,4
	mov eax,[PointerToPicture]
	mov ecx,[Picture_SizeX]
	mov edx,[x]
	shl edx,16
	add edx,[y]
	mov esi,[Radius]
	call calculate_circle
 
	;save color pixels in ReserveArray
	square_width_save
 
	;draw calculated pixels on work arrea
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	draw_calc_pixels width_pixels
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	call MovePictureToWorkScreen
	jmp still
	no_circle:
 
	;************************zoom 1*************************
	cmp eax,45
	jne no_1_
	mov [k],1
	mov [Scroll1CoordinatX],9
	mov [Scroll2CoordinatY],89
	and [Current_instrument],0
	call drawwin
	jmp still
	no_1_:
 
	;************************zoom 2*************************
	cmp eax,46
	jne no_2_
	mov [k],2
	call drawwin
	mov [Scroll1CoordinatX],9
	mov [Scroll2CoordinatY],89
	and [Current_instrument],0
	jmp still
	no_2_:
 
 
	;************************zoom 3*************************
	cmp eax,47
	jne no_3_
	mov [k],3
	call drawwin
	mov [Scroll1CoordinatX],9
	mov [Scroll2CoordinatY],89
	and [Current_instrument],0
	jmp still
	no_3_:
 
	;************************zoom 4*************************
	cmp eax,48
	jne no_4_
	mov [k],4
	call drawwin
	mov [Scroll1CoordinatX],9
	mov [Scroll2CoordinatY],89
	and [Current_instrument],0
	jmp still
	no_4_:
 
	;************************zoom 8*************************
	cmp eax,49
	jne no_8_
	mov [k],8
	call drawwin
	mov [Scroll1CoordinatX],9
	mov [Scroll2CoordinatY],89
	and [Current_instrument],0
	jmp still
	no_8_:
 
	;************************zoom 16************************
	cmp eax,50
	jne no_16_
	mov [k],16
	call drawwin
	mov [Scroll1CoordinatX],9
	mov [Scroll2CoordinatY],89
	and [Current_instrument],0
	jmp still
	no_16_:
 
	;***************allocation of a countour****************
	cmp eax,21
	jne no_allocation
 
	cmp [instrument_used],0
	jnz instrument_not_finished_work
 
	mov al,[Activate_instrument]
	test al,al
	jnz no_new_allocation_xy
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [OldX],eax
	mov [OldY],ebx
	inc eax
	inc ebx
	mov [rectangular_shade_x],eax
	mov [rectangular_shade_y],ebx
	mov [Activate_instrument],1
	mov [instrument_used],1
	and [crossing],0
	and [finishing_crossing],0
	xor eax,eax
	mov ecx,mem_flood_f/4
	mov edi,[ReserveArray]
	rep stosd
	jmp still
	no_new_allocation_xy:
	instrument_not_finished_work:
 
	mov al,[instrument_used]
	test al,al
	jz no_change_coordinats
 
	cmp [Activate_instrument],0
	jnz no_change_coordinats
 
	;save coordinates as old if crossing=0
	cmp [crossing],0
	jnz no_save_coordinate_of_crossing
 
	mov eax,[OldX]
	mov ebx,[OldY]
 
	cmp eax,[rectangular_shade_x]
	jl no_remove_x
	mov ecx,[rectangular_shade_x]
	mov [OldX],ecx			  ; OldX <-----> rectangulare_shade_x
	mov [rectangular_shade_x],eax
	no_remove_x:
 
	cmp ebx,[rectangular_shade_y]
	jl no_remove_y
	mov ecx,[rectangular_shade_y]
	mov [OldY],ecx			  ; OldY <-----> rectangulare_shade_y
	mov [rectangular_shade_y],ebx
	no_remove_y:
 
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [crossing_old_x],eax
	mov [crossing_old_y],ebx
	mov [crossing],1
 
 
	mov eax,[OldX]
	mov ebx,[OldY]
	inc eax
	inc ebx
	mov [SpriteCoordinatX],eax
	mov [SpriteCoordinatY],ebx
	mov [SpriteOldCoordinatX],eax
	mov [SpriteOldCoordinatY],ebx
	mov esi,[rectangular_shade_x]
	mov edi,[rectangular_shade_y]
 
	sub esi,eax
	jns no_sign_sprite_size_x
	neg esi
	no_sign_sprite_size_x:
 
	sub edi,ebx
	jns no_sign_sprite_size_y
	neg edi
	no_sign_sprite_size_y:
 
	test esi,esi
	jnz no_null_sprite_x
	mov esi,1
	no_null_sprite_x:
 
	test edi,edi
	jnz no_null_sprite_y
	mov edi,1
	no_null_sprite_y:
 
	mov [SpriteSizeX],esi
	mov [SpriteSizeY],edi
 
	call SaveFonForSprite
 
	no_save_coordinate_of_crossing:
 
	cmp [crossing],0
	je no_test_crossing_with_work_arrea
	;if mouse situatad after allocation than exit
	push [ScreenX]
	push [ScreenY]
 
	call GetScreenCordinats
 
	mov eax,[OldX]
	mov ebx,[OldY]
	mov ecx,[ScreenX]
	mov edx,[ScreenY]
	mov esi,[SpriteSizeX]
	mov edi,[SpriteSizeY]
	add ecx,[PosX]
	add edx,[PosY]
	inc esi;eax
	inc edi;ebx
	call columnus
 
	test eax,eax
	jnz crossing_with_work_area
	mov [finishing_crossing],1
	mov [register],1
	crossing_with_work_area:
 
	pop [ScreenY]
	pop [ScreenX]
 
	no_test_crossing_with_work_arrea:
 
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov ecx,eax
	mov edx,ebx
	sub eax,[crossing_old_x]  ;dx=(x-oldx)
	sub ebx,[crossing_old_y]  ;dy=(y-oldy)
	mov [crossing_old_x],ecx
	mov [crossing_old_y],edx
 
	add [OldX],eax		       ;x1=x1+dx
	add [OldY],ebx		       ;y1=y1+dy
	add [rectangular_shade_x],eax  ;x2=x2+dx
	add [rectangular_shade_y],ebx  ;y2+y2+dy
 
	mov eax,[OldX]
	mov ebx,[OldY]
	inc eax
	inc ebx
	mov [SpriteCoordinatX],eax
	mov [SpriteCoordinatY],ebx
 
	cmp [SpriteCoordinatX],0
	jns no_null_sprite_coordinat_x
	mov [SpriteCoordinatX],1
	no_null_sprite_coordinat_x:
 
	cmp [SpriteCoordinatY],0
	jns no_null_sprite_coordinat_y
	mov [SpriteCoordinatY],1
	no_null_sprite_coordinat_y:
 
	mov esi,[rectangular_shade_x]
	mov edi,[rectangular_shade_y]
 
	sub esi,[OldX]
	jns no_znak_size_of_rectangulare_crossing_x
	neg esi
	no_znak_size_of_rectangulare_crossing_x:
 
	sub edi,[OldY]
	jns no_znak_size_of_rectangulare_crossing_y
	neg edi
	no_znak_size_of_rectangulare_crossing_y:
 
	mov ecx,[OldX]
	mov edx,[OldY]
 
	sub ecx,[PosX]
	jns no_minimum_x_crossing
	mov ecx,0
	add ecx,[PosX]
	mov [OldX],ecx
	add ecx,esi
	mov [rectangular_shade_x],ecx
	no_minimum_x_crossing:
 
	sub edx,[PosY]
	jns no_minimum_y_crossing
	mov edx,0
	add edx,[PosY]
	mov [OldY],edx
	add edx,edi
	mov [rectangular_shade_y],edx
	no_minimum_y_crossing:
 
	mov ecx,[Picture_SizeX]
	sub ecx,esi
	cmp [OldX],ecx
	jl no_maximum_x_crossing
	dec ecx
	mov [OldX],ecx
	add ecx,esi
	mov [rectangular_shade_x],ecx
	no_maximum_x_crossing:
 
	mov edx,[Picture_SizeY]
	sub edx,edi
	cmp [OldY],edx
	jl no_maximum_y_crossing
	dec edx
	mov [OldY],edx
	add edx,edi
	mov [rectangular_shade_y],edx
	no_maximum_y_crossing:
 
	mov eax,[rectangular_shade_x]
	mov ebx,[rectangular_shade_y]
	sub eax,[PosX]
	sub ebx,[PosY]
	mov [ScreenX],eax
	mov [ScreenY],ebx
	no_change_coordinats:
 
	;put saved pixels
	square_width_put
 
	cmp [DrawSprite_flag],1
	jne no_activate_put_fon_
 
	cmp [Paste_flag],1
	je no_put_fon___
	call PutFonForSprite
	no_put_fon___:
	and [Paste_flag],0
	no_activate_put_fon_:
 
	cmp [finishing_crossing],0
	jz not_finish_from_instrument_crossing
	and [Activate_instrument],0
	and [crossing],0
	and [instrument_used],0
	and [DrawSprite_flag],0
	call MovePictureToWorkScreen
	jmp still
	not_finish_from_instrument_crossing:
 
	;calculate line
	mov ebx,[ReserveArray]
	add ebx,4
	mov eax,[PointerToPicture]
	mov ecx,[Picture_SizeX]
	mov edx,[OldX]
	shl edx,16
	add edx,[OldY]
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
 
	mov ebp,[Picture_SizeX]
	dec ebp
	cmp esi,ebp
	jl no_minimum_x_allocation
	mov esi,ebp
	no_minimum_x_allocation:
 
	mov ebp,[Picture_SizeY]
	dec ebp
	cmp edi,ebp
	jl no_minimum_y_allocation
	mov edi,ebp
	no_minimum_y_allocation:
 
	call calculate_rectangle
 
	;save color pixels in ReserveArray
	square_width_save
 
	cmp [DrawSprite_flag],1
	jne no_save_fon_for_sprite_
	;save current coordinats as old
	mov eax,[SpriteCoordinatX]
	mov ebx,[SpriteCoordinatY]
	mov [SpriteOldCoordinatX],eax
	mov [SpriteOldCoordinatY],ebx
 
	call SaveFonForSprite
 
	no_save_fon_for_sprite_:
 
	;draw calculated pixels on work arrea
	mov ebx,[ReserveArray]
	mov ecx,[ebx]
	add ebx,4
	next_pixel_put_allocation:
 
	mov edx,0x1f3fff
	mov esi,edx
	shr edx,16
 
	mov ebp,ecx
	and ebp,8
	cmp ebp,8
	jne black_color
	mov si,0xffff
	mov dl,0xff
	black_color:
 
	mov eax,[ebx]
	mov [eax],si
	mov [eax+2],dl
 
	add ebx,4
	dec ecx
	jnz next_pixel_put_allocation
 
	cmp [DrawSprite_flag],1
	jne no_activate_draw_sprite_
 
	call DrawSprite
 
	no_activate_draw_sprite_:
 
	mov al,[instrument_used]
	test al,al
	jz no_change_coordinats
	cmp [Activate_instrument],0
	jz no_save_shades
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [rectangular_shade_x],eax
	mov [rectangular_shade_y],ebx
	no_save_shades:
 
	call MovePictureToWorkScreen
	jmp still
	no_allocation:
 
	;*************reflection from left to right*************
	cmp eax,23
	jne no_reflection_from_left_to_right
 
	mov ebp,[PointerToPicture]
	mov edx,[ReserveArray]
	mov esi,[Picture_SizeX]
	mov ebx,[Picture_SizeX]
	lea ebx,[ebx+ebx*2]
	shr esi,1
	next_line_reflection_x:
	;copy vertical line to array
	mov ecx,[Picture_SizeX]
	shr ecx,1
	sub ecx,esi
	lea ecx,[ecx+ecx*2]
	add ecx,[PointerToPicture]
	mov edx,[ReserveArray]
	and edi,0
	copy_to_array_line_reflection_y:
	mov eax,[ecx]
	mov ebp,edi
	lea ebp,[ebp+ebp*2]
	mov [edx+ebp],ax
	shr eax,16
	mov [edx+ebp+2],al
	add ecx,ebx
	inc edi
	cmp edi,[Picture_SizeY]
	jne copy_to_array_line_reflection_y
 
	mov ecx,[Picture_SizeX]
	shr ecx,1
	mov ebp,ecx
	add ecx,esi
	dec ecx
	lea ecx,[ecx+ecx*2]
	add ecx,[PointerToPicture]
	sub ebp,esi
	lea ebp,[ebp+ebp*2]
	add ebp,[PointerToPicture]
	and edi,0
	next_line_reflection_y:
	mov eax,[ecx]
	and eax,0xffffff
	mov [ebp],ax
	shr eax,16
	mov [ebp+2],al
	add ebp,ebx
	add ecx,ebx
	inc edi
	cmp edi,[Picture_SizeY]
	jnz next_line_reflection_y
 
	;copy vertical line  from array to screen
	mov ecx,[Picture_SizeX]
	shr ecx,1
	add ecx,esi
	dec ecx
	lea ecx,[ecx+ecx*2]
	add ecx,[PointerToPicture]
	mov edx,[ReserveArray]
	and edi,0
	copy_from_array_to_screen_reflection_y:
	mov ebp,edi
	lea ebp,[ebp+ebp*2]
	xor eax,eax
	mov eax,[edx+ebp]
	mov [ecx],ax
	shr eax,16
	mov [ecx+2],al
	add ecx,ebx
	inc edi
	cmp edi,[Picture_SizeY]
	jne copy_from_array_to_screen_reflection_y
 
	dec esi
	jnz next_line_reflection_x
 
	call MovePictureToWorkScreen
	jmp still
	no_reflection_from_left_to_right:
 
	;*************reflection from up to down****************
	cmp eax,24
	jne no_reflection_from_up_to_down
	mov esi,[Picture_SizeX]
	mov edi,esi
	lea esi,[esi+esi*2]
	lea edi,[edi+edi*2]
	imul edi,[Picture_SizeY]
	mov edx,[ReserveArray]
	mov ecx,[Picture_SizeY]
	shr ecx,1
	add edi,[PointerToPicture]
	sub edi,esi
	mov ebp,[PointerToPicture]
	next_lines_reflection:
	;copy line
	xor ebx,ebx
	copy_line_1:
	xor eax,eax
	mov al,[edi+ebx]
	mov [edx+ebx],al
	inc ebx
	cmp ebx,esi
	jne copy_line_1
 
	xor ebx,ebx
	copy_line_2:
	xor eax,eax
	mov al,[ebp+ebx]
	mov [edi+ebx],al
	inc ebx
	cmp ebx,esi
	jne copy_line_2
 
	xor ebx,ebx
	copy_line_3:
	xor eax,eax
	mov al,[edx+ebx]
	mov [ebp+ebx],al
	inc ebx
	cmp ebx,esi
	jne copy_line_3
 
	add ebp,esi
	sub edi,esi
	dec ecx
	jnz next_lines_reflection
 
	call MovePictureToWorkScreen
	jmp still
	no_reflection_from_up_to_down:
 
	;*********************draw hard contour*****************
	cmp eax,20
	jne no_kontur_
 
	mov [Last_instrument],eax
 
	mov al,[Activate_instrument]
	test al,al
	jnz no_new_konture_xy
 
	mov al,[instrument_used]
	test al,al
	jz instrument_not_used
	mov eax,[used_OldX]
	mov ebx,[used_OldY]
	mov [OldX],eax
	mov [OldY],ebx
	jmp exit_used_instrument
	instrument_not_used:
 
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [OldX],eax
	mov [OldY],ebx
	exit_used_instrument:
 
	mov al,[instrument_used]
	test al,al
	jnz instrument_used_true
	mov [instrument_used],byte 1
	instrument_used_true:
 
	mov [Activate_instrument],1
	xor eax,eax
	mov ecx,mem_flood_f/4
	mov edi,[ReserveArray]
	rep stosd
 
	no_new_konture_xy:
 
	;put saved pixels
	square_width_put
 
	;calculate line
	mov ebx,[ReserveArray]
	add ebx,4
	mov eax,[PointerToPicture]
	mov ecx,[Picture_SizeX]
	mov edx,[OldX]
	shl edx,16
	add edx,[OldY]
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
 
	mov ebp,[Picture_SizeX]
	sub ebp,[line_width]
	cmp esi,ebp
	jl no_minimum_x_konture
	mov esi,ebp
	no_minimum_x_konture:
 
	mov ebp,[Picture_SizeY]
	sub ebp,[line_width]
	cmp edi,ebp
	jl no_minimum_y_konture
	mov edi,ebp
	no_minimum_y_konture:
 
	call calculate_line
 
	;save color pixels in ReserveArray
	square_width_save
 
	;draw calculated pixels on work arrea
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	draw_calc_pixels width_pixels
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [used_OldX],eax
	mov [used_OldY],ebx
 
	call MovePictureToWorkScreen
 
	jmp still
 
	no_kontur_:
	;************************draw ellips********************
	cmp eax,19
	jne no_ellips
 
	mov [Last_instrument],eax
 
	mov al,[Activate_instrument]
	test al,al
	jnz no_new_ellips_xy
	mov eax,[ScreenX]
	mov ebx,[ScreenY]
	add eax,[PosX]
	add ebx,[PosY]
	mov [OldX],eax
	mov [OldY],ebx
	mov [Activate_instrument],1
	xor eax,eax
	mov ecx,mem_flood_f/4
	mov edi,[ReserveArray]
	rep stosd
	jmp still
	no_new_ellips_xy:
 
	;put saved pixels
	square_width_put
 
 
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
 
	sub esi,[OldX]
	jns no_sign_x_ellips
	neg esi
	shr esi,1
	neg esi
	add esi,[OldX]
	jmp no_plus_sign_x_ellips
	no_sign_x_ellips:
 
	shr esi,1
	add esi,[OldX]
	no_plus_sign_x_ellips:
 
	sub edi,[OldY]
	jns no_sign_y_ellips
	neg edi
	shr edi,1
	neg edi
	add edi,[OldY]
	jmp no_plus_sign_y_ellips
	no_sign_y_ellips:
 
	shr edi,1
	add edi,[OldY]
	no_plus_sign_y_ellips:
 
	mov [x],esi
	mov [y],edi
 
	mov esi,[ScreenX]
	mov edi,[ScreenY]
	add esi,[PosX]
	add edi,[PosY]
 
	sub esi,[OldX]
	jns no_sign_x_ellips_r
	neg esi
	no_sign_x_ellips_r:
 
	sub edi,[OldY]
	jns no_sign_y_ellips_r
	neg edi
	no_sign_y_ellips_r:
 
	cmp edi,0
	jnz no_null_a_ellips
	mov edi,1
	no_null_a_ellips:
 
	shr esi,1
	shr edi,1
	mov [a_ellips],esi
	mov [b_ellips],edi
 
	mov edi,[x]
	mov ebp,[y]
	add edi,esi
	add ebp,esi
 
	mov edx,[Picture_SizeX]
	sub edx,[line_width]
	cmp edi,edx
	jl no_limit_x_ellips
	sub edi,edx
	sub [a_ellips],edi
	no_limit_x_ellips:
 
	mov edx,[Picture_SizeY]
	sub edx,[line_width]
	cmp ebp,edx
	jl no_limit_y_ellips
	sub ebp,edx
	sub [b_ellips],ebp
	no_limit_y_ellips:
 
 
	mov edi,[x]
	mov ebp,[y]
 
	sub edi,[a_ellips]
	jns no_minimum_x_ellips
	add [a_ellips],edi
	no_minimum_x_ellips:
 
	sub ebp,[b_ellips]
	jns no_minimum_y_ellips
	add [b_ellips],ebp
	no_minimum_y_ellips:
 
	;calculate circle
	mov ebx,[ReserveArray]
	add ebx,4
	mov eax,[PointerToPicture]
	mov ecx,[Picture_SizeX]
	mov edx,[x]
	shl edx,16
	add edx,[y]
	mov esi,[a_ellips]
	shl esi,16
	add esi,[b_ellips]
	call calculate_ellips
 
	;save color pixels in ReserveArray
	square_width_save
 
	;draw calculated pixels on work arrea
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	draw_calc_pixels width_pixels
 
	call MovePictureToWorkScreen
	jmp still
	no_ellips:
 
 
	jmp still
	ret

Rev 6354	Rev 6355
1	macro square_width_put	1	macro square_width_put
2	{	2	{
3	local .no_put_to_screen	3	local .no_put_to_screen
4	local .next_color_put	4	local .next_color_put
5	local .vertical_width_put	5	local .vertical_width_put
6	local .horizontal_width_put	6	local .horizontal_width_put
7		7
8	mov ebx,[ReserveArray]	8	mov ebx,[ReserveArray]
9	mov eax,[ebx]	9	mov eax,[ebx]
10	test eax,eax	10	test eax,eax
11	jz .no_put_to_screen	11	jz .no_put_to_screen
12	mov ecx,[ebx]	12	mov ecx,[ebx]
13	add ebx,4	13	add ebx,4
14	xor ebp,ebp	14	xor ebp,ebp
15		15
16	.next_color_put:	16	.next_color_put:
17	;put saved pixels in ReserveArray	17	;put saved pixels in ReserveArray
18	push ecx	18	push ecx
19	mov [counter2],5	19	mov [counter2],5
20	mov edi,[ebx]	20	mov edi,[ebx]
21	push edi	21	push edi
22	.vertical_width_put:	22	.vertical_width_put:
23	mov [counter],5	23	mov [counter],5
24		24
25	.horizontal_width_put:	25	.horizontal_width_put:
26	mov edx,[ebx+4807*4+ebp]	26	mov edx,[ebx+4807*4+ebp]
27	;and edx,0xffffff	27	;and edx,0xffffff
28	mov [edi],dx	28	mov [edi],dx
29	shr edx,16	29	shr edx,16
30	mov [edi+2],dl	30	mov [edi+2],dl
31		31
32	add edi,3	32	add edi,3
33	add ebp,4	33	add ebp,4
34	dec [counter]	34	dec [counter]
35	jnz .horizontal_width_put	35	jnz .horizontal_width_put
36		36
37	mov ecx,[Picture_SizeX]	37	mov ecx,[Picture_SizeX]
38	sub ecx,5	38	sub ecx,5
39	lea ecx,[ecx+ecx*2]	39	lea ecx,[ecx+ecx*2]
40	add edi,ecx	40	add edi,ecx
41	dec [counter2]	41	dec [counter2]
42	jnz .vertical_width_put	42	jnz .vertical_width_put
43	pop edi	43	pop edi
44	pop ecx	44	pop ecx
45		45
46	add ebx,4	46	add ebx,4
47	dec ecx	47	dec ecx
48	jnz .next_color_put	48	jnz .next_color_put
49		49
50	.no_put_to_screen:	50	.no_put_to_screen:
51	}	51	}
52		52
53	macro square_width_save	53	macro square_width_save
54	{	54	{
55	local .next_color_save	55	local .next_color_save
56	local .vertical_width_save	56	local .vertical_width_save
57	local .horizontal_width_save	57	local .horizontal_width_save
58	mov ebx,[ReserveArray]	58	mov ebx,[ReserveArray]
59	mov [ebx],eax	59	mov [ebx],eax
60	mov ecx,eax	60	mov ecx,eax
61	add ebx,4	61	add ebx,4
62	xor ebp,ebp	62	xor ebp,ebp
63		63
64	.next_color_save:	64	.next_color_save:
65	;save color of pixel in ReserveArray	65	;save color of pixel in ReserveArray
66	push ecx	66	push ecx
67	mov [counter2],5	67	mov [counter2],5
68	mov edi,[ebx]	68	mov edi,[ebx]
69	.vertical_width_save:	69	.vertical_width_save:
70	mov [counter],5	70	mov [counter],5
71		71
72	.horizontal_width_save:	72	.horizontal_width_save:
73	mov eax,edi	73	mov eax,edi
74	mov edx,[eax]	74	mov edx,[eax]
75	;and edx,0xffffff	75	;and edx,0xffffff
76	mov [ebx+4807*4+ebp],dx	76	mov [ebx+4807*4+ebp],dx
77	shr edx,16	77	shr edx,16
78	mov [ebx+4807*4+2+ebp],dl	78	mov [ebx+4807*4+2+ebp],dl
79		79
80	add edi,3	80	add edi,3
81	add ebp,4	81	add ebp,4
82	dec [counter]	82	dec [counter]
83	jnz .horizontal_width_save	83	jnz .horizontal_width_save
84		84
85	mov ecx,[Picture_SizeX]	85	mov ecx,[Picture_SizeX]
86	sub ecx,5	86	sub ecx,5
87	lea ecx,[ecx+ecx*2]	87	lea ecx,[ecx+ecx*2]
88	add edi,ecx	88	add edi,ecx
89	dec [counter2]	89	dec [counter2]
90	jnz .vertical_width_save	90	jnz .vertical_width_save
91	pop ecx	91	pop ecx
92		92
93	add ebx,4	93	add ebx,4
94	dec ecx	94	dec ecx
95	jnz .next_color_save	95	jnz .next_color_save
96	}	96	}
-		97
-		98	macro draw_calc_pixels brush
-		99	{
-		100	local .next_pixel_put
-		101	local .vertical_width
-		102	local .horizontal_width
-		103	local .no_draw_pixel
-		104
-		105	mov ebx,[ReserveArray]
-		106	mov ecx,[ebx]
-		107	mov edx,[Color]
-		108	mov esi,[Color]
-		109	shr edx,16
-		110	add ebx,4
-		111	mov edi,[line_width]
-		112	dec edi
-		113	imul edi,25
-		114	add edi,brush
-		115	.next_pixel_put:
-		116
-		117	mov eax,[ebx]
-		118	push eax
-		119	push ecx
-		120	xor ebp,ebp
-		121	mov [counter2],5
-		122
-		123	.vertical_width:
-		124	mov [counter],5
-		125
-		126	.horizontal_width:
-		127	xor ecx,ecx
-		128	mov cl,byte[edi+ebp]
-		129	test cl,cl
-		130	jz .no_draw_pixel
-		131	mov [eax],si
-		132	mov [eax+2],dl
-		133	.no_draw_pixel:
-		134	add eax,3
-		135	inc ebp
-		136	dec [counter]
-		137	jnz .horizontal_width
-		138
-		139	mov ecx,[Picture_SizeX]
-		140	sub ecx,5
-		141	lea ecx,[ecx+ecx*2]
-		142	add eax,ecx
-		143	dec [counter2]
-		144	jnz .vertical_width
-		145
-		146	pop ecx
-		147	pop eax
-		148	add ebx,4
-		149	dec ecx
-		150	jnz .next_pixel_put
-		151	}
97		152
98	;-----------------------------------------------------------	153	;-----------------------------------------------------------
99	;-----instruments of panel(icon's instruments)--------------	154	;-----instruments of panel(icon's instruments)--------------
100	;-----------------------------------------------------------	155	;-----------------------------------------------------------
101	TakeButtonInstruments:	156	TakeButtonInstruments:
102		157
103	mov eax,[Current_instrument]	158	mov eax,[Current_instrument]
104		159
105	;***********************brush 1*********************	160	;***********************brush 1*********************
106	cmp eax,40	161	cmp eax,40
107	jne no_brush1	162	jne no_brush1
108		163
109	mov [Brush_SizeX],4	164	mov [Brush_SizeX],4
110	mov [Brush_SizeY],4	165	mov [Brush_SizeY],4
111	mov [Number_Brush],0	166	mov [Number_Brush],0
112	mov ebx,[Last_instrument]	167	mov ebx,[Last_instrument]
113	mov [Current_instrument],ebx	168	mov [Current_instrument],ebx
114		169
115	mov [line_width],1	170	mov [line_width],1
116		171
117	jmp still	172	jmp still
118	no_brush1:	173	no_brush1:
119		174
120	;***********************brush 2*********************	175	;***********************brush 2*********************
121	cmp eax,41	176	cmp eax,41
122	jne no_brush2	177	jne no_brush2
123		178
124	mov [Brush_SizeX],6	179	mov [Brush_SizeX],6
125	mov [Brush_SizeY],4	180	mov [Brush_SizeY],4
126	mov [Number_Brush],1	181	mov [Number_Brush],1
127	mov ebx,[Last_instrument]	182	mov ebx,[Last_instrument]
128	mov [Current_instrument],ebx	183	mov [Current_instrument],ebx
129		184
130	mov [line_width],2	185	mov [line_width],2
131		186
132	jmp still	187	jmp still
133	no_brush2:	188	no_brush2:
134		189
135	;***********************brush 3*********************	190	;***********************brush 3*********************
136	cmp eax,42	191	cmp eax,42
137	jne no_brush3	192	jne no_brush3
138		193
139	mov [Brush_SizeX],8	194	mov [Brush_SizeX],8
140	mov [Brush_SizeY],7	195	mov [Brush_SizeY],7
141	mov [Number_Brush],2	196	mov [Number_Brush],2
142	mov ebx,[Last_instrument]	197	mov ebx,[Last_instrument]
143	mov [Current_instrument],ebx	198	mov [Current_instrument],ebx
144		199
145	mov [line_width],3	200	mov [line_width],3
146		201
147	jmp still	202	jmp still
148	no_brush3:	203	no_brush3:
149		204
150	;***********************brush 4*********************	205	;***********************brush 4*********************
151	cmp eax,43	206	cmp eax,43
152	jne no_brush4	207	jne no_brush4
153		208
154	mov [Brush_SizeX],14	209	mov [Brush_SizeX],14
155	mov [Brush_SizeY],14	210	mov [Brush_SizeY],14
156	mov [Number_Brush],3	211	mov [Number_Brush],3
157	mov ebx,[Last_instrument]	212	mov ebx,[Last_instrument]
158	mov [Current_instrument],ebx	213	mov [Current_instrument],ebx
159		214
160	mov [line_width],4	215	mov [line_width],4
161		216
162	jmp still	217	jmp still
163	no_brush4:	218	no_brush4:
164		219
165	;***********************brush 5*********************	220	;***********************brush 5*********************
166	cmp eax,44	221	cmp eax,44
167	jne no_brush5	222	jne no_brush5
168		223
169	mov [Brush_SizeX],6	224	mov [Brush_SizeX],6
170	mov [Brush_SizeY],6	225	mov [Brush_SizeY],6
171	mov [Number_Brush],4	226	mov [Number_Brush],4
172	mov ebx,[Last_instrument]	227	mov ebx,[Last_instrument]
173	mov [Current_instrument],ebx	228	mov [Current_instrument],ebx
174		229
175	mov [line_width],5	230	mov [line_width],5
176		231
177	jmp still	232	jmp still
178	no_brush5:	233	no_brush5:
179		234
180	;***********************pensil**********************	235	;***********************pensil**********************
181	cmp eax,10	236	cmp eax,10
182	jne no_pensil	237	jne no_pensil
183		238
184	mov al,[exit_from_work_arrea]	239	mov al,[exit_from_work_arrea]
185		240
186	test al,al	241	test al,al
187	jz no_exit_from_work_arrea	242	jz no_exit_from_work_arrea
188		243
189	and [Activate_instrument],0	244	and [Activate_instrument],0
190	and [exit_from_work_arrea],0	245	and [exit_from_work_arrea],0
191		246
192	no_exit_from_work_arrea:	247	no_exit_from_work_arrea:
193		248
194	mov al,[Activate_instrument]	249	mov al,[Activate_instrument]
195		250
196	test al,al	251	test al,al
197	jnz no_activated_later	252	jnz no_activated_later
198		253
199	call GetScreenCordinats	254	call GetScreenCordinats
200	mov eax,[ScreenX]	255	mov eax,[ScreenX]
201	mov ebx,[ScreenY]	256	mov ebx,[ScreenY]
202	add eax,[PosX]	257	add eax,[PosX]
203	add ebx,[PosY]	258	add ebx,[PosY]
204	mov [OldX],eax	259	mov [OldX],eax
205	mov [OldY],ebx	260	mov [OldY],ebx
206		261
207	no_activated_later:	262	no_activated_later:
208		263
209	; mov eax,[MaxWorkScreen_SizeX] ???	264	; mov eax,[MaxWorkScreen_SizeX] ???
210	; mov ebx,[MaxWorkScreen_SizeY] ???	265	; mov ebx,[MaxWorkScreen_SizeY] ???
211		266
212	mov eax,[PointerToPicture]	267	mov eax,[PointerToPicture]
213	mov ebx,[ReserveArray]	268	mov ebx,[ReserveArray]
214	mov ecx,[Picture_SizeX]	269	mov ecx,[Picture_SizeX]
215	mov edx,[OldX]	270	mov edx,[OldX]
216	shl edx,16	271	shl edx,16
217	add edx,[OldY]	272	add edx,[OldY]
218	mov esi,[ScreenX]	273	mov esi,[ScreenX]
219	mov edi,[ScreenY]	274	mov edi,[ScreenY]
220	add esi,[PosX]	275	add esi,[PosX]
221	add edi,[PosY]	276	add edi,[PosY]
222	call calculate_line	277	call calculate_line
223		278
224	mov ecx,eax	279	mov ecx,eax
225	mov edx,[Color]	280	mov edx,[Color]
226	mov esi,[Color]	281	mov esi,[Color]
227	shr edx,16	282	shr edx,16
228	xor ebx,ebx	283	xor ebx,ebx
229	mov eax,[ReserveArray]	284	mov eax,[ReserveArray]
230		285
231	pensil_next_pixel_draw:	286	pensil_next_pixel_draw:
232		287
233	mov ebx,[eax]	288	mov ebx,[eax]
234	mov [ebx],si	289	mov [ebx],si
235	mov [ebx+2],dl	290	mov [ebx+2],dl
236	add eax,4	291	add eax,4
237		292
238	dec ecx	293	dec ecx
239	jnz pensil_next_pixel_draw	294	jnz pensil_next_pixel_draw
240		295
241	mov eax,[ScreenX]	296	mov eax,[ScreenX]
242	mov ebx,[ScreenY]	297	mov ebx,[ScreenY]
243	add eax,[PosX]	298	add eax,[PosX]
244	add ebx,[PosY]	299	add ebx,[PosY]
245	mov [OldX],eax	300	mov [OldX],eax
246	mov [OldY],ebx	301	mov [OldY],ebx
247		302
248	call MovePictureToWorkScreen	303	call MovePictureToWorkScreen
249	mov [Activate_instrument],1	304	mov [Activate_instrument],1
250	jmp still	305	jmp still
251	no_pensil:	306	no_pensil:
252		307
253	;***********************pipetka*********************	308	;***********************pipetka*********************
254	cmp eax,15	309	cmp eax,15
255	jne no_pipetka	310	jne no_pipetka
256		311
257	mov eax,[ScreenY]	312	mov eax,[ScreenY]
258	mov ebx,[Picture_SizeX]	313	mov ebx,[Picture_SizeX]
259	add eax,[PosY]	314	add eax,[PosY]
260	imul eax,ebx	315	imul eax,ebx
261	add eax,[ScreenX]	316	add eax,[ScreenX]
262	add eax,[PosX]	317	add eax,[PosX]
263	lea eax,[eax+eax*2]	318	lea eax,[eax+eax*2]
264	add eax,[PointerToPicture]	319	add eax,[PointerToPicture]
265	mov ebx,[eax]	320	mov ebx,[eax]
266	and ebx,0xffffff	321	and ebx,0xffffff
267	mov [Color],ebx	322	mov [Color],ebx
268		323
269	mcall SF_DRAW_RECT, 13665536+20, 6565536+21, [Color]	324	mcall SF_DRAW_RECT, 13665536+20, 6565536+21, [Color]
270		325
271	jmp still	326	jmp still
272	no_pipetka:	327	no_pipetka:
273		328
274	;***********************draw brush******************	329	;***********************draw brush******************
275	cmp eax,11	330	cmp eax,11
276	jne no_brush	331	jne no_brush
277		332
278	mov [Last_instrument],eax	333	mov [Last_instrument],eax
279		334
280	jmp no_lastik_	335	jmp no_lastik_
281		336
282	lastik_in:	337	lastik_in:
283	mov eax,[Color]	338	mov eax,[Color]
284	mov [SColor],eax	339	mov [SColor],eax
285	mov [Color],0xffffff	340	mov [Color],0xffffff
286	no_lastik_:	341	no_lastik_:
287		342
288	mov eax,[ScreenX]	343	mov eax,[ScreenX]
289	mov ebx,[ScreenY]	344	mov ebx,[ScreenY]
290	mov ecx,[Brush_SizeX]	345	mov ecx,[Brush_SizeX]
291	mov edx,[Brush_SizeY]	346	mov edx,[Brush_SizeY]
292	add eax,[PosX]	347	add eax,[PosX]
293	add ebx,[PosY]	348	add ebx,[PosY]
294	add eax,ecx	349	add eax,ecx
295	add ebx,edx	350	add ebx,edx
296		351
297	cmp eax,[Picture_SizeX]	352	cmp eax,[Picture_SizeX]
298	jl no_max_pos_x	353	jl no_max_pos_x
299	mov eax,[Picture_SizeX]	354	mov eax,[Picture_SizeX]
300	no_max_pos_x:	355	no_max_pos_x:
301		356
302	cmp ebx,[Picture_SizeY]	357	cmp ebx,[Picture_SizeY]
303	jl no_max_pos_y	358	jl no_max_pos_y
304	mov ebx,[Picture_SizeY]	359	mov ebx,[Picture_SizeY]
305	no_max_pos_y:	360	no_max_pos_y:
306		361
307	cmp eax,ecx	362	cmp eax,ecx
308	ja no_min_pos_x	363	ja no_min_pos_x
309	mov eax,[Brush_SizeX]	364	mov eax,[Brush_SizeX]
310	no_min_pos_x:	365	no_min_pos_x:
311		366
312	cmp ebx,edx	367	cmp ebx,edx
313	ja no_min_pos_y	368	ja no_min_pos_y
314	mov ebx,[Brush_SizeY]	369	mov ebx,[Brush_SizeY]
315	no_min_pos_y:	370	no_min_pos_y:
316		371
317	sub eax,[Brush_SizeX]	372	sub eax,[Brush_SizeX]
318	sub ebx,[Brush_SizeY]	373	sub ebx,[Brush_SizeY]
319		374
320	mov [x],eax	375	mov [x],eax
321	mov [y],ebx	376	mov [y],ebx
322		377
323	mov al,[exit_from_work_arrea]	378	mov al,[exit_from_work_arrea]
324	test al,al	379	test al,al
325	jz no_exit_from_work_arrea_brush	380	jz no_exit_from_work_arrea_brush
326	and [Activate_instrument],0	381	and [Activate_instrument],0
327	and [exit_from_work_arrea],0	382	and [exit_from_work_arrea],0
328	no_exit_from_work_arrea_brush:	383	no_exit_from_work_arrea_brush:
329		384
330	mov al,[Activate_instrument]	385	mov al,[Activate_instrument]
331	test al,al	386	test al,al
332	jnz no_new_brush_xy	387	jnz no_new_brush_xy
333	mov eax,[x]	388	mov eax,[x]
334	mov ebx,[y]	389	mov ebx,[y]
335	mov [OldX],eax	390	mov [OldX],eax
336	mov [OldY],ebx	391	mov [OldY],ebx
337	mov [Activate_instrument],1	392	mov [Activate_instrument],1
338	no_new_brush_xy:	393	no_new_brush_xy:
339		394
340	mov eax,[PointerToPicture]	395	mov eax,[PointerToPicture]
341	mov ebx,[ReserveArray]	396	mov ebx,[ReserveArray]
342	add ebx,4	397	add ebx,4
343	mov ecx,[Picture_SizeX]	398	mov ecx,[Picture_SizeX]
344	mov edx,[OldX]	399	mov edx,[OldX]
345	shl edx,16	400	shl edx,16
346	add edx,[OldY]	401	add edx,[OldY]
347	mov esi,[x]	402	mov esi,[x]
348	mov edi,[y]	403	mov edi,[y]
349		404
350	call calculate_line	405	call calculate_line
351		406
352	mov ebx,[ReserveArray]	407	mov ebx,[ReserveArray]
353	mov [ebx],eax	408	mov [ebx],eax
354		409
355	;procedure drawing of brush	410	;procedure drawing of brush
356	mov ebx,[ReserveArray]	411	mov ebx,[ReserveArray]
357	mov ecx,[ebx]	412	mov ecx,[ebx]
358	mov edx,[Color]	413	mov edx,[Color]
359	mov esi,[Color]	414	mov esi,[Color]
360	shr edx,16	415	shr edx,16
361	add ebx,4	416	add ebx,4
362	mov edi,[Number_Brush]	417	mov edi,[Number_Brush]
363	imul edi,20*20	418	imul edi,20*20
364		419
365	next_pixel_put_brush:	420	next_pixel_put_brush:
366		421
367	mov eax,[ebx]	422	mov eax,[ebx]
368	push eax	423	push eax
369	push ecx	424	push ecx
370	xor ebp,ebp	425	xor ebp,ebp
371	and [counter2],0	426	and [counter2],0
372		427
373	vertical_width_brush:	428	vertical_width_brush:
374	and [counter],0	429	and [counter],0
375		430
376	horizontal_width_brush:	431	horizontal_width_brush:
377	xor ecx,ecx	432	xor ecx,ecx
378	mov cl,byte[Brush_color+edi+ebp]	433	mov cl,byte[Brush_color+edi+ebp]
379	test cl,cl	434	test cl,cl
380	jz no_draw_pixel_brush	435	jz no_draw_pixel_brush
381	mov [eax],si	436	mov [eax],si
382	mov [eax+2],dl	437	mov [eax+2],dl
383	no_draw_pixel_brush:	438	no_draw_pixel_brush:
384	add eax,3	439	add eax,3
385	inc ebp	440	inc ebp
386	inc [counter]	441	inc [counter]
387	cmp [counter],20	442	cmp [counter],20
388	jne horizontal_width_brush	443	jne horizontal_width_brush
389		444
390	mov ecx,[Picture_SizeX]	445	mov ecx,[Picture_SizeX]
391	sub ecx,20	446	sub ecx,20
392	lea ecx,[ecx+ecx*2]	447	lea ecx,[ecx+ecx*2]
393	add eax,ecx	448	add eax,ecx
394	inc [counter2]	449	inc [counter2]
395	cmp [counter2],20	450	cmp [counter2],20
396	jne vertical_width_brush	451	jne vertical_width_brush
397		452
398	pop ecx	453	pop ecx
399	pop eax	454	pop eax
400	add ebx,4	455	add ebx,4
401	dec ecx	456	dec ecx
402	jnz next_pixel_put_brush	457	jnz next_pixel_put_brush
403		458
404	mov eax,[x]	459	mov eax,[x]
405	mov ebx,[y]	460	mov ebx,[y]
406	mov [OldX],eax	461	mov [OldX],eax
407	mov [OldY],ebx	462	mov [OldY],ebx
408		463
409	mov al,[lastik_is_active]	464	mov al,[lastik_is_active]
410	test al,al	465	test al,al
411	jz no_lastik_active	466	jz no_lastik_active
412		467
413	mov eax,[SColor]	468	mov eax,[SColor]
414	mov [Color],eax	469	mov [Color],eax
415	and [lastik_is_active],0	470	and [lastik_is_active],0
416	no_lastik_active:	471	no_lastik_active:
417		472
418	call MovePictureToWorkScreen	473	call MovePictureToWorkScreen
419	mov eax,[Current_instrument]	474	mov eax,[Current_instrument]
420	mov [Last_instrument],eax	475	mov [Last_instrument],eax
421		476
422	jmp still	477	jmp still
423	no_brush:	478	no_brush:
424		479
425	;**********************Flood Fill*******************	480	;**********************Flood Fill*******************
426	cmp eax,14	481	cmp eax,14
427	jne no_FloodFill	482	jne no_FloodFill
428		483
429	mov eax,[PointerToPicture]	484	mov eax,[PointerToPicture]
430	mov ebx,[PointerToEditBufer]	485	mov ebx,[PointerToEditBufer]
431		486
432	mov ecx,[Picture_SizeX]	487	mov ecx,[Picture_SizeX]
433	imul ecx,[Picture_SizeY]	488	imul ecx,[Picture_SizeY]
434	lea ecx,[ecx+ecx*2]	489	lea ecx,[ecx+ecx*2]
435	shl ecx,1	490	shl ecx,1
436		491
437	cmp ecx,mem_flood_f	492	cmp ecx,mem_flood_f
438	ja normal_size_of_bufer	493	ja normal_size_of_bufer
439		494
440	mov ebx,[ReserveArray]	495	mov ebx,[ReserveArray]
441		496
442	normal_size_of_bufer:	497	normal_size_of_bufer:
443		498
444	add ebx,4	499	add ebx,4
445	mov ecx,[Picture_SizeX]	500	mov ecx,[Picture_SizeX]

Subversion Repositories Kolibri OS

(root)/programs/media/animage/trunk/icons_instruments.inc – Rev 6354 → 6355