First upload of the code.
git-svn-id: svn://pulkomandy.tk/GrafX2/trunk@2 416bcca6-2ee7-4201-b75f-2eb2f807beb1
This commit is contained in:
Adrien Destugues
246
mcpourp2.asm
Normal file
246
mcpourp2.asm
Normal file
@@ -0,0 +1,246 @@
|
||||
; -- Calcul de la meilleure couleur s'approchant d'une teinte particuliŠre --
|
||||
Meilleure_couleur proc near
|
||||
|
||||
push ebp
|
||||
mov ebp,esp
|
||||
|
||||
arg Rouge:byte,Vert:byte,Bleu:byte
|
||||
|
||||
push ebx
|
||||
push esi
|
||||
push edi
|
||||
|
||||
|
||||
; On place dans ESI l'adresse de la palette
|
||||
mov esi,offset Principal_Palette
|
||||
|
||||
; On place l'indice de la couleur au d‚but de la table d'exclusion de coul.
|
||||
mov MC_Indice,offset Exclude_color
|
||||
|
||||
; EDI servira … stocker la meilleure diff‚rence
|
||||
mov edi,07FFFFFFFh
|
||||
|
||||
; On se sert de CL pour compter la couleur en cours
|
||||
; (et CH servira … stocker la meilleure couleur)
|
||||
xor cx,cx
|
||||
|
||||
Meilleure_couleur_Pour_chaque_couleur:
|
||||
|
||||
mov ebx,MC_Indice
|
||||
cmp byte ptr [ebx],0
|
||||
jnz Meilleure_couleur_Pas_mieux
|
||||
|
||||
; On calcule la diff‚rence:
|
||||
|
||||
; On s'occupe de la composante Rouge
|
||||
xor ebx,ebx
|
||||
xor eax,eax
|
||||
mov bl,[esi]
|
||||
mov al,Rouge
|
||||
sub eax,ebx
|
||||
imul eax
|
||||
mov MC_DR,eax
|
||||
|
||||
; On s'occupe de la composante Verte
|
||||
xor ebx,ebx
|
||||
xor eax,eax
|
||||
mov bl,[esi+1]
|
||||
mov al,Vert
|
||||
sub eax,ebx
|
||||
imul eax
|
||||
mov MC_DV,eax
|
||||
|
||||
; On s'occupe de la composante Bleue
|
||||
xor ebx,ebx
|
||||
xor eax,eax
|
||||
mov bl,[esi+2]
|
||||
mov al,Bleu
|
||||
sub eax,ebx
|
||||
imul eax
|
||||
mov MC_DB,eax
|
||||
|
||||
; On totalise la "distance" dans EBX
|
||||
mov eax,30
|
||||
mul MC_DR
|
||||
mov ebx,eax
|
||||
|
||||
mov eax,59
|
||||
mul MC_DV
|
||||
add ebx,eax
|
||||
|
||||
mov eax,11
|
||||
mul MC_DB
|
||||
add ebx,eax
|
||||
jz Meilleure_couleur_Correspond_impeccablement
|
||||
|
||||
cmp ebx,edi
|
||||
jae Meilleure_couleur_Pas_mieux
|
||||
|
||||
; L…, on sait que CL contient une meilleure couleur que CH
|
||||
|
||||
mov ch,cl ; On commence par mettre CH … CL
|
||||
mov edi,ebx ; Ensuite, on peut mettre DI (meilleure diff‚rence) … jour
|
||||
|
||||
Meilleure_couleur_Pas_mieux:
|
||||
|
||||
inc MC_Indice
|
||||
add esi,3
|
||||
|
||||
inc cl
|
||||
jnz Meilleure_couleur_Pour_chaque_couleur
|
||||
|
||||
; Ici, on sait que CH contient d‚j… la meilleure couleur. On va donc faire
|
||||
; une sortie rapide (c'est pas bien, mais ‡a fait gagner 3 cycles)
|
||||
|
||||
mov al,ch
|
||||
|
||||
pop edi
|
||||
pop esi
|
||||
pop ebx
|
||||
|
||||
mov esp,ebp
|
||||
pop ebp
|
||||
|
||||
ret
|
||||
|
||||
Meilleure_couleur_Correspond_impeccablement:
|
||||
|
||||
; Ici, on sait que CL contient la couleur qui correspond exactement aux
|
||||
; exigences de l'appelant
|
||||
|
||||
mov al,cl
|
||||
|
||||
|
||||
pop edi
|
||||
pop esi
|
||||
pop ebx
|
||||
|
||||
mov esp,ebp
|
||||
pop ebp
|
||||
|
||||
ret
|
||||
|
||||
Meilleure_couleur endp
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
; -- Calcul de la meilleure couleur s'approchant d'une teinte particuliŠre --
|
||||
; -- et ceci SANS exclure certaines couleurs coch‚es par l'utilisateur --
|
||||
|
||||
Meilleure_couleur_sans_exclusion proc near
|
||||
|
||||
push ebp
|
||||
mov ebp,esp
|
||||
|
||||
arg Rouge:byte,Vert:byte,Bleu:byte
|
||||
|
||||
push ebx
|
||||
push esi
|
||||
push edi
|
||||
|
||||
|
||||
; On place dans ESI l'adresse de la palette
|
||||
mov esi,offset Principal_Palette
|
||||
|
||||
; EDI servira … stocker la meilleure diff‚rence
|
||||
mov edi,07FFFFFFFh
|
||||
|
||||
; On se sert de CL pour compter la couleur en cours
|
||||
; (et CH servira … stocker la meilleure couleur)
|
||||
xor cx,cx
|
||||
|
||||
MCSE_Pour_chaque_couleur:
|
||||
|
||||
; On calcule la diff‚rence:
|
||||
|
||||
; On s'occupe de la composante Rouge
|
||||
xor ebx,ebx
|
||||
xor eax,eax
|
||||
mov bl,[esi]
|
||||
mov al,Rouge
|
||||
sub eax,ebx
|
||||
imul eax
|
||||
mov MC_DR,eax
|
||||
|
||||
; On s'occupe de la composante Verte
|
||||
xor ebx,ebx
|
||||
xor eax,eax
|
||||
mov bl,[esi+1]
|
||||
mov al,Vert
|
||||
sub eax,ebx
|
||||
imul eax
|
||||
mov MC_DV,eax
|
||||
|
||||
; On s'occupe de la composante Bleue
|
||||
xor ebx,ebx
|
||||
xor eax,eax
|
||||
mov bl,[esi+2]
|
||||
mov al,Bleu
|
||||
sub eax,ebx
|
||||
imul eax
|
||||
mov MC_DB,eax
|
||||
|
||||
; On totalise la "distance" dans EBX
|
||||
mov eax,30
|
||||
mul MC_DR
|
||||
mov ebx,eax
|
||||
|
||||
mov eax,59
|
||||
mul MC_DV
|
||||
add ebx,eax
|
||||
|
||||
mov eax,11
|
||||
mul MC_DB
|
||||
add ebx,eax
|
||||
jz MCSE_Correspond_impeccablement
|
||||
|
||||
cmp ebx,edi
|
||||
jae MCSE_Pas_mieux
|
||||
|
||||
; L…, on sait que CL contient une meilleure couleur que CH
|
||||
|
||||
mov ch,cl ; On commence par mettre CH … CL
|
||||
mov edi,ebx ; Ensuite, on peut mettre DI (meilleure diff‚rence) … jour
|
||||
|
||||
MCSE_Pas_mieux:
|
||||
|
||||
add esi,3
|
||||
|
||||
inc cl
|
||||
jnz MCSE_Pour_chaque_couleur
|
||||
|
||||
; Ici, on sait que CH contient d‚j… la meilleure couleur. On va donc faire
|
||||
; une sortie rapide (c'est pas bien, mais ‡a fait gagner 3 cycles)
|
||||
|
||||
mov al,ch
|
||||
|
||||
pop edi
|
||||
pop esi
|
||||
pop ebx
|
||||
|
||||
mov esp,ebp
|
||||
pop ebp
|
||||
|
||||
ret
|
||||
|
||||
MCSE_Correspond_impeccablement:
|
||||
|
||||
; Ici, on sait que CL contient la couleur qui correspond exactement aux
|
||||
; exigences de l'appelant
|
||||
|
||||
mov al,cl
|
||||
|
||||
|
||||
pop edi
|
||||
pop esi
|
||||
pop ebx
|
||||
|
||||
mov esp,ebp
|
||||
pop ebp
|
||||
|
||||
ret
|
||||
|
||||
Meilleure_couleur_sans_exclusion endp
|
||||
Reference in New Issue
Block a user