PhotoFiltre

Le forum officiel de PhotoFiltre
It is currently 21 Oct 2020 15:00

All times are UTC + 1 hour [ DST ]




Post new topic Reply to topic  [ 66 posts ]  Go to page 1, 2, 3, 4, 5  Next
Author Message
 Post subject: Arithmetique Assemblages Fondus 3 images et plus
PostPosted: 17 Apr 2008 10:55 
Offline
Nouveau(elle)
Nouveau(elle)|Nouveau|Nouvelle

Joined: 17 Apr 2008 10:51
Posts: 3
Gender: None specified
PhotoFiltre version: 6
Bonjour

Je voudrai faire un Assemblage Fondu horizontal de 3 images
j ai pris la formule Assemblage Fondu horizontal de 2 images
j essaye de la modifier pour l adapter a 3 images mais sans succès
je pense que c est la dernier ligne alphablend qui pose porblème
quelqu un de plus doué que moi pourrait il m aider ?
merci
Cordialement

//Assemblage Fondu horizontal de 3images
F:200; //Taille de la zone commune

H:Max(H(I1),H(I2),H(I3)); //Hauteur maximale des 3 images

S1:BStretch(I1,W(I1)*H/H(I1),H); //Adaptation de la hauteur pour l'image 1
S2:BStretch(I2,W(I2)*H/H(I2),H); //Adaptation de la hauteur pour l'image 2
S3:BStretch(I3,W(I3)*H/H(I3),H); //Adaptation de la hauteur pour l'image 3

W:W(S1)+W(S2)+W(S3)-F; //Taille de l'image totale

T1:Tile(S1,W,H); //Augmentation de la zone de travail de l'image 1
T2:Scroll(Tile(S2,W,H),W(S1)-F,0); // Augmentation de la zone de travail de l'image 2 et positionnement au bon endroit
T3:Scroll(Tile(S3,W,H),W(S2)-F,0); // Augmentation de la zone de travail de l'image 3 et positionnement au bon endroit

X:X(T1); //Dégradé
If(X<W(S1)-F,T1, //Image 1
If(X>W(S1),T2, //Image 2
If(X>W(S1),T3, //Image 3

AlphaBlend(T1,T2,T3,X-W(S1)+F,F)))//Fondu

Mots clés pour la recherche : arithmétique, arithmetique


Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 17 Apr 2008 11:35 
Offline
Administrateur
Administrateur(trice)|Administrateur|Administratrice
User avatar

Joined: 02 Feb 2005 10:35
Posts: 12687
Location: 54
Gender: Male
PhotoFiltre version: PF6 + 7 + Studio
Operating System: W10
Bonjour,

j'ai pas la tête à faire des math ce matin, :oops: :lol: mais il y a une autre solution beaucoup plus simple :
Tu peux appliquer deux fois le plugin :
- pour assembler 1 et 2
- pour assembler le résultat de 1 et 2 avec 3

quand j'aurai ma dose de café, je verrai si je trouve une autre solution. :)

_________________
Bien plus facile avec PhotoFiltre. Cordialement.
. . Image . . Image


Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 17 Apr 2008 11:45 
Offline
Nouveau(elle)
Nouveau(elle)|Nouveau|Nouvelle

Joined: 17 Apr 2008 10:51
Posts: 3
Gender: None specified
PhotoFiltre version: 6
merci voilà une idée qu'elle est bonne :D
bon café :)


Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 18 Apr 2008 11:51 
Offline
Administrateur
Administrateur(trice)|Administrateur|Administratrice
User avatar

Joined: 02 Feb 2005 10:35
Posts: 12687
Location: 54
Gender: Male
PhotoFiltre version: PF6 + 7 + Studio
Operating System: W10
Bonjour,

après plusieurs cafés et un peu de prise de tête pour le fun, même si ce n'est pas d'une folle utilité :lol: :

Code:
//Assemblage Fondu horizontal de 3 images. Adaptation : jptom.free.fr
F:64; //Taille de la zone commune
H:Max(H(I1),H(I2),H(I3)); //Hauteur maximale des 3 images
S1:BStretch(I1,W(I1)*H/H(I1),H); //Adaptation hauteur Image 1
S2:BStretch(I2,W(I2)*H/H(I2),H); //Adaptation hauteur Image 2
S3:BStretch(I3,W(I3)*H/H(I3),H); //Adaptation hauteur Image 3
W:W(S1)+W(S2)+W(S3)-F*2; //Taille de l'image totale
T1:Tile(S1,W,H); //Augmentation zone de travail Image 1
T2:Scroll(Tile(S2,W,H),W(S1)-F,0); //Augmentation zone de travail Image 2 et positionnement au bon endroit
T3:Scroll(Tile(S3,W,H),W(S1)+W(S2)-F*2,0); //Augmentation zone de travail Image 3 et pos. au bon endroit
X:X(T1); //Initialisation Dégradé
If(X<W(S1)-F,T1, //Image 1
If((X>W(S1))and(X<W(S1)+W(S2)-F*2),T2, //Image 2
If(X>W(S1)+W(S2)-F,T3, //Image 3
If((X>=W(S1)-F)and(X<=W(S1)),AlphaBlend(T1,T2,X-W(S1)+F,F), //1er Fondu
AlphaBlend(T2,T3,X-W(S1)-W(S2)+F*2,F))))) //2ème Fondu

