|
AutoLisp : Querschnitte an bestimmter Stelle
Dieter Jannediddi am 05.02.2003 um 15:09 Uhr (0)
Ein ähnliches Problem haben wir ´mal vor einigen Monaten bearbeitet und auch zufriedenstellend lösen können. Es ist möglich, daß die Punktübergabe beim _SECTION Befehl nicht gut klappt. Rund um 3D und den ACIS Kern gibt es an einigen Stellen solche "Merkwürdigkeiten". Wir haben uns damals strikt an das Objektmodell gehalten und die Active-X Kommandos zur Lösung verwendet. Und das hat jedenfalls gut funktioniert - ist natürlich leider (mindestens am Anfang) deutlich schwieriger umzusetzen. Im Prinzip muss d ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Suche nach: Funktionen zur Listenbearbeitung...
mapcar am 15.08.2005 um 11:51 Uhr (0)
Zitat:Original erstellt von Dabrunz:das Konzept der ausgeglichenen Bäume weggelassenSo meinte ich das gar nicht. Mir fehlte nur der Hinweis, dass der Ansatz eine gewisse Verteilung der Daten veraussetzt, um effektiv zu sein. Und das habe ich ein wenig ausgeführt, damit Leute wie Marc, der Verstehensprobleme äussert, nicht ggf. mit einem Nebensatz abgefertigt werden.Aber nochmal ein Stück weiter zurück: Wie könnte man eine Vrgleichsfunktion implementieren (für das Sortieren bzw. Einordnen in einen Baum), d ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : acad_strlsort
Bernd10 am 28.04.2004 um 15:02 Uhr (0)
Hallo, ich kann das Sortierproblem inzwischen beheben, indem ich in den Eigenschaften meiner VLX-Anwendung (Visual Lisp - Datei - Anwendung - Eigenschaften einer Anwendung) auf der Registerkarte Anwendungsoptionen den Haken der Eigenschaft Separater Namensbereich entferne. Alle anderen Eigenschaften und Einstellungen bleiben unverändert. Meine grobe Umgebung sieht so aus: - mehrere Zeichnungen können gleichzeitig geöffnet sein (Multiple Document Interface) - VLX-Anwendung einmal für alle Dokumente l ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Umwandlung von (getvar DWGNAME)
spider_dd am 05.10.2006 um 10:01 Uhr (0)
Hallo Angeltoni,teste doch mal Deine einzelnen Codezeile (auch abschnittsweise) im Lisp-Editor / VL-Konsole. Da siehst Du was die einzelnen substr Anweisungen liefern. Das erhaltenbleiben der mittleren Zeichen: Kann es sein, dass Dein aktueller Dateiname das zweite "-" Zeichen nicht hat? Das wird nämlich gesucht.Wenn Deinen Dateinamenstruktur immer so "starr" ist wie angegeben brauchst Du auch nur die gewünschten Abschnitte rausgreifen.Code:(setq dwgname (vl-string-right-trim ".dwg" dwgname))(setq TX (strc ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Linien und Kreise
danielboukreev am 06.01.2006 um 21:14 Uhr (0)
HalloGenerell:zunächst würde ich (wie ja schon in deinem letzten Thread beantwortet) die verwendeten Variablen lokalisieren, siehe hierzu auch die Lisp-Hilfe unter "defun" (local variables). Zu Aufg. 1: Zu deiner Frage mit dem Abbruch der Funktion: schau mal unter www.cadwiesel.de - dort dann Bauklötze und dann Error.Bezgl. (/ PI 2) und (* Pi 1.5): Nachdem, was ich in Mathematik bezgl. Einheitskreis gehört hab, dürfte das relativ egal sein, ob ich jetzt im Uhrzeigersinn um 1/4 Pi herumgehe oder entgegen de ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Linie in Punkt umwandeln
globerDa95 am 27.03.2017 um 14:09 Uhr (1)
Hallo,wie könnten diese 10 Zeilen aussehen? Ich habe nämlich folgendes Problem:Ich habe Positionen angegeben bekommen, diese bestehen aus zwei Linien (kreuz). Ich bräuchte im Prinzip ein Skript, dass in die Mitte der beiden Linien ein Punkt setzt. Wobei es toll wäre, wenn es bei beliebigen objekten (Kreise, Blöcke etc.) immer die Mitte nimmt und man diese Objekte mit "ähnliche Objekte" auswählen könnte.Ich hab zwar kleine Sachen mit Lisp gemacht, jedoch wäre das eine Nummer zu hoch für mich... Tipps oder ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Zweites Element
cad-intensiv am 21.07.2005 um 15:10 Uhr (0)
Zitat: Original erstellt von Rabbit 007: Hallo Kamm mir jemand sagen wie ich am besten aus einer Zeichenkette z.B. ( 3 2 5 7 9 1 usw.) das 1 3 5 7 9 Element in eine neue Zeichenkette bekomme, also so ( 3 5 9 usw.) so habe ich es schon probiert und habe einen fehler in der Rückgabe erhalten. Vielleicht gibts ja etwas anderes? (setq zahl 0) (setq pos 0) (while (/= Zahl Elemente) (Setq Liste (append Liste(list (nth pos as)))) (setq Zahl (1+ Zahl)) (setq pos (+ 2 pos)) ) APPEND i ...
|
| In das Form AutoLisp wechseln |
|
Lisp : DCL / Text und width
Bernd10 am 10.10.2006 um 13:52 Uhr (0)
Hallo CADchup, Zitat:Original erstellt von CADchup:schreib dir eine Funktion, die dir zur Laufzeit der aufrufenden Lisp die DCL-Datei im temporären Verzeichnis erzeugt, bevor du sie aufrufst. Anschließend lässt du sie wieder löschen.Ein unvollständiges Beispiel (irgendwo rauskopiert):Code:(defun Fragwas (/ dclfile dcl-id result) (MakeDCL (setq dclfile (strcat (getvar "TEMPPREFIX") "Fragen.dcl")) ) (setq dcl_id (load_dialog dclfile)) (if (not (new_dialog "Fragen" dcl_id)) (exit) ) (action_tile ...
|
| In das Form Lisp wechseln |
|
AutoLisp : bildeigenschaften via lisp abfragen
fuchsi am 21.10.2003 um 10:53 Uhr (0)
sorry noch ne kleine ergänzung, der U-vektor ist nur der vektor eines einzigen pixels ! und nicht der bildbreite im GC13 hast du eine liste aus (xPixel und YPixel) dir berrechnung ´des rechten oberen punktes läuft dann so (setq en1 (car (entsel))) elementname image (setq ed1 (entget en1)) elemtdaten image (setq LiUn (cdr (assoc 10 ed1))) einfügepunkt (setq u (cdr (assoc 11 ed1))) u-vektor (setq u1 (polar LiUn 0 (car u))) (setq u1 (polar u1 (/ pi 2.) (cadr u))) u-punkt abs ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Explorer-Pfad ändern
Willi W. am 12.04.2013 um 10:18 Uhr (0)
Hallo -ikarus-,das funktioniert, allerdings öffnet sich auf diesem Wege auch für jedes Verzeichnis ein neues Fenster.Bei einem Aufruf zu einem bereits geöffneten Fenster kommt dieses in den Vordergrund, wird also nicht neu geöffnet.Nachteil, den ich hier nicht haben möchte, ist das nach einiger Zeit reichlich Fenster geöffnet sind.Daher suche ich nach einer Lösung, entweder den Pfad in einem offenen Exlorer-Fenster zu ändernoder das/die offenen Explorer-Fenster zu schließen und ein neues zu öffnen.Hallo CA ...
|
| In das Form Lisp wechseln |
|
AutoLisp : punkt oder variable
marc.scherer am 01.10.2002 um 09:48 Uhr (0)
Hi Gregor, hier ein Beispiel: Code: (defun test (/ RETVAL) (initget 9 "optionA optionB") (setq retval (getpoint "
Punkt eingeben oder Option wählen [optionA/optionB]: " ) ;_ end of getpoint ) ;_ end of setq (cond ((= retval "optionA") (setq retval (subfunction-a))) ((= retval "optionB") (setq retval (subfunction-b))) (T) ;_ ansonsten tue nix ) ;_ end of cond retval ) ;_ end of defun (defun subfunction-a () "Ausführung von A" ) ;_ end of defun (defun ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Tastenabfrage
FiRePhoeniX am 23.04.2009 um 13:04 Uhr (0)
Mahlzeit!! Forum Mitglieder.Wollte euch mal wieder ein bisschen belästigen. Geht um nicht wichtiges, aber die fragen interessiert mich sehr.Wollte eigentlich nur wissen, ob es möglich gibt einen Tastenabfrage bei Lisp zu programmieren. Bei VBA gib es so etwas. VBA überprüft nach jeder Eingabe den ASCII wert. Ist eigentlich nur eine Spielerei die ich machen wollte.Wollte eigentlich nur wissen ob man eine Routine schreiben kann die nach den Drücken einer Taste den ASCII Code ausspuckt. Den befehl ASCII kenne ...
|
| In das Form Lisp wechseln |
|
Lisp : Befehl fortsetzen
Dorfy am 01.04.2008 um 06:59 Uhr (0)
Hallo,ich möchte einen Standardbefehl (line oder copy...)ausführen dann eine kleine Lisp starten und danach den Befehl fortsetzen.(defun hs:start (/) (setq AWS(ssget));;egal mach was, berechne oder vergleiche was);endeBsp: kopieren aufrufen - Objekte wählen - (hs:start) aufrufen -hs:start-Objekte wählen - (vllt. noch Punkte übergeben) - kopieren wiederaufnehmen bzw. fortsetzen...Nun wird aber Kopieren mit den hs:start-Objekten und nicht mit den ursprünglich gewählten Objekten fortgesetzt!?sssetfirst aktivi ...
|
| In das Form Lisp wechseln |
