Vector Animation using Filmstrip player

[Alejandro Tejada]

Hi developers,

I'm having troubles to access or download from 
my Geocities webpages, so I'll post the code here for 
further examination.

1) Visit this page for a sample of a java based
filmstrip player:

<http://www2.connectnet.com/users/klidke/public_html/html/MetaMovie/MetaMovi.htm>

Now while you are at this page, download their 
player, to get a sample image to play with.

<http://www2.connectnet.com/users/klidke/public_html/html/MetaMovie/MetaMovi.zip>

(Does exist a repository of filmstrip animations
in the web? The secuences of human motion by Edward 
Muybridge could be good examples, if they could 
be found in the web.)

Create a new stack and import the image. Convert
it in a group. The purpose of converting the image
in a group is to clip the content to the exact size
of one frame.

The example image of MetaMovie has a size of 180 pixel
of width and 2400 pixels of height.

You had to reduce the size of the group to clip an
area of 180 pixel (width) by 120 pixel (height).

(In the example that i posted, it's a secuence 
of vector shapes that morphs )

Now, create a button and paste this code in it:

on mouseUp
  -- groups grows 5 pixel in every direction, in total
10 pixels vertical and 10 pixels horizontal
  
  put the id of group 1 into mygroup
  put 1 into framerows
  put 20 into framecolumns
  put 180 into framewidth
  put 120 into frameheight
  put fld "loops" into loops
  put fld "time" into timebetweenframes
 
  put 0 into mycounter
  
  repeat loops
    
    repeat (framerows * framecolumns)
      if the hscroll of grp id mygroup = 0 -- (the
formattedwidth of grp id mygroup - (framewidth + 10))
-- reached the last horizontal frame
      then
        if mycounter < (framecolumns - 1) then add 1
to mycounter else put 0 into mycounter
        set the vscroll of grp id mygroup to
frameheight * mycounter
        set the hscroll of grp id mygroup to 0
        put the vscroll of grp id mygroup && "vscroll"
&& the hscroll of grp id mygroup && "hscroll"
        wait timebetweenframes seconds
      else
        set the hscroll of grp id mygroup to the
hscroll of grp id mygroup + 72
        put the vscroll of grp id mygroup && "vscroll"
&& the hscroll of grp id mygroup && "hscroll"
        wait timebetweenframes seconds
      end if
    end repeat
    
    set the hscroll of grp id mygroup to 0
    set the vscroll of grp id mygroup to 0
    
  end repeat
  
  set the hscroll of grp id mygroup to 0
  set the vscroll of grp id mygroup to 0
end mouseUp

I'll like to convert this handler in a function.
Any help is welcome.

Thanks in advance.

al

=====
Visit my site:
http://www.geocities.com/capellan2000/
Search the mail list:
http://mindlube.com/cgi-bin/search-use-rev.cgi

__________________________________
Do you Yahoo!?
Yahoo! Hotjobs: Enter the "Signing Bonus" Sweepstakes
http://hotjobs.sweepstakes.yahoo.com/signingbonus