J'ai testé avec des images de tailles différentes, et comparé avec la méthode de mon post précédent,
ça a l'air de marcher sur différents groupes d'essais.
Donc à copier/coller tel quel dans la fenêtre du module Arithmétique,
et à enregistrer sous un nom différent du fondu horizontal pour 2 images.

_________________
Bien plus facile avec PhotoFiltre. Cordialement.
. . Image . . Image


Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 18 Apr 2008 14:29 
Offline
Nouveau(elle)
Nouveau(elle)|Nouveau|Nouvelle

Joined: 17 Apr 2008 10:51
Posts: 3
Gender: None specified
PhotoFiltre version: 6
:D finalement le café c'est efficace
Bravo j aurai pas trouver

:clap: :clap: :clap: :clap:


Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 18 Apr 2008 14:47 
Offline
Régulier
Régulier(ère)|Régulier|Régulière

Joined: 19 Feb 2005 23:43
Posts: 137
Gender: Male
PhotoFiltre version: Pf_6.3.0
Operating System: WinXP
Bonjour

Je tenais à remercier Tom pour la Formule :clap:

DM 66


Last edited by DM 66 on 18 Apr 2008 16:44, edited 1 time in total.

Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 18 Apr 2008 15:38 
Offline
Posteuse acharnée
Posteur(se) acharné(e)|Posteur acharné|Posteuse acharnée
User avatar

Joined: 06 Jul 2007 16:22
Posts: 912
Location: Alpes Maritimes
Gender: Female
PhotoFiltre version: Photofiltre Studio 9.0
Operating System: Window XP
Bonjour Tom,
Image

_________________
Image


Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 19 Apr 2008 15:23 
Offline
Administrateur
Administrateur(trice)|Administrateur|Administratrice
User avatar

Joined: 02 Feb 2005 10:35
Posts: 12687
Location: 54
Gender: Male
PhotoFiltre version: PF6 + 7 + Studio
Operating System: W10
Bonjour et merci à vous. :D
Finalement, si vous avez besoin d'autres variantes, n'hésitez pas,
Il n'est pas dit que je trouverai la bonne solution, mais ç'est plus rigolo que le Sudoku. :lol:

_________________
Bien plus facile avec PhotoFiltre. Cordialement.
. . Image . . Image


Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 20 Apr 2008 10:46 
Offline
Régulier
Régulier(ère)|Régulier|Régulière

Joined: 08 May 2005 6:59
Posts: 429
Location: Maisons Alfort
Gender: Male
PhotoFiltre version: Studio
Operating System: XP
Processor: ?
RAM memory: 512
Bonjour

merci Tom pour la Formule

une variante

"Assemblage Fondu vertical de 3 images"

A+

Erik


Top
 Profile  
 
 Post subject: Arithmetique Assemblage Fondu vertical de 3 images
PostPosted: 21 Apr 2008 22:50 
Offline
Administrateur
Administrateur(trice)|Administrateur|Administratrice
User avatar

Joined: 02 Feb 2005 10:35
Posts: 12687
Location: 54
Gender: Male
PhotoFiltre version: PF6 + 7 + Studio
Operating System: W10
Merci Erik, ça va, t'as pas été top dur avec moi. :lol:

Avec seulement une petite tasse de café : "Assemblage Fondu vertical de 3 images" :

