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

RJ9 holder

Browse source
This commit is contained in:
Tom Short 2017-03-07 17:22:08 -05:00
parent 4b7cc77a65
commit fb4e89530e
1 changed files with 22 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -444,30 +444,33 @@
(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 rj9-holder1
(on-wall-place 1 20
(difference (cube 14.78 13 22.38)
(translate [0 0 -5] (cube 10.78 13 5)))))
(def rj9-cube (cube 14.78 13 22.38))
(def rj9-space (on-wall-place 1 20 rj9-cube))
(def rj9-holder (on-wall-place 1 20
(difference rj9-cube
(union (translate [0 2 0] (cube 10.78 9 18.38))
(translate [0 0 5] (cube 10.78 13 5))))))
(def rj9-holder (on-wall-place 1 20
(difference rj9-cube
(union (translate [0 2 0] (cube 10.78 9 18.38))
(translate [0 0 5] (cube 10.78 13 5))))))
(def teensy-width 20) (def teensy-width 20)
(def teensy-height 12) (def teensy-height 12)
(def teensy-length 33) (def teensy-length 33)
(def teensy2-length 53)
(def teensy-pcb-thickness 1.6) (def teensy-pcb-thickness 1.6)
(def teensy-offset-height 5) (def teensy-offset-height 5)
(def usb-cutout (def teensy2 (on-wall-place 0 20 (cube teensy-height teensy2-length teensy-width)))
(let [hole-height 6.2
side-radius (/ hole-height 2)
hole-width 10.75
side-cylinder (->> (cylinder side-radius teensy-length)
(with-fn 20)
(translate [(/ (- hole-width hole-height) 2) 0 0]))]
(->> (color [20/255 163/255 163/255 1])
(hull side-cylinder
(mirror [-1 0 0] side-cylinder))
(translate [0 (/ teensy-length 2) (- side-radius)])
(translate [0 0 (- 1)])
(translate [0 0 (- teensy-offset-height)])
(on-wall-place 1 20))))
(spit "repl.scad" (spit "repl.scad"
@ -476,9 +479,9 @@
connectors connectors
thumb thumb
thumb-connectors thumb-connectors
case-walls (difference case-walls rj9-space)
test-shape rj9-holder
; usb-cutout teensy2
; thumbcaps ; thumbcaps
; caps ; caps
))) )))