Unfortunately, the cursor moving ANSI hasn't worked in any console I've tried it in (including the native Window's console). I had to resort to using this hack function:
(defn move-cursor-to [x y] (let [r #(apply str (repeat % %2))] (print (str (r y \newline) (r x \space)))))
3 comments:
Works well, thank you!
Awesome, perfect. Thanks.
Unfortunately, the cursor moving ANSI hasn't worked in any console I've tried it in (including the native Window's console). I had to resort to using this hack function:
(defn move-cursor-to [x y]
(let [r #(apply str (repeat % %2))]
(print (str (r y \newline)
(r x \space)))))
Post a Comment