modeling-app/public/kcl-samples/walkie-talkie/button.kcl

// Walkie Talkie button

// set units
@settings(defaultLengthUnit = in)

// import constants
import buttonWidth, buttonHeight, buttonThickness from 'globals.kcl'

// create a function to define the button
export fn button() {

  // sketch the button profile and extrude
  buttonSketch = startSketchOn('XZ')
    |> startProfileAt([0, 0], %)
    |> angledLine({
         angle = 180,
         length = buttonWidth
       }, %, $tag1)
    |> angledLine({
         angle = 270,
         length = buttonHeight
       }, %, $tag2)
    |> angledLine({
         angle = 0,
         length = buttonWidth
       }, %)
    |> close()
  buttonExtrude = extrude(buttonSketch, length = buttonThickness)
    |> chamfer(
         length = .050,
         tags = [
           getNextAdjacentEdge(tag1),
           getNextAdjacentEdge(tag2)
         ]
       )
     |> appearance(color = "#ff0000")

  return buttonExtrude
}