#######
#
# E-scripts on gifs.
#
# Note 1: use the eev command (defined in eev.el) and the
# ee alias (in my .zshrc) to execute parts of this file.
# Executing this file as a whole makes no sense.
# An introduction to eev can be found here:
#
#   (find-eev-quick-intro)
#   http://anggtwu.net/eev-intros/find-eev-quick-intro.html
#
# Note 2: be VERY careful and make sure you understand what
# you're doing.
#
# Note 3: If you use a shell other than zsh things like |&
# and the for loops may not work.
#
# Note 4: I always run as root.
#
# Note 5: some parts are too old and don't work anymore. Some
# never worked.
#
# Note 6: the definitions for the find-xxxfile commands are on my
# .emacs.
#
# Note 7: if you see a strange command check my .zshrc -- it may
# be defined there as a function or an alias.
#
# Note 8: the sections without dates are always older than the
# sections with dates.
#
# This file is at <http://anggtwu.net/e/gifs.e>
#           or at <http://anggtwu.net/e/gifs.e.html>.
#        See also <http://anggtwu.net/emacs.html>,
#                 <http://anggtwu.net/.emacs[.html]>,
#                 <http://anggtwu.net/.zshrc[.html]>,
#                 <http://anggtwu.net/escripts.html>,
#             and <http://anggtwu.net/>.
#
#######



# «.bezier»	(to "bezier")

# (find-esgrep "grep --color=auto -nH --null -e gifsicle *.e")
# (find-myqdraw "mkanim1.sh" "makeanim")
# (find-es "imagemagick" "pdf-to-animated-gif")
# (find-angg ".emacs.templates" "find-classroom-trab-links")
# (find-angg "MAXIMA/bezier2.mac")
# (find-man "convert")
# (find-man "pdftoppm")
# (find-man "gifsicle")




#####
#
# bezier
# 2025apr04
#
#####

# «bezier»  (to ".bezier")
# (find-sh "locate -i bezier | grep pdf")
# (find-pdf-page "~/LATEX/2024-2-C3/bezier_flipbook.pdf")

* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
# (find-fline "/tmp/gifs/")
rm -Rv /tmp/gifs/
mkdir  /tmp/gifs/
cd     /tmp/gifs/
cp -v ~/LATEX/2024-2-C3/bezier_flipbook.pdf a.pdf
togif0 () { echo $(basename $1 .jpg).gif; } 
togif  () { echo convert $1 $(togif0 $1);
                 convert $1 $(togif0 $1); }
togifs () { for i in b-*.jpg; do togif $i; done; }

pdftoppm -jpeg -jpegopt quality=80 -r 150 a.pdf b
togifs
gifsicle b-*.gif > b.gif
gifsicle --colors 256 --loop --delay 20 b-*.gif > b.gif
laf

# (find-fline "/tmp/gifs/")
# (find-fline "/tmp/gifs/b.gif")
# file:///tmp/gifs/b.gif

# (find-pdf-page "/tmp/gifs/a.pdf")






#  Local Variables:
#  coding:               utf-8-unix
#  End: