* 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>
		
			
				
	
	
		
			32 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			32 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
sketch001 = startSketchOn(XZ)
 | 
						|
  |> startProfile(at = [75.8, 317.2]) // [$startCapTag, $EndCapTag]
 | 
						|
  |> angledLine(angle = 0, length = 268.43, tag = $rectangleSegmentA001)
 | 
						|
  |> angledLine(angle = segAng(rectangleSegmentA001) - 90, length = 217.26, tag = $seg01)
 | 
						|
  |> angledLine(angle = segAng(rectangleSegmentA001), length = -segLen(rectangleSegmentA001))
 | 
						|
  |> line(endAbsolute = [profileStartX(%), profileStartY(%)], tag = $seg02)
 | 
						|
  |> close()
 | 
						|
extrude001 = extrude(sketch001, length = 100)
 | 
						|
  |> fillet(radius = 20, tags = [seg01])
 | 
						|
  |> chamfer(length = 50, tags = [seg02], tag = $seg04)
 | 
						|
  |> chamfer(
 | 
						|
       length = 50,
 | 
						|
       tags = [getOppositeEdge(seg01)],
 | 
						|
       tag = $seg03
 | 
						|
     )
 | 
						|
 | 
						|
sketch003 = startSketchOn(extrude001, face = seg04)
 | 
						|
   |> startProfile(at = [-69.1, 277.34])
 | 
						|
   |> angledLine(angle = 0, length = 41.48, tag = $rectangleSegmentA003)
 | 
						|
   |> angledLine(angle = segAng(rectangleSegmentA003) - 90, length = 104.8, tag = $rectangleSegmentB002)
 | 
						|
   |> angledLine(angle = segAng(rectangleSegmentA003), length = -segLen(rectangleSegmentA003), tag = $rectangleSegmentC002)
 | 
						|
   |> line(endAbsolute = [profileStartX(%), profileStartY(%)])
 | 
						|
   |> close()
 | 
						|
sketch002 = startSketchOn(extrude001, face = seg03)
 | 
						|
  |> startProfile(at = [159.25, 278.35])
 | 
						|
  |> angledLine(angle = 0, length = 40.82, tag = $rectangleSegmentA002)
 | 
						|
  |> angledLine(angle = segAng(rectangleSegmentA002) - 90, length = 132.27, tag = $rectangleSegmentB001)
 | 
						|
  |> angledLine(angle = segAng(rectangleSegmentA002), length = -segLen(rectangleSegmentA002), tag = $rectangleSegmentC001)
 | 
						|
  |> line(endAbsolute = [profileStartX(%), profileStartY(%)])
 | 
						|
  |> close()
 | 
						|
extrude002 = extrude(sketch002, length = 50)
 |