diff --git a/src/clj_figlet/core.clj b/src/clj_figlet/core.clj index d52ac60..753923b 100644 --- a/src/clj_figlet/core.clj +++ b/src/clj_figlet/core.clj @@ -1,6 +1,16 @@ -(ns clj-figlet.core) +(ns clj-figlet.core + (:import (java.io File)) + (:require [clojure.string :as str])) + +(defn- parse-flf-header [header-line] + (let [parts (str/split header-line #" ")] + {:hardblank (-> parts first last) + :height (Integer/parseInt (nth parts 1)) + :num-comments (Integer/parseInt (nth parts 5))})) + +(defn load-flf [file] + (let [lines (str/split (slurp file) #"\n") + header (parse-flf-header (first lines)) + char-lines (drop (inc (:num-comments header)) lines)] + )) -(defn foo - "I don't do a whole lot." - [x] - (println x "Hello, World!"))