le script:
Gauche:
- Code: Tout sélectionner
coord=0;
cx=0;cy=0;
?dent,Dents,0,3,3;
m1=32;
if (dent >=2){m1=16;}
m2=m1/2;
LoadBmpNum(0,"pen/timbre",dent);
xc2=int(xs/m2)-1;
xc=xc2-1;
yc2=int((ys)/m2)-1;
yc=yc2-1;
Droite
- Code: Tout sélectionner
k=0;
px=int(x/m2);py=int(y/m2);
if (( px == 0) || (px == xc2) || (py == 0) || (py == yc2))
{
R=255;
G=255;
B=255;
k=1;}
if ( k!=1){
if((px == 1) || (py==1)|| (px == xc) || (py == yc)){
r2=R;g2=G;b2=B;
x2=x%m1;y2=y%m1;
getb(0,x2,y2);
if( (R> 129) || (G>129) || (B>129)){
R=r2;G=g2;B=b2;}
if(( R==129) ){ R=255;G=255;B=255;}
}}
Il faut à cela ajouter les quatre bmp qui sont dans la piece jointe et les placer dans Gonta->Pen comme de coutume
le fichier installation.txt explique tout celà ( dans l' archive en bas de l' article)
Le script est pour l' instant tres limité ( il ne dessine que les dents )et fonctionne sous certaines conditions:
Note:
Les options 0 et 1 utilise une denture de 32 pixels
les options 2 et 3 une denture de 16 pixels
Pour l' instant le script ne fonctionne correctement que si la taille en x et en y
de la sélection sont des multiples entiers de la taille de la denture.
une image de 640x480 convient pour une denture de 32 pixels ( 16 aussis)
640/32=20, 20 est entier
480/32=15 est un entier.
alors que 680x400 ne fonctionne pas
400/32= 12,5 : ce n' est pas un entier
cependant 400/16 = 25 : c' est ok
un rendu en combinaison avec le filtre Gonta Puceron->vignette
@+ Eric