Advertisement
Guest User

Untitled

a guest
Aug 18th, 2019
75
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.92 KB | None | 0 0
  1. function dir-opt
  2. set fmt
  3. set sig
  4. switch $argv[1]
  5. case left
  6. set fmt "+%d+0"
  7. set sig '(-1)'
  8. case right
  9. set fmt "+%d+0"
  10. set sig 1
  11. case up
  12. set fmt "+0+%d"
  13. set sig '(-1)'
  14. case down
  15. set fmt '+0+%d'
  16. set sig 1
  17. end
  18. set frame $argv[2]
  19. set trans (echo "$sig * ($frame * 32 / 6)" | bc)
  20. printf $fmt $trans
  21. end
  22.  
  23. set dirs left right up down
  24.  
  25. if [ (count $argv) != 1 ]
  26. echo "usage : this-script image-of-64x64"
  27. exit 1
  28. else
  29. set image $argv
  30. for from in $dirs
  31. for to in $dirs
  32. mkdir "$from-$to"
  33. for i in (seq 0 11)
  34. set j (echo "$i - 12" | bc)
  35. convert -size 64x64 xc:white \
  36. $image -geometry (dir-opt $to $i) -composite \
  37. $image -geometry (dir-opt $from $j) -composite \
  38. $from-$to/frame-$i.gif
  39. end
  40. convert -delay 6 -dispose background $from-$to/frame-*.gif -loop 0 $from-$to/$from-$to.gif
  41. end
  42. end
  43. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement