使用ClojureScript在HTML页面上渲染Three.js场景

Question

我正在尝试在ClojureScript中实现three.js的创建场景示例。

我不需要进行动画，只想显示静态场景（一个绿色块）。

问题似乎出在被调用以渲染场景的这个函数中。

    (defn ^:export draw []
      (.render renderer scene camera)
    )

这就是从HTML中进行调用的内容。

    %script{:type => "text/javascript"}
      three.demo.draw();

当我让它在文档主体中打印“HELLO”时，它会查看并运行绘图函数。

    (.write js/document "HELLO")

我不知道出了什么问题，页面上的其他所有内容都已呈现。

在这个HTML文件中，我有：

<script src='https://raw.github.com/mrdoob/three.js/master/build/three.js'></script>
<script src='js/main.js' type='text/javascript'></script>
<script type='text/javascript'>goog.require('main')</script>

和

<script type='text/javascript'>
  three.demo.draw();
</script>

以下是main.js的结尾，它是由clojurescript文件创建的Javascript代码。

    goog.provide("three.demo");
    goog.require("cljs.core");
    goog.require("goog.dom");
    three.demo.scene = new THREE.Scene;
    three.demo.camera = new THREE.PerspectiveCamera(75, window.innerWidth / window.innerHeight, 0.1, 1E3);
    three.demo.renderer = new THREE.WebGLRenderer;
    three.demo.renderer.setSize(window.innerWidth, window.innerHeight);
    document.body.appendChild(three.demo.renderer.domElement);
    three.demo.geometry = new THREE.CubeGeometry(1, 1, 1);
    three.demo.material = new THREE.MeshBasicMaterial(cljs.core.ObjMap.fromObject(["\ufdd0'color"], {"\ufdd0'color":255}));
    three.demo.cube = new THREE.Mesh(three.demo.geometry, three.demo.material);
    three.demo.scene.add(three.demo.cube);
    three.demo.camera.position.setZ(5);
    three.demo.draw = function draw() {
      three.demo.renderer.render(three.demo.scene, three.demo.camera);
      return document.write("HELLO")
    };
    goog.exportSymbol("three.demo.draw", three.demo.draw);

在 project.clj 文件中的 :cljsbuild 下面有。

    :foreign-libs [{:file "https://raw.github.com/mrdoob/three.js/master/build/three.js"
                    :provides ["three"]}]

我尝试了 :externs 和 :foreign-libs，但似乎都不起作用。

- Kao Nashi

---

我认为如果您用纯JS编写完全相同的方法，那么我们就可以排除代码转换器的问题。此外，是否有堆栈跟踪信息？还是没有错误但什么都没有显示？ - Matt Randell

Answer 1

创建场景代码的直接翻译如下：

(defn ^:export example []
  (let [scene (js/THREE.Scene.)
        width (.-innerWidth js/window)
        height (.-innerHeight js/window)
        camera (js/THREE.PerspectiveCamera. 75 (/ width height) 0.1 1000 )
        renderer (js/THREE.CanvasRenderer.)
        geometry (js/THREE.CubeGeometry. 1 1 1)
        material (js/THREE.MeshBasicMaterial. (clj->js {:color 0x00ff00}))
        cube (js/THREE.Mesh. geometry material)
        render (fn cb []
                   (js/requestAnimationFrame cb) 
                   (set! (.-x (.-rotation cube))  (+ 0.1 (.-x (.-rotation cube))) )
                   (set! (.-y (.-rotation cube))  (+ 0.1 (.-y (.-rotation cube))) )
                   (.render renderer scene camera)
                 ) 
        ]
    (.setSize renderer width height)
    (.appendChild js/document.body (.-domElement renderer) )
    (.add scene cube)
    (set! (.-z (.-position camera))  5)
    (render)
    )
  )

这段代码没有使用:foreign-libs和:require，而是直接使用JS互操作，并假设之前已经加载了three.js。可能有更好的方法来实现，但这是一个有效的一对一翻译。

- f3lix