Problème avec un script-fu

Bonjour,

Je souhaite convertir en lot des fichiers .png en fichiers .gbr. Pour cela je me suis inspirée de script que j'ai pu trouver sur le net. Notamment le script brush-bash car celui-ci ne fonctionnait pas chez moi et ne convenait pas entièrement à ce que je voulais. Néanmoins, ce que j'ai écris ne fonctionne pas non plus. Le code se lance mais s'arrête au chargement de l'image j'ai l'impression.
Voici le code:

(define (convert-pngtogbr load name location)

; Définit les couleurs d'avant-plan (noir) et d'arrière-plan (blanc)
(gimp-context-set-foreground '(0 0 0))
(gimp-context-set-background '(255 255 255))

(let* (
(filelist (cadr (file-glob (string-append load "\\*.png") 1)))
(s 1)
)
(while filelist
(let* (
(loadfile (car filelist))
(image (car (gimp-file-load RUN-NONINTERACTIVE loadfile loadfile)))
)


(set! drawable (gimp-image-get-active-drawable image))


(set! filename2 (string-append location "/" name ".gbr"
))


(file-gbr-save 1 image drawable filename2 name 15 name))
(set! s (+ s 1))
(gimp-image-delete (car image))
(set! filelist (cdr filelist))))
)




(script-fu-register "convert-pngtogbr"
"<Toolbox>/Xtns/Script-Fu/PngToGbr..."
"Convert png to gbr"
"XX"
"XX"
"Juin 2016"
""

SF-DIRNAME "Load from" ""

SF-STRING "Brush Name" "name"
SF-DIRNAME "SAVE TO FOLDER" "")

Si vous avez une idée du problème ça pourrait m'aider.

Merci d'avance.