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+mem_offs_shape+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+mem_offs_shape+ebp],dx
			shr edx,16
			mov [ebx+mem_offs_shape+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)--------------
;-----------------------------------------------------------
;input:
; [Current_instrument] - instrument code
;
; *** instrument codes ***
;10 - pensil
;11 - draw brush
;12 - spray
;13 - lastik
;14 - flood fill
;15 - pipetka
;16 - draw line
;17 - draw rectangle
;18 - draw circle
;19 - draw ellips
;20 - draw hard contour
;21 - allocation of a countour
;23 - reflection from left to right
;24 - reflection from up to down
;40 - brush 1
;41 - brush 2
;42 - brush 3
;43 - brush 4
;44 - brush 5
;45 - zoom 1
;46 - zoom 2
;47 - zoom 3
;48 - zoom 4
;49 - zoom 8
;50 - zoom 16
;51 - palette
 
align 4
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
	ret
	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
	ret
	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
	ret
	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
	ret
	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
	ret
	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,[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
	ret
	no_pensil:
 
	;*************************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
 
	ret
	no_brush:
 
	;*************************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, ((ci_panel_x_pos+130) shl 16)+21,\
		((ci_panel_y_pos+28) shl 16)+21, [Color]
 
	ret
	no_pipetka:
 
	;************************lastik*************************
	cmp eax,13
	jne no_lastik
 
	mov [Last_instrument],eax
	mov [lastik_is_active],1
	jmp lastik_in
	no_lastik:
 
	;************************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
	ret
	no_FloodFill:
 
	;************************spray**************************
	cmp eax,12
	jne no_spray
 
	cmp [Activate_instrument],0
	jne no_null_spray
	mov [Activate_instrument],1
	ret
	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
	ret
	no_spray:
 
	;************************palette************************
	cmp eax,51
	jne no_palette
 
	mov eax,20
	mov ebx,ci_palete_y_pos
	mov ecx,32*10+32*5+7
	mov edx,140
	mov  esi,1
	call draw_volume_rectangle
	mov [x],20+5
	mov [y],ci_palete_y_pos+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:
	mcall SF_WAIT_EVENT
 
	cmp eax,1
	jne @f
		ret
	@@:
	cmp eax,2
	jne no_keys
		mcall SF_GET_KEY
		jmp wait_events
	no_keys:
	cmp eax,3
	jne no_buttons
		mcall SF_GET_BUTTON
		jmp wait_events
	no_buttons:
	cmp eax,6
	jne wait_events
 
	call GetMouseClick
 
	test eax,eax
	jz wait_events
	call GetMouseCoordinats
	mov [x],20+5
	mov [y],ci_palete_y_pos+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
	ret
	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]
	cld
	rep stosd
	ret
	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
	ret
	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]
	cld
	rep stosd
	ret
	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
	ret
	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]
	cld
	rep stosd
	ret
	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
	ret
	no_circle:
 
	;************************zoom 1*************************
	cmp eax,45
	jne no_1_
	mov [k],1
	call scrollbar_move_00
	and [Current_instrument],0 ;???
	call drawwin
	ret
	no_1_:
 
	;************************zoom 2*************************
	cmp eax,46
	jne no_2_
	mov [k],2
	call drawwin
	call scrollbar_move_00
	and [Current_instrument],0
	ret
	no_2_:
 
	;************************zoom 3*************************
	cmp eax,47
	jne no_3_
	mov [k],3
	call drawwin
	call scrollbar_move_00
	and [Current_instrument],0
	ret
	no_3_:
 
	;************************zoom 4*************************
	cmp eax,48
	jne no_4_
	mov [k],4
	call drawwin
	call scrollbar_move_00
	and [Current_instrument],0
	ret
	no_4_:
 
	;************************zoom 8*************************
	cmp eax,49
	jne no_8_
	mov [k],8
	call drawwin
	call scrollbar_move_00
	and [Current_instrument],0
	ret
	no_8_:
 
	;************************zoom 16************************
	cmp eax,50
	jne no_16_
	mov [k],16
	call drawwin
	call scrollbar_move_00
	and [Current_instrument],0
	ret
	no_16_:
 
	;***************allocation of a countour****************
	cmp eax,21
	jne no_allocation
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	mov [Activate_instrument],1
 
	call GetScreenCordinats
 
	bt [MouseBut],8 ;left button down
	jnc .left_but_down
		cmp [crossing],2
		jne @f
			;move old selection
			mov eax,[crossing_old_x]
			mov ebx,[crossing_old_y]
			mov ecx,[ScreenX]
 
 
			mov edx,[ScreenY]
			add ecx,[PosX]
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
			add edx,[PosY]
			mov esi,[rectangular_shade_x]
			mov edi,[rectangular_shade_y]
			sub esi,eax
			sub edi,ebx
 
 
			call columnus
 
 
 
 
 
 
			test eax,eax
 
 
 
 
 
 
			jz @f
 
 
 
 
 
 
 
 
				mov [crossing],3
 
 
 
 
				mov [OldX],ecx
 
 
 
 
 
 
 
				mov [OldY],edx
				jmp selection_update
		@@:
		;start new selection
		mov eax,[ScreenX]
		add eax,[PosX]
		mov [crossing_old_x],eax
		mov [rectangular_shade_x],eax
		mov eax,[ScreenY]
		add eax,[PosY]
		mov [crossing_old_y],eax
		mov [rectangular_shade_y],eax
		mov [crossing],1
		jmp selection_update
	.left_but_down:
 
	bt [MouseBut],0 ;left button press
	jnc .no_mouse_move
		cmp [crossing],3
		jne .no_sel_move
			;move selection
			mov eax,[ScreenX]
			add eax,[PosX]
			sub eax,[OldX]
			add [OldX],eax
			mov ebx,[crossing_old_x]
			add ebx,eax
			cmp ebx,0
			jge @f
				;exit from left border
				sub eax,ebx 
			@@:
			add [crossing_old_x],eax
			add [rectangular_shade_x],eax
			mov eax,[ScreenY]
			add eax,[PosY]
			sub eax,[OldY]
			add [OldY],eax
			mov ebx,[crossing_old_y]
			add ebx,eax
			cmp ebx,0
			jge @f
				;exit from top border
				sub eax,ebx 
			@@:
			add [crossing_old_y],eax
			add [rectangular_shade_y],eax
			jmp selection_update
		.no_sel_move:
		;resize selection
		mov eax,[ScreenX]
		add eax,[PosX]
		mov [rectangular_shade_x],eax
		mov eax,[ScreenY]
		add eax,[PosY]
		mov [rectangular_shade_y],eax
		jmp selection_update
	.no_mouse_move:
 
	bt [MouseBut],16 ;left button up
	jnc .left_but_up
		;finish selection
		mov eax,[crossing_old_x]
		mov ebx,[rectangular_shade_x]
		cmp eax,ebx
		jle @f
 
			mov [crossing_old_x],ebx
			mov [rectangular_shade_x],eax
		@@:
		mov eax,[crossing_old_y]
		mov ebx,[rectangular_shade_y]
		cmp eax,ebx
		jle @f
			mov [crossing_old_y],ebx
			mov [rectangular_shade_y],eax
 
		@@:
		mov [crossing],2
		ret
	.left_but_up:
 
	bt [MouseBut],9 ;right button down
	jnc .right_but_down
		;delete select
		mov [crossing],0
		jmp selection_update
	.right_but_down:
 
if 0
	cmp [Paste_flag],1
	je @f
		call PutFonForSprite
	@@:
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	cmp [DrawSprite_flag],1
	jne @f
 
 
 
 
 
 
		call SaveFonForSprite
 
 
 
 
 
		call DrawSprite
	@@:
end if
 
 
 
 
 
 
 
 
 
 
 
 
 
	selection_update:
	call MovePictureToWorkScreen
	ret
	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
	ret
	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
	ret
	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
	ret
	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]
	cld
	rep stosd
	ret
	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
	;ret
	no_ellips:
 
	ret

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

Subversion Repositories Kolibri OS

(root)/programs/media/animage/trunk/icons_instruments.inc – Rev 6379 → 6385