Code:
//Assemblage-Fondu vertical de 3 images. Adaptation Tom : jptom.free.fr
F:64; //Taille de la zone commune
W:Max(W(I1),W(I2),W(I3)); //Largeur maximale des 3 images
S1:BStretch(I1,W,H(I1)*W/W(I1)); //Adaptation Largeur Image 1
S2:BStretch(I2,W,H(I2)*W/W(I2)); //Adaptation Largeur Image 2
S3:BStretch(I3,W,H(I3)*W/W(I3)); //Adaptation Largeur Image 3
H:H(S1)+H(S2)+H(S3)-F*2; //Taille de l'image totale
T1:Tile(S1,W,H); //Augmentation zone de travail de Image 1
T2:Scroll(Tile(S2,W,H),0,H(S1)-F); // Augmentation zone de travail Image 2 et positionnement au bon endroit
T3:Scroll(Tile(S3,W,H),0,H(S1)+H(S2)-F*2); // Augmentation zone de travail Image 3 et pos. au bon endroit
Y:Y(T1); //Initialisation Dégradé
If(Y<H(S1)-F,T1, //Image 1
If((Y>H(S1))and(Y<H(S1)+H(S2)-F*2),T2, //Image 2
If(Y>H(S1)+H(S2)-F,T3, //Image 3
If((Y>=H(S1)-F)and(Y<=H(S1)),AlphaBlend(T1,T2,Y-H(S1)+F,F), //1er Fondu
AlphaBlend(T2,T3,Y-H(S1)-H(S2)+F*2,F))))) //2ème Fondu

_________________
Bien plus facile avec PhotoFiltre. Cordialement.
. . Image . . Image


Last edited by Tom on 23 Apr 2008 15:22, edited 1 time in total.

Top
 Profile  
 
 Post subject: Assemblage Fondu horizontal et vertical de 4 images
PostPosted: 22 Apr 2008 12:19 
Offline
Administrateur
Administrateur(trice)|Administrateur|Administratrice
User avatar

Joined: 02 Feb 2005 10:35
Posts: 12687
Location: 54
Gender: Male
PhotoFiltre version: PF6 + 7 + Studio
Operating System: W10
Bonjour,

Pour aller un peu plus loin dans le genre, avec un calcul des tailles un peu plus vicieux :

Fondu horizontal et vertical de 4 Images :

Code:
//Assemblage Fondu horizontal et vertical de 4 images Adaptation Tom : jptom.free.fr
F:64; //Taille de la zone commune
H1:Max(H(I1),H(I2)); //Hauteur maximale des 2 images de 1ère ligne
S1:BStretch(I1,W(I1)*H1/H(I1),H1); //Adaptation hauteur image 1
S2:BStretch(I2,W(I2)*H1/H(I2),H1); //Adaptation hauteur image 2
H2:Max(H(I3),H(I4)); //Hauteur maximale des 2 images de 2ème ligne
S3:BStretch(I3,W(I3)*H2/H(I3),H2); //Adaptation hauteur image 3
S4:BStretch(I4,W(I4)*H2/H(I4),H2); //Adaptation hauteur image 4
W:Max(W(S1)+W(S2),W(S3)+W(S4));//Largeur maximale des 2 lignes sans fondu
H1:H1*W/(W(S1)+W(S2)); H2:H2*W/(W(S3)+W(S4)); //Adapt hauteurs lignes
S1:BStretch(S1,W(S1)*H1/H(S1),H1); //Adaptation Largeur Image 1
S2:BStretch(S2,W(S2)*H1/H(S2),H1); //Adaptation Largeur Image 2
S3:BStretch(S3,W(S3)*H2/H(S3),H2); //Adaptation Largeur Image 3
S4:BStretch(S4,W(S4)*H2/H(S4),H2); //Adaptation Largeur Image 4
H:H1+H2-F; //Taille de l'image totale
W:W-F; //Taille de l'image totale
T1:Tile(S1,W,H); //Augmentation zone de travail Image 1
T2:Scroll(Tile(S2,W,H),W(S1)-F,0); // Augmentation zone de travail Image 2 et positionnement au bon endroit
T3:Scroll(Tile(S3,W,H),0,H1-F); // Idem sur Image 3
T4:Scroll(Tile(S4,W,H),W(S3)-F,H1-F); // Idem dur Image 4
X:X(T1); //Initialisation Dégradé H
TA:If(X<W(S1)-F,T1, //Image 1
If(X>W(S1),T2, //Image 2
AlphaBlend(T1,T2,X-W(S1)+F,F)));//1er Fondu
X:X(T3); //Initialisation Dégradé H
TB:If(X<W(S3)-F,T3, //Image 3
If(X>W(S3),T4, //Image 4
AlphaBlend(T3,T4,X-W(S3)+F,F)));//2ème Fondu
Y:Y(T1); //Initialisation Dégradé V
If(Y<H1-F,TA, //Image 1+2
If(Y>H1,TB, //Image 3+4
AlphaBlend(TA,TB,Y-H1+F,F))) //3ème Fondu


fonctionne bien entendu avec des images de tailles différentes, mais les calculs étant importants,
il vaut mieux travailler avec des images de taille modeste.

Petit exemple en image :

Image

