ALGORITHMES DE COMPRESSION D'IMAGES ET CODES DE ...

47
!* AFFICHAGE PAR BALAYAGE */
1* lx et ex représentent la taille de l'image a reconstruire *1
1* INITIALISATIONS */
lccx, cccx := lecture des coord du pt de depart de la 1ere CCX
init_couples();
init_contours();
pp:=ps:=pc:=Nil;
coul := BLANC;
1* Lecture des index permettant de récupérer les ccx
dans l'ordre lexicographique inverse *1
lire (fichier index);
1* ON BALAYE L'IMAGE ENTIERE POUR LA RECONSTRUIRE*/
l:=lccx;
tant que 1 >=0
tel-00839591, version 1 - 28 Jun 2013
pour c := ex jusqu'à 1 faire
si (pactives [c] > 0) alors
si (pactives [c] = 2) alors
ABSORBER_LIEN;
ABSORBER_LIEN
sinon
ABSORBER_LIEN
fin si
sinon
si (ATTEINT(lcple,ccple)) alors
ACTIVER_COUPLE
sinon
si (ATTEINT(lcont,ccont)) alors
ACTIVER_CONTOUR
sinon
si {ATTEINT(lccx,cccx)) alors
ACTIVER_CCX;
fin si
fin si
fin si
fin si
finpour
fintant
1* s'il y a des lignes blanches on saute à la ccx suivante.
abs(lcple)=INFINI lorsqu'il n'y a plus de couples en
attente. pc=Nil lorsqu'il n'y a plus de parois actives. */
si ({pc= Nil) et { abs(lcple) =INFINI)) alors
l:=lccx;
fin si
ATTEINT (ligne,colonne) est vrai lorsque ligne = 1
et colonne = c