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

Question

我已经让基本的quil 示例工作了

根据这个教程，在处理过程中加载/显示图像的代码如下所示：

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()查找存储在处理素描的"data“文件夹中的图像文件。”

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

我使用Clojure 1.5.1 /Leiningen2.1.3/ emacs24+ / nrepl

任何想法都是欢迎的

提前谢谢。

Answer 1

我选择了一张随机图片，将其重命名为bill.jpg，并将其放在项目根目录下，您的代码就完美地工作了。

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

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