Petite suggestion d'utilisation : un assemblage de portraits Pop art à la Andy Warhol
le tuto de Pascal : viewtopic.php?p=4449
_

_________________
Bien plus facile avec PhotoFiltre. Cordialement.
. . Image . . Image


Last edited by Tom on 23 Apr 2008 15:25, edited 2 times in total.

Top
 Profile  
 
 Post subject: Assemblage Fondu horizontal et vertical de 9 images
PostPosted: 23 Apr 2008 1:46 
Offline
Administrateur
Administrateur(trice)|Administrateur|Administratrice
User avatar

Joined: 02 Feb 2005 10:35
Posts: 12687
Location: 54
Gender: Male
PhotoFiltre version: PF6 + 7 + Studio
Operating System: W10
Bonsoir,

comme je vois que ça passionne les foules, je rajoute un fondu horizontal et vertical pour 9 images. :lol:
Comme pour le fondu précédent, il vaut mieux préparer de petites images pour ne pas solliciter inutilement le processeur.

Code:
//Assemblage Fondu horizontal et vertical de 9 images Adaptation Tom : jptom.free.fr
F:64; //Taille de la zone commune
H1:Max(H(I1),H(I2),H(I3)); //Hauteur maximale des 3 images de 1ère ligne
S1:BStretch(I1,W(I1)*H1/H(I1),H1); //Adaptation hauteur image 1
S2:BStretch(I2,W(I2)*H1/H(I2),H1); //Adaptation hauteur image 2
S3:BStretch(I3,W(I3)*H1/H(I3),H1); //Adaptation hauteur image 3
H2:Max(H(I4),H(I5),H(I6)); //Hauteur maximale des 3 images de 2ème ligne
S4:BStretch(I4,W(I4)*H2/H(I4),H2); //Adaptation hauteur image 4
S5:BStretch(I5,W(I5)*H2/H(I5),H2); //Adaptation hauteur image 5
S6:BStretch(I6,W(I6)*H2/H(I6),H2); //Adaptation hauteur image 6
H3:Max(H(I7),H(I8),H(I9)); //Hauteur maximale des 3 images de 2ème ligne
S7:BStretch(I7,W(I7)*H3/H(I7),H3); //Adaptation hauteur image 7
S8:BStretch(I8,W(I8)*H3/H(I8),H3); //Adaptation hauteur image 8
S9:BStretch(I9,W(I9)*H3/H(I9),H3); //Adaptation hauteur image 9
W:Max(W(S1)+W(S2)+W(S3),W(S4)+W(S5)+W(S6),W(S7)+W(S8)+W(S9)); //Largeur maximale des lignes sans fondu
H1:H1*W/(W(S1)+W(S2)+W(S3)); H2:H2*W/(W(S4)+W(S5)+W(S6));
H3:H3*W/(W(S7)+W(S8)+W(S9)); //Adapt hauteurs lignes
S1:BStretch(S1,W(S1)*H1/H(S1),H1); //Adaptation Largeur Image 1
S2:BStretch(S2,W(S2)*H1/H(S2),H1); //Adaptation Largeur Image 2
S3:BStretch(S3,W(S3)*H1/H(S3),H1); //Adaptation Largeur Image 3
S4:BStretch(S4,W(S4)*H2/H(S4),H2); //Adaptation Largeur Image 4
S5:BStretch(S5,W(S5)*H2/H(S5),H2); //Adaptation Largeur Image 5
S6:BStretch(S6,W(S6)*H2/H(S6),H2); //Adaptation Largeur Image 6
S7:BStretch(S7,W(S7)*H3/H(S7),H3); //Adaptation Largeur Image 7
S8:BStretch(S8,W(S8)*H3/H(S8),H3); //Adaptation Largeur Image 8
S9:BStretch(S9,W(S9)*H3/H(S9),H3); //Adaptation Largeur Image 9
H:H1+H2+H3-F*2; //Taille de l'image totale
W:W-F*2; //Taille de l'image totale
T1:Tile(S1,W,H); //Augmentation zone de travail Image 1
T2:Scroll(Tile(S2,W,H),W(S1)-F,0); // Augmentation zone de travail Image 2 et positionnement au bon endroit
T3:Scroll(Tile(S3,W,H),W(S1)+W(S2)-F*2,0); // Idem sur Image 3
T4:Scroll(Tile(S4,W,H),0,H1-F); // Idem sur Image 4
T5:Scroll(Tile(S5,W,H),W(S4)-F,H1-F); // Idem sur Image 5
T6:Scroll(Tile(S6,W,H),W(S4)+W(S5)-F*2,H1-F); // Idem sur Image 6
T7:Scroll(Tile(S7,W,H),0,H1+H2-F*2); // Idem sur Image 7
T8:Scroll(Tile(S8,W,H),W(S7)-F,H1+H2-F*2); // Idem sur Image 8
T9:Scroll(Tile(S9,W,H),W(S7)+W(S8)-F*2,H1+H2-F*2); // Idem sur Image 9
X:X(T1); //Initialisation Dégradé H 1ère ligne
TA:If(X<W(S1)-F,T1, //Image 1
If((X>W(S1))and(X<W(S1)+W(S2)-F*2),T2, //Image 2
If(X>W(S1)+W(S2)-F,T3, //Image 3
If((X>=W(S1)-F)and(X<=W(S1)),AlphaBlend(T1,T2,X-W(S1)+F,F), //1er Fondu
AlphaBlend(T2,T3,X-W(S1)-W(S2)+F*2,F))))); //2ème Fondu
X:X(T4); //Initialisation Dégradé H 2ème ligne
TB:If(X<W(S4)-F,T4, //Image 4
If((X>W(S4))and(X<W(S4)+W(S5)-F*2),T5, //Image 5
If(X>W(S4)+W(S5)-F,T6, //Image 6
If((X>=W(S4)-F)and(X<=W(S4)),AlphaBlend(T4,T5,X-W(S4)+F,F), //1er Fondu
AlphaBlend(T5,T6,X-W(S4)-W(S5)+F*2,F))))); //2ème Fondu
X:X(T7); //Initialisation Dégradé H 3ème ligne
TC:If(X<W(S7)-F,T7, //Image 7
If((X>W(S7))and(X<W(S7)+W(S8)-F*2),T8, //Image 8
If(X>W(S7)+W(S8)-F,T9, //Image 9
If((X>=W(S7)-F)and(X<=W(S8)),AlphaBlend(T7,T8,X-W(S7)+F,F), //1er Fondu
AlphaBlend(T8,T9,X-W(S7)-W(S8)+F*2,F))))); //2ème Fondu
Y:Y(T1); //Initialisation Dégradé
If(Y<H1-F,TA, //Ligne 1
If((Y>H1)and(Y<H1+H2-F*2),TB, //Ligne 2
If(Y>H1+H2-F,TC, //Ligne 3
If((Y>=H1-F)and(Y<=H1),AlphaBlend(TA,TB,Y-H1+F,F), //1er Fondu
AlphaBlend(TB,TC,Y-H1-H2+F*2,F))))) //2ème Fondu


