39 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			39 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
// Socket Head Cap Screw
 | 
						|
// This is for a #10-24 screw that is 1.00 inches long. A socket head cap screw is a type of fastener that is widely used in a variety of applications requiring a high strength fastening solution. It is characterized by its cylindrical head and internal hexagonal drive, which allows for tightening with an Allen wrench or hex key.
 | 
						|
 | 
						|
// Set units
 | 
						|
@settings(defaultLengthUnit = in, kclVersion = 1.0)
 | 
						|
 | 
						|
// Define parameters
 | 
						|
boltDiameter = 0.190
 | 
						|
boltLength = 1.0
 | 
						|
boltHeadLength = boltDiameter
 | 
						|
boltHeadDiameter = 0.313
 | 
						|
boltHexDrive = 5 / 32
 | 
						|
boltHexFlatLength = boltHexDrive / (2 * cos(30deg))
 | 
						|
 | 
						|
// Create the head of the cap screw
 | 
						|
boltHead = startSketchOn(XZ)
 | 
						|
  |> circle(center = [0, 0], radius = boltHeadDiameter / 2, tag = $topEdge)
 | 
						|
  |> extrude(length = -boltHeadLength)
 | 
						|
  |> fillet(radius = 0.020, tags = [topEdge, getOppositeEdge(topEdge)])
 | 
						|
 | 
						|
// Define the sketch of the hex pattern on the screw head
 | 
						|
hexPatternSketch = startSketchOn(boltHead, face = START)
 | 
						|
  |> startProfile(at = [
 | 
						|
       boltHexDrive / 2,
 | 
						|
       boltHexFlatLength / 2
 | 
						|
     ])
 | 
						|
  |> angledLine(angle = 270, length = boltHexFlatLength)
 | 
						|
  |> angledLine(angle = 210, length = boltHexFlatLength)
 | 
						|
  |> angledLine(angle = 150, length = boltHexFlatLength)
 | 
						|
  |> angledLine(angle = 90, length = boltHexFlatLength)
 | 
						|
  |> angledLine(angle = 30, length = boltHexFlatLength)
 | 
						|
  |> close()
 | 
						|
  |> extrude(length = -boltHeadLength * 0.75)
 | 
						|
boltBody = startSketchOn(boltHead, face = END)
 | 
						|
  |> circle(center = [0, 0], radius = boltDiameter / 2, tag = $filletEdge)
 | 
						|
  |> extrude(length = boltLength)
 | 
						|
  |> fillet(radius = .020, tags = [getOppositeEdge(filletEdge)])
 | 
						|
  |> appearance(color = "#4dd043", metalness = 90, roughness = 90)
 |