使用quil在clojure中加载/显示图像

时间:2013-09-10 09:14:37

标签: clojure processing quil

我有基本的quil example正在工作

根据此tutorial,在处理中加载/显示图像的代码如下所示:

PImage img; 

void setup() {
   size(320,240);
   img = loadImage("mysummervacation.jpg");
}

void draw() {
   background(0);
   image(img,0,0);
}

我把它翻译成:

(ns img-demo.core
  (:use quil.core))

(def img (ref nil))

(defn setup []
  (background 0)
  (dosync (ref-set img (load-image "bill.jpg"))))

(defn draw []
  (image @img 0 0))

(defsketch example
  :title "image demo"
  :setup setup
  :draw draw
  :size [2560 1920])

当我执行代码时,会打开一个窗口,闪烁白色并在之后保持黑色。没有错误。

我怀疑它与图像位置有关,因为在教程中它说:“loadImage()查找存储在Processing sketch的”data“文件夹中的图像文件。”

我尝试了各种位置和路径,甚至在我的项目文件夹中创建了一个“数据”文件夹并将图像放在那里,但没有成功。

我正在使用 Clojure 1.5.1 / 莱宁根2.1.3 / emacs24 + / nrepl

欢迎任何想法,

提前致谢。

1 个答案:

答案 0 :(得分:3)

我选择了一张随机图片,将其重命名为bill.jpg并将其放在项目根目录下,您的代码运行良好。

以下是我认为相关的文件及其位置:

~/Projects/repl/project.clj
~/Projects/repl/bill.jpg
~/Projects/repl/src/img.clj