summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/dactyl_keyboard/dactyl.clj18
1 files changed, 14 insertions, 4 deletions
diff --git a/src/dactyl_keyboard/dactyl.clj b/src/dactyl_keyboard/dactyl.clj
index 3aca913..f05f3ba 100644
--- a/src/dactyl_keyboard/dactyl.clj
+++ b/src/dactyl_keyboard/dactyl.clj
@@ -13,13 +13,13 @@
;; Shape parameters ;;
;;;;;;;;;;;;;;;;;;;;;;
-(def nrows 5)
-(def ncols 6)
+(def nrows 4)
+(def ncols 5)
(def α (/ π 12)) ; curvature of the columns
(def β (/ π 36)) ; curvature of the rows
(def centerrow (- nrows 3)) ; controls front-back tilt
-(def centercol 2) ; controls left-right tilt / tenting (higher number is more tenting)
+(def centercol 3) ; controls left-right tilt / tenting (higher number is more tenting)
(def tenting-angle (/ π 12)) ; or, change this for more precise tenting control
(def column-style
(if (> nrows 5) :orthographic :standard)) ; options include :standard, :orthographic, and :fixed
@@ -32,7 +32,7 @@
(def thumb-offsets [6 -3 7])
-(def keyboard-z-offset 14) ; controls overall height; original=9 with centercol=3; use 15 for centercol=2
+(def keyboard-z-offset 9) ; controls overall height; original=9 with centercol=3; use 15 for centercol=2
(def extra-width 2.5) ; extra space between the base of keys; original= 2
(def extra-height 1.0) ; original= 0.5
@@ -773,3 +773,13 @@
; wire-posts
)))
+(spit "things/right-plate.scad"
+ (write-scad
+ (cut
+ (translate [0 0 -0.1]
+ (difference (union case-walls
+ teensy-holder
+ ; rj9-holder
+ screw-insert-outers)
+ (translate [0 0 -10] screw-insert-screw-holes))
+ )))) \ No newline at end of file