Con l'aiuto del mio Amico Immaginario, ho scritto un autolisp che disegna il profilo di una sezione di scale dati due punti, con anteprima e diversi parametri modificabili.
Pubblicata sul mio blog qui:
andrearicci.it/howtocad/tools/…
ma la versione più aggiornata sarà sempre qui, dove sono anche graditi contributi:
github.com/andrearicci/autolis…
Si adatta all'UCS e funziona con mm, cm, m, inch e feet (se insunit è impostato).

STAIR
├─ Pick Base Point
├─ Pick Arrival Point
│
├─ Main Menu
│   ├─ +
│   │   └─ Add riser
│   │
│   ├─ -
│   │   └─ Remove riser
│   │
│   ├─ Tread
│   │   ├─ Value
│   │   │   └─ Fixed tread value
│   │   │
│   │   ├─ Ergonomic
│   │   │   └─ Automatic Ergonomic rule
│   │   │
│   │   ├─ Fit
│   │   │   └─ Fit stair to picked run
│   │   │
│   │   └─ Accept
│   │
│   ├─ Nosing
│   │   ├─ None
│   │   │
│   │   ├─ Square
│   │   │   ├─ Nosing X
│   │   │   └─ Nosing Y
│   │   │
│   │   ├─ Round
│   │   │   └─ Diameter
│   │   │
│   │   └─ Cancel
│   │
│   ├─ Accept
│   │   ├─ Final geometry
│   │   └─ Optional MTEXT report
│   │
│   └─ Exit
│       └─ Delete preview
│
└─ End