0ea0d1703e
* Remove deprecated syntax Signed-off-by: Nick Cameron <nrc@ncameron.org> * fix one test * fix sketch on revolved face test * fix test: empty-scene default-planes act as expected * fix up more tests * another fix * remove another const --------- Signed-off-by: Nick Cameron <nrc@ncameron.org> Co-authored-by: Kurt Hutten Irev-Dev <k.hutten@protonmail.ch>
52 lines
2.2 KiB
Plaintext
52 lines
2.2 KiB
Plaintext
routerDiameter = 12.7
|
|
mmInInch = 25.4
|
|
templateDiameter = mmInInch * 11 / 16
|
|
templateGap = ((templateDiameter - routerDiameter) / 2) -0.5
|
|
slateWidthHalf = 41.5 / 2
|
|
minClampingDistance = 50 + 30
|
|
templateThickness = 10
|
|
radius = 10
|
|
depth = 30
|
|
length001 = slateWidthHalf - radius
|
|
length002 = depth + minClampingDistance
|
|
sketch001 = startSketchOn(XZ)
|
|
|> startProfile(at = [0, depth - templateGap])
|
|
|> xLine(length = length001, tag = $seg01)
|
|
|> arc(
|
|
angleEnd = 0,
|
|
angleStart = 90,
|
|
radius = radius - templateGap
|
|
)
|
|
|> yLine(endAbsolute = -templateGap * 2 - (templateDiameter / 2), tag = $seg05)
|
|
|> xLine(endAbsolute = slateWidthHalf + templateThickness, tag = $seg04)
|
|
|> yLine(length = -length002, tag = $seg03)
|
|
|> xLine(endAbsolute = 0, tag = $seg02)
|
|
|> xLine(length = -segLen(seg02, %))
|
|
|> yLine(length = segLen(seg03, %))
|
|
|> xLine(length = segLen(seg04, %))
|
|
|> yLine(length = segLen(seg05, %))
|
|
|> arc(
|
|
angleEnd = 90,
|
|
angleStart = 180,
|
|
radius = radius - templateGap
|
|
)
|
|
|> line(endAbsolute = [profileStartX(%), profileStartY(%)])
|
|
|> close()
|
|
extrude001 = extrude(sketch001, length = 5)
|
|
sketch002 = startSketchOn(extrude001, face = 'START')
|
|
|> startProfile(at = [-slateWidthHalf, -templateGap * 2 - (templateDiameter / 2)])
|
|
|> xLine(length = -7, tag = $rectangleSegmentA001)
|
|
|> angledLine(angle = segAng(rectangleSegmentA001, %) + 90, length = minClampingDistance, tag = $rectangleSegmentB001)
|
|
|> angledLine(angle = segAng(rectangleSegmentA001, %), length = -segLen(rectangleSegmentA001, %), tag = $rectangleSegmentC001)
|
|
|> line(endAbsolute = [profileStartX(%), profileStartY(%)])
|
|
|> close()
|
|
extrude002 = extrude(sketch002, length = 7.5)
|
|
sketch003 = startSketchOn(extrude001, face = 'START')
|
|
|> startProfile(at = [slateWidthHalf, -templateGap * 2 - (templateDiameter / 2)])
|
|
|> xLine(length = 7, tag = $rectangleSegmentA002)
|
|
|> angledLine(angle = segAng(rectangleSegmentA002, %) - 90, length = minClampingDistance)
|
|
|> angledLine(angle = segAng(rectangleSegmentA002, %), length = -segLen(rectangleSegmentA002, %))
|
|
|> line(endAbsolute = [profileStartX(%), profileStartY(%)])
|
|
|> close()
|
|
extrude003 = extrude(sketch003, length = 7.5)
|