Voilà de quoi faire des cartes postales sans peine avec PhotoFiltre. :D

_________________
Bien plus facile avec PhotoFiltre. Cordialement.
. . Image . . Image


Last edited by Tom on 23 Apr 2008 15:26, edited 2 times in total.

Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 23 Apr 2008 5:29 
Offline
Modérateur
Modérateur(trice)|Modérateur|Modératrice
User avatar

Joined: 07 Dec 2004 20:37
Posts: 3482
Location: 46
Gender: Male
PhotoFiltre version: PF / PFS
Operating System: Windows 10
RAM memory: 6
Merci beaucoup Tom,

Voilà qui va nous faciliter la vie.

:clap: :clap: :clap:

_________________
Petit à petit on devient moins petit.


Top
 Profile  
 
 Post subject: Arithmetique Assemblage Fondu horizontal de 9 images
PostPosted: 23 Apr 2008 8:33 
Offline
Régulier
Régulier(ère)|Régulier|Régulière

Joined: 19 Feb 2005 23:43
Posts: 137
Gender: Male
PhotoFiltre version: Pf_6.3.0
Operating System: WinXP
Merci Tom, du joli travail :clap:

PS : Tu devrais changer le titre du : Sujet

DM 66


Top
 Profile  
 
 Post subject: Re: Arithmetique Assemblage Fondu horizontal de 3 images
PostPosted: 23 Apr 2008 8:37 
Offline
Régulier
Régulier(ère)|Régulier|Régulière

Joined: 08 May 2005 6:59
Posts: 429
Location: Maisons Alfort
Gender: Male
PhotoFiltre version: Studio
Operating System: XP
Processor: ?
RAM memory: 512
Bonjour

Merci Tom

Je vois que tu as du vidé la cafetiere :)

Petite Question :?:

Est il possible de faire un formule de 3 images (plus ou moins ) en diagonal ( escalier )

A+

Erik


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 66 posts ]  Go to page 1, 2, 3, 4, 5  Next

All times are UTC + 1 hour [ DST ]


Who is online

Users browsing this forum: No registered users and 0 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum

Search for:
Jump to:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group