gered/toascii
Archived
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

append inline js script to animated gif frames to autostart animation

Browse source
This commit is contained in:
Gered 2014-04-03 22:51:52 -04:00
parent 6da8abfb39
commit 5e979c8ba5
2 changed files with 30 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
resources/gif-animation.js Normal file
View file

@ -0,0 +1,23 @@
setTimeout(function() {
var scripts = document.getElementsByTagName('script');
var thisScript = scripts[scripts.length - 1];
var frameContainer = thisScript.previousSibling;
var frames = frameContainer.children;
var currentFrame = frames[0];
function animate() {
currentFrame.style.display = 'block';
var delay = parseInt(currentFrame.dataset['delay']);
setTimeout(function() {
currentFrame.style.display = 'none';
currentFrame = currentFrame.nextSibling;
if (currentFrame == null)
currentFrame = frames[0];
animate();
}, delay);
}
animate();
}, 100);

9
src/toascii/models/image.clj
View file

@ -2,11 +2,14 @@
(:import (java.awt.image BufferedImage)
(javax.imageio.stream ImageInputStream))
(:require [clojure.string :as str]
[clojure.java.io :as io]
[clj-image2ascii.core :as i2a]
[toascii.util :refer [query-param-url->java-url]])
(:use hiccup.core))
(def ascii-pre-css "font-size:6pt; letter-spacing:1px; line-height:5pt; font-weight:bold;")
(def js-gif-animation (slurp (io/resource "gif-animation.js")))
(def ascii-pre-css "font-size:6pt; letter-spacing:1px; line-height:5pt; font-weight:bold; display: none;")
(defn get-image [^String url]
(let [java-url (query-param-url->java-url url)]
@ -37,4 +40,6 @@
(fn [frame]
(wrap-pre-tag (:image frame) (:delay frame)))
x)
(str/join x)))
(str/join x)
(str "<div class=\"animated-gif-frames\">" x "</div>")
(str x "<script type=\"text/javascript\">" js-gif-animation "</script>")))