jasmine/dactyl-manuform
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fix on-wall-rotation

Browse source
This commit is contained in:
Tom Short 2017-03-07 14:52:07 -05:00
parent 90e5023244
commit 4b7cc77a65
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/dactyl_keyboard/dactyl-manuform.clj
View file

@ -439,11 +439,12 @@
(defn on-wall-place [column depth shape] (defn on-wall-place [column depth shape]
(key-place column 0 (key-place column 0
(->> shape (->> shape
(rotate (* α centerrow) [-1 0 0])
(rotate (+ (* β (- centercol column)) (/ π 12)) [0 -1 0]) (rotate (+ (* β (- centercol column)) (/ π 12)) [0 -1 0])
(rotate (* α centerrow) [-1 0 0])
(translate [0 (/ mount-height 2) -15]) (translate [0 (/ mount-height 2) -15])
; (Math/sin (/ α 2))) ; (Math/sin (/ α 2)))
))) )))
; (def test-shape (on-wall-place 1 20 (translate [2.5 15 5] (cube 5 30 10))))
(def test-shape (on-wall-place 1 20 (cube 5 30 10))) (def test-shape (on-wall-place 1 20 (cube 5 30 10)))
(def teensy-width 20) (def teensy-width 20)