The Shrinking size of animated gif

[Richmond Mathewson]

I'll "have a bash at this" tonight: currently in my lunch break.

HOWEVER . . .

I ALWAYS decompose an animated GIF into constituent frames (which I then 
export on PNG format)
using GIMP . . .

OK, it's long and tedious, but at least I have a considerable amount of 
control over the process.

Richmond.

On 10/31/17 4:54 am, Alejandro Tejada via use-livecode wrote:
> Hi All,
>
> Could you verify if always that we convert
> an animaated gif in a series of png images
> the resulting images are always smaller
> than the original animated gif?
>
> Here is the recipe:
>
> 1) Create a new stack
>
> 2) create a button and paste this script
> into the button: (check for broken lines
> in the mail list server)
>
> ----------------------------------------------------------------
> on mouseUp
>
> -- first, delete all previous images
>     repeat with i = the number of controls of this card down to 1
>        if word 1 of the long  name of control i of this card is "image" then
> delete control i of this card
>     end repeat
>
>     answer file "Choose an animated gif..."
>     import paint from file it
>     try
>        put the framecount of img 1 into k
>        repeat with m = 1 to k
>           set the currentframe of img 1 to m
>           create image
>           set the width of it to the width of img 1
>           set the height of it to the height of img 1
>           set the imagedata of it to the imagedata of img 1
>           set the alphadata of it to the alphadata of img 1
>        end repeat
>
>        repeat with i = 1 to the number of controls of this card
>           put the long name of control i of this card into q
>           if word 1 of q is "image" then
>              put the size of q & comma after n
>           end if
>        end repeat
>
>        delete last char of n -- a comma
>        put item 1 of n into tAnimatedGifSize
>        delete item 1 of n
>        put sum(n) into tPngImagesSize
>
>        if tAnimatedGifSize > tPngImagesSize then
>           put "Animated gif is " & (tAnimatedGifSize - tPngImagesSize) & "
> bytes larger than png images"
>        else
>           -- sum of sizes of png images is larger
>           -- than size of animated gif
>           put "Png images are " & (tPngImagesSize - tAnimatedGifSize) & "
> bytes larger than animated gif"
>        end if
>     end try
> end mouseUp
>
> ----------------------------------------------------------------
>
> 3) Click the button and import an animated gif
>
> Post your results in this thread,
> Thanks a lot in advance!
>
> Al
> _______________________________________________
> use-livecode mailing list
> use-livecode at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your subscription preferences:
> http://lists.runrev.com/mailman/listinfo/use-livecode