AutoCAD-AutoDeskJenitopografia

Plis pase 60 Autolisp woutin pou AutoCAD

Lisp pou konvèsyon ak operasyon


NAN. Konvèti pye mèt ak vis vèrsa

Sa a woutin ki te pwodwi ak Autolisp, pèmèt nou konvèti valè a antre nan pye jiska mèt ak vis vèrsa, rezilta a yo montre nan liy lan lòd.

Isit la nou menm tou nou itilize fonksyon an CVunit, fonksyon sa a zozote, jwenn valè konvèsyon, File acad.unt (AutoCAD Inite Definisyon), si ou vle obsève an detay ki sa sa yo valè ak pousantaj konvèsyon diferan, mwen sijere ou wè sa a ranpli .

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: Pen
  3. Chwazi kalite konvèsyon an: pye rive mèt oswa mèt nan pye
  4. Mete valè ou vle konvèti a
  5. Ou pral jwenn nan liy lan lòd enfòmasyon an ak konvèsyon an inite

Ou ka jwenn woutin lan isit la


NAN. Miltipliye tout tèks yo chwazi yo

Sa a woutin ki te pwodwi nan AutoLisp pèmèt yo jwenn miltiplikasyon an nan tout valè yo nan tèks yo chwazi, pou sa a woutin nan travay kòrèkteman li nesesè ke tèks yo chwazi yo se tip TEXT epi yo pa nan kalite MTEXT.

Pou egzanp, si ou gen twa tèks 3 chak ak valè: 1, 2, 3 ak chwazi twa, rezilta a lòd se miltiplikasyon nan twa nimewo sa yo, egal a: 6.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: mul
  3. Chwazi tout tèks ke ou vle jwenn miltiplikasyon an.
  4. Peze kle a Antre nan pou jwenn rezilta a.

Ou ka jwenn woutin lan isit la


NAN. Konvèti pous mèt

Sa a woutin ti pèmèt nou konvèti valè a antre nan pous nan mèt ki montre rezilta a nan liy lan lòd, montre tou rezilta a divize ant 2 kòm yon pati nan enfòmasyon adisyonèl.

Ou ka modifye lòd sa a pou konvèti lòt kalite inite yo, pou sa ou dwe modifye kòd sous la, pou egzanp, konvèti pous santimèt o minit a segonn, jis chanje paramèt yo nan fonksyon an "cvunit", nan lòd sa a cvunit gen paramèt sa yo: "pous" "mèt", ak paramèt sa yo, valè a antre yo pral pran kòm pous (pous) epi yo pral konvèti nan mèt (mèt), ou ka chanje paramèt yo nan la. sa yo: "minit" "dezyèm", "pous" "cm", "acre" "sq yard", "ft" "nan", pami lòt moun.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: PM
  3. Antre valè a ou vle konvèti soti nan pous mèt ak

Pare, ou pral jwenn enfòmasyon an ak konvèsyon inite a.

Ou ka jwenn woutin lan isit la


NAN. Add longè liy ki nan kouch la chwazi

Wout sa a pèmèt ou ajoute distans nan tout liy ki genyen nan kouch objè ou chwazi a.

Sa a woutin pèmèt ou ajoute distans yo nan tout liy yo ki genyen nan kouch objè a ke ou chwazi, si polylin yo te jwenn nan kouch la chwazi yo, yo pral inyore.
Yon fwa yo sòm total la nan tout liy yo te jwenn rezilta a parèt.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: sumlcapa
  3. Chwazi liy lan ki nan kouch liy ou vle ajoute

Ou ka jwenn woutin lan pou USD 5.99 isit la


NAN. Ajoute oswa retire valè yo nan tèks yo chwazi yo

Sa a woutin te fè ak AutoLisp pèmèt nou ajoute oswa soustraksyon valè nan tèks yo ke yo chwazi.

Pou egzanp, si ou gen yon tèks ak yon valè de 5 epi sèvi ak kòmandman sa a, yo antre nan 2 a valè, tèks chanjman sa yo chwazi, mete ajou pa valè 7 a, si se valè a -2 antre, tèks la pral mete ajou 3.

Fè sa ki annapre yo pou itilize woutin sa a.

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: vsr
  3. Endike valè a dwe ajoute oswa soustraksyon
  4. Chwazi tèks yo dwe ajoute oswa soustraksyon yo.

Ou ka jwenn woutin lan isit la


NAN. Jwenn zòn ki soti nan seksyon fonse yo

Sa a woutin pèmèt ou jwenn zòn nan lonbraj kwa-seksyon ak mete valè yo jwenn nan atribi blòk chwazi.

Lonbraj yo chwazi yo dwe nan yon kouch ki dekri kalite zòn pou jwenn, pa default lisp la pral li de non kouch, ki se sa ki annapre yo: "ShadingCut"Epi"ShadowFill".

Lisp la sòm tout zòn shaders yo ki nan kouch la "ShadingCut"ak tout zòn nan lonbraj yo kouch"ShadowFill” ak yon fwa seleksyon an nan kale yo fini, atribi yo nan blòk la nan zòn yo mete ajou, pou sa a atribi pwogresif nan blòk la dwe premye chwazi, sa a se yon atribi envizib, men lisp la jis anvan seleksyon an montre li ak Lè sa a, kache l 'ankò, sa a se fè lè l sèvi avèk lòd la "Attdisp", Lè sa a, atribi yo nan koupe ak ranpli zòn yo pral chwazi ak sa yo pral mete ajou pa valè yo nan zòn yo te jwenn.

Seleksyon an nan objè yo fè pa vle di nan yon fenèt ki gen ladan tout ponksyon yo ki gen ladan tèks la nan pwogresif nan seksyon an.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: AKS.
  3. Chwazi pa vle di nan yon fenèt tout ponksyon yo nan koupe ak ranpli nan seksyon an, ki gen ladan tèks la nan youn nan pwogresif nan yon sèl la menm.
  4. Chwazi youn pa youn atribi yo nan blòk la modifye, kòmanse ak atribi nan pwogresis la.
  5. Kòmandman an ap fini otomatikman apre yo fin chwazi atribi yo koupe ak ranpli.

Yon dosye echantiyon CAD se tache ak lisp la pou yon pi bon konpreyansyon sou lòd la.

Ou ka jwenn woutin lan isit la


NAN. Jwenn pant lan yon liy oswa pollinin

Sa a lòd (Autolisp woutin) jwenn valè a pant nan yon liy oswa yon polyline, epi tou li jwenn liy longè, orizontal longè ak ang.

Li prezante yon gwo èd lè nou vle kontwole zanno nou yo, rezilta a ka parèt sèlman sou ekran an (liy lòd) oswa pa chwazi yon tèks (valè tèks sa a pral chanje pa valè pant yo te jwenn).

Li se vo mete aksan sou ki nan ka a nan yon polylin, lòd sa a jwenn pant lan nan sèlman premye segman an.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: PND
  3. Chwazi liy lan oswa polylin jwenn pant lan.
  4. Si li vle ou ka chwazi yon tèks ranplase valè li yo pou pant lan yo te jwenn, otreman, sèlman pou laprès Antre nan Pou jwenn rezilta yo sou ekran.

Ou ka jwenn woutin lan isit la


8.  ROUTIN NAN LISP vizyèl pou jwenn som la nan liy yo chwazi oswa polyan

Li se yon woutin ki pwodwi nan Lisp ki jwenn sòm nan longè liy yo oswa polylin chwazi, rezilta a nan sòm sa a ka etabli nan yon tèks chwazi li oswa li ka sèlman yo montre nan liy nan kòmandman.

Ou ka chwazi liy ak polylin tout ansanm nan yon sèl fenèt oswa youn pa youn.

Nimewo desimal desimal la nan sòm total la nan longè yo te jwenn se 2, men yon lòt valè ka antre.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: lpl
  3. Mete nimewo desimal yo pou rezilta sòm longè yo
  4. Chwazi liy yo oswa polylin yo ajoute longè yo
  5. Peze kle a Antre nan nan fen seleksyon an
  6. Chwazi yon tèks pou ranplase valè li ak sa ki nan sòm yo jwenn oswa pou laprès Antre nan ankò yo montre rezilta a sou liy lan lòd

Ou ka jwenn woutin lan isit la


NAN. WOUTIN NAN LISP VIZYÈL KI GENYEN YON LIS KOTE YO DEMANN KOUNYE A

Sa a se yon woutin ti ki jenere yon lis ak non yo nan tout kouch nan desen aktyèl la epi montre li sou liy lan bay lòd.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

Chaje dosye a lisp nan AutoCAD.
Mete non kòmandman an: lc
Rezilta a pral yon lis nan liy lan lòd nan tout kouch yo nan desen ki la kounye a.

Ou ka jwenn woutin lan isit la


Travay ak kowòdone


10. ROUTIN AUTOLISP KI ENSÈRE YON TAB DONE

Sa a woutin jenere yon tab ak nimewo a espesifye nan ranje ak kolòn, li se menm jan ak lòd nan tab AutoCAD, men pi lejè yo itilize.

Sa a woutin jenere yon tab avèk kantite ranje ak kolòn espesifye, se menm jan ak lòd la Table AutoCAD, men pi lejè yo itilize, byenke li pa lyen done ak Excel ou gen opsyon a ranpli tab la ak yon valè predefini ki pa default se "0.00" epi li mete nan chak selil yo dwe modifye pita.

Kòmandman sa a tou pèmèt ou jenere tab la lè l sèvi avèk de opsyon, opsyon nan premye pèmèt defini tab la atravè yon wotè fiks ak lajè selil yo ak opsyon nan lòt ajiste valè sa yo pou ke nimewo a espesifik nan ranje ak kolòn antre nan deziyasyon yon fenèt.

Opsyon adisyonèl gen ladan sa ki annapre yo:

  • Tèks Default: Ou ka di kòmandman an insert yon valè default ("0.00") nan chak selil pwodwi, valè sa a ka Customized epi yo ka chanje nan nenpòt lòt.
  • Wotè Text: Li se wotè tèks ki mete a pral genyen, wotè default la gen yon valè "0.25".
  • Jistifikasyon: nan tèks la eleman, se konsa gen de opsyon: Anfòm (Fit nan selil) ak Presegondè (mwatye nan selil la).
  • Koulè: Li se koulè a ​​ki pral mete tèks, pa default koulè inisyal la se koulè aktyèl la defini.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: Tablo
  3. Selon jenerasyon Mode chwazi a, yon pwen endike oswa de pwen yo endike jenere yon fenèt

Ou ka jwenn woutin lan isit la


Lisp woutin pou entèraksyon ak Excel


NAN. Ekspòtasyon koòdone pwen nan yon dosye CSV

Sa a woutin ki te pwodwi ak Autolisp pèmèt ou ekspòte pwen kowòdone nan yon Microsoft Excel CSV dosye. Objè ki soti nan kote ou ka ekspòtasyon kowòdone sa yo se pwen, tèks ak blòk, jis chwazi yo epi endike yon dosye destinasyon nan kowòdone yo.

Li dwe espesyal swen nan ka objè yo se tèks, depi pwen nan ensèsyon ki te pran an kont nan yon moman nan ekspòte kowòdone yo, depann de jistifikasyon ke tèks sa yo genyen, si ou se asire ke jistifikasyon nan tèks yo kòrèk pa gen okenn pwoblèm nan ekspòte pwen yo.

Li rekòmande pou w chwazi objè yo ki gen yon sèl ensèsyon pwen, tankou blòk oswa pwen nan AutoCAD, fason sa a li pi an sekirite ke kowòdone ekspòte yo se yo menm ki koresponn.

Kòm nou mansyone pi bonè, sa a ekspòtasyon woutin kowòdone soti nan pwen, tèks (oswa tou Mtext) ak blòk, men ou ka konplete kòd la sous pran an kont lòt antite tankou pou egzanp: ti sèk, pwen premye nan liy, pami lòt objè yo ke nan baz done li yo gen kòd 10 la.

