|
Lisp : Attributsextraktion vs Datenextraktion
steinwurm am 10.04.2007 um 12:42 Uhr (0)
Hallo zusammen!Wir sind jetzt auf AutoCAD 2008 umgestiegen.Allerdings haben wir jetzt ein richtiges Problem. Wir haben für unsere CNC-Steuerung ein Programm erstellt, wofür die Daten mit der Funktion Attributsextraktion von 2007 ausgelesen wurden.Beim 2008er gibt es diese Funktion allerdings nicht mehr. Dafür ist jetzt die Funktion Datenextraktion vorhanden. Diese läuft allerdings anders ab.Ich muss bei der Funktion "-dataextraction" immer eine Vorlage angeben. Wir arbeiten allerdings ohne Vorlage, da wir ...
|
| In das Form Lisp wechseln |
 |
AutoCAD MEP (ABS) : Plankof automatisch ausfüllen
globerDa am 08.11.2013 um 12:28 Uhr (15)
HAllo,bin auch erst frisch in diesem Forum und eigentlich nur aus dem Grund, weil ich die Plankopfausfüllung so leicht wie möglich haben will.Hab mir gedacht, es wäre optimal wenn man anhand der Dateinamen, in dem fall RR0000005H000GR02000 z.B..Die ersten vier Nullen stehen für die Projektnummer, die zwei weiteren für das Unterprojekt, die 5 für die Leistungsphase (Optimal währe 3= Entwurf ..., dass es selber erkennt), dann H für das Gewerk (also S= Sanitär K= Kälte R= Lüftung ...) und dann die 02 z.B für ...
|
| In das Form AutoCAD MEP (ABS) wechseln |
|
Lisp : ScripPro
cadffm am 17.08.2015 um 09:22 Uhr (1)
Ich kann dir nur sagen das (Auto)Lisp grundsätzlich funktioniert, was man auch sehr gut googeln kann?Die CoreConsole stellt natürlich etwas weniger AutoCAD-Befehle und Funktionen bereit, allerdings ist uns ja nicht beaknnt was du da nutzt und was nicht.Bei der Aufgabenbeschreibung würden ja auch AutoCAD-Befehl _.-XREF und _.-PURGE ausreichen, die sollten in der Console laufen.Ich rate einfach mal ins blaue: In deiner Lsp/vlx sind nicht alle notwendigen Definitionen vorhanden.Es crashed und beim Befehl DXFO ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Durchgezogene statt gestrichelte Linie im XREF (Linientypfaktor)
IfeCAD am 29.05.2019 um 14:27 Uhr (15)
Vielen lieben Dank für die vielen Antworten.Anscheinend ist das Problem doch nicht so einfach mit einem Befehl AutoCAD-intern zu lösen.Ich habe nun auch unsere Zeichnung auf 1 gesetzt, wie im XREF vorgegeben und mich daran orientiert. In Zukunft wäre es wohl die einfachste Lösung bei neu erstellten Zeichnungen vorher in die externe Referenz reinzuschauen und deren genutzten LTSCALE Faktor zu übernehmen und dementsprechend die die Linienskalierung anzupassen.Vielen Dank auch für die LISP-Datei.Bei mir Funkt ...
|
| In das Form Rund um AutoCAD wechseln |
|
CoCreate Programmierung : Problem mit mutual-exclusion
der_Wolfgang am 27.10.2008 um 22:00 Uhr (0)
... das man auf die X1/2, Y1/2 buttons druecken muss, um den Fehler zu sehen, hatte Patrick aber auch geschrieben. Das war die wichtigste, aber kleine feine Info, die ich auch erst mal überlesen hatte.Anbei eine überarbeitete Version.Patrick, aufgrund der Mutual exclusions drängt sich die Verwendung einer CONDition auf, bzw. derer zwei. Die von dir in dem Bereich genutzen IFs.. waren klassische WHENs, weils keinen else Zweig gab. Aber die 6 WHENs waren jeweils ein COND. Der 2. 6fach-if-Block ist zu einer s ...
|
| In das Form CoCreate Programmierung wechseln |
|
Rund um AutoCAD : Koordinaten BKS UCS schieben mit Option
3jalex am 25.02.2011 um 16:06 Uhr (0)
Vielen DankDas BKS ist nun genau da wo ich es haben möchte. Punkt 2) ist somit gelöst.Nun zu Punkt 1)Wenn ich das Lisp mit Anführungszeichen in das Makro schreibe kommt folgende Fehlermeldung:Einfügepunkt angeben oder [Basispunkt/Faktor/X/Y/Z/Drehen]: "(if (setq p (getpoint "[0,0,0)]:")) p (0 0 0))"*Abbruch*Auch ohne Anführungszeichen geht es leider nicht. Es wird der Einfügepunkt verlangt.Hier der neueste Stand ^C^C_Filedia;0;Ortho;_on;Osmode;4;-layer;_new;"A";se;"A";_Color;T;0,127,255;"A";plot;P;^C^C_-in ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Routine Lisp für TL
Angelika Hädrich am 29.04.2004 um 07:52 Uhr (0)
Hi Michelangelo, Chefs sind grausam, sonst wären sie keine Chefs. Klar müssen die zuerst alles durchsetzten damit die Firma läuft, aber was zuviekll ist, ist zu viel. Wie schon ein Vorredner sagt, es gibt Gesetze! Kommt drauf an wie groß Eure Firma ist - aber wenn es Teamleiter gibt sicher mehr als 6 Leute, was ist mit Gewerkschaft? Mach Dich doch einfach mal in Sachen Arbeitsrecht schlau - da kann Dich auch erstmal ein Anwalt beraten oder such mal im Internet nach Deutsche Anwaltshotline, dort kann man si ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Schleifen kontrollieren
Dorfy am 01.02.2012 um 14:48 Uhr (0)
X liefert dir die "subliste" dein Elementx1 = ("TB" "BRUNN" "LAYER1")x2 = ("SS" "SCHACHT" "LAYER2")x3 = ("BL" "MAST" "LAYER3")(mapcar ; führe aus cdr ; liefert die Subliste ab zweitem Listenelement zbsp ("MAST" "LAYER3")(vl-remove-if-not ; ??? -- schmeißt alles raus, was die Bedingung nicht erfüllt (lambda (x) (= (car x) "BL")) ; entspricht das einer if-schleife so ähnlich - ja cplist)); in Verbindung mit mapcar eine Liste(setq re ()) ;leere liste(mapcar (lambda (x) (and (= "BL" (car x))(setq re (cons x re ...
|
| In das Form Lisp wechseln |
|
Lisp : XDATA-Wert in Attribut übernehmen
joern bosse am 13.05.2009 um 07:28 Uhr (0)
Hallo Attilio,na das wär doch ein Grund Dich mit LISP ein wenig mehr zu beschäftigen. Also, hier der Code auf die Schnelle:Code:(defun c:XD2Att (/ A ATT_LISTE LISTE OBJ) (if(and(setq obj (car (entsel))) (setq att_liste (mapcar (lambda(A) (list(cdr(assoc 2 A))A))(XD2Att:att_liste obj)))) (progn (entmod (subst (cons 1 (nth (+ (- (length (setq liste (mapcar cdr (cdr (cadr (assoc -3 (entget obj ("pit-cup")) ...
|
| In das Form Lisp wechseln |
|
OneSpace Modeling : Oberflaeche anpassen / neuer Befehl
Ludger am 07.12.2001 um 13:43 Uhr (0)
Hallo, ich habe leider keine Zeit dir die Lösung zu erstellen, ich habe dier hier aber mal was kopiert: ;Material Messing add_toolbox_button "Toolbox" :label "Messing" :action (material_Messing) complete (defun material_Messing () ** (set_pers_context :none) (set_text_wid_value_f "prompt" "Teil angeben.") (current_part :interactive) (put-buffer "complete") (set_part_inst_color arts :current :color :clr) ; Teileeigenschaften Farbe loeschen (set_part ...
|
| In das Form OneSpace Modeling wechseln |
Beispiel.dwg.txt |
Lisp : Transparente Punkte in while Schleife
MARTINLE am 19.11.2013 um 12:57 Uhr (1)
Hallo Theodor.Danke für deine Hilfe. Das sichern der Einstellungen ist sehr gut.Habe eine Beispielzeichnung angehängt. Mein Ziel wäre mit diesem Lisp so zu bemaßen wie in der Zeichnung gezeigt.1 Punkt normal mit Endpunkt etc. wählen. Bei der Abfrage von Punkt 2 möchte ich Strg+RM Kontextmenü Lot auswählen und dann die Polylinie wie im Beispiel gezeigt wählen. Dann wäre schön wenn mir der Punkt P2 gefangen würde. Und zwar genau auf der senkrechten Linie die ich gerade bemaßen will. Danach möchte ich mit der ...
|
| In das Form Lisp wechseln |
|
PTC Creo Elements/Programmierung : Behälter abfragen ob er schon existiert.
Seele am 21.03.2019 um 18:54 Uhr (1)
Halloich erzeuge im Lisp mittels diesem Befehl einen Behälter an einem Teil.(create_container :owner (sd-inq-parent-obj Flaeche) :name "Messpunkte")Damit es bei der Wiederholung des Befehls keine Fehlermeldung gibt, möchte ich vorher abfragen, ob dieser schon existiert.Den abzufragenden Namen habe ich bereits hiermit erstellt:(format nil "~a/Messpunkte" (sd-inq-obj-pathname (sd-inq-parent-obj Flaeche)))Auf der Suche im Integration Kit, konnte ich leider den Befehl nicht finden, mit dem ich abfragen kann, ...
|
| In das Form PTC Creo Elements/Programmierung wechseln |
|
CoCreate Modeling : 3d aufklappen
Knuddel25 am 17.04.2009 um 10:20 Uhr (0)
Guten Morgen Matthias, hab grad mal auf der Schnelle versucht, ein geschlossenes Rohr abzuwickeln, aber da hat er mir in Annotation die beiden kurzen Körperkanten nicht gezeichnet. Werde es aber noch weiter testen.Danke für die Faustregel, entspricht genau meiner Vorgehensweise, habe bisher den Schlitz immer beiseitig von der Mittellinie aus mit 0,5 (sind ja insgesamt 1mm) gelocht. Gibt es irgendwo eine gut verständliche Anleitung zum Erstellen eines LISP? Dann würde ich das gerne mal versuchen (vorausges ...
|
| In das Form CoCreate Modeling wechseln |
