Re: Re: Why my script doesn't work ?

[Kevin Cozens <kevin@xxxxxxxxx>]

dodo_do_not_wake_up wrote:
> so forget my previous script here is the new one but it still don't
> work...
> help please :(
> http://www.freewebs.com/dodoecchi/ZCM%2Dnew%2Dtest2.scm 
> <http://www.freewebs.com/dodoecchi/ZCM%2Dnew%2Dtest2.scm>

You either forgot (or did not know) that calls to GIMP functions return their 
values inside a list. You need to use 'car' to get the image ID returned from 
the calls to gimp-layer-new.

You can simplify the script slightly after you fix the two set! calls. Just 
drop the 'set!' function reference from the line and move the two lines to 
where you currently set i and l.

   (let*
     (
     (sx 256)
     (sy 168)
     (i  (car (gimp-image-new (* sx nx) (* sy ny) RGB) ) )
     (l  (car (gimp-layer-new i (* sx nx) (* sy ny) RGB-IMAGE
                              "Background" 100 NORMAL-MODE) ) )
     )

-- 
Cheers!

Kevin.

http://www.ve3syb.ca/           |"What are we going to do today, Borg?"
Owner of Elecraft K2 #2172      |"Same thing we always do, Pinkutus:
                                 |  Try to assimilate the world!"
#include <disclaimer/favourite> |              -Pinkutus & the Borg