Kowòdone ekspòte yo gen fòma a P, N, E, C (pwen, Nò = Y, East = X, Cota = Z) epi kòm li ekspòte nan yon dosye CSV (separe pa komas), lè ouvèti dosye a chak valè pral okipe selil separe li yo.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: EPC
  3. Chwazi objè ki soti nan ki kowòdone yo pral ekspòte (sonje ke ou pral chwazi pwen, tèks ak blòk (si ou jwenn yo).
  4. Endike kote ak non dosye CSV kote kowòdone ekspòte yo pral pwodwi.

Ou ka jwenn woutin lan isit la


12.  ROUTIN EKSPOZISYON KONPÒTMAN KOTE NAN LI POU YON DOSYE CSV

Sa a Autolisp jenere woutin pou AutoCAD pèmèt ou ekspòte pwen yo nan kowòdone yo nan bout yo nan liy yo chwazi nan yon Microsoft Excel dosye CSV

Kowòdone ekspòte koresponn ak la kòmanse ak fini pwen nan liy yo, Se konsa, nan ka liy yo ansanm ak pwen an menm, lisp a ap li 2 fwa kowòdone a menm.

Nan ka sa a, si yo vle ou ta dwe konsidere opsyon nan sòt kowòdone yo ak efase yo menm kopye, kowòdone yo ekspòte gen la fòma P, N, E, C (Pwen, Nò = Y, East = X, Dimansyon = Z) ak kijan li ekspòte nan yon CSV dosye (separe pa komas), lè ouvèti dosye a chak valè pral okipe selil li endepandan ak nan yon fason lòd.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: EL3
  3. Chwazi liy ki soti nan ki kowòdone nan kòmansman an ak pwen final yo pral ekspòte.
  4. Endike kote ak non dosye CSV kote yo pral pwodwi kowòdone ekspòte yo.

Ou ka jwenn woutin lan isit la


13. LISP ROUTINE POU enpòte pwen nan kowòdinat Soti nan MICROSOFT EXCEL

woutin sa a pwodwi pou itilize nan AutoCAD ak aplikasyon pou vètikal li yo pèmèt ou Afiche kowòdone a nan pwen ki sòti nan yon dosye ki nan Microsoft Excel, woutin sa a se pa nesesè yo presize detay ki gen rapò ak dosye a nan enpòte, kòm nan koòdone li yo gen opsyon ki disponib bezwen enpòte pwen yo jan ou vle.

Pou enpòte pwen yo, li konsidere kòm nesesè ke dosye a pwen yo dwe enpòte gen XLS ekstansyon (ki soti nan vèsyon anvan biwo 2007) oswa XLSX (vèsyon 2007 oswa pita) ak nan dosye a kowòdone yo fòma ak fòma a: P, N, E, C, D, (Pansanm, Nkote, ESte Cpeche Ddeskripsyon), jan yo montre nan imaj sa a:

Li pèmèt ou chwazi nan mitan 3 diferan kalite fason yo mete yon objè pwen nan li koòdone la.

  • Premye a se chwazi insert yon AutoCAD pwen antite (ki te pwodwi pa lòd nan POINT), sonje ke ekspozisyon an nan yon pwen nan AutoCAD depann sou kalite a nan ekspozisyon pwen ke ou te defini ak lòd la DDPTYPE.
  • Opsyon nan dezyèm konsiste de chwazi yon blòk ki estoke nan desen an kòm yon pwen yo dwe mete nan kowòdone lekti a, pa default woutin nan kreye yon nouvo blòk ki rele "cg-point", ki ka itilize si gen blòk nan desen an oswa si pa gen okenn blòk nan desen an.
  • Opsyon nan twazyèm ki gen rapò ak style la nan pwen, pèmèt ou enpòte yon blòk soti nan ki gen kapasite a difisil, sonje ke nan ka sa a dimansyon yo ak ki te blòk la te kreye enfliyans vizyalizasyon nan blòk la nan moman an nan ensèsyon.
  • Avèk respè done done (etikèt), iCe pèmèt ou deside sa ou vle montre, si ou sèlman vle montre yon pwen, ou pral sèlman gen chwazi opsyon sa a, menm bagay la tou pou tèks la nan Dimansyon la oswa deskripsyon an nan pwen an. Ou ka chwazi yo montre done yo tag 3 oswa montre okenn.

Epitou ou ka kontwole kantite desimal nan tèks la nan dimansyon a elemanpral Echèl la pou yo make, wotasyon nan ladan l 'ki gen baz pwen se kote a pwen an enpòte ak separasyon nan etikèt la ki gen rapò ak pwen an, opsyon sa yo yo kapab rete ak yon non, se konsa ke ou ka rele yo selon pwen yo w ap enpòte.

Tout opsyon sa yo pral pèmèt ou enpòte pwen ou soti nan yon dosye Excel nan yon fason vit ak klè-kap, li vo klarifye ki fason tèks yo nan etikèt la pwen yo wè li pa depann sou woutin nan, men style la tèks aktyèl nan desen ou ak kouch aktyèl la.

Kèk tan de sa mwen pibliye yon woutin devlope pa yon itilizatè, men pèmèt enpòte kowòdone ki sòti nan yon dosye tèks men ak limit anpil, tan sa a lè l sèvi avèk lòd sa a nouvo ap gen plis opsyon yo kontwole kowòdone a pwen ensèsyon.

Fichye a tache tou bay yon egzanp blòk ke ou ka enpòte, apa de yon calcul ak fòma ki kòrèk la ke lòd la bezwen enpòte kowòdone yo san okenn deranjman.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: ICE
  3. Nan bwat dyalòg la, endike opsyon ou panse yo pratik pou enpòte pwen yo.

Ou ka jwenn woutin lan isit la


NAN. Enpòte zòn ki sòti nan yon dosye CSV nan seksyon kwa

Kòmandman sa a pèmèt ou enpòte zòn (koupe default, epi nwasi) sou yon kwa seksyon nan zòn peyi yo enpòte yo dwe nan yon dosye ak CSV (vigil séparer), selon atachman nan dosye echantiyon.

Lòd sa a li pwogresyon an ki sitiye nan premye kolòn nan dosye a csv ak rechèch pou tèks la ak ki menm pwogresif nan dosye a desen, mete koupe korespondan li yo ak ranpli zòn nan dwa anwo a nan seksyon an kwa.

Sifiks yo mete nan zòn nan koupe ak ranpli pa default yo se: "AC =" ak "AR =", ki ka manipile pa kòd, osi byen ke kantite desimal ak wotè tèks la mete.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Li etabli kòm aktyèl kouch ki pral genyen tèks yo pral mete, pa egzanp: "Tèks-Zòn".
  3. Mete non kòmandman an: arimx
  4. Chwazi dosye a SCV ki gen zòn yo dwe enpòte
  5. Chwazi a ou vle insert zòn korespondan li nan dosye CSV a, si ou vle chwazi tout jis peze kle a Antre.

Ou ka jwenn woutin lan isit la


NAN. Fè lis wout imaj yo mete nan desen an

Si w ap travay ak imaj, ou souvan pral yo te nesesè yo jenere yon lis nan yo, ki gen ladan chemen kote yo, woutin sa a ka jenere yon lis nan wout yo nan tout imaj eleman nan desen aktyèl la.

Sa a woutin pa mande pou D 'nan nenpòt ki opsyon, tou senpleman rele kòmandman an epi li pral imedyatman ap parèt nan liy lan lòd AutoCAD, lis la ak chemen yo nan imaj yo eleman.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: dosye

Ou ka jwenn woutin lan isit la


NAN. Ranplase yon tèks ak chemen dosye aktyèl la

Sa a woutin devlope nan Autolisp, pèmèt nou mete nenpòt ki tèks, ak chemen an ak non nan dosye aktyèl la.

Sa a se yon bon èd lè mete ajou lèt la nan plan yo ak enfòmasyon sa a.
Nan chemen an jwenn tou gen non an nan tab la kounye a, si li se nan espas modèl la, li pral montre nan fen wout la: modèl, otreman li pral montre sou non tab la kounye a.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: wout
  3. Chwazi tèks la ranplase ak valè a nan chemen an desen ki la kounye a, si ou pa vle ranplase kèk tèks jis peze Antre nan yo montre chemen an sou liy lan bay lòd.

Ou ka jwenn woutin lan isit la


NAN. Ranplase yon tèks chwazi pa dat aktyèl la ak fòma pwodiksyon diferan

Avèk èd nan woutin sa a bon nou ka ranplase nenpòt ki tèks, ak valè a nan dat aktyèl la.

Kòmandman an 8 bay diferan kalite fòma pou dat sa a, sòti nan yon kalite dat ki senp, nan yon kalite dat fòma long, kote se non an jou nan dat aktyèl la otomatikman pwograme ak AutoLisp.

Ou ka chwazi antite kalite Tèks y Mtext, sa yo pral ranplase otomatikman pa dat aktyèl la ak fòma a chwazi, fòma yo dat ki disponib yo se sa yo montre nan ilistrasyon an, chak moun idantifye pa nimewo li yo, ki pral sèvi yo chwazi fòma a lè yo mande nan liy lan lòd nan AutoCAD.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: RF
  3. Endike nan nimewo 1 nan 8, fòma pwodiksyon an dat, ou ka antre nan mak kesyon an (?), yo montre fòma dat ki disponib yo
  4. Chwazi tèks ke ou vle ranplase ak dat la ak fòma a chwazi
  5. Peze kle a Antre nan nan fen lòd la epi mete ajou tèks yo chwazi

Ou ka jwenn woutin lan isit la


18. LISP ROUTINE ENFÒMASYON OSWA TRANSPÒTASYON TELEFÒM SELECTED

Pafwa nou vle envesti valè yo nan de tèks, pou egzanp, ke tèks la avèk nimewo a 1346 1111 vin ak vis vèrsa, woutin sa a pèmèt nou tradwir valè yo nan tèks yo chwazi.

Pou yo rive nan rezilta sa a, sifi pou endike de tèks yo, youn apre lòt la.

Fè sa ki annapre yo pou itilize woutin sa a.

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: TRA
  3. Chwazi de tèks yo dwe transpoz.

Ou ka jwenn woutin lan isit la


NAN. ROUTINE ranplase kontni an nan yon tèks pa pwen an nan pwen endike

Nouvo kòmandman sa a vin valè valè (Y kowòdone) nan yon pwen bay epi li mete li kòm kontni an nan tèks la chwazi.

Woutin sa a trè itil pou egzanp lè w ap travay avèk pwofil tèren epi nou vle jwenn wotè yon vertex epi mete l nan youn nan tèks ki endike dimansyon tèren an, li kapab tou itilize lè wap travay avèk seksyon kwa tèren ak li vle jwenn valè dimansyon nan aks seksyon an epi etabli li nan yon tèks ki pral endike ke valè kota.

Nan lòd sa a ou ka endike ki echèl pral gen dimansyon nan mete nan tèks la, li se pa wotè nan tèks la chwazi, men echèl la ki gen pwofil la oswa seksyon ki endike, si pwofil ou pou egzanp se scaled 10 fwa nan vètikal la, ou dwe mete kòmandman an 10 NC echèl kòm yon, se konsa ke lòd la, fè divizyon ki koresponn lan, li mete valè ki apwopriye a nan tèks la chwazi yo.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: NC
  3. Endike echèl la nan kota yo
  4. Antre nimewo a nan kote desimal tèks la ap gen ak dimansyon yo bay la (3 pa default)
  5. Endike pwen kote ou vle jwenn a
  6. Chwazi tèks la ke yo pral ranplase pa valè a nan kota nan jwenn oswa si ou vle ou ka peze kle a Antre nan sèlman montre kota la jwenn san ranplase nenpòt ki tèks

Ou ka jwenn woutin lan isit la


NAN. ROUTE ki ranplase tèks pa PROGRESSIVE ak yon lòt ak endike KOUVRI pa ajoute yon PREFIX OU SUFFIX

Lòd sa a pèmèt ou jwenn valè pwogresif ak dimansyon (X ak Y valè) nan yon pwen bay epi mete yo nan tèks yo chwazi 2.

Anplis de sa nan chak tèks li ajoute yon prefiks oswa yon sifiks, pou egzanp si yo endike yon prefiks pou dimansyon (kowòdone Y) egal a "CT=", lè yo chwazi tèks elevasyon an, kòmandman an pral mete ajou tèks la chwazi a pa valè elevasyon an jwenn, plis prefiks ki endike a, pou egzanp "CT=236.42", lè yo chwazi tèks pwogresif la, li pral mete ajou ak valè a. nan kowòdone X yo jwenn plis sifiks la "0+", pa egzanp "0+10.0".

Lòd sa a vini ak prefiks yo pou dimansyon yo pwogresif ak deja defini ("0 +" ak "CT =") epi yo ka chanje sèlman pa modifye kòd la sous, nan adisyon a ka lòd sa a dwe modifye si yo vle, se konsa ke yon prefiks ak yon sifiks yo te ajoute nan menm tan an nan tèks yo.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: PC
  3. Endike pwen ki soti nan ki valè yo nan kowòdone a pwogresif (X) ak kowòdone a (Y kowòdone)
  4. Chwazi tèks pwogresif la
  5. Chwazi tèks la dimansyon

Valè tèks yo pral mete ajou ak done yo jwenn yo

Ou ka jwenn woutin lan isit la


NAN. ROUTINE AUTOLISP POU etabli yon kotè espesyal nan yon pwen endike

Li se yon woutin te fè nan Autolisp ki pèmèt nou mete yon valè dimansyon (Y kowòdone) nan yon pwen bay yo.

Sa a lòd demann done (pwen ak valè) ak fè operasyon yo jwenn valè final la dwe mete nan kowòdone Y a nan pwen an endike (chanje valè a nan kowòdone nan sistèm nan Kowòdone Inivèsèl (UCS) nan yon pwen ki endike nan valè a antre ).

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a nan AutoCAD lè l sèvi avèk lòd la APPLOAD oswa kopye dosye a ak kole li nan AutoCAD.
  2. Mete non nan lòd: OS
  3. Lè pouse pou endike pwen dimansyon, ou dwe endike yon pwen sou ekran an (pwen kote ou vle mete yon dimansyon patikilye).
  4. Kòmandman an pral fè w antre nan valè a dimansyon yo mete oswa chwazi yon tèks:
  5. Isit la ou dwe antre nan valè dimansyon ou vle genyen Y kowòdone nan pwen endike a, ou ka antre nan yon valè oswa ou ka chwazi yon tèks ki gen valè dimansyon, lòd la pral jwenn sèlman valè a nimerik nan ka a tou gen kèk deskripsyon.

Pou verifye ke dimansyon ki te antre nan pwen endike yo te mete egzekite ID a lòd, endike pwen an, epi yo pral obsève nan liy lan lòd ke valè a nan kowòdone Y a se kounye a ak valè a antre.

Ou ka jwenn woutin lan isit la


22.  AREASX: LISP ROUTINE POU jwenn kote pa kontour

Lòd sa a pèmèt ou jwenn zòn ki endike yon pwen entèn ant objè oswa pa chwazi kontou fèmen, lòd sa a montre zòn nan jwenn oswa otreman kouche li nan yon tèks chwazi.

Kòmandman Ax la gen opsyon sa yo:

Premye demann:
Espesifye yon pwen entèn nan zòn nan oswa [Chwazi objè / Opsyon] :

Isit la ou dwe endike pwen entèn yo ki nan zòn nan yo pral jwenn, lòt chwa sa yo ki dekri anba a:

Chwazi objè: Olye pou yo endike pwen entèn yo jwenn lè, pa vle di nan opsyon sa a ou ka chwazi fèmen poligòn jwenn zòn li yo.

Opsyon: Opsyon sa a charman bwat bwat dyalòd la Kòmandman, bwat dyalòg la jan sa a:

Chak chwa dekri anba a:

Kantite desimal: Nimewo a nan desimal zòn nan ap gen (2 pa default).
Wotè nan tèks yo dwe eleman: Si ou deside insert yon tèks ak zòn nan jwenn, isit la li mete wotè a ki pral gen di tèks.

Konvèsyon nan zòn: Opsyon sa a pèmèt ou fè operasyon ak valè zòn ki te jwenn yo, chak zòn te ajoute, soustrè, miltipliye oswa divize pa yon faktè ki dwe espesifye nan pati ki pi ba nan opsyon sa a.
Kòmandman an montre si konvèsyon an aktif e kilès nan operasyon yo ki fèt e ak ki valè konvèsyon an pral fèt.

Opsyon sa a pèmèt ou Customize zòn yo lè desen an se nan diferan balans oswa nan lòt inite desen.

Aplike lonbraj: Opsyon sa a pèmèt chak zòn endike yo dwe lonbraj yo gen yon pi bon gade nan zòn nan ke yo te jwenn, ki pèmèt yo verifye si li kòrèk (pèmèt pa default).
Non lonbraj la: Men ou dwe endike non lonbraj la pou aplike nan zòn ki endike yo (Solid default).

(Lonbraj) Echèl: Isit la faktè a echèl nan lonbraj la ki endike, sa a faktè se varyab selon ki kalite lonbraj chwazi.

Koulè (lonbraj): Koulè ki pral gen lonbraj la aplike nan zòn ki endike yo.

Fini lonbraj la: Opsyon ki anba yo aplike yon fwa ke aplikasyon an bay lòd yo sispann.

Kenbe kontou: Si pèmèt kontou yo jenere yo pa efase.

Kenbe lonbraj: Si pèmèt lonbraj yo pwodwi pa efase.

Demann Final:
Espesifye yon pwen entèn nan zòn nan oswa [Chwazi objè / Mete tèks zòn / Opsyon] :

Mete tèks zòn: Opsyon sa a pèmèt ou mete yon tèks ak zòn yo jwenn olye pou w chwazi youn pou ranplase li. Tèks ki gen zòn nan jwenn gen prefiks default: ” Zòn =”, prefiks sa a ka modifye nan kòd pwogram lan.

Chanjman tèks: Opsyon sa a aktive lè yo peze kle Enter la oswa bouton sourit dwat la peze, ki pral mande pou yo chwazi yon tèks, pou egzanp si gen yon tèks ki gen kontni sa a: "AC=0.00m2" ak nan lòd la yon Yo te jwenn zòn nan 3.25, Lè sa a, lòd la pral ranplase tèks la, mete ajou li nan "AC = 3.25m2". Kòm ou ka wè, AX ranplase sèlman valè nimerik tèks yo dwe ranplase, kidonk, ou ka gen tèks zòn ki gen diferan prefiks, pou egzanp: "AR=0.00m2", "AM=0.00m2", "Zòn koupe. = 0.00m2", "Zòn mwen an = 0.00m2", elatriye.

Valab e valab enkli:

Valab egzamen an

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: AX
  3. Endike yon pwen entèn nan zòn nan ou vle jwenn (ou gen asire w ke zòn nan yo dwe jwenn yo dwe konplètman fèmen, otreman lòd la ap montre yon mesaj erè).
  4. Endike pwen entèn yo kòm anpil fwa ke ou bezwen, lòd la pral raj, akimile (sentèz) tout lè yo te jwenn.
  5. Peze Mete oswa dwa-klike sou nan fen lòd la, li mete zòn nan nan yon tèks ki deja egziste.

Ou ka jwenn woutin lan isit la


Chwazi objè yo


NAN. Chwazi tout antite ki nan kouch objè yo chwazi a

Sa a woutin ti fè menm bagay la kòm yon sèl anvan an, diferans lan se ke isit la se non an nan kouch la nan chwazi objè antre, men se yon antite ki se vle non an kouch chwazi.

Kòm nan woutin anvan an, seleksyon an nan antite pa vizib, men li egziste kòm yon seri antite chwazi, kidonk mòd seleksyon an dwe endike "Previous” pou chwazi objè yo.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: SSL
  3. Chwazi objè a ou vle jwenn non an kouch yo chwazi antite yo lòt
  4. Fè seleksyon an nan antite efikas nan mòd nan prediksyon

Ou ka jwenn woutin lan isit la


NAN. Retire objè entèn oswa ekstèn soti nan yon pollinlin chwazi

Avèk woutin sa a ou ka efase atik ki andedan oswa andeyò yon polyligne zòn chwazi, si opsyon ki endike rediksyon, objè ki yo entèsekte pa polyligne a pral koupe sou bò endike yo.

Lè li rive retire objè deyò polylin lan, yo ta dwe pran swen espesyal kòm lòd sa a efase tout objè deyò polyline la.

Polylin nan chwazi dwe yon polyline fèmen, otreman woutin a kontre ak dènye pwen segman an ak premye a, fèmen konsa pa vle di nan yon liy imajinè polyline la ak elimine tout bagay ki andedan oswa deyò ki liy.

Opsyon an koupe jan li se ki lojik, sèlman travay ak objè ki ka koupe manyèlman, Kòm pou egzanp, liy, sèk, ark, elatriye, blòk ak lòt objè konpoze pa anfòm andedan objè sa yo ki ka koupe soti.

Avèk lisp la se yon dosye egzanp ki atache se konsa ke tès ki koresponn yo ap fè anvan ou sèvi ak lòd la nan dosye final la.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: PolErase
  3. Chwazi polyline ki pral sèvi kòm yon kwen délimitation objè yo elimine.
  4. Chwazi youn efase objè opsyon, ou ka chwazi opsyon a: Fenèt (li sèlman efase objè ki yo totalman deyò oswa andedan ki fenèt), kaptire (retire objè ki menm entèsekte pa kwen nan polylin a), efase ak rekòt (tankou non an implique, li pral efase objè yo ki andedan oswa deyò polylin a epi yo pral koupe soti objè yo ki entèsekte nan fwontyè a.
  5. Endike a pwen sou ki bò (entèn / ekstèn) yo pral efase oswa pran pare.

Ou ka jwenn woutin lan isit la


NAN. Pèmèt ou chwazi tout antite ki nan kouch ki antre a

Li se yon woutin zozote ki pèmèt ou chwazi tout òganizasyon ki chita nan kouch nan endike pa fè okenn diferans nan koulè oswa lòt pwopriyete ki ka gen antite la.

Sa a woutin se pa ka sansib nan moman an nan k ap antre nan non kouch la, kidonk, ou ka antre nan nenpòt fason, jis ke li se byen ekri.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: SCA
  3. Antre nan non an kouch nan objè yo ou vle chwazi
  4. Fè seleksyon an nan antite efikas nan la previuos

Ou ka jwenn woutin lan isit la


NAN. Kopi kontni yon tèks nan yon lòt tèks

Li se yon woutin fè ak lang nan pwogram AutoLISP, pèmèt nou a kapab bay kopi sa ki nan yon tèks chwazi, li mete ke valè nan yon tèks dezyèm yo dwe chwazi.

Pou itilize woutin sa a, ou dwe fè bagay sa yo:
  1. Chaje dosye a lisp nan AutoCAD, lè l sèvi avèk comado la Aplod oswa tou senpleman pa kopye dosye a ak kole li nan AutoCAD.
  2. Mete non kòmandman an: RT
  3. Chwazi tèks la, ki soti nan ki ou vle jwenn valè a.
  4. Chwazi tèks la, ki ou vle ranplase ak valè a te deja jwenn.

Kòm ou ka wè, woutin lan se senp, men li trè itil lè li rive koreksyon tèks.

Li ta dwe remake ke lang ki itilize nan woutin sa a byen klè AutoLisp, nan yon nouvo antre nou pral pibliye kòmandman an menm men ekri nan VisualLisp, nan ki nou pral obsève ke gwosè a nan estrikti a se plis redwi.

Ou ka jwenn woutin lan isit la


NAN. Chanje nonb desimal yon tèks san li pa pèdi valè orijinal la

Sa a woutin lisp pèmèt ou chanje nimewo a nan desimal nan tèks yo chwazi san yo pa pèdi orijinal la nan desimal, ak ke ou ka montre yon nimewo pou egzanp ak desimal xNUMX, men intern li pral gen yon nouvo pwopriyete ak valè orijinal li defini.

Sa a nouvo pwopriyete kapab sèlman jwenn aksè pa lòd sa a, depi li pa ki nan lis bwat dyalòg Pwopriyete.

Lisp la pèmèt ou chanje kantite desimal oswa jwenn nimewo orijinal la nan yon tèks ki fòma pi bonè ak woutin sa a, Se konsa, ou konnen ki kantite desimal ou te orijinèlman si ou vle Reyajiste valè orijinal yo.

Se enpòtan pou remake ke valè orijinal sa yo rete menm si dosye a oswa AutoCAD te fèmen, kidonk, ou gen sekirite a ki done orijinal la nan valè ou yo ap toujou la, menm nan malgre nan restore valè orijinal yo nan tèks yo.

Nouvo kòmandman sa a ka konpare ak aksyon an chanje Excel desimal, men obsèvasyon a sèlman se ke pwopriyete sa a se entèn ak jan nou te di pi bonè Fenèt pwopriyete yo pa pare yo montre ekspoze dat pwolonje.

Yo dwe bay konsiderasyon patikilye tèks yo chwazi yo se tèks nimerik, se sa ki, yo sèlman gen nimewo, paske otreman valè yo pral konvèti nan "0.00".

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an:
  3. Chwazi youn nan opsyon ou vle fè
  4. Chwazi tèks (nimerik) kote ou vle fè operasyon an

Ou ka jwenn woutin lan isit la


NAN. Fè aliman plizyè tèks ki baze sou premye chwazi a

Woutin devlope ak AutoLisp ki pèmèt nou aliman plizyè tèks ki baze sou premye a chwazi.

pwogram nan pèmèt aliyen tèks vètikal (kolòn) oswa nan orizontal (ranje a), pou li dwe sèlman chwazi premye a, ki pral sèvi kòm baz pou aliyen tèks yo ak lòt.
Li ta dwe remake ke pwen yo pran kòm baz pou aliyman tèks yo se pwen ensèsyon an, si tout tèks yo gen jistifikasyon "Goch" kòm pwen ensèsyon an, yo tout pral aliman ak respè pwen sa a epi li pral yon aliyman inifòm. Si tèks yo gen jistifikasyon diferan, yo tout pral aliyman ak respè pwen ensèsyon yo, ki pral lakòz aliyman an nan tèks yo dwe enkonsistan.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: alit
  3. Chwazi tèks la baz ki soti nan aks aksè a ap jwenn
  1. Chwazi tèks yo aliman
  1. Fè, tèks yo te aliyen ki baze sou premye a chwazi

Ou ka jwenn woutin lan isit la


NAN. Kopi wotè yon tèks epi mete li nan lòt tèks yo chwazi

Sa a woutin ki te kreye nan AutoLisp kopi wotè a nan yon tèks chwazi epi etabli li nan tèks yo ke yo chwazi pita, chanje wotè yo te genyen an.

Pou egzanp, si ou gen 3 tèks, ansyen an gen yon wotè ki 3 ak de nan pwochen te gen yon wotè ki 6, epi ou vle dezyèm de a yo te genyen tou yon wotè ki 3 6 olye ke, jis premye chwazi tèks la ki gen wotè gen 3 lè sa a, tèks ki gen 6 wotè.

Fè sa ki annapre yo pou itilize woutin sa a.

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: CA
  3. Chwazi tèks la ki wotè se youn nan ou vle kopye oswa mete.
  4. Chwazi tèks yo ou vle chanje wotè a pou chwazi nan premye

Ou ka jwenn woutin lan isit la


NAN. Chwazi yon tèks epi mete valè ou jwenn nan atribi yon blòk

Pwogram sa a te fè nan AutoLISP ak vizyèl ale sou lang, ka chwazi tèks, kopi valè a nan kontni ak mete (aktyalizasyon) nan yon atribi ki se yon pati nan yon blòk.

Sa vle di si nou vle mete ajou yon atribi nan nenpòt ki blòk pa yon tèks ki deja egziste, tou senpleman chwazi tèks la premye ak Lè sa a atribi nan ak sa a pral mete ajou dapre valè a nan tèks la chwazi.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: Kta
  3. Chwazi tèks la ki gen valè a yo dwe kopye.
  1. epi finalman chwazi atribi a chanje mezi a
  1. Rezilta a montre anba a:

Kòm nou ka wè, lòd sa a itil si nou vle mete yon valè de yon atribi ki sòti nan yon tèks an patikilye.

Ou ka jwenn woutin lan isit la


NAN. Chanje wotè nan tèks yo dapre yon pousantaj te antre nan

Sa a woutin ki te pwodwi nan AutoLisp pèmèt nou modifye Heights yo nan tèks yo chwazi pa chanje yo dapre yon pousantaj antre.

Pou egzanp si nou gen de tèks, yon sèl ak segondè, epi yon sèl ak 0.5 1.00 wotè lòd ak antre nan yon pousantaj nan 1.5, mòn yo nan tèks yo chanje pa bagay sa yo: 0.75 1.5 ak respektivman.

Woutin sa a trè itil lè li oblije fè chanjman nan wotè yo nan anpil tèks ak wotè diferan.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: ch
  3. Antre pousantaj la ki pral chanje wotè tèks yo, pou egzanp: si ou antre nan 0.5, tout tèks yo ap redwi a mwatye, epi si ou antre nan 2, tout tèks ap grandi doub
  4. Chwazi tèks yo ou vle modifye

Ou ka jwenn woutin lan isit la


32. LISP ROUTINE POU elimine kontni an nan yon ATTRIBUTE nan yon blòk

Lè ou gen yon blòk ak atribi anpil, li trè fatigan gen efase kontni an nan anpil nan yo, anjeneral double klike sou atribi a chwazi, rete tann pou li chaje bwat la dyalòg epi kontinye nan efase kontni an.

Pou evite travay fatigan sa a, sa a ti kras woutin pral soulaje ou yon ti kras nan tan an ou te pase nan fè travay la ki dekri anwo a. Avèk lòd sa a ou gen sèlman chwazi atribi yo ke ou vle efase kontni an.

Ou dwe verifye ke tèks yo ki nan blòk la se atribi (pafwa konfonn ant yo), pou woutin nan travay kòrèkteman. Mind, lòd sa a sèlman delèt kontni an nan atribi a, men se pa atribi nan tèt li nan blòk la.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: BCA
  3. Chwazi atribi yo nan blòk la ki soti nan kote ou vle efase sa li yo.

Ou ka jwenn woutin lan isit la


33. ROUTINE NAN VISIS LISP KOPIFIKASYON KONTAN YON TEXT AK ESTABLING IT POU TOUT TELEVIZYON SELEKSYON

Kèk tan de sa mwen te pataje avèk ou yon woutin ki kopye valè yon tèks epi li etabli li nan yon lòt tèks chwazi, fwa sa a woutin sa a pral pèmèt ou jwenn valè a nan yon tèks chwazi epi yo pral etabli li nan tèks plizyè ke ou chwazi.

Itilize nouvo kòmandman sa a trè senp, ou jis bezwen chwazi tèks la kote ou vle kopye valè a epi ou dwe chwazi tout tèks ke ou vle ranplase ak nouvo valè sa a.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: RTN
  3. Chwazi tèks la sous nan valè a yo dwe kopye
  4. Chwazi tèks ki pral ranplase pa nouvo valè sa a
  5. Peze kle a antre nan fen lòd la epi mete ajou tèks yo ak valè nan nouvo

Ou ka jwenn woutin lan isit la


34. Wout nan otolis ki ogmante OSWA diminye PROGRESSIVELY Wotè a nan Tèks yo

Li se yon lisp ki gen de kòmandman: Ogmante ak Diminye, kòmandman sa yo pèmèt yo modifye wotè nan tèks la chwazi, ogmante li oswa diminye li nan gwosè dapre lòd la chwazi.

Chanjman nan gwosè te fè pou chak klike sou te fè nan tèks la ak fè selon yon faktè ki endike nan kòd la sous nan lisp la, faktè sa a se 1.2. Se wotè inisyal la nan tèks la miltipliye pa 1.2 chak fwa ou klike sou li oswa divize li ant 1.2, depann sou ki lòd ou te chwazi.

Pou plis enfòmasyon sou ki jan tèks la se chak fwa se tèks la klike, woutin la montre wotè a ki kapab lakòz pou chak chanjman nan wotè te fè nan tèks la.

Kòmandman sa a trè itil lè ou vle ogmante oswa redwi wotè nan tèks nan pwopòsyon, san yo pa gen yon espesifye wotè final, sèlman vizyèl.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: AU (pou ogmante) | RE (diminye)
  3. Klike sou tèks la ogmante oswa diminye gwosè a kòm anpil fwa ke ou konsidere nesesè
  4. Peze kle a antre nan fini lòd la

Ou ka jwenn woutin lan isit la


35.  RISK LISP KÒM MIZAJOU nan dimansyon yo chwazi

Woutin sa a pèmèt ou jwenn mezi dimansyon (dimansyon), valè yo jwenn yo parèt, ki ou ka kopye epi kole pou egzanp nan Microsoft Excel epi yo pral chak valè kole nan yon ranje separe.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: DimX
  3. Antre nan kantite desimal nan mezi yo dwe pran (3 pa default)
  4. Chwazi dimansyon yo pou jwenn mezi ou yo
  5. Peze Antre nan fen seleksyon an epi montre sou ekran an valè yo jwenn

Ou ka jwenn woutin lan isit la


NAN. ROUTIN NAN VISUALLISP ki ogmante valè an nan nimewo yo dapre yon faktè

Woutin nan VisualLisp pèmèt yo ogmante valè a nan nimewo yo nan tèks yo chwazi. Sa a woutin ki te pwodwi nan VisualLisp pèmèt yo ogmante valè a nan nimewo yo nan tèks yo chwazi (youn pa youn) dapre yon faktè ogmante endike.

Si valè a endike se yon nimewo negatif valè yo ki vin apre yo pral yon diminisyon nan valè inisyal la.

Pou egzanp, si valè inisyal la se nimewo 1 a, ak yon valè enkreman nan 1 yo te antre nan, nimewo ki vin apre chwazi yo pral incremented pa yon inite, 2 kap vini an, 3 kap vini an, ak sou sa.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: INC
  3. Chwazi tèks la ak valè inisyal la
  4. Antre nan enkreman an
  5. Chwazi youn pa youn tout tèks ou vle ranplase
  6. Peze kle a antre nan fini lòd la

Ou ka jwenn woutin lan isit la


Lisp pou topography ak 3D


NAN. Konvèti antite 37DFace nan ACIS solid

Kèk tan de sa mwen te vini atravè sa a zozote enteresan woutin ak byenke dènyèman mwen pa te itilize, nenpòt lè mwen te bezwen te ede m 'anpil ak kalkil volim, sa a sipleman nan moman yo ki 3D sivil pa ban m' rezilta yo mwen bezwen .

Li se yon woutin nan ki chwazi 3Dface objè, ekstrè yo ansanm ak konvèti yo nan yon sèl objè 3D Solid, itilize li yo se senp epi jis senpleman chwazi objè yo ak woutin a pral fè tout travay la.

Pou yon apresyasyon pi gwo nan chanjman yo ki woutin nan fè nan objè yo, ou bezwen gen yon View 3D, otreman nan gade nan plant pa pral obsève Heights ki te kreye nan Solid nan 3D, paske solid la kreye pa pwojte chak figi chwazi vètikal "desann" aktyèl z-aks la, nan yon avyon ak nan yon distans espesifye nan itilizatè a.

Pou asire ke tout pati nan may la yo te pwodwi kòm solid, sa a distans pa kapab zewo, men ka solid la ap koupe pita si sa nesesè nan epesè a egzije, ak operasyon boolean oswa solid operasyon koreksyon. Se solid la ki kapab lakòz kreye nan kouch aktyèl la.

Si nan fen sendika a nan ti solid yo, operasyon an sispann oswa pandye akòz memwa memwa, ou ka eseye rantre nan yo manyèlman.

Nòt yo konsidere:

Si fè fas adjasan pa gen kowòdone ki idantik, pral gen anpil ti twou vid ki genyen oswa sipèpoze ant solid ki sòti nan yo, ki ka paske AutoCAD pa ka kapab rantre nan solid yo, ki montre mesaj sa yo:

  •  "Konteni enkonsistan nan koub entèseksyon."
  •  "Enfòmasyon enkonsistan nan kowòdone somè ak coedge."
  •  "Relasyon enkonsistan kwen-fas."
  •  "Relasyon enkonsistan figi-kò."
    Si pwoblèm pèsiste lè génération solid la, ou dwe kopye yon ti distans ak Lè sa a, rantre kopi yo ak orijinal la pou yo eseye ranpli tout twou vid ki genyen yo nan sifas la 3DFace epi eseye ankò jiskaske pwoblèm nan rezoud.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: F2S
  3. Chwazi 3D a konvèti nan yon solid
  4. Antre nan wotè (desann) ki solid la pral genyen nan chak somè nan 3DF la
  5. Antre nan fason a jenere solid la: Otomatik oswa Manyèl

Ou ka jwenn woutin lan isit la


NAN. Foure dimansyon nan liy kontou soti nan elevasyon li yo

Nan plizyè okazyon ou pral jwenn ke ou gen koub nivo nan yon dosye, men sa yo pa gen kota yo, atravè woutin sa a, ou ka insert dimansyon nan koub nivo topografik ke ou vle.

Dimansyon yo dwe insert yo se blòk ak atribi, sa yo blòk yo kreye nan yon desen pous milimèt. Pou ou ka itilize lisp sa a san pwoblèm, ou dwe itilize kòmandman an "INIT” (Inite) defini inite kontni an pou mete nan “milimèt” (milimèt).

Li vo fè klè ke pou woutin sa a mete elevasyon ki kòrèk la nan liy kontou yo, yo dwe gen yon elevasyon (kowòdone z> 0), depi se elevasyon an jwenn nan pwen ki endike sou yon koub kontou Si liy kontou yo gen elevasyon 0 (kowòdone z = 0), se sa ki, yo pa gen elevasyon, woutin lan ap mete yon tèks ak valè sa a.

Echèl la mande sa woutin nan refere a echèl la ke yo pral konplo desen an, se yon valè de referans tèks gwosè dimansyon nan yo pral figire, ou ka fè tès lè yo ogmante oswa diminye sa a valè jiskaske yo dimansyon nan eleman ak tèks gwosè ou vle.

Woutin sa a gen atachman 2: EL_TAG.dwg y EL_TAG2.dwg, li se blòk yo ak atribi eksplike anwo a, sa yo dosye ka kopye nenpòt kote, byenke li rekòmande yo ke yo dwe nan menm katab la kòm woutin nan.

Nan lòd pou AutoCAD chaje dosye sa yo, ou dwe defini chemen an nan kote AutoCAD nan bwat dyalòg la Opsyon-> Sipò pou dosye rechèch chemen.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: CPE
  3. Endike yon pwen ki pi wo a liy lan nan koub la nivo ak nan plas la ou vle dimansyon nan yo dwe eleman
  4. Endike yon lòt pwen defini wotasyon an ki pral gen dimansyon nan insert
  5. Ou ka kontinye mete plis dimansyon ki endike pwen ensèsyon ou an, si ou pa vle mete plis dimansyon, peze kle nan antre a fini lòd la

Ou ka jwenn woutin lan isit la


NAN. Trase liy ki nan pant koupe oswa ranpli

Sa a woutin trase liy ki nan pant yo koupe oswa ranpli, sa yo pant liy yo nesesè yo endike oswa reprezante inegalite ki genyen ant tribin yo.

Yo nan lòd yo jenere liy lan pant ak woutin sa a, yo dwe done 6 dwe antre nan ki pral pèmèt liy ki pant yo dwe pwodwi jan yo espere.

Sa ki anba la yo se done yo mande yo:

  1. Distans ant liy pant (m): Isit la ou dwe antre nan separasyon ki genyen ant chak liy nan pant.
  2. Chwazi polyline de dimansyon ki pi wo a: Kòm pant lan se yon diferans ki genyen ant de liy nan bor, isit la li dwe endike ke polylin se youn nan dimansyon ki pi wo a.
  3. Chwazi polyline de dimansyon ki pi ba a: Yo dwe endike polyline dimansyon ki pi ba a.
  4. Koupe oswa Ranpli?: Direksyon desen an nan kòmansman an nan liy pant yo pral depann de si wi ou non li se yon koupe oswa yon ranpli, pa default lè peze kle a Antre, li pral pran kòm valè a ranpli "R".
  5. Maksimòm liy pant maksimòm: Yon mezi ki pral gen liy la pi gwo reprezante pant lan, si mezi a se mwens pase distans la nan pye a nan pant lan, li pral dwe te note ke liy lan pa entèsekte ak liy lan kwen nan zòtèy la nan pant lan, si ou vle nan pi gwo liy pant pye rive nan entèseksyon an ak liy lan kwen nan zòtèy la nan pant lan, li ta dwe endike yon valè pi wo, kòm 200 500 oswa pou egzanp.
  6. Distans ant twotwa yo: Se Separasyon ki twotwa yo pral genyen.

Ou ka obsève graf sa yo pou yon pi gwo konpreyansyon sou definisyon yo:

Isit la gen yon longè maksimòm pou liy lan pant nan 5m te endike.
Isit la se yon longè maksimòm pou liy lan pant nan 200m te endike (valè a egzak se pa enpòtan jis bay yon valè ekzajere pou ke lè li entèsekte ak liy nan kwen pye pant lan, li koupe otomatikman).

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Ou dwe genyen kòm aktyèl kouch ki pral genyen liy pant yo dwe pwodwi, pa egzanp: "Pant liy yo".
  2. Chaje dosye a lisp nan AutoCAD.
  3. Mete non kòmandman an: tik
  4. Antre nan done yo mande nan lòd la.

Ou ka jwenn woutin lan isit la


NAN. Trase yon liy ak yon pant endike

Sa a woutin pèmèt ou trase yon liy ak pant lan ke ou endike, jis endike pwen an ensèsyon nan liy lan ak pant lan ki pral genyen.

se pant lan endike nan se yon valè relatif nan 1, pou egzanp, si ou vle trase yon liy ki gen yon pant nan 2: 1, se sèlman ta dwe endike kòm pant pou liy lan Nimewo 2 a, si yo pant lan ka jwenn li se 1: 1.333, ou dwe antre nan 0.75.

Pou plis klarifikasyon, si yo vle pant genyen ak valè a nan 1 premye (1: x), ou dwe divize Nimewo 1 ki genyen ant pant lan konplemantè (x).

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: DT
  3. Endike pwen an ensèsyon nan liy lan
  4. Antre nan pant lan ki pral gen liy la kòm eksplike anwo a

Ou ka jwenn woutin lan isit la


NAN. Trase yon liy ak yon pant endike

Avèk woutin sa a ki senp ou ka trase yon liy ak pant lan endike, pou li pou kont li se ase yo endike pwen an ensèsyon nan liy la ak pant volonte la.

Se liy lan pwodwi ak yon longè orizontal nan inite 10 ak yon longè vètikal nan valè pant ki endike ant 10.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: LP
  3. Endike pwen an ensèsyon nan liy lan
  4. Antre nan pant lan ki pral gen liy lan nan pousan (ejm: 12), san siy la pousan

Ou ka jwenn woutin lan isit la


NAN. Kalkile koupe a ak ranpli zòn nan seksyon kwa

Avèk woutin sa a lisp ou ka jwenn zòn ki koupe ak ranpli nan yon koup transvèsal ki gen yon liy teritwa Natirèl ak yon liy patiraj (seksyon nan wout final la).

Avèk woutin sa a lisp ou ka jwenn zòn ki koupe ak ranpli nan yon koup transvèsal ki gen yon liy teritwa Natirèl ak yon liy patiraj (seksyon nan wout final la).

Pou sa a lisp jwenn zòn yo, ou dwe fè seleksyon an nan polylin yo nan tèren an ak patiraj ak lòd la pral mande yon pwen yo mete tèks yo nan zòn ki koresponn yo te jwenn.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: ZANTRAY
  3. Chwazi polylin nan chemen orijinal la (Natirèl Teritwa)
  4. Chwazi polylin nan wout la (Rim oswa Sub-Slider)
  5. Endike pwen pou mete tèks zòn yo jwenn yo

Yon dosye echantiyon CAD tou te gen ladann nan dosye a .rar pou plis konpresyon nan woutin nan.

Ou ka jwenn woutin lan isit la


NAN. Antre pant yo nan yon pwofil Longitudinal

Sa a woutin pèmèt ou insert nan gita pant yo nan yon pwofil Longitudinal (poliyin oswa liy), jis chwazi pwofil la (polylin a) epi endike yon pwen ki koresponn ak kote vètikal la nan tèks yo ki endike pant yo.

Si li se yon liy, lòd la kalkile sèlman ekstremite yo, konsa jwenn pant lan, nan ka yon polylin, woutin la jwenn chak inèks ak final vertex ak kalkile pant lan ant yo nan tout segments yo nan polyline la.

Tèks ki endike pant yo jwenn se kalite a, pa egzanp: "P = 1.11 nan 10.49 m” epi kòm ou konnen, fòma sa a ka modifye pou adapte yo ak fason chak nan nou travay.

Kòm nan woutin anvan an, style la tèks aktyèl pa ta dwe kontanple yon wotè, si se yon erè ki te pwodwi ak pant yo pa pral antre.

Echèl ki endike nan kòmansman woutin lan, se sèlman pou gwosè tèks yo epi ki pa enfliyanse mezi yo pran pou pwosesis pant yo.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: Pf
  3. Antre nan echèl la pou tèks yo nan pant yo te jwenn yo dwe eleman
  4. Chwazi pwofil pou kalkile pant
  5. endike yon pwen referans pou mete tèks yo ak pant yo

Ou ka jwenn woutin lan isit la


NAN. Mete yon mak nan somè yon pollinik

Sa a woutin lisp se yon adaptasyon nan yon sèl anvan an ak pèmèt ou insert yon mak nan tout verite yo nan polyline a ke ou chwazi, jis chwazi li.

Mak la antre se yon dosye desen (blòk) pwodwi pou yon echèl patikilye, men li se totalman customizable, li ka modifye tankou nenpòt ki desen, li dwe sèlman respekte pwen an sant nan li (nan ka sa a sant la nan sèk la nan blòk la ).

Nan kòd sous la nan dosye a ou ka chwazi insert yon sèk olye pou yo blòk la, pou ke ou gen sèlman yo retire kòmantè yo nan liy lan ki gen kòd sa a ak kòmantè liy lan ki foure blòk la.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: Ima
  3. Chwazi polyline a ou vle make vètikal li yo
  4. Endike chemen an ak non an nan dosye a yo dwe ekspòte

Ou ka jwenn woutin lan isit la


NAN. Jwenn pant lan nan yon liy chwazi

Pwogram sa a devlope nan AutoLisp, pèmèt jwenn valè pant lan nan yon liy chwazi.

Li ta dwe remake ke moun ki lòd sa a sèlman travay ak liy, si ou gen yon polylin li ta dwe eksploze oswa jenere yon liy pi wo a polyline la.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: TL
  3. Chwazi liy ki soti nan ki ou vle jwenn pant lan.
  4. Enfòmasyon yo jwenn se pant H: V.

Ou ka jwenn woutin lan isit la


46. 3 PACK ROUTIN POU MOUN KONDI - PATI 3: CREATING PROFIL LA SOTI NAN YON MOUN

Pa vle di nan woutin sa a ou yo pral kapab jenere pwofil la (elevasyon) nan yon miray ranpa, ka pwofil sa a dwe fèt nan done yo nan seksyon yo kwa sou miray ranpa yo, done sa yo yo se: Pwogresif, Dimansyon Crown ak Dimansyon Fondasyon.

Done echèl yo mande nan lòd la, pa refere a echèl vètikal la nan pwofil la (se pwofil la ki te pwodwi ak echèl vètikal egal a orizontal la) men gwosè echèl la pou tèks yo pwofil (dimansyon ak lòt done).

Pou jenere pwofil la, li se ase premye chwazi pwogresyon nan seksyon an, Lè sa a, wotè nan kouwòn lan epi finalman wotè fondasyon an.

Ou dwe pran swen espesyal nan chwazi done yo depi si ou pa chwazi yon tèks, epi klike sou ekran an, kòmandman an pral pran li kòm li te konplete seleksyon an nan done jenere pwofil la.

Ansanm ak woutin nan se yon dosye CAD apwovizyone, ak miray seksyon kwa, kòm yon egzanp yo mete woutin nan lis nan pratik.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: MUP
  3. Antre nan echèl la (gwosè) nan tèks yo pwofil (egzanp: 75)
  4. Chwazi tèks pwogresif la
  5. Chwazi tèks la nan dimansyon an kouwòn
  6. Chwazi tèks anba fondasyon an
  7. Yon fwa ou fin ranpli seleksyon an sou tout seksyon miray la, peze Antre nan ak endike yon pwen nan ki tèt la kite nan kouwòn lan nan pwofil la miray yo pral pwodwi.

Ou ka jwenn woutin lan isit la


47. 3 PACK ROUTIN POU MOUN KONDISYON - PATI 2: SIZE (SEKIRITE) nan seksyon an nan yon miray

Sa a woutin pèmèt ou dimansyon (dimansyon) yon seksyon nan miray ki te pwodwi ak woutin la te deja pibliye (depi li gen menm kritè konsepsyon), rezilta a ta dwe tankou imaj ki annapre yo (mezi yo varye selon dimansyon yo nan miray la).

Woutin sa a mande pou echèl la pou dimansyon yo ke yo pral pwodwi, echèl sa a sèlman refere a separasyon ki genyen ant liy yo nan dimansyon, gwosè yo ak fòm nan dimansyon yo depann sèlman sou style la dimansyon kounye a ak sa a dwe deja pwodwi pa itilizatè a pou echèl la ke yo te travay.

Jenere talu yo ta dwe pwosedi menm jan ak nan woutin la anvan pou génération miray la, yon pwen note nan seksyon an pant zepòl nan wout la, sou bò a ki kote miray la bezwen ak wotè ki endike ak opsyon la nan ki endike yon pwen sou anba a nan fondasyon an nan miray la.

Li se vo mansyone ke woutin sa a sèlman limite yon seksyon nan miray pwodwi ak woutin nan pòs anvan an, menm jan li itilize kritè desen yo menm nan seksyon miray la, ou ka modifye nan kòd la operasyon yo ki kalkile pwen yo nan ka ou vle pou aplike pou yon lòt kalite miray.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: MUD
  3. Antre nan echèl la pou separasyon ant liy dimansyon
  4. Endike yon pwen referans (P1 nan imaj la) sou miray la
  5. Endike direksyon miray la (Left oswa Dwa)
  6. Endike yon pwen nan pati anba a nan seksyon an nan miray la (P2 nan imaj la)

Ou ka jwenn woutin lan isit la


NAN. PACK OF 48 ROUTINES POU miray ranpa a - PATI 3: KREYASYON SEKSYON AN WALL A

woutin sa a se premye a nan 3 pou génération twou kalite gravite a, kèk tan de sa nou menm tou nou pataje avèk ou yon woutin ki pwodwi yon miray repwan, fwa sa a woutin nan jenere yon miray ak diferan konsepsyon (mezi).

Li dwe vin chonje ki travay yo nan atizay nan yon wout (mi yo, pasaj idwolik, elatriye) yo pa toujou konsepsyon an menm pou chak travay, sa a konsepsyon se yon fonksyon nan anpil faktè nan menm zòn nan nan bilding lan.

Woutin sa a pèmèt ou jenere yon mi repwan ak kritè konsepsyon sa yo:

Pou jenere li, ou dwe endike zepòl pant lan nan seksyon an nan wout la, sou bò kote miray la ki nesesè, ak lisp la miray la ka pwodwi sou nenpòt ki bò, pou sa li ase yo endike direksyon an (kite oswa dwa).

Avèk respè wotè, sa a se defini lè l sèvi avèk opsyon 2, premye a se yon wotè (H) defini antye ak dezyèm posiblite a se defini pa yon elevasyon nan pati anba a nan miray ranpa a nan fondasyon, sa a wotè ka endike pa yon pwen sou ekran an, pwogram lan ki responsab pou kalkile wotè a ak tout lòt mezi ki soti nan li.

Pwogram lan prepare pou asime de kritè de wotè miray: premye kritè a se yon miray ki gen wotè konstan, kote baz la nan fondasyon an se pa orizontal ak dezyèm kritè a (pi itilize a) se ke wotè miray la se varyab, kote baz la nan fondasyon an se orizontal epi yo pa swiv pant yo nan wout la.

Kouman yo itilize zozote sa a depann sou chak itilizatè, epi li pral pi bon ou ka premye jenere avyon sou miray ranpa san yo pa ede a nan nenpòt ki woutin, se konsa li pral pi fasil yo konprann itilize a apwopriye nan sa a zozote.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: MUS
  3. Endike yon pwen sou zepòl la nan fas a nan bò ki endike an
  4. Endike direksyon miray la (Left oswa Dwa)
  5. Chwazi ki jan ou pral defini wotè nan miray la (pa wotè oswa wotè fondasyon)

Ou ka jwenn woutin lan isit la


NAN. ROUTINE AUTOLISP POU trase yon mi nan CONTENTMENT

Sa a woutin lisp pèmèt ou trase yon miray kalite gravite pou wout, mezi yo ak ki sa a miray trase nan sa a lisp yo toujou menm bagay la tou (yo konstan), mezi a sèlman ki chanjman se wotè nan miray la.

Pwen yo ak ki sa a miray ki pwodwi yo ki te pwodwi soti nan mezi yo nan yon konsepsyon miray patikilye, si li vle ke ak sa a lisp dwe pwodwi mi ak mezi Customized, yo dwe chanje mezi yo ki ekri nan pwogram nan .

Lè sa a, ou ka wè graf sa a, ki gen pwen yo ak ki miray la ki te pwodwi:

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: MU
  3. Endike pwen an kòmanse nan jenerasyon an miray la
  4. Endike direksyon miray la (Left oswa Dwa)
  5. Antre nan wotè miray la

Ou ka jwenn woutin lan isit la


NAN. LISP ROUTINE POU GENRE PWOZSIV AN yon aliyman

woutin itil sa a jwenn men m 'pou kèk tan ak pou moun ki ta jenere aliyman senp san yo pa bezwen la ki vin apre jenere seksyon kwa ak seksyon Longitudinal ladan l', yo ap benefisye de woutin sa a.

Woutin la gen yon koòdone bwat dyalòg ki pèmèt ou Customize fòma final la nan pwogresis yo eleman nan arbr a.

Pou itilize woutin nan ou dwe gen yon poliyin (aliyman) epi swiv etap sa yo:

  1. Kopi dosye yo 3 telechaje nan yon sèl nan chemen sipò nan AutoCAD ou
  2. Voye dosye lisp nan AutoCAD (avèk APPLOAD).
  3. Mete non kòmandman an: pwogresif
  4. Nan bwat dyalòg la, defini fòma pwogresis yo dwe pwodwi.
  5. Chwazi polylin (aliyman) nan ki pwogrè sa yo pral pwodwi.
  6. Li endike yon pwen, ki pral vin pwen an kòmanse nan jenerasyon an nan pwogresis.

Ou ka jwenn woutin lan isit la


51. ROUTINE POU GENYEN yon pwofil LONGITUDINAL SOU PWOLINASYON POU GROUND AK ROUGH

Sa a se youn nan woutin yo konplè ki jenere fòma a nan yon pwofil Longitudinal. Pa senpleman chwazi de polylines 2D (tèren an ak kole), woutin la jenere fòma a nan yon pwofil ak tout done yo ki bezwen yo dwe parèt.

Nan lòd pou jenerasyon sa a pwofil yo dwe reyisi, polylin yo dwe chwazi yo dwe posib nan 2D, otreman yon erè ka rive nan operasyon li yo.

Pou itilize sa a woutin ou dwe fè sa ki annapre yo:

  1. Kopi dosye yo 3 telechaje sou youn nan chemen sipò AutoCAD ou
  2. Voye dosye: pwofil pwofil yo nan AutoCAD (ak APPLOAD).
  3. Mete non kòmandman an: pwofil
  4. Nan bwat dyalòg ki parèt la, klike sou "Done” epi klike sou bouton yo “Terno"Epi"Pant” pou chwazi tèren an ak polilin klas yo
  5. Si ou vle ou ka defini lòt done ki nan bwat dyalòg la anvan kreye pwofil la (si ou vle)
  6. Endike a pwen ensèsyon tèt pwofil la jenere

Ou ka jwenn woutin lan isit la


NAN. ROUTINE NAN LISP vizyèl pou ajoute mezi yo ARCOS nan desen an

Sa a woutin pèmèt ou ajoute distans yo nan tout ark yo nan desen an oswa sèlman sa yo ke ou chwazi, ki montre ou rezilta yo nan adisyon a nan liy nan kòmandman.

Sa a woutin pèmèt ou ajoute distans yo nan tout ark yo nan desen an oswa sèlman sa yo ke ou chwazi, ki montre ou rezilta yo nan adisyon a nan liy nan kòmandman.

Pou itilize woutin sa a, fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: sumarque
  3. Chwazi ar yo nan desen an ou vle ajoute, si ou vle chwazi tout ark yo, peze kle a Antre nan anvan demann lan nan seleksyon an nan ark.

Ou ka jwenn woutin lan isit la


LÒT


NAN. ROUTINE LISP POU enpòte UCSS la ekonomize nan lòt dosye

Sa a woutin enteresan kreye ak AutoLisp ak Visual Basic pou aplikasyon pou (VBA), pèmèt ou enpòte UCS yo sove ak yon non soti nan nenpòt ki dosye segondè nan desen nou an.

Zouti sa a trè itil si ou travay avèk avyon ki okipe anpil uk, nou anjeneral kreye uk yo nan yon dosye premye epi nou dwe fè menm bagay la tou pou lòt dosye yo, ak woutin sa a, jis kreye yo nan premye a epi nou ka Lè sa a, enpòte yo nan nenpòt lòt dosye.

Wout la korije menm jan ak zouti nan Designcenter, eksepte ke li pa gen opsyon nan enpòte uk soti nan lòt dosye. Nan ka sa a woutin byenke li pa pèmèt trennen ak gout, rezilta yo yo jan yo espere.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Voye oswa ajoute DVB ak dosye LSP Appload Startup Suite.
  2. Mete non kòmandman an: IMPUCS
  3. Nan zòn nan Sous Desen, klike sou bouton an chwazi, yo chwazi dosye a desen soti nan kote ou vle enpòte uk la.
  4. Nan zòn nan UCS yo te jwenn, chwazi uk yo enpòte epi klike sou bouton an OK.

Ou ka jwenn woutin lan isit la


54. WOUTIN LISP KI ELIMINE VÈTIS KI ENDIKE YON POLYLINE

Ou pral te rive ki gen yon polyligne nan AutoCAD ak vle retire youn nan somè li yo ak reyalize ke ou gen pou aplike pou plis pase de kòmandman.

Avèk sa a woutin jis ase ke ou endike ki vètek nan poline a ou vle retire epi ranje matyè.

Pou woutin nan travay kòrèkteman, nan pwen nan ki endike pwen an, sa a dwe sou vertex la elimine epi yo pa yon pwen tou pre, pou ke ou dwe aktive mòd referans antite yo, tankou Endpoint oswa entèseksyon.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: evepol
  3. Chwazi polylik kote ou vle efase yon vertex.
  4. Endike yon pwen sou vètek la nan polyline a ou vle efase.

Ou ka jwenn woutin lan isit la


NAN. ROUTINE KI ESPORTE Pwen nan kowòdone nan viktim yo nan objè 55DFACE

Sa a woutin ki ekri nan Autolisp, se menm jan ak yon sèl anvan an, diferans lan se ke tan sa a, li ekspòtasyon kowòdone yo nan verite yo nan objè yo 3Dface nan AutoCAD, sa yo kowòdone yo estoke nan yon dosye CSV nan Microsoft Excel, ki endike pou li .

Ekspòtasyon nan pwen vertex ka ede ou anpil nan ka ou gen yon triyangulasyon ak figi 3D epi ou vle jwenn kowòdone yo rkree dosye pwen kowòdone ou.

Konsiderasyon tou se menm ak nan woutin anvan an, nan ka a nan 3Dface ansanm ak somè yo menm, tou si yo vle, yo ta dwe konsidere konsiderasyon an sote kowòdone yo ak efase sa yo ki double.

Kowòdone ki ekspòte gen a fòma P, N, E, C (Pwen, Nò = Y, East = X, Dimansyon = Z) ak jan li ekspòte nan yon dosye CSV (separe pa koma), lè ouvèti dosye a chak valè pral okipe selil li endepandan ak nan yon fason te bay lòd.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: E3D
  3. Chwazi objè yo 3D ki soti nan kote ou vle ekspòte kowòdone nan vèt ou yo.
  4. Endike kote ak non dosye CSV kote yo pral pwodwi kowòdone ekspòte yo.

Ou ka jwenn woutin lan isit la


NAN. ROUTINE LISP POU KOPI ENTITIES yon blòk ekstèn oswa REFERANS

Pafwa ou bezwen yon kopi antite, men lè sa yo, se nan yon blòk, sa nou fè se anjeneral esplwate ki blòk oswa petèt sèvi ak editè a blòk, kidonk, ou ka pran kontwòl nan antite yo endividyèlman, chwazi ak fè kopi .

Avèk woutin sa a ou p ap bezwen esplwate nenpòt blòk oswa itilize editè a blòk pou kopye nenpòt antite nan li, jis chaje woutin sa a epi chwazi antite yo dwe kopye.

Nouvo objè ki te kreye nan seleksyon an parèt pi wo a orijinal la, se konsa si yo vle ou dwe chwazi yo epi deplase yo nan pozisyon an vle.

Nan woutin sa a ou ka chwazi opsyon a ke objè nouvo yo ka kreye nan yon lòt kouch, ki se chwazi paske pa default antite yo nouvo yo kreye nan kouch aktyèl la.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: CPL
  3. Chwazi karakteristik yo nan blòk la ou vle kopye.
  4. Si ou vle ou ka chwazi chanje kouch la nan ki objè yo nouvo yo te pwodwi.

Ou ka jwenn woutin lan isit la


57. LISP ROUTINE POU TRANSFÒM ARCHES YON POLYLININ NAN SEGMENT LINEAR

woutin sa a pèmèt ou transfòme ark yo enkli nan yon segman polyligne liy, longè a nan chak segman yo se opsyon sa yo ou presize nan lòd la. Zozote pran done nan somè yo nan polyligne a chwazi, ki gen ladan arc ak jeyometri ak jenere yon nouvo polyligne ak done nouvo.

Longè chak segman nouvo nan arc la depann sou valè a antre, li dwe mwens pase longè ark la ki pi piti nan chwazi polyline a, lisp pral divize arc orijinal la an "n" segman jouk rive nan longè orijinal li yo.

Opsyonèlman ou ka chwazi kenbe polyline orijinal la, ki pral lakòz yon polylin dwe kreye sou tèt li - oswa retire li.

Sa a woutin ka itil, pou egzanp, nan ka a kote ou bezwen defini pwen sou yon koub sou yon aks nan yon aliyman orizontal oswa vètikal.

Pou itilize woutin ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: artose
  3. Chwazi polyline kote ou vle transfòme segments koube yo nan segman lineyè yo.
  4. Endike longè chak segman ki pral fòme nouvo "ark" lineyè a.
  5. Chwazi kisa pou w fè avèk polyllin orijinal la chwazi, si ou chwazi efase, ou pral gen sèlman polylin ak segments koube yo transfòme nan segman lineyè.

Ou ka jwenn woutin lan isit la


58. AUTOLISP ROUTINE ENFÒMASYON POINTS NAN DISTANS KI NAN YON AKS

Avèk sa a woutin ou yo pral kapab insert nan yon pwen chwazi (pwen polyline) ak distans respektif yo, done yo nan ensèsyon an nan pwen sa yo, soti nan nimerik la nimerasyon distans oswa lekti a nan yon dosye de distans (yon dosye nan egzanp pou yon pi bon konpreyansyon).

Ka woutin sa a dwe itilize pou egzanp nan ka a nan aks yon wout, nan kèk okazyon li nesesè jwenn yon pwogresif egzak nan aks la (polylin), tankou pou egzanp youn nan pwogresif 23.76Manyèlman ka fè men pran plis tan, sa a woutin jis ase yo chwazi aks la, ki endike ke premye aks la pwogresis (anjeneral ak valè 0), ak Lè sa a, antre nan distans la.

Si ou gen distans twò anpil pou rantre nan aks lan, olye pou yo tape yo lisp bay opsyon pou chwazi yon dosye tèksNan sa a ranpli tèks pral distans ak zozote pral li youn pa youn pa yo mete yon pwen sou aks la (polyligne).

Lisp la tou pèmèt ou chanje kòmanse nan aks la Depi kòmansman an detèmine dapre pwen kòmanse ki te pwodwi polilin lan, si lisp la kòmanse mete distans yo nan pwen final la ki pa vle a, sèvi ak opsyon an: "Chanje aks kòmanse".

Ansanm ak woutin la se yon dosye CAD, ak yon sèl aks (polylin), kòm yon egzanp aplike woutin nan lisp.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: PP
  3. Chwazi ki jan ou vle mete pwogresif yo: manyèlman (1 × 1) oswa lè ou li yon dosye tèks.
  4. Chwazi arbr an poliyin
  5. Antre pwogresif oswa premye distans soti nan aks lan (default se 0)
  6. Antre nan pwogresif oswa distans pou jwenn (nan ka manyèl manifakti, si yo te chwazi yon lekti dosye sa a pa nesesè)

Ou ka jwenn woutin lan isit la


NAN. LISP ROUTINE KI ENSWI Kowòdone yo nan yon pwofil otomatikman dapre espazaj ki espesifye yo.

Avèk woutin sa a ki fèt ak AutoLisp ak VisualLisp, ou pral kapab mete chak "n" mèt elevasyon yo nan yon polilin chwazi (tèren natirèl oswa patiraj) nan fòma pwofil ou a, elevasyon yo pral antre pran kòm referans yon pwen ki endike nan la. fòma.

Nan lòd sa a ou ka defini echèl la nan desen anechèl sa a pa, al gade nan echèl la vètikal nan yon pwofil, men echèl la nan tèks yo nan dimansyon yo nan yo pral figire, tèks la dimansyon pou yon echèl 1: 500 dwe pi gwo pase yon echèl 1: 50.

tou ou ka defini echèl vètikal la nan pwofil ou, done sa a enpòtan paske li kontwole valè yo nan dimansyon yo, nan yon pwofil tèren natirèl scaled nan 10 fwa gwosè li nan vètikal la ap gen valè yo nan dimansyon yo tou 10 fwa pi plis pase gwosè aktyèl yo, se konsa lòd la ta dwe pote soti nan operasyon ki koresponn yo transfòme valè yo nan kota yo nan yo menm ki reyèl.

Yon lòt valè pou antre ak youn nan ki defini lòd sa a, se distans la nan ki dimansyon yo pral antre, valè a default ke sa a woutin pote se 10, ki vle di ke dimansyon yo pral antre chak mèt 10 orizontal soti nan pwen an referans endike.

Apre chwazi polylin a ki reprezante pwofil ou a (TN, Rasante, elatriye), lòd la pral fè w konnen yon pwen referans nan fòma pwofil ou, ou dwe endike pwen sa a nan yon pwogresif tout antyePou egzanp si yon pwofil se 0 000 100 000 + +, yo ta dwe endike pwen an nan 0 nan pwogresis oswa 10 20 oswa, elatriye (dapre chak jan sa endike distans ensèsyon nan dimansyon).

Sonje pou pwogram lan jwenn dimansyon korespondan yo, pwofil la dwe kòrèkteman chita, sa vle di dimansyon yo kòrèk pou pwofil la.

Tablo sa a pral ede w pi byen konprann opsyon woutin sa a:

Pou itilize sa a woutin ou dwe fè bagay sa yo: (Valè yo default yo dwe swiv egzanp lan ak dosye a CAD tache)

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: ICP.
  3. Antre nan echèl la desen pou gwosè dimansyon: 850 (ou ka chanje jiskaske gwosè a apwopriye)
  4. Antre nan echèl vètikal la nan pwofil la: 1 (vètikal echèl menm jan ak orizontal)
  5. Antre nan distans ant pwogresif: 10
  6. Antre nimewo a desimal, pa default: 3
  7. Chwazi pwofil ou pral limite (TN, Rasante, elatriye.)
  8. Endike bòn tè a nan fòma pwofil ou a (gade graf)

Ou ka jwenn woutin lan isit la


NAN. LISP ROUTINE ki pèmèt yo jwenn pwogresiv oswa longè nan yon pwen endike

Woutin sa a devlope nan Autolisp ak Visual Lisp, pèmèt ou jwenn longè oswa pwogresif nan yon poliyin oswa aks epi mete l nan desen an pa vle di yon pwen ensèsyon.

Pou fè sa ou dwe chwazi polylin lan epi endike premye inivèsite a, ou dwe verifye ke lòd la te jwenn pwen an kòmanse nan polyllin kòrèk la (kòmanse nan aks), si se pa, ou ka chanje nan konmansman an nan aks la ak opsyon ki prezante kòmandman sa a.

Ou ka modifye kèk paramèt default soti nan kòd sous la, tankou wotè tèks la yo dwe eleman.
Remake byen ke sistèm kowòdone ou yo dwe pozitif, otreman yon erè pral pwodwi lè endike pwogrè pwen oswa longè ou dwe jwenn.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: OPR
  3. Chwazi poliliy aks la oswa antre lèt la "C", chanje kòmansman aks la
  4. Antre nan kòmansman an (oswa inisyal) valè de pwen an kòmanse nan polyligne nan default: 0.00
  5. Endike pwen yo nan liy kote ou vle jwenn longè oswa pwogresif

Ou ka jwenn woutin lan isit la


NAN. LISP ROUTINE ki fè diferan operasyon avèk tèks la chwazi (nimerik)

Li se yon ti men trè itil woutin lisp ki pèmèt ou jwenn enfòmasyon sou operasyon ak tèks chwazi, evidamman tèks sa yo dwe gen valè nimerik pou kalkil yo ka fèt, pou egzanp: "2.22", "3.39" ( san quotes yo), elatriye.

Si nan mitan tout tèks yo nimerik lòd la jwenn yon tèks ki pa nimerik pou egzanp mo "pwen", pral pran tèks sa a kòm Valè 0.00, se konsa rezilta yo ta chanje.

Enfòmasyon yo bay nan lòd sa a se:

  • Konte (Total kantite chwazi eleman nimerik)
  • NimewoMaksimòm (Valè a maksimòm nan tout tèks chwazi nimerik)
  • NimewoMinimòm (Valè a minimòm nan tout tèks chwazi nimerik)
  • Mwayèn (Mwayèn nan tout tèks chwazi nimerik)
  • Suma (Sòm la nan tout tèks nimerik chwazi)

Pou jwenn rezilta yo poukont yo li pral ase yo chwazi youn pa youn oswa pa vle di nan yon fenèt (fenèt) tèks ki soti nan ki enfòmasyon yo vle.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: IV
  3. Chwazi tout tèks nimerik kote ou vle jwenn enfòmasyon an

Ou ka jwenn woutin lan isit la


NAN. LISP ROUTINE ki mache ak enprime tout fòm ak konfigirasyon aktyèl li yo.

woutin sa a pèmèt ou vizite tout kouman yo epi enprime yo chak ak konfigirasyon an paj aktyèl ou genyen, li te klè ke Layout a espas modèl se pa sa te pran an kont.

Kòmandman an kouri nan chak nan kouman yo epi si li verifye ke li se espas ki la modèl, li se inyore pa kontinye ak lòt moun yo, Se konsa, si ou vle espas ki la modèl yo dwe enprime, ou gen sèlman modifye lòd la nan ki se tou pran an kont ak enprime.

Ou ka pwofite fonksyonalite kòmandman sa a pou, pa egzanp, mete antèt, efase oswa ajoute tèks nan chak layout, elatriye. Kòmandman an pa enprime travay nan "Istorik", sof si yo espesifye nan bwat dyalòg la opsyon nan tab la "Trase epi pibliye".

Si ou gen anpil dosye pou enprime ak chak moun gen kouman anpil, ou ka ogmante fonctionnalités a nan lòd sa a pa:

Kreye yon dosye rele Acad.lsp (si ou pa deja genyen li), nan ki dosye ajoute liy sa yo nan kòd nenpòt kote nan menm bagay la tou:

(defunye :: startup ()
(Chaje "Loop through and print all layouts.LSP") ;Sa a se non fichye tache a.
)

Chemen an pa endike paske li deja konprann ke chemen an nan dosye a lsp espesifye te ajoute nan repèrtwar yo sipò AutoCAD (ki endike nan bwat la dyalòg opsyon), si se pa, ou ka ranplase liy lan nan kòd ak (chemen an plen nan dosye a lsp chaj ki endike):

(defunye :: startup ()
(Chaje "C:\\CONSTRUCGEEK\\TUSLISP\\Repase epi enprime tout layouts.LSP")
)

Pou itilize woutin sa a nòmalman (san modifikasyon) ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: LPLOT
  3. Ou dwe rete tann jiskaske tout travay enprime yo fini.

Ou ka jwenn woutin lan isit la


63.  VISISEL ROUTINE LISP COUPE TEXTS POU DWA OSWA LEFT KONNEN NIMEWO KARAKTÈ ANKIZE

Sa a woutin lisp pèmèt ou taye tèks yo chwazi, trim yo sou bò dwat la, bò gòch oswa tou de bò, ki pral depann de sa ki lòd la te di.

Pou egzanp si ou gen tèks inisyal la "0 + 580.00" epi ou di kòmandman an yo koupe karaktè 2 sou bò gòch la, lòd la pral ranplase li avèk yo "580.00".

Si ou moutre kòmandman an nan koupe karaktè 3 sou bò dwat la, lòd la pral ranplase tèks inisyal la ak "0 + 580".

Finalman, si ou di lòd la taye sou toude bò yo, karaktè 2 sou bò gòch la ak 3 sou bò dwat la, yo pral premye tèks la ranplase pa "580".

Kòm ou ka wè, jis endike kantite karaktè nan koupe epi chwazi tèks yo, epi yo pral koupe jan yo endike.

Pou itilize woutin sa a ou dwe fè bagay sa yo:

  1. Chaje dosye a lisp nan AutoCAD.
  2. Mete non kòmandman an: RET
  3. Endike ki bò nan tèks la pral pran pare [Left / Right / Both]
  4. Antre nan nimewo a nan karaktè yo dwe koupe sou bò ki endike (yo)
  5. Chwazi tout tèks ou vle koupe
  6. Peze kle a antre oswa dwa-klike sou yo fè ranplasman an

Ou ka jwenn woutin lan isit la

Golgi Alvarez

Ekriven, chèchè, espesyalis nan Modèl Jesyon Tè. Li te patisipe nan konsèptualizasyon ak aplikasyon modèl tankou: Sistèm Nasyonal Administrasyon Pwopriyete SINAP nan Ondiras, Modèl Jesyon Minisipalite Joint nan Ondiras, Modèl Integrated Jesyon Cadastre - Rejis nan Nikaragwa, Sistèm Administrasyon Teritwa SAT nan Kolonbi. . Editè nan blog konesans Geofumadas depi 2007 ak kreyatè Akademi AulAGEO ki gen ladann plis pase 100 kou sou sijè GIS - CAD - BIM - Digital Twins.

Atik ki gen rapò

56 Kòmantè

  1. Bonjou enjenyè. Èske w ka ede m ? Ki jan yo tape griy kowòdone nan sivil 3D 2024 tanpri

  2. سلام
    Lisp درج شده، در راستای Z منتقل کند؟
    به عبارت دیگر یعنی رقوم را واقعی کند ؟

  3. Pral gen yon woutin ki chaje yon nwaj pwen nan fòma PENCD, separe pa espas oswa vigil nan Autocad 2015.
    oswa pi wo. Mèsi

  4. KI KOTE TIVER DIFFICULTY EM BAIXAR AS LISP. Mwen pral adrese nan yon sit nan ESPANHOL ak tès Pwosesis yon ESPOSH LISP EM VOSSA, Mwen p'ap jwenn NESSA PAGINA PROCUREM NO FIM DA PAGINA KASM SETAS PARA PASSAR ak pwochen P IT mwen pral jwenn ou. DEPOZE LISP NAN CLICAR NA VOSSA, KLIKE K EMANSE AYE YON TAKS E KI APLIKE.

  5. KI KOTE TIVER DIFFICULTY EM BAIXAR AS LISP. Mwen pral adrese nan yon sit nan ESPANHOL ak tès Pwosesis yon ESPOSH LISP EM VOSSA, Mwen p'ap jwenn NESSA PAGINA PROCUREM NO FIM DA PAGINA KASM SETAS PARA PASSAR ak pwochen P IT mwen pral jwenn ou. LISP KONPAYI A CLICAR NA VOSSA LISP E KLIKE POU FÈY YO TE KONNEN E TAKS OSWA APLIKAB. Mwen HOPE TER AJUDADO

  6. Bonjou, mwen ta renmen konnen si ou gen nenpòt kou oswa fòmasyon pou aprann pwogram nan Autocad. Epi tou pou kreye yon app ki ede m 'konte epi idantifye yon seri polylines

  7. boa noite .. gostaria de konnen pou lisp 37. Entitiesganizasyon konnvètè 3DFace em solid ACIS travay nan tout vèsyon fè oto cad?

  8. Mwen pa t 'download lisp ou
    tanpri voye m 'lisp

  9. alo mwen ta renmen konnen ki jan mwen ka jwenn moun sa yo bouch ekstrè kowòdone yo nan yon polylin ak youn nan jwenn zanno yo polyligne

    mèsi

  10. HELLO
    Mwen travay kòm yon P & ID desen epi mwen vle konnen ki jan mwen ka fè blòk yo entelijan ke mwen genyen nan yon ekspòtasyon plan autocad nan Excel.
    nan plan yo se:
    tiyo
    liy liy
    enstrimantasyon
    ekipman
    Mwen vle ekstrè enfòmasyon sa epi montre li nan Excel. si yon moun ka ede m 'tanpri

  11. Hi tout moun,
    Mwen chèche yon Lisp, ki pèmèt li nan yon Polylinie nan nenpòt ki X nenpòt ki kote yon Estasyonasyon (tou Polylinie nan Length nan sa a).
    LG

  12. K ap chèche yon zozote pou gradyan sa vle di yon sèk nan sèten reyon gen nan koupe yon koub nivo pwochen ak jenere yon polyligne soti nan sous yo ak sou sa pandan l ap deplase nan yon lòt kote se nan konsepsyon yon wout epi li se an reta kopi ti sèk yo epi trase poliyon yo mèsi

  13. Yo gen kèk woutin yo bay atribi nan eleman debaz, pa blòk, ak sa yo ka visualized nan yon bwat dyalòg sou ekran an.

  14. Hey.

    Kouman pou mwen telechaje lisp "Export Coordinate Points to a CSV file"?

    Mèsi

  15. Bon nwit
    VLE sipò ou, Mwen gen yon pwoblèm MWEN BOUCH AUTOCAD pa chaje trase a pou TECHNICAL TABLE done (kowòdone, kote, ang)

  16. Bonjou, prepri woutin yo rele AREASX, se li posib.

    Mèsi davans

  17. Bonjou mwen ta renmen jwenn aksè nan woutin nan mete progrsivas nan yon aliyman.

    Mèsi

  18. Mwen ta renmen voye ou yon woutin lisp ki nan vèsyon resan yo pa travay ak nan vèsyon fin vye granmoun si li te travay, mwen espere ou ka korije li ak / oswa amelyore li, nan lapòs la ke ou endike m 'oswa lè ou voye m' woutin nan lisp.

  19. Li bon anpil nan tout, mwen bezwen arcos_de_una_polilinea_en_segmentos_lineales.fas yo woutin ekspòtasyon AutoCAD MIDAS GEN 2015 pa gen pwoblèm ark yo pwodwi nan AutoCAD ak mwen kraze yo desann nan segments. Mèsi anpil Mwen soti nan Kiba

  20. Sou português e gostava, se possível, de ter a rotina “ROUTIN KI RANPLACE KONNIT YON TÈKS PAR COTA PWEN KI ENDIZE A”.

    Mèsi poutèt ou

  21. Tanpri, èske ou ta ka di m 'ki kote mwen ka telechaje woutin lisp ou a "Ekspòte pwen Kowòdone nan yon dosye CSV" paske mwen gen topografi nan yon zòn epi mwen bezwen ekspòte li nan csv oswa txt pwen yo antre kòm tèks (kontni an se wotè a. ) ak nan kowòdone Z a soti zewo, te resevwa li?
    Tanpri, ou ka ede m '

  22. Mwen ta renmen lisp la ak fonksyon "Retire objè entèn oswa ekstèn nan yon polilin chwazi", paske nan atik la mwen pa ka jwenn lyen ki telechaje.

  23. Hi, mwen ta renmen konnen si gen yon woutin yo jwenn kantite objè epi mete yo nan tèks

  24. Chè, mwen eseye pi ba kèk woutin ak avètisman sa a soti:

    Pa jwenn

    Demann URL / fowòm / Routine-lisp-a-ajoute-a-soustraksyon-valè-a-chwazi-tèks pa te jwenn sou sèvè sa a.

    Anplis de sa, yo te rankontre yon 404 pa jwenn erè pandan y ap eseye sèvi ak yon ErrorDocument okipe demann lan.

    Ki sa ki mwen mal?, 1000 di ou mèsi wa

  25. Alo si yon moun konnen kèk zozote ki pèmèt Lè ou konnen trase poligòn, longè a ak ang, si yon moun konnen, woutin nan topo12 si ou ka voye e-AMI juanpaulo_100@htomail.comMèsi anpil, zanmi mwen yo.

  26. bon jou, mwen ta renmen konnen woutin pou autocad 2014 si yo te li nan jenere tab yo bay kowòdone ak konsepsyon wout

    mèsi

    concerne

  27. alo
    Excuse me peuden ede ak yon zozote nan etwat yon polyligne ak km li yo, mwen vle di si mwen gen yon polyligne Originating Dm a Incio 100 ak nan fen dm 1000, yo ki make nenpòt ki pwen nan polyligne a ak mwen jete m 'dm ou ak kite make.

    kounye a kòmansman ak fen dm ap toujou diferan pou chak pwojè

    si ou ka ede m 'mwen ta dwe rekonesan anvè ou jan mwen travay ak sa a souvan epi li ta trè itil nan pwojè wout.

    concerne

  28. bonjou yon moun ka ede m 'ak yon zozote fè rapò ant yon sondaj fè ak arbitrias kowòdone soti nan de pwen, Lè sa a, kowòdone a nò orijinal yo mete ak bò solèy leve ak elevasyon an kite yo arbitarias yo menm nan de pwen yo kòmanse Se konsa, mwen te fè ak Aling men dimansyon yo yo chanje

  29. bon jou, mwen ta renmen konnen si yon moun konnen yon ti woutin oswa li gen yon egzanp senp nan kèk woutin ti yo kreye yon dbf baz done epi ajoute done li oswa efase nan autolisp.
    Mwen espere ou ede mwen.
    mèsi

  30. Alo zanmi mwen ta renmen konnen si yon moun konnen yon woutin pou mezire ang yo (espwa ekstèn) nan yon poligòn ak distans li yo epi si li pa twòp mande, li pral ekspòte yo nan Excel.

  31. Ki jan ou ekri yon woutin .lsp ki ègzekutra lè yon desen dwog chaje ak lè li anrejistre?
    mèsi

  32. Mwen bezwen èd pou wè si yon moun ki konnen lisp ka sove mwen.

    Mwen vle ekspòte soti nan sivil 3d tout seksyon kwa ki te pwodwi nan dosye tèks, mwen jis bezwen montre kantite mil la, distans nan aks la, ak dimansyon ki koresponn lan.
    Yon bagay tankou sa

    Km, Dist nan aks la, Cota

    Se sèlman sa. Èske yon moun ka ede m? Mwen pa konnen anyen sou pwogramasyon, Se konsa, mwen mande pou èd.

  33. Ann wè si mwen konprann.
    Ou di ke ak lisp ou ekspòtasyon kowòdone yo nan Excel
    Èske ou mete l 'nan yon distans? Mwen pa konprann ke, mwen ta kwè li se nan AutoCAD Kòm dimansyon oswa fonksyon nan lisp la?

    Men, si ou deja gen kowòdone yo nan Excel, poukisa ou pa fè yon kolòn pwochen ak yon fòmil nan Pythagoras ant pwen an ak pwochen an?
    rasin kare nan ((y2 kowòdone - y2 kowòdone) kare + (x2 kowòdone - x1 kowòdone) kare)

  34. Bon maten HELLO, mwen vle ede m 'ak yon zozote. ESPLIKE, mwen gen yon plan nan pran echantiyon chak pwen ki graj ak zozote Exporta ki gen kowòdone yo nan Excel a, men kounye a ant chak pwen, epi pwen, ou, li mete distans la, koulye a mwen vle pase mezi ki ANT POINT YPUNTO yo briye pou pa DWE tape nan 400PUNTOS distans epi gen okenn fason? TANPRI, fè anpil ME Se konsa, AVANZO TRAVAY AK pi rapid.

    Mèsi nan men

  35. Bonjou, mwen ta renmen konnen si gen nenpòt woutin ki transfòme yon avyon otokad nan yon lòt sistèm referans pou egzanp soti nan wgs84 psad56

  36. http://www.hispacad.com/foro/viewtopic.php?p=165851#165851

    Attached Routines pou desen Des Longitudinal, transverse, enpòte ak ekspòtasyon nan briye, divès kalite sèvis piblik, bibliyotèk blòk.

    Nan folder nan manyèl, gen èd yo pou enstalasyon an.
    Se dosye a pou aktivasyon enkli nan katab la kle.
    Anndan folder nan manyèl yo se dosye yo èd pou kòmandman yo.

    Remak: akòz pwoblèm konpaksyon, manyèl la mete ajou te efase ak imaj plizyè yo te efase nan manyèl la èd atache.
    Ka manyèl la mete ajou dwe mande pa lapòs nan
    vhcad@hotmail.com
    si aplikasyon yo yo itil, oswa analize operasyon an nan kòmandman yo sou pwòp yo.

Kite yon kòmantè

Adrès imèl ou pa pral dwe pibliye. Jaden obligatwa yo make ak *

Retounen nan bouton tèt