Subversion Repositories Kolibri OS

      mov ebx,[Line.x1]

      mov ecx,[Line.y1]

      mov edx,[Line.color]

      shl ebx,16

      shl ecx,16

      add ebx,[Line.x2]

      add ecx,[Line.y2]

      mcall

      inc al

      mov ebx,[Pixel.x]

      mov ecx,[Pixel.y]

      mov edx,[Pixel.color]

      mcall

      mov ebx,[Rectangle.x]

      mov ecx,[Rectangle.y]

      mov edx,[Rectangle.color]

      mov esi,ebx

      mov edi,ecx

      shl ebx,16

      shl ecx,16

      add ebx,esi

      add ecx,edi

      add ebx,[Rectangle.width]

      mcall

      mov ebx,[Rectangle.x]

      mov ecx,[Rectangle.y]

      mov edx,[Rectangle.color]

      add ecx,[Rectangle.height]

      mov esi,ebx

      mov edi,ecx

      shl ebx,16

      shl ecx,16

      add ebx,esi

      add ecx,edi

      add ebx,[Rectangle.width]

      mcall

      mov ebx,[Rectangle.x]

      mov ecx,[Rectangle.y]

      mov edx,[Rectangle.color]

      mov esi,ebx

      mov edi,ecx

      shl ebx,16

      shl ecx,16

      add ebx,esi

      add ecx,edi

      add ecx,[Rectangle.height]

      mcall

      mov ebx,[Rectangle.x]

      mov ecx,[Rectangle.y]

      mov edx,[Rectangle.color]

      add ebx,[Rectangle.width]

      mov esi,ebx

      mov edi,ecx

      shl ebx,16

      shl ecx,16

      add ebx,esi

      add ecx,edi

      add ecx,[Rectangle.height]

      mcall

;ebx- second color

;OUT

;eax - averege color

calculate_average_color:

      and ebx,0xffffff

      mov [b_max],bl

      shr eax,8

      shr ebx,8

      mov [g_min],al

      mov [g_max],bl

      shr eax,8

      shr ebx,8

      mov [r_min],al

      mov [r_max],bl

      xor ebx,ebx

      mov al,[r_max]

      mov bl,[r_min]

      add eax,ebx

      shr eax,1

      mov [r],al

      xor ebx,ebx

      mov al,[g_max]

      mov bl,[g_min]

      add eax,ebx

      shr eax,1

      mov [g],al

      xor ebx,ebx

      mov al,[b_max]

      mov bl,[b_min]

      add eax,ebx

      shr eax,1

      mov [b],al

      mov al,[r]

      shl eax,8

      mov al,[g]

      shl eax,8

      mov al,[b]

;ebx- sub value

;OUT

;eax - sabved color

calculate_sabved_color:

      shr eax,8

      mov [g],al

      shr eax,8

      mov [r],al

      sub [g],bl

      sub [b],bl

      mov al,[r]

      shl eax,8

      mov al,[g]

      shl eax,8

      mov al,[b]

      call GetLengthString

      mov esi,eax

      mov ebx,[Font.x]

      shl ebx,16

      add ebx,[Font.y]

      mov ecx,[Button.textcolor]

      mov edx,[Button.text]

      mcall

;ebx- second color

;ecx- x coordinat of rectangle

;edx- y coordinat of rectangle

;esi- rectangle size x

;edi- rectangle size y

      mov [line_coordinat_y],edx

      mov [line_size_x],esi

      mov [line_size_y],edi

      mov edx,dword pointer

      call gradient

      shl ecx,16

      add ecx,[line_coordinat_y]

      add ecx,[line_size_y]

      add [line_coordinat_x],eax

      mov edi,[line_size_x]

	mov ebx,[line_coordinat_x]

	shl ebx,16

	add ebx,[line_coordinat_x]

	mov edx,[esi]

	and edx,0xffffff

	mcall

	sub [line_coordinat_x],1

      jnz  next_vertical_line_draw_right

;ebx- second color

;ecx- x coordinat of rectangle

;edx- y coordinat of rectangle

;esi- rectangle size x

;edi- rectangle size y

      mov [line_coordinat_y],edx

      mov [line_size_x],esi

      mov [line_size_y],edi

      mov edx,dword pointer

      call gradient

      shl ecx,16

      add ecx,[line_coordinat_y]

      add ecx,[line_size_y]

      mov edi,[line_size_x]

	mov ebx,[line_coordinat_x]

	shl ebx,16

	add ebx,[line_coordinat_x]

	mov edx,[esi]

	and edx,0xffffff

	mcall

	add [line_coordinat_x],1

      jnz  next_vertical_line_draw_left

;ebx- second color

;ecx- x coordinat of rectangle

;edx- y coordinat of rectangle

;esi- rectangle size x

