Dopo il blocco dinamico per disegnare una scala in pianta, con l'aiuto dell'AI (Amico immaginario) ho riscritto un autolisp per tracciare la sezione di una scala. È dotato di anteprima in tempo reale e consente, dato il punto di partenza e di arrivo, di tracciarla ergonomica o esattamente tra i due punti, o di personalizzare la pedata, infine anche eventualmente di creare un sormonto, tondo o squadrato, di misura a scelta, e infine scriverne i parametri.

Se si è impostato INSUNITS (l'unità di misura del disegno) il programma adatta automaticamente la scala a cm, m, mm, inch o foot, e lavora nell'UCS corrente. Funziona anche nelle versioni LIGHT che supportano autolisp (≥2004).

Di default traccia una scala con le alzate prossime a 16.5 cm, e pedata 2 a + p ≈ 63 cm, ma è tutto configurabile.

Scarica

Da qui o da github - most recent (versione più recente). Se volete contribuire implementando o migliorando il codice siete i benvenuti su github.

Informazioni

Qui il codice e una descrizione dettagliata in inglese.
Tutti comandi sono in inglese, di seguito una piccola traduzione dei termini tecnici:

Comando

Una volta caricato l'autolisp
Digita STAIR al prompt.

FLUSSO DI LAVORO

1. Seleziona Punto Base
2. Seleziona Punto di Arrivo
3. Rivedi l'Anteprima
4. Modifica i parametri della scala se necessario
5. Accetta o Esci

MENU PRINCIPALE

[+/-/Tread/Nosing/Accept/Exit] <Accetta>

ALBERO DEL MENU

STAIR
├─ Seleziona Punto Base
├─ Seleziona Punto di Arrivo
│
├─ Menu Principale
│   ├─ +
│   │   └─ Aggiungi alzata
│   │
│   ├─ -
│   │   └─ Rimuovi alzata
│   │
│   ├─ Tread
│   │   ├─ Value
│   │   │   └─ Valore fisso pedata
│   │   │
│   │   ├─ Ergonomic
│   │   │   └─ Regola ergonomica automatica
│   │   │
│   │   ├─ Fit
│   │   │   └─ Adatta la scala alla corsa selezionata
│   │   │
│   │   └─ Accetta
│   │
│   ├─ Nosing (sormonto)
│   │   ├─ None (Nessuno)
│   │   │
│   │   ├─ Square (Squadrato)
│   │   │   ├─ Sporgenza X
│   │   │   └─ Spessore Y
│   │   │
│   │   ├─ Round (Toroidale)
│   │   │   └─ Diametro
│   │   │
│   │   └─ Annulla
│   │
│   ├─ Accept
│   │   ├─ Finalizza il disegno
│   │   └─ Report MTEXT opzionale
│   │
│   └─ Esci
│       └─ Elimina anteprima
│
└─ Fine

MODALITÀ PEDATA

ERGONOMICA

Pedata calcolata automaticamente usando:
2R + T ≈ 63 cm
scalata in base alle INSUNITS del disegno (funziona in pollici, piedi, millimetri e metri).

FIXEDTREAD (PEDATA FISSA)

L'utente specifica un valore per la pedata.
Lo stesso valore viene memorizzato tra le sessioni.

FIT (ADATTA)

La corsa totale è vincolata dai punti selezionati.
Formula:
pedata = corsaTotale / (alzate - 1)
dove:
corsaTotale = abs(ep.x - bp.x)

TIPI DI SORMONTO (NOSING)

NESSUNO

Profilo della scala come semplice zig-zag.

QUADRATO

Sormonto rettangolare.

Parametri:

• Proiezione X
• Discesa Y

ARROTONDATA

Sormonto semicircolare.

Parametro:

• Diametro

REPORT

Il report di anteprima è mostrato nel prompt durante la modifica con avviso ⚠ se 50° < angolo <20°.
Esempio:
Anteprima -> 14 alzate da 11.96 | 13 pedate da 39.08 | Altezza 167.46 | Corsa 508.01 | 2R+T 63.00 | Pedata ERGONOMICA | Sporgenza QUADRATA | Angolo 18.2° ⚠

Il report finale contiene:

• Altezza
• Corsa
• Numero di alzate
• Numero di pedate
• Valore alzata
• Valore pedata
• 2R+T
• Angolo della scala

REPORT MTEXT

(Opzionale)

Inserito automaticamente:

• Sopra l'ultimo gradino
• Allineato all'UCS
• Altezza = alzata / 3
• Memorizza la preferenza Sì/No
• Avviso ⚠ se 50° < angolo <20°

NOTE

• Indipendente dall'UCS.
• Indipendente dalle insunits.
• Direzione della corsa rilevata automaticamente.
• Geometria e parametri di anteprima.
• Accetta promuove l'anteprima a geometria finale.
• Esci elimina la geometria di anteprima.

Per commenti e suggerimenti raggiungetemi su github.

Enjoy