|
Creating an animated gif fileLogo allows the user to save each frame of an animation in an animated gif file
Step 1: We set the active area Step 2: The first frame is drawn Step 2: We do not append the first frame to the file. The file will be overwritten Step 3: The other frames are drawn and appended to the gif file Step 4: Step 2 & 3 are repeated until completion
The example below creates an animated gif:
TO pic
PERSPECTIVE SETPENCOLOR [ 255 0 0 ] CS SETACTIVEAREA [-90 -45 90 90] SETSCREENCOLOR [ 0 0 0] ; FLAG TO INDICATE WE DO NOT APPEND THE FIRST FRAME MAKE "APPEND "FALSE REPEAT 36 ~ [ POLYSTART REPEAT 5 [FD 50 RT 72] RR 12 POLYEND POLYVIEW ; SAVE A FRAME (NO DELAY AND LOOP FOREVER) (GIFSAVE "MYFILE.GIF 0 :APPEND 0) MAKE "APPEND "TRUE ] MAKE "APPEND "TRUE WRAP END
| |||||||||||||||