;edi- rectangle size y

      mov [line_coordinat_y],edx

      mov [line_size_x],esi

      mov [line_size_y],edi

      mov edx,dword pointer

      call gradient

      shl ebx,16

      add ebx,[line_coordinat_x]

      add ebx,[line_size_x]

      add [line_coordinat_y],eax

      mov edi,[line_size_y]

	mov ecx,[line_coordinat_y]

	shl ecx,16

	add ecx,[line_coordinat_y]

	mov edx,[esi]

	and edx,0xffffff

	mcall

	sub [line_coordinat_y],1

      jnz  next_horizontal_line_draw_up

;ebx- second color

;ecx- x coordinat of rectangle

;edx- y coordinat of rectangle

;esi- rectangle size x

;edi- rectangle size y

      mov [line_coordinat_y],edx

      mov [line_size_x],esi

      mov [line_size_y],edi

      mov edx,dword pointer

      call gradient

      shl ebx,16

      add ebx,[line_coordinat_x]

      add ebx,[line_size_x]

      mov edi,[line_size_y]

	mov ecx,[line_coordinat_y]

	shl ecx,16

	add ecx,[line_coordinat_y]

	mov edx,[esi]

	and edx,0xffffff

	mcall

	add [line_coordinat_y],1

      jnz  next_horizontal_line_draw_down

;ebx- second color

;ecx- length of line

;edx- pointer to memory for colors of gradient

      and eax,0xffffff

      mov [b_max],bl

      shr eax,8

      shr ebx,8

      mov [g_min],al

      mov [g_max],bl

      shr eax,8

      shr ebx,8

      mov [r_min],al

      mov [r_max],bl

      dec eax

      mov [v],eax

      fild [v]

      mov al,[r_max]

      sub al,[r_min]

      mov [v],eax

      fild [v]

      fdiv st0,st1

      fstp [step_r]

      mov al,[g_max]

      sub al,[g_min]

      mov [v],eax

      fild [v]

      fdiv st0,st1

      fstp [step_g]

      mov al,[b_max]

      sub al,[b_min]

      mov [v],eax

      fild [v]

      fdiv st0,st1

      fstp [step_b]

      mov al,[r_min]

      mov [r],al

      mov [v],eax

      fild [v]

      fstp [r_f]

      mov al,[g_min]

      mov [g],al

      mov [v],eax

      fild [v]

      fstp [g_f]

      mov al,[b_min]

      mov [b],al

      mov [v],eax

      fild [v]

      fstp [b_f]

	xor eax,eax

	mov al,[r]

	mov bl,al

	shl eax,8

	mov al,[g]

	shl eax,8

	mov al,[b]

	mov [edx+2],bl

	fld [r_f]

	fadd st0,st1

	fst [r_f]

	fistp [v]

	xor eax,eax

	mov eax,[v]

	mov [r],al

	fstp [v]

	fld [g_f]

	fadd st0,st1

	fst [g_f]

	fistp [v]

	xor eax,eax

	mov eax,[v]

	mov [g],al

	fstp [v]

	fld [b_f]

	fadd st0,st1

	fst [b_f]

	fistp [v]

	xor eax,eax

	mov eax,[v]

	mov [b],al

	fstp [v]

      jnz  next_gradient_color_save

;NON

;OUT

;variable [skin_height]

      mov ebx,4

      int 0x40

      popad

;eax - x

;ebx - y

;ecx - size x

;edx - size y

;esi - pointer to memory for rectangle

SaveFonForRectangle:

     mov [Rectangle.y],ebx

     mov [Rectangle.width],ecx

     mov [Rectangle.height],edx

     mov [PointerToMem],esi

     mov eax,61

     mov ebx,2

     mcall

     mov [BitsPerPixel],eax

     mov ebx,3

     mcall

     mov [BytesPerString],eax

     mov eax,9

     mov ebx,dword IPC_table

     or ecx,-1

     mcall

     mov ebx,dword[IPC_table+38]

     ;mov ecx,dword[IPC_table+42]

     ;mov edx,dword[IPC_table+46]

     ;mov [WindowCoordinatX],eax

     ;mov [WindowCoordinatY],ebx

     ;mov [WindowSizeX],ecx

     ;mov [WindowSizeY],edx

     add ebx,[Rectangle.y]

     mov esi,[Rectangle.width]

     jne no_24

     lea esi,[esi+esi*2]

     mov edi,3

     jmp exit_bits_per_pixel

     no_24:

     shl esi,2

     mov edi,4

     exit_bits_per_pixel:

     sub ebx,esi

     mov [offset],ebx

     mov edx,[Rectangle.height]

     next_string_pixels_save:

       next_pixel_save:

	 and ebx,0xffffff

	 mov [esi],bx

	 shr ebx,16

	 mov [esi+2],bl

	 add eax,edi

       dec ecx

       jnz next_pixel_save

     dec edx

     jnz next_string_pixels_save

     ret