 |
Rund um AutoCAD : LISP versus DIESEL in LT
CAD-Huebner am 21.01.2016 um 09:58 Uhr (15)
Zitat:Original erstellt von greatmgm:...Benutzereingabe mit Übergabe an Variable ist nicht oder ?...Doch, da geht schon einiges mit DIESELCode:^C^C$M=userr1;dimscale;$(getvar,userr1)http://www.crlf.de/Dokumente/Diesel/Diesel5.html------------------Mit freundlichem GrußUdo Hübnerwww.CAD-Huebner.de
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Rundungsfehler?
CAD-Huebner am 23.03.2016 um 17:33 Uhr (15)
Die Flächen sind rechnerisch nicht genau 1.15 bzw. 5.55 in den (aller)letzten Nachkommastellen gibt es Abweichungen.Die kann man sich mit einem Lisp-Befehl anzeigen lassen (die AutoCAD Anzeige geht ja nur max. 8 Nachkommastellen).Code:Befehl: (rtos (vla-get-area (vlax-ename-vla-object (car (entsel)))) 2 16)Objekt wählen: "1.150000000000033"Objekt wählen: "1.154999999999985"Objekt wählen: "5.549999999999947"Dann macht die festgestellte Rundung bei 2 Nachkommastellen wieder Sinn.Der Fehler ist durch das Rund ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : acadltype.ocx und objectdcl
CAD-Huebner am 15.12.2003 um 23:13 Uhr (0)
acadltype.ocx - Lisp ? AutoCAD Hat das etwas mit AutoCAD und Lisp zu tun? - bisher noch nie gehört.
|
| In das Form AutoLisp wechseln |
|
AutoLisp : binär daten
CAD-Huebner am 31.03.2004 um 12:32 Uhr (0)
Stukturierte Daten aus Pascal kann Lisp nicht erkennen. Lesen kann man in der Datei nur byteweise. (mit READ-CHAR) Die Pascal-Datei hat eine feste Größe pro Datensatz. Sofern die Struktur der Pascal-Binärdaten genau bekannt sind (ist der Pascal-Quellcode vorhanden?) muss für jeden verwendeten Datentyp eine Umwandlung in Lisp programmiert werden. (ich hab leider keine fertigen Funktionen) Die Strings sind unkompliziert, alle Zahlenwerte (Real, Double, Int ... müssen aus den ASCII-Bytedaten zurückkonvertiert ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Höhenkote Lisp Code 3 Fragen
CAD-Huebner am 07.05.2004 um 14:59 Uhr (0)
Das Programm ließe sich sicherlich hinsichtlich error-handling und Benutzung lokaler Variablen verbessern, aber hier die Systemvariablen zu den Fragen. Prinzip ist am Anfang die Einstellung der Systemvariablen merken, und am Ende des Programmes germerkte Werte wiederherstellen. (defun c:HKATTS (/ ) (princ
H koten setzen. Starten mit HKATTS ) ;FEHLERBEHANDLUNGSROUTINE.................................. . . . (setq aosm (getvar osmode )) (setq abli (getvar blipmode )) (setq alup (getvar luprec )) (setq ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Endpunkt eines Bogens mit Lisp bestimmen
CAD-Huebner am 31.05.2004 um 21:33 Uhr (0)
einfach mit (GETVAR LASTPOINT ) Ein Bogen hat ja immer 2 Enden, und die müssen aus den Winkeln berechnet werden siehe GC 50 und 51. Dabei ist aber unklar, welcher Punkt dann gesucht wird, hier ist Lastpoint sicher der einfachste Weg.
|
| In das Form AutoLisp wechseln |
|
Lisp : Lisp - Routinen für Ausschnitt-Anzeige transparent möglich ??
CAD-Huebner am 19.06.2004 um 16:47 Uhr (0)
Und wäre nicht das AutoCAD Übersichtsfenster ein geeigneter Ersatz?Befehl ÜFENSTEREtwas Übung erfordert das Links-Rechts klicken im ÜFENSTER, aber es ist als transparenter Befehl zu nutzen.Udo Hübner
|
| In das Form Lisp wechseln |
|
Lisp : Mechanical Partlist mit Lisp auslesen
CAD-Huebner am 24.06.2004 um 01:10 Uhr (0)
Die Zeichnung wurde mit AutoCAD Mechanical 2004 DX erstellt, ohne ACM 2004 DX hat man nur Proxy Entities.Hier mal ein paar Codeschnipsel, um die partlist auszulesenCode:(DEFUN C:PRINTPARTLIST ( / elname eliste acmbom acmbomrow) (SETQ elname (CAR (ENTSEL "
Teileliste wählen:")) eliste (ENTGET elname) ) (IF (AND elname (= "ACMPARTLIST" (CDR (ASSOC 0 eliste))) ) (PROGN ; ACMBOM = Bill of Material (SETQ acmbom (ENTGET (CDR (ASSOC 330 eliste)))) (FOREACH ele acmbom (IF (= (CAR ele) 350) ...
|
| In das Form Lisp wechseln |
|
AutoLisp : asi_iexecute
CAD-Huebner am 05.07.2004 um 11:25 Uhr (0)
Die Fehlerbeschreibung ist doch etwas dürftig, um das Problem im Einzeln aufzuspüren. Lief die Funktion bisher schon, oder noch nie? Hat sich an der Excel-Tabelle etwas geändert, Umbenennung, Schreibschutz o. ä.? Ich bin mir auch gar nicht sicher, ob ich in Excel über SQL neue Tabellen anlegen kann, hier gab es glaube ich einige Einschränkungen. Gehen nicht auch Tabellen in einer Accesss-Datenbank und später in einfach nach Excel exportieren? Vielleicht bschreibst du die Aufgabenstellung einfach genauer, ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Öffnen von mehreren Dokumenten (SDI = 0)
CAD-Huebner am 27.08.2004 um 13:14 Uhr (0)
Na eine Funktion namens OPEN zu definieren, würd ich mir verkneifen, da es diese Funktion in LISP ja bereits gibt. Vieleicht ist z. B. (DEFUN DWGOPEN (Dateiname) ... besser Mit freundlichem Gruß Udo Hübner
|
| In das Form AutoLisp wechseln |
|
AutoLisp : BD-Bezeichnungsvorlage editieren
CAD-Huebner am 11.09.2004 um 07:30 Uhr (0)
Ich hab ehrlich gesagt nicht ganz genau verstanden, was jetzt nach der Konvertierung geht bzw. nicht geht. Geht es hier um Annotations/Kommentare, oder um die Objektverknüpfung selbst. Schildere das Problem noch etwas ausführlicher, wenn du hier Hilfe erwartest. Der Name der Verknüpfungsvorlage wird als EED an die Objekte gehängt. Diese mit Lisp zu manipulieren ist kein Problem. Wesnn es nur darum geht #(#( Feldnamen )) gegen #(Feldnamen) zu ersetzen, schreib einfach eine DXF Datei und ersetze die gesuchte ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Automatisch einen Mittelpunkt einer Polylinie zeichnen?
CAD-Huebner am 14.09.2004 um 08:38 Uhr (0)
Sin diese Polylinien evt. 2 Gögen, die mit dem Befehl RING erzeugt wurden? Sieht es etwas so aus, wenn man Liste auf eine Polylinie anwendet? Code: LWPOLYLINE Layer: 0 Bereich: Modellbereich Referenz = EF Geschlossen Konstante Breite 0.5000 Fläche 0.1963 Umfang 1.5708 Bei Punkt X= 183.2582 Y= 166.7656 Z= 0.0000 Ausbuchtung 1.0000 Mittelpunkt X= 183.5082 Y= 166.7656 Z= 0.0000 ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Auflösen von Blöcken
CAD-Huebner am 16.09.2004 um 18:42 Uhr (0)
Zitat: Original erstellt von Detlef Wischmann: Hallo Leute, ich verzweifle mal wieder an meinen minimalen Lisp-Kenntnissen. Ich möchte gerne einen bestimmten Block in meiner Zeichnung per Lisp-Programm auflösen. Den Block gibt es mehrfach in der Zeichnung. Ich habe schon mal angefangen: (setq auswahl (ssget X (list (cons 2 tuer )))) (command _explode auswahl ) Bei anderen auswahlen ausser Blöcken klappt es eigentlich. Was habe ich hier vergessen? Viele Grüße Detlef Ich würde noc ...
|
| In das Form AutoLisp wechseln |
