lisp で実行する複数の操作

[FabrizioV]

salve a tutt*, per motivi di lavoro devo eseguire le seguenti operazioni:

- eseguire un find&replace su più file contemporaneamente .dwg
- cambiare i colori di un layer in comune a più file senza dover aprire ogni singolo file
- cambiare variabili di sistema su un set di file senza dover aprirli singolarmente

grazie in anticipo

fab

 

[rpor66]

di questi tempi in senato non ti hanno eguagliato in quanto a "sparate"
quello che chiedi è di facile soluzione, basta creare uno script e male che vada farsi aiutare da qualche routine in lisp, per modificare in sequenza i tuoi file.
lo script ti permette di aprire un file, operare modifiche, salvarlo, chiuderlo e passare al successivo, senza intervento umano.
find e replace? in rete, o quì, trovi molti esempi.
devi cambiare colore ad un piano? (command "_layer" "_c" numerotuocolore "tuopiano" "")
impostare variabili? (setvar "nomevariabile" nuovovalore)

creafilescript.xls ti permette di eseguire le singole operazioni su tutti i file che vuoi.

 

[FabrizioV]

ciao rpor66, ammetto di aver peccato nell'introdurre meglio l'argomento. io sto iniziando adesso ad utilizzare linguaggio lisp e similari per motivi di lavoro quindi, purtroppo, faccio confusione molto facilmente...
ho spulciato un pò questo forum per trovare argomenti simili ed ho iniziato a leggere la guida "il mio lisp" di giuseppe rossi...
nonostante questo ho pensato di scrivere qui per cercare un confronto con chi ne sa più di me in materia e/o come dici tu trovare suggerimenti e metodi "di facile soluzione".
procediamo per ordine:
- mi è stato chiesto di eseguire un find&replace su più file contemporaneamente sia .dwg che .txt
per ciò che concerne il .txt sono riuscito istallando notepad++ ed mettendo in atto la seguente procedura
(1.creare una cartella che contiene tutti i file .txt da modificare e laciare notepad++
2.dalla barra menù selezionare cerca>trova...
3.selezionare il tab "cerca nei file"
4.impostare il percorso, compilare il campo "trova" e "sostituisci con"
5.filtri *.*
6.cliccare sul comnando "sostituisci nei file"). la mia domanda pertanto è : esiste qualcosa del genere anche per i .dwg?

"devi cambiare colore ad un piano? (command "_layer" "_c" numerotuocolore "tuopiano" "") "
come faccio ad ottenere il codice completo di un qualsivoglia file ed applicare simultaneamente delle modifiche a più file? considera che io ne ho più di 100 quindi pensare in batch penso sia necessario....
stesso discorso per le variabili di sistema!
fai conto che mi manca ancora capire come applicare i codici prima ancora di scriverli ed editarli

please help!
ti ringranzio tanto per la risposta e per la disponibilità
fab

 

[shadashiindia]

forse questo aiuterà - run script in many files

 

[rpor66]

per la modifica dei file di testo avrei fatto ricorso al vba, autocad o excel, con poche righe di codice si risolve il problema, se non hai esperienza con questo linguaggio va bene anche notepad++.
ti allego creafilescript.xls impostato per il tuo bisogno, con il pulsante <seleziona file> selezioni i dwg dove operare e li aggiungi (no appendere), nella colonna d modifica (rpfind_m "find" "replace") sostituendo find con il testo da cercare e replace con quello da sostituire, puoi aggiungerne quante ne vuoi dalla riga successiva, stesso discorso sia per cambio colore layer che per impostazione variabili, termina sempre con _qsave e _close.
quando hai completato la modifica, tramite il pulsante <crea file script> indichi dove salvare lo script e gli assegni un nome.
da autocad, tramite il comando script avvii il file creato.
se hai problemi, sono quì.

ciao

p.s.
per il cambio colore layer, se c'è la possibilità che uno dei dwg non abbia il layer "tuopiano" puoi impostare la creazione dello stesso così da evitare l'errore che farebbe bloccare lo script. (command "_layer" "_m" "tuopiano" "")