//Motif sans raccord en quinconce. Adaptation : jptom.free.fr F:48; //Taille de la zone de raccordement // mettre environ 10% de la hauteur ou largeur de l'image de base W:W(I1)*2-F; H:H(I1); T1:Tile(I1,W,H); T2:Scroll(T1,W(I1)-F,0);//positionnement des images L1 X:X(T1); // Initialisation Dégradé L1:If(XW(I1),T2, AlphaBlend(T1,T2,X-W(I1)+F,F))); //Première ligne D1:F/2-W(I1)/2; //Décalage négatif, vers la gauche D2:W(I1)/2-F/2; D3:W(I1)*3/2-F*3/2; //Décalage à droite depuis X=0 T3:Scroll(Tile(I1,W,H),D1,0);// Pose de la Demi-Image 1 T4:Scroll(Tile(I1,W,H),D2,0); T5:Scroll(Tile(I1,W,H),D3,0);// Demi-Image 3 X:X(T3); //Initialisation Dégradé L2:If(XD2+F)and(XD3+F,T5, //Image 3 If((X>=D2)and(X<=D2+F),AlphaBlend(T3,T4,X-D2,F), //1er Fondu AlphaBlend(T4,T5,X-D3,F))))); //2ème Fondu // Deuxième ligne W:W(T1); H:H(T1)*3-F*2; TA:Tile(L1,W,H); // Positionnement des lignes TB:Scroll(Tile(L2,W,H),0,H(I1)-F); TC:Scroll(Tile(L1,W,H),0,H(I1)*2-F*2); Y:Y(TA); // Initialisation Dégradé Vertical TZ:If(YH(I1))and(YH(I1)*2-F,TC, //Ligne 3 If((Y>=H(I1)-F)and(Y<=H(I1)),AlphaBlend(TA,TB,Y-H(I1)+F,F), //1er Fondu AlphaBlend(TB,TC,Y-H(I1)*2+F*2,F))))); //2ème Fondu // découpe de la matrice du motif Tile(Scroll(TZ,-W(I1)/2,-H(I1)/2),W(I1)-F,H(I1)*2-F*2)