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

Update screw insert

Browse source
This commit is contained in:
Leo Lou 2018-05-20 08:30:26 +09:00
parent 463f8124c7
commit ea6f29c469
1 changed files with 10 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/dactyl_keyboard/dactyl.clj
View file

@ -608,11 +608,17 @@
(screw-insert 0 lastrow bottom-radius top-radius height [0 8 0]) (screw-insert 0 lastrow bottom-radius top-radius height [0 8 0])
(screw-insert 3 lastrow bottom-radius top-radius height [9 4 0]) (screw-insert 3 lastrow bottom-radius top-radius height [9 4 0])
(screw-insert 3 0 bottom-radius top-radius height [6 -4 0]))) (screw-insert 3 0 bottom-radius top-radius height [6 -4 0])))
(def screw-insert-height 3.8)
(def screw-insert-bottom-radius (/ 5.31 2)) ; Hole Depth Y: 4.4
(def screw-insert-top-radius (/ 5.1 2)) (def screw-insert-height 4)
; Hole Diameter C: 4.1-4.4
(def screw-insert-bottom-radius (/ 4.4 2))
(def screw-insert-top-radius (/ 4.4 2))
(def screw-insert-holes (screw-insert-all-shapes screw-insert-bottom-radius screw-insert-top-radius screw-insert-height)) (def screw-insert-holes (screw-insert-all-shapes screw-insert-bottom-radius screw-insert-top-radius screw-insert-height))
(def screw-insert-outers (screw-insert-all-shapes (+ screw-insert-bottom-radius 1.6) (+ screw-insert-top-radius 1.6) (+ screw-insert-height 1.5)))
; Wall Thickness W:\t1.65
(def screw-insert-outers (screw-insert-all-shapes (+ screw-insert-bottom-radius 1.65) (+ screw-insert-top-radius 1.65) (+ screw-insert-height 1.5)))
(def screw-insert-screw-holes (screw-insert-all-shapes 1.7 1.7 350)) (def screw-insert-screw-holes (screw-insert-all-shapes 1.7 1.7 350))
(def model-right (difference (def model-right (difference