| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY bietet das umfangreichste Ökosystem von B2B als auch B2C-Lösungen für IT-Akteure auf dem Markt, eine Pressemitteilung
|
Autor
|
Thema: block erstellen (1722 mal gelesen)
|
fca_mi2 Mitglied Bauingenieur
Beiträge: 508 Registriert: 10.01.2003 ACAD2018
|
erstellt am: 21. Nov. 2003 11:23 <-- editieren / zitieren --> Unities abgeben:
moin, ich versuche mit folgendem programm einen block zu erstellen, klappt aber nicht! (defun c:fb (/) (entmake (list '(0 . "block") '(8 . "0") '(100 . "AcDbBlockReference") '(2 . "test") (cons 10 (list 0 0 0)) ) );entmake (entmake (list '(0 . "LINE") '(8 . "0") (cons 10 (list 1 1 0)) (cons 11 (list 2 2 0)) ) );entmake (entmake (list (cons 0 "endblk") ) );entmake );defun
fehlermeldung : "block-flags fehlen"
------------------
MfG Frank Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi Mitglied Programmierer c#.net Datawarehouse
Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit
|
erstellt am: 21. Nov. 2003 11:27 <-- editieren / zitieren --> Unities abgeben: Nur für fca_mi2
dir fehklt der gc 70 (entmake (list '(0 . "block") '(8 . "0") '(100 . "AcDbBlockReference") '(2 . "test") (cons 10 (list 0 0 0)) '(70 . 0) ) );entmake ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fca_mi2 Mitglied Bauingenieur
Beiträge: 508 Registriert: 10.01.2003 ACAD2018
|
erstellt am: 21. Nov. 2003 11:38 <-- editieren / zitieren --> Unities abgeben:
|
fca_mi2 Mitglied Bauingenieur
Beiträge: 508 Registriert: 10.01.2003 ACAD2018
|
erstellt am: 21. Nov. 2003 12:44 <-- editieren / zitieren --> Unities abgeben:
|
Brischke Moderator CAD on demand GmbH
Beiträge: 4187 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 21. Nov. 2003 13:08 <-- editieren / zitieren --> Unities abgeben: Nur für fca_mi2
Hallo, 2 Beiträge unter diesem, wird ein Tool empfohlen, welches, genau das, was du willst, von einem beliebigen Block in eine externe Datei als LISP-Code schreibt. Teste und schaue dir das Ergebnis an, dann weißt du wie es geht. Bei Fragen ... kann ich wahrscheinlich antworten, da das Tool mal von mir geschrieben wurde. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD NEU: AutoLISP- Projektschulung NEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de Moderatoren AutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural Desktop Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi Mitglied Programmierer c#.net Datawarehouse
Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit
|
erstellt am: 21. Nov. 2003 13:14 <-- editieren / zitieren --> Unities abgeben: Nur für fca_mi2
(setq ss (ssget)) (entmake (list (cons 0 "block") (cons 8 "0") (cons 100 "AcDbBlockReference") (cons 2 "test") (cons 10 (list 0 0 0)) (cons 70 0))) (setq i1 0) (repeat (sslength ss ) ; alle elemente des auswahlsatzes durchlauf. (setq ename (ssname ss i1)); und im block neu erstellen (setq edate (entget ename)) (entmake edate) (setq i1 (1+ i1)) ) (entmake (list (cons 0 "endblk")))
------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fca_mi2 Mitglied Bauingenieur
Beiträge: 508 Registriert: 10.01.2003 ACAD2018
|
erstellt am: 21. Nov. 2003 13:34 <-- editieren / zitieren --> Unities abgeben:
|