diff --git a/Fonderie/crapulator.c b/Fonderie/crapulator.c
index 2125f8bf..81fabf3b 100644
--- a/Fonderie/crapulator.c
+++ b/Fonderie/crapulator.c
@@ -14,6 +14,28 @@
 #include  "glitches.h"
 #include  "sfx.h"
 
+/* -------------------------------------------------------------- */
+static int trier_les_pixels(FloatImg *pimg)
+{
+FloatImg	copy;
+int		foo;
+
+fimg_clone(pimg, &copy, 1);
+
+foo = fimg_qsort_rgb_b(pimg, &copy, 0);
+if (foo) {
+	fprintf(stderr, "%s: err qsort rgb = %d\n", __func__, foo);
+	return foo;
+	}
+
+incrustation_0(pimg, &copy, 0);
+
+fimg_copy_data(&copy, pimg);
+
+fimg_destroy(&copy);
+
+return 0;
+}
 /* -------------------------------------------------------------- */
 static int effect_3(FloatImg *image)
 {
@@ -227,7 +249,8 @@ switch (idFx) {
 
 	case CR_qsortrgb:
 		// fprintf(stderr, "!!! %d !!!\n", idFx);
-		retval = fimg_qsort_rgb_b(image, image, 0);
+		// retval = fimg_qsort_rgb_b(image, image, 0);
+		retval = trier_les_pixels(image);
 		break;
 
 	case CR_message:
diff --git a/Fonderie/essai.sh b/Fonderie/essai.sh
index 36c163de..56379b68 100755
--- a/Fonderie/essai.sh
+++ b/Fonderie/essai.sh
@@ -31,12 +31,17 @@ convert -delay 200 /tmp/fstack*.png foo.gif
 essai_single ()
 {
 MP4="/home/tth/Essais/FondageDePlomb/foo.mp4"
+INPUT="/home/tth/Essais/FondageDePlomb/capture/?[23]???.fimg"
+FILTRE="classtrial:liss3x3"
+
+echo '********* essai single *********'
 
-echo '*** essai single ***'
 
 rm /tmp/x8/*.png
 
-time ./t -v -F rnd48b:water:liss2x2 -x
+time ./t -v -g "$INPUT" -F $FILTRE -s
+
+echo ; echo "encoding to " $MP4
 
 ffmpeg	-nostdin				\
 	-loglevel error					\
@@ -48,6 +53,6 @@ ffmpeg	-nostdin				\
 # ------------------------------------------------------------
 #			MAIN
 
-essai_filtres
+essai_single
 
 # ------------------------------------------------------------
diff --git a/Fonderie/sfx.c b/Fonderie/sfx.c
index 64c6c11e..0efccc42 100644
--- a/Fonderie/sfx.c
+++ b/Fonderie/sfx.c
@@ -35,8 +35,8 @@ x4 = dst->width / 4,	y4 = dst->height / 4;
 
 for (y=0; y<y4; y++) {
 	for (x=0; x<x4; x++) {
-		fimg_get_rgb(src, x*4, y*4, rgb);
-		fimg_put_rgb(dst, x+9, y+9, rgb);
+		fimg_get_rgb(src, x*4,  y*4,  rgb);
+		fimg_put_rgb(dst, x+19, y+19, rgb);
 		}
 	}
 
diff --git a/Fonderie/single.c b/Fonderie/single.c
index 747d1021..f400e531 100644
--- a/Fonderie/single.c
+++ b/Fonderie/single.c
@@ -23,9 +23,10 @@
 
 static int		nextpng, counter;
 static char		*destination;
+static int		chainfilter;
 
 /* -------------------------------------------------------------- */
-int single_init(int next, char *dest, char *sfxchain)
+int single_init(int next, char *dest, int fxchain)
 {
 int			foo;
 struct stat		stbuf;
@@ -33,19 +34,19 @@ struct stat		stbuf;
 fprintf(stderr, ">>> %s ( %d '%s' )\n", __func__, next, dest);
 
 nextpng = next;
+chainfilter = fxchain;
 
 foo = stat(dest, &stbuf);
 if (foo) {
 	perror("stat dest dir");
 	return -2;
 	}
-// fprintf(stderr, "\t%s type = %04x\n", dest, stbuf.st_mode & S_IFMT);
 if (S_IFDIR != (stbuf.st_mode & S_IFMT)) {
 	fprintf(stderr, "! %s must be a directory\n", dest);
 	return -3;
 	}
 
-destination = dest;
+destination = strdup(dest);		/* have a static copy */
 
 return 0;
 }
@@ -76,7 +77,7 @@ if (foo) {
 	return foo;
 	}
 
-nextpng++;
+nextpng++;		counter++;
 
 return 0;
 }
@@ -87,8 +88,12 @@ int single_print_state(char *title, int k)
 fprintf(stderr, ">>> %s ( '%s' %d )\n", __func__, title, k);
 #endif
 
-fprintf(stderr, "nextpng     %d\n", nextpng);
-fprintf(stderr, "counter     %d\n", counter);
+fprintf(stderr, "%s : %s\n", __FILE__, title);
+fprintf(stderr, "   nextpng          %d\n", nextpng);
+fprintf(stderr, "   counter          %d\n", counter);
+fprintf(stderr, "   chainfilter      %d\n", chainfilter);
+
+fprintf(stderr, "   destination      %s\n", destination);
 
 return -1;
 }
diff --git a/Fonderie/single.h b/Fonderie/single.h
index 1372e4b4..7f2cea49 100644
--- a/Fonderie/single.h
+++ b/Fonderie/single.h
@@ -6,7 +6,7 @@
 
 /* -------------------------------------------------------------- */
 
-int single_init(int next, char *dest, char *sfxchain);
+int single_init(int next, char *dest, int fxchain);
 int single_push_picture(FloatImg *pimg);
 
 int single_print_state(char *title, int k);
diff --git a/Fonderie/t.c b/Fonderie/t.c
index 0ba15d98..951db680 100644
--- a/Fonderie/t.c
+++ b/Fonderie/t.c
@@ -6,6 +6,7 @@
 #include  <stdlib.h>
 #include  <unistd.h>
 #include  <string.h>
+#include  <glob.h>
 
 #include  "../floatimg.h"
 #include  "glitches.h"
@@ -77,28 +78,48 @@ fprintf(stderr, "essayer single -> %d\n", foo);
  */
 int essayer_single(char *globpattern, char *destdir, int chain)
 {
-FloatImg	image;
+FloatImg	image = { 0 };
 int		idx, foo;
+glob_t		globbuf;
+char		*fname;
 
 fprintf(stderr, ">>> %s ( '%s' '%s' %d )\n", __func__,
 			globpattern, destdir, chain);
 
-foo = fimg_create(&image, 640, 480, 3);
-if (foo) {
-	fprintf(stderr, "erreur %d creation image\n", foo);
-	return foo;
-	}
-fimg_vdeg_a(&image, (double)3.141592654);
 
-foo = single_init(0, destdir, "none");
+filterstack_list(chain, "essai du single");
+
+foo = single_init(0, destdir, chain);
 if (foo) {
 	fprintf(stderr, "erreur %d single_init\n", foo);
 	return foo;
 	}
+single_print_state("just after init", 0);
 
-filterstack_list(chain, "essai du single");
+memset(&globbuf, 0, sizeof(glob_t));
+foo = glob(globpattern, 0, NULL, &globbuf);
+fprintf(stderr, "globbing '%s' -> %d, %d files found\n",
+			globpattern, foo, (int)globbuf.gl_pathc);
+if (0 == globbuf.gl_pathc) {
+	fprintf(stderr, "%s : no file found, aborting\n", __func__);
+	return -1;
+	}
 
-for (idx=0; idx<666; idx++) {
+for (idx=0; idx<globbuf.gl_pathc; idx++) {
+
+	fname = globbuf.gl_pathv[idx];		/* alias of filename */
+	fprintf(stderr, "%s  %6d  %s\r", __func__, idx, fname);
+
+	if (0==image.width && 0==image.height) {
+		foo = fimg_create_from_dump(fname, &image);
+		}
+	else	{
+		foo = fimg_load_from_dump(fname, &image);
+		}
+	if (foo) {
+		fprintf(stderr, "get image -> %d\n", foo);
+		return -1;
+		}
 
 	foo = filterstack_run(chain, &image, 0);
 	if (foo) {
@@ -112,22 +133,29 @@ for (idx=0; idx<666; idx++) {
 		fprintf(stderr, "erreur %d push picture\n", foo);
 		return foo;
 		}
-
 	}
 
+fprintf(stderr, "\n");
+
+single_print_state("end of run", 0);
+
+fimg_destroy(&image);
+
 return -1;
 }
 /* ----------------------------------------------------------- */
 
 int help(void)
 {
-puts("yolo!");
+puts("Yolo!");
 
 puts("\t-F\tdefine:the:filter:chain");
-puts("\t-L\tlist available filters");
+puts("\t-g\tinput glob pattern");
 puts("\t-i\tinfile.fimg");
+puts("\t-L\tlist available filters");
 puts("\t-o\tinfile.xxx");
-
+puts("\t-O\t/output/directory");
+puts("\t-s\tdo single test");
 
 exit(0);
 }
@@ -158,26 +186,31 @@ exit(0);		/* back to real world */
 
 int main(int argc, char *argv[])
 {
-int		foo;
-int		opt, do_xper = 0;
+int		foo, opt;
+int		do_xper = 0;
+int		do_single = 0;
 char		*filterchain = "0";
 char		*infile = "mire.fimg";
 char		*outfile = PNG;
 char		*outdir = "/tmp/x8/";
+char		*globstr = "capture/????7.fimg";
 
 fprintf(stderr, "*** %s : compiled by tTh, %s %s\n", __FILE__,
 			__DATE__, __TIME__);
 fimg_print_version(2);
 
-while ((opt = getopt(argc, argv, "hF:i:Lo:vx")) != -1) {
+while ((opt = getopt(argc, argv, "hF:g:i:Lo:O:svx")) != -1) {
 	switch(opt) {
 		case 'h':	help();			break;
 		case 'F':	filterchain = optarg;	break;
+		case 'g':	globstr = optarg;	break;
 		case 'i':	infile = optarg;	break;
 		case 'L':
 			list_crapulors("available filters");
 			exit(0);
 		case 'o':	outfile = optarg;	break;
+		case 'O':	outdir  = optarg;	break;
+		case 's':	do_single = 1;		break;
 		case 'v':	verbosity++;		break;
 		case 'x':	do_xper = 1;		break;
 		default:	exit(1);
@@ -198,6 +231,11 @@ if (do_xper) {
 	experiment();
 	return 0;
 	}
+if (do_single) {
+	fprintf(stderr, "Globbing '%s'\n", globstr);
+	essayer_single(globstr, outdir, STK);
+	return 0;
+	}
 
 foo = essai_filterstack(infile, outfile);
 if (foo) {