From 2c405abde5f644584651e7a9a8dba11ab849c68a Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 18 Mar 2018 14:04:49 +0000
Subject: [PATCH] fairphone-case: wip lanyard, proper profiles

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 fairphone-case.scad | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/fairphone-case.scad b/fairphone-case.scad
index bc0cef0..06edd69 100644
--- a/fairphone-case.scad
+++ b/fairphone-case.scad
@@ -533,9 +533,18 @@ module LanyardLanyardProfile(entry=false){
   }
 }
 
-module LanyardMainChannelProfile(){
+module LanyardCurveChannelProfile(){
   translate([0, -ly_r])
     LanyardLanyardProfile();
+}  
+
+module LanyardEntryChannelProfile(){
+  translate([0, -ly_r])
+    LanyardLanyardProfile(true);
+}  
+
+module LanyardMainChannelProfile(){
+  LanyardCurveChannelProfile();
   difference(){
     square(center=true, ly_r * [6, 2]);
     for (xs=[-1,+1])
@@ -1574,6 +1583,8 @@ module DemoProfiles(){ ////toplevel
 
   translate([0,20]) {
     LanyardMainChannelProfile();
+    translate([0,0,1]) color("purple") LanyardCurveChannelProfile();
+    translate([0,0,-1]) color("red") LanyardEntryChannelProfile();
   }
 
   translate([20,0]) {
-- 
2.30.2