| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | Exklusives EDU-Programm für RTX PRO Blackwell, eine Pressemitteilung
|
|
Autor
|
Thema: entmake text (1325 mal gelesen)
|
fca_mi2 Mitglied Bauingenieur
  
 Beiträge: 508 Registriert: 10.01.2003 ACAD2018
|
erstellt am: 14. Apr. 2011 16:01 <-- editieren / zitieren --> Unities abgeben:         
hi, irgendwie schaffe ich es nicht, einen text in einem gedrhten und verschobenen koordinatensystem richtig zu platzieren. hier der code: (entmake (list '(0 . "TEXT") (cons 1 zeile) (cons 7 textstil) (cons 8 layername) (cons 10 p1) (cons 40 texthoehe) (cons 50 (* winkelgrad (/ 3.1415927 180))) (cons 62 farbnr) '(72 . 1) (cons 73 ausrichtung) (cons 11 ep) )) ------------------ MfG Frank Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
wronzky Ehrenmitglied V.I.P. h.c. CAD-Dienstleistungen für Architekten

 Beiträge: 2154 Registriert: 02.05.2005 CAD: AutoCAD 2.6 bis 2014 ADT 2005 - 2014 Arcibem System: Windows 2000, XP, NO VISTA Internet-Startseite: http://www.archi.de
|
erstellt am: 14. Apr. 2011 16:35 <-- editieren / zitieren --> Unities abgeben:          Nur für fca_mi2
Hallo Frank, woher und wie kommen denn die Koordinaten in P1 zustande? Schau Dir mal den Befehl TRANS an. Grüsse, Henning ------------------ Henning Jesse VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de [Diese Nachricht wurde von wronzky am 14. Apr. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
       

 Beiträge: 22689 Registriert: 03.06.2002 Alles
|
erstellt am: 14. Apr. 2011 20:28 <-- editieren / zitieren --> Unities abgeben:          Nur für fca_mi2
|
fca_mi2 Mitglied Bauingenieur
  
 Beiträge: 508 Registriert: 10.01.2003 ACAD2018
|
erstellt am: 15. Apr. 2011 07:21 <-- editieren / zitieren --> Unities abgeben:         
|
joern bosse Ehrenmitglied Dipl.-Ing. Vermessung und AutoLISPler
    
 Beiträge: 1781 Registriert: 11.10.2004 Window 11 ACAD 2021 CIVIL 2021 BricsCAD ab V14 11th Gen Intel(R) Core(TM) i7-1165G7 @ 2.80GHz 2.80 GHz 32.0GB RAM NVIDIA GeForce MX450<P>
|
erstellt am: 15. Apr. 2011 07:44 <-- editieren / zitieren --> Unities abgeben:          Nur für fca_mi2
Hallo Frank, der Winkel des aktuellen BKS's in der XY-Ebenen läßt wie folgt berechnen: (setq w (angle '(0.0 0.0 0.0)(getvar "UCSXDIR"))) Nachtrag: Die Rückgabe von angle ist grundsätzlich in RAD, d.h. Du brauchst nicht mehr umzurechnen bezüglich der aktuellen Winkeleinheit, einfach in den GC 50 einsetzen. ------------------ viele Grüße Jörn http://www.bosse-engineering.com [Diese Nachricht wurde von joern bosse am 15. Apr. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
chris888 Mitglied Technischer Zeichner
 
 Beiträge: 141 Registriert: 11.11.2010 AutoCAD 2002, 2005, 2008, 09, 10, 11
|
erstellt am: 17. Apr. 2011 22:33 <-- editieren / zitieren --> Unities abgeben:          Nur für fca_mi2
Zitat: Original erstellt von fca_mi2:
(entmake (list '(0 . "TEXT") (cons 1 zeile) (cons 7 textstil) (cons 8 layername) (cons 10 p1) (cons 40 texthoehe) (cons 50 (* winkelgrad (/ 3.1415927 180))) (cons 62 farbnr) '(72 . 1) (cons 73 ausrichtung) (cons 11 ep) ))
Hab hierzu mal ne reine Verständnisfrage: Warum schreibt Frank hier manchmal (cons ....) und manchmal '(....) theoretisch würde es doch auch nur mit der 2 Methode funktionieren. Oder gibt es da einen Unterschied bei der Eingabe??? mfg chris Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |

| |
archtools Mitglied
   
 Beiträge: 1059 Registriert: 09.10.2004 Entwickler für AutoCAD, BricsCAD u.a., alle Systeme
|
erstellt am: 17. Apr. 2011 23:13 <-- editieren / zitieren --> Unities abgeben:          Nur für fca_mi2
Zitat: Original erstellt von chris888: Hab hierzu mal ne reine Verständnisfrage: Warum schreibt Frank hier manchmal (cons ....) und manchmal '(....) theoretisch würde es doch auch nur mit der 2 Methode funktionieren. Oder gibt es da einen Unterschied bei der Eingabe???mfg chris
Du brauchst nur mal zu sehen, was das jeweils ergibt: (setq hoehe 100) (cons 1 hoehe) und alternativ '(1 hoehe) Na, siehst Du den Unterschied? '(1 2 3) ist dasselbe wie und nur eine verkürzte Schreibweise für (quote (1 2 3)). Das Quoten verhindert das, was Lisp normalerweise macht: Ausdrücke zu evaluieren. Du kannst (1 2 3) nicht direkt verwenden, weil Lisp Listen so zu evaluieren versucht, dass das erste Element ein gültiger Funktionsname ist, bzw genauer: selbst zu einer gültigen Funktion evaluiert, die dann auf den Rest der Liste angewendet wird. Bei (1 2 3) kommt demnach die Fehlermeldung, dass 1 kein gültiger Funktionsname ist. Um Listen eingeben zu können, musst Du also verhindern, dass diese evaluiert werden, und das geht mit dem Quoten. Der Haken ist nun, dass so eine quotierte Liste überhaupt nicht evaluiert wird. Darin stehende Symbole wie Variablennamen werden also auch nicht evaluiert, sondern bleiben als Symbol in der Liste stehen. Du willst aber, dass in der Liste (1 hoehe) das Symbol hoehe als Variable zu 100 evaluiert wird, und dass dann die Liste (1 100) weiter verwendet wird. Also darfst Du nicht quoten, sondern musst die Liste aus ihren zukünftigen Eleemnten erst mal konstruieren, und das geht beispielsweise mit (list 1 hoehe). Mit cons erzeugt man aus zwei Elementen ein sogenanntes Dotted Pair, falls das zweite Element keine Liste ist. Ein Dotted Pair ist eine besondere Form einer Liste, genau genommen die elementare Form einer Liste. Eigentlich ist nämlich jede Liste ein Dotted Pair aus dem CAR der Liste und dem CDR der Liste. Aber das führt für jetzt zu weit ... Mehr findest Du bei Mapcar: http://www.autolisp-tutorial.mapcar.net/
[Diese Nachricht wurde von archtools am 17. Apr. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |