Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 255 → Rev 1643

/programs/media/animage/trunk/palette.inc
2,7 → 2,6
;-------analizing picture to palette------------------------
;-----------------------------------------------------------
analizing_picture_to_palette:
 
mov eax,[Picture_SizeX]
mov ebx,[Picture_SizeY]
imul eax,ebx
19,14 → 18,15
analizing_to_palette:
mov eax,[edx]
and eax,0xffffff
 
mov edi,esi
mov ebp,[PointerToPalette]
 
next_color_in_palette:
mov ebx,[ebp]
and ebx,0xffffff
cmp ebx,eax ;this is color have in palette
je exit_loop_palette
 
add ebp,4
dec edi
jnz next_color_in_palette
34,6 → 34,7
inc esi
cmp esi,256 ;256 colors
ja more_than_256_colors
 
mov ebp,[PointerToPalette]
mov ebx,esi
dec ebx
44,13 → 45,10
mov [ebp+2],al
 
exit_loop_palette:
 
add edx,3
dec ecx
jnz analizing_to_palette
 
 
more_than_256_colors:
mov eax,esi
 
ret