Kwargs: startProfileAt (#6424)
Previous: ``` startProfileAt([x, y], %) startProfileAt([x, y], sketch001) ``` New: ``` startProfile(%, at = [x, y]) startProfile(sketch001, at = [x, y]) ```
This commit is contained in:
		@ -69,7 +69,7 @@ fn rightInvolute(i, sg) {
 | 
			
		||||
 | 
			
		||||
// Draw gear teeth
 | 
			
		||||
start = startSketchOn(XY)
 | 
			
		||||
  |> startProfileAt([xs[101], ys[101]], %)
 | 
			
		||||
  |> startProfile(at = [xs[101], ys[101]])
 | 
			
		||||
teeth = reduce([0..100], start, leftInvolute)
 | 
			
		||||
  |> arc(angleStart = 0, angleEnd = toothAngle, radius = baseDiameter / 2)
 | 
			
		||||
  |> reduce([1..101], %, rightInvolute)
 | 
			
		||||
@ -92,10 +92,10 @@ startAngle = asin(keywayWidth / 2 / holeRadius)
 | 
			
		||||
 | 
			
		||||
// Sketch the keyway and center hole and extrude
 | 
			
		||||
keyWay = startSketchOn(body, face = END)
 | 
			
		||||
  |> startProfileAt([
 | 
			
		||||
  |> startProfile(at = [
 | 
			
		||||
       holeRadius * cos(startAngle),
 | 
			
		||||
       holeRadius * sin(startAngle)
 | 
			
		||||
     ], %)
 | 
			
		||||
     ])
 | 
			
		||||
  |> xLine(length = keywayDepth)
 | 
			
		||||
  |> yLine(length = -keywayWidth)
 | 
			
		||||
  |> xLine(length = -keywayDepth)
 | 
			
		||||
 | 
			
		||||
		Reference in New Issue
	
	Block a user