协助翻译JS到CLJS

Assistance translating JS to CLJS

本文关键字：CLJS JS 翻译      更新时间：2023-09-26

我在JS中开发了一个简单的节拍器，作为JS练习，也是出于需要。它可以在这里找到：https://github.com/Greduan/js-metronome/blob/master/js/main.js

我在一定程度上把它翻译成了CLJS:

(ns mies-2.core
  (:use 'createjs.Sound))
(def assetsPath "assets/")
(def manifest [{:src "Click1.ogg|Click1.mp3" :id 1} {:src "Click2.ogg|Click2.mp3" :id 2}])
(.registerManifest createjs/Sound [manifest assetsPath])
(defn stop []
  ((js/clearInterva(intervalID))
   (.stop createjs/Sound [])
   (.log js/console "Stopped sound(s).")))
(defn playSound [target]
  ;                                           v FIX
  ((def instance (.play createjs/Sound [target.id (.INTERRUPT_NONE createjs/Sound []) 0 0 false 1]))
  ;                                 v FIX
  (or (== instance nil) (== instance.playState (.PLAY_FAILED createjs/Sound)) nil)
  (.log js/console ["Played sound ID:" target.id])))
(defn soundLoop [soundID]
  ;                                                             v FIX
  ((def bpmInput (.querySelector js/document ["[name='"bpm'"]"] .value))
   (def bpm (/ 60000 bpmInput))
   (.log js/console ["Input:" bpmInput "Delay:" bpm])
   (def intervalID (js/setInterval [fn [] (playSound [soundID]) bpm]))))

我在评论中指出了我需要帮助的地方，比如FIX.：）

基本上是thing.function.value或类似的系统，特别是将document.querySelector('[name="bpm"]').value翻译成CLJS。

变量，有一个variable.value系统，我如何用CLJS实现这一点？

给我指一个正确的方向就足够了，我非常感激

我已经将您的js应用程序转换为cljs并创建了一个存储库：https://github.com/edbond/cljs-metronome如果它对你不起作用，请告诉我。

相关文章：