diff --git a/src/heyarne/all_my_friends/core.cljs b/src/heyarne/all_my_friends/core.cljs index 9e29e63..e229029 100644 --- a/src/heyarne/all_my_friends/core.cljs +++ b/src/heyarne/all_my_friends/core.cljs @@ -70,6 +70,7 @@ (set! (.-onloadedmetadata video-elem) #(resolve video-elem))))) ;; TODO: Handle rejected permission request +;; TODO: Initialize model in the background (defn init [] (swap! state ::status :webcam-init) @@ -85,8 +86,7 @@ ;; initialize canvas (set! (.-width canvas) (.-videoWidth video)) (set! (.-height canvas) (.-videoHeight video)) - #_(.translate ctx (.-width canvas) 0) - #_(.scale ctx -1 1) + #_(.scale ctx (/ (.-clientWidth video) (.-videoWidth video)) (/ (.-clientHeight video) (.-videoHeight video))) ;; initalize model (swap! state ::status :model-init) @@ -95,6 +95,8 @@ (then #(.load facemesh #js {:maxFaces 1})) (then #(detect-faces % video)))))))) +(.-clientWidth (.querySelector js/document "video#capture")) + (defonce initialize (init) #_(do (println "Initializing…")