| Autore |
 Discussione  |
|
|
Foxhound
Nuovo Arrivato
2 Messaggi |
 Inserito il - 13 aprile 2011 : 20:28:00
|
|
Ciao, sono nuovo, complimenti per il forum. E' presente un comando che mi realizzi l'asse formato tra due archi che non hanno ne origine in comune ne curvatura uguale? (in poche parole ho bisogno dell'insieme dei punti che si trovano a metà tra l'uno e 'altro arco)
|
A |
Modificato da - Foxhound in Data 13 aprile 2011 20:29:10
|
|
|
Terminator
Utente Master
725 Messaggi |
Inserito il - 14 aprile 2011 : 06:40:03
|
| comando linea --> m2p --> clic sui due estremi più vicini dei due archi --> altro clic sugli altri due estremi --> hai l'asse |
 |
|
|
Giuseppe Mauro
Amministratore
Regione: Campania
Prov.: Napoli
2704 Messaggi |
Inserito il - 14 aprile 2011 : 11:26:29
|
Mica ho capito cosa cerchi...
Terminator ti ha spiegato la procedura per cercare un segmento che sia medio tra gli estremi degli archi, che forse e' quello che cerchi, ma non e' un asse...
un asse dovrebbe avere caratteristiche di equidistanza, e tra 2 archi diventa difficile. Dovrebbe' piu avere la forma di un paraboloide.
Ci puoi spiegare meglio?
|
|
|
|
Foxhound
Nuovo Arrivato
2 Messaggi |
Inserito il - 14 aprile 2011 : 19:31:56
|
Essatto Mauro è quella la difficoltà che ho a disegnare l'asse. Però mi correggo hanno uguale curvatura.
Ci sono riuscito a disegnarlo, gli archi non hanno una origine in comune ma hanno un punto di rotazione in cui poi ho fatto serie polare per realizzarli.
Niente ho fatto una serie polare con metà dei gradi dei due profili e mi è risultato un arco perfettamente al centro che rappresenta l'asse.
Comunque in caso si dovesse disegnare un asse tra due curve differenti senza un comando specifico sarebbe impossile. |
A |
Modificato da - Foxhound in data 14 aprile 2011 19:47:22 |
|
|
|
joseph
Utente Master
Regione: Lombardia
Prov.: Cremona
Città: Casalmaggiore
1884 Messaggi |
Inserito il - 14 aprile 2011 : 23:06:21
|
Improponibile forse, impossibile mai (scherzo!!)
Non è un arco vero e proprio ma, aumentando il valore della variabile, la differenza è minima.
Immagine inserita:
118,33 KB |
|
|
|
Terminator
Utente Master
725 Messaggi |
Inserito il - 15 aprile 2011 : 08:43:48
|
| Fra il punto 7 e il punto 8 sggiungerei un bel comandO OVERKILL, dato che i segmenti ottenuti dall'esplosione delle regioni sono sovrapposti. |
|
|
|
arri
Utente Master
Regione: Lombardia
14951 Messaggi |
Inserito il - 15 aprile 2011 : 09:44:18
|
Messaggio inserito da Terminator
un bel comandO OVERKILL
è possibile sfruttare il comando OVERKILL senza passare attraverso le finestre di dialogo ?
|
|
|
|
GP
Utente Master
Regione: Piemonte
Prov.: Vercelli
2776 Messaggi |
Inserito il - 15 aprile 2011 : 10:00:43
|
Messaggio inserito da arri
è possibile sfruttare il comando OVERKILL senza passare attraverso le finestre di dialogo ?
Col solito trattino anteposto al comando.
 |
|
|
|
Terminator
Utente Master
725 Messaggi |
Inserito il - 15 aprile 2011 : 10:09:07
|
Senza scomodare OVERKILL potrebbe andare bene questo, scritto di getto:
(defun C:TROVAASSE (/ gruppolinee index surf1 surf2 arc1
arc2 arcvl1 arcvl2 pinizialearc1 pinizialearc2
pfinalearc1 pfinalearc2 line1 line2
)
(setq gruppolinee (ssadd)
surf1 (getvar "SURFTAB1")
surf2 (getvar "SURFTAB2")
arc1 (car (entsel "\nSelezionare primo arco: "))
arc2 (car (entsel "\nSelezionare secondo arco: "))
arc1vl (vlax-ename->vla-object arc1)
arc2vl (vlax-ename->vla-object arc2)
pinizialearc1 (vlax-safearray->list (vlax-variant-value (vla-get-startpoint arc1vl)))
pinizialearc2 (vlax-safearray->list (vlax-variant-value (vla-get-startpoint arc2vl)))
pfinalearc1 (vlax-safearray->list (vlax-variant-value (vla-get-endpoint arc1vl)))
pfinalearc2 (vlax-safearray->list (vlax-variant-value (vla-get-endpoint arc2vl)))
)
(setvar "SURFTAB1" 1000)
(setvar "SURFTAB2" 2)
(command "_LINE" pinizialearc1 pinizialearc2 "")
(setq line1 (entlast))
(command "_LINE" pfinalearc1 pfinalearc2 "")
(setq line2 (entlast))
(command "_EDGESURF" arc1 line1 arc2 line2 "_EXPLODE" (entlast))
(setq gruppo (ssget "p"))
(setq index 0)
(repeat (sslength gruppo)
(command "_LINE"
(cdr (assoc 11 (entget (ssname gruppo index))))
(cdr (assoc 12 (entget (ssname gruppo index))))
""
)
(ssadd (entlast) gruppolinee)
(setq index (1+ index))
)
(command "_ERASE" gruppo line1 line2 "" "_PEDIT" "P" gruppolinee "" "_J" "" "")
(setvar "SURFTAB1" surf1)
(setvar "SURFTAB2" surf2)
(princ)
)
(princ
"\nTROVAASSE (vers.1) - by Terminator"
)
(princ "\nDigitare TROVAASSE per lanciare il lisp")
(princ) |
|
|
|
arri
Utente Master
Regione: Lombardia
14951 Messaggi |
Inserito il - 15 aprile 2011 : 10:11:28
|
Messaggio inserito da GP
Col solito trattino anteposto al comando.
grazie 
sarebbe interessante inglobarlo in un lisp per poter eseguire la pulizia del dwg mediante la divisione in riquadri automatici.
La pulizia globale su dwg complessi richiede tantissimo tempo ...
|
|
|
|
Terminator
Utente Master
725 Messaggi |
Inserito il - 15 aprile 2011 : 10:18:52
|
| Messaggio inserito da GP
Col solito trattino anteposto al comando. |
E invece questa volta il trattino non serve essendo un comando degli EXPRESS TOOLS. Mi sembra, fra l'altro, che OVERKILL è uno comandi inglobati già nella versione AutoCAD 2012. Dato che quelli dell'Autodesk ci hanno preso gusto per i nomi lunghissimi deI nuovi comandi e variabili, non oso pensare come chiameranno in italiano questo comando, forse UCCIDIENTITASOVRAPPOSTE?? |
|
|
|
arri
Utente Master
Regione: Lombardia
14951 Messaggi |
Inserito il - 15 aprile 2011 : 10:27:24
|
Messaggio inserito da Terminator
E invece questa volta il trattino non serve
serve, altrimenti esce la finestra di dialogo
|
|
|
|
Terminator
Utente Master
725 Messaggi |
Inserito il - 15 aprile 2011 : 10:28:44
|
Pardon, mi ero fissato con l'underscore, il trattino invece è il segno meno. |
Modificato da - Terminator in data 15 aprile 2011 10:31:25 |
|
|
|
arri
Utente Master
Regione: Lombardia
14951 Messaggi |
Inserito il - 15 aprile 2011 : 10:33:55
|
Messaggio inserito da Terminator
Pardon, mi ero fissato con l'underscore, il trattino invece è il segno -.
naturalmente la richiesta del lisp sopra citato è rivolta anche a te
|
|
|
|
Terminator
Utente Master
725 Messaggi |
Inserito il - 15 aprile 2011 : 11:01:06
|
Solito bug trovato in ritardo (righe aggiunte in rosso):
(defun C:TROVAASSE (/ gruppolinee index surf1 surf2 arc1
arc2 arcvl1 arcvl2 pinizialearc1 pinizialearc2
pfinalearc1 pfinalearc2 line1 line2
)
(vl-load-com)
(setq osm(getvar "OSMODE"))
(setvar "OSMODE" 0)
(setq gruppolinee (ssadd)
surf1 (getvar "SURFTAB1")
surf2 (getvar "SURFTAB2")
arc1 (car (entsel "\nSelezionare primo arco: "))
arc2 (car (entsel "\nSelezionare secondo arco: "))
arc1vl (vlax-ename->vla-object arc1)
arc2vl (vlax-ename->vla-object arc2)
pinizialearc1 (vlax-safearray->list (vlax-variant-value (vla-get-startpoint arc1vl)))
pinizialearc2 (vlax-safearray->list (vlax-variant-value (vla-get-startpoint arc2vl)))
pfinalearc1 (vlax-safearray->list (vlax-variant-value (vla-get-endpoint arc1vl)))
pfinalearc2 (vlax-safearray->list (vlax-variant-value (vla-get-endpoint arc2vl)))
)
(setvar "SURFTAB1" 1000)
(setvar "SURFTAB2" 2)
(command "_LINE" pinizialearc1 pinizialearc2 "")
(setq line1 (entlast))
(command "_LINE" pfinalearc1 pfinalearc2 "")
(setq line2 (entlast))
(command "_EDGESURF" arc1 line1 arc2 line2 "_EXPLODE" (entlast))
(setq gruppo (ssget "p"))
(setq index 0)
(repeat (sslength gruppo)
(command "_LINE"
(cdr (assoc 11 (entget (ssname gruppo index))))
(cdr (assoc 12 (entget (ssname gruppo index))))
""
)
(ssadd (entlast) gruppolinee)
(setq index (1+ index))
)
(command "_ERASE" gruppo line1 line2 "" "_PEDIT" "P" gruppolinee "" "_J" "" "")
(setvar "SURFTAB1" surf1)
(setvar "SURFTAB2" surf2)
(setvar "OSMODE" osm)
(princ)
)
(princ
"\nTROVAASSE (vers.1) - by Terminator"
)
(princ "\nDigitare TROVAASSE per lanciare il lisp")
(princ) |
|
|
|
GP
Utente Master
Regione: Piemonte
Prov.: Vercelli
2776 Messaggi |
Inserito il - 15 aprile 2011 : 13:48:05
|
Messaggio inserito da arri
sarebbe interessante inglobarlo in un lisp per poter eseguire la pulizia del dwg mediante la divisione in riquadri automatici.
La pulizia globale su dwg complessi richiede tantissimo tempo ...
Ormai non serve più, il comando nella 2012 è una scheggia.
Messaggio inserito da Terminator
...Dato che quelli dell'Autodesk ci hanno preso gusto per i nomi lunghissimi deI nuovi comandi e variabili, non oso pensare come chiameranno in italiano questo comando, forse UCCIDIENTITASOVRAPPOSTE??
ELIMINADUPLICATI, ma funziona anche OVERKILL (senza underscore). |
|
|
|
arri
Utente Master
Regione: Lombardia
14951 Messaggi |
Inserito il - 15 aprile 2011 : 14:46:17
|
Messaggio inserito da GP
Ormai non serve più, il comando nella 2012 è una scheggia.
grazie per l'info
Comunque è una richiesta per chi non ha la versione 2012
|
|
|
|
Terminator
Utente Master
725 Messaggi |
Inserito il - 15 aprile 2011 : 15:12:30
|
@GP
Infatti ELIMINADUPLICATI segue le filosofia dei comandi extralunghi! 
| Messaggio inserito da arri
Comunque è una richiesta per chi non ha la versione 2012 |
Insomma vuoi farci lavorare comunque sul lisp! |
|
|
|
arri
Utente Master
Regione: Lombardia
14951 Messaggi |
Inserito il - 15 aprile 2011 : 19:23:08
|
Messaggio inserito da Terminator
Insomma vuoi farci lavorare comunque sul lisp!
lascia perdere,
a questo punto chi vuole overkill veloce si aggiorna al 2012 
|
Modificato da - arri in data 15 aprile 2011 19:25:34 |
|
|
|
TheGrey61
Utente Master
Regione: Piemonte
Prov.: Torino
Città: Rivalta di Torino
1039 Messaggi |
Inserito il - 15 aprile 2011 : 20:38:23
|
Ammirevole  Sagacia Arri: |
|
|
| |
Discussione |
|
Realizzare asse
