|
AutoLisp : 90 Grad rotieren
Brischke am 24.08.2005 um 23:19 Uhr (0)
Hallo archstudent,Ich denke du brauchst erst einmal einen Fahrplan, und dann kannst du dich mit einzelnen Details beschäftigen. In jedem deiner Beiträge kam bisher immer auch ein neuer Wunsch zur Funktionalität heraus .. wäre das alles von Beginn an bekannt gewesen, hätten die Lösungsvorschläge sicher auch anders ausgesehen.Wenn ich das alles richtig interpretiere, dann wählst du irgendwie irgendwelche Zeichnungselemente aus, mit einem KreuzenFenster - ok. Dieser Vorgang gehört mit in das Lisp, nur dann ka ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Sound in Lisp?
CADmium am 05.11.2004 um 17:47 Uhr (0)
Zitat:Original erstellt von cadking:Ich haben AutoCAD 2002 deutsch mit Expresstools 2000i englisch undbekomme trotz Soundkarte keinen Sound. Ich verstehe auch die Syntax nicht. Habe folgendes eingegeben:(vlr-beep-reaction) (defun Beep (/ f) (if (not (getenv "windir")) (progn (setq f (open "con" "w")) (write-char 7 f) (close f) ) ) )(acet-sys-beep 0)aber das ist wohl vollkommen falsch?jo, völlig..wenn du DOS als Betriebssystem hast kannst du (defun Beep (/ f) (if (not ( ...
|
| In das Form Lisp wechseln |
|
Lisp : Alle Einfügepunkte eines Blockes ermitteln
THE_ONE am 19.03.2007 um 12:28 Uhr (0)
Hallo! Frage kann mir vielleicht einer von euch sagen wie man alle Einfügepunkte eines Blockes bekommt- am besten in einer Liste!Hab hier im Forum ein Auto-Nummerierungstool gefunden, das ich mir auf meine Problemstellung angepasst habe! Nur muss ich dazu jeden Einfügepunkt selber angeben. Und eigentlich will ich ja nur das jeder Block eine eindeutige Nummer bekommt die neben dem Block steht (in einem fixen Abstand), dazu bräuchte ich aber die Einfügepunkte des Blockes.hier mal was ich bis jetzt habe:Code: ...
|
| In das Form Lisp wechseln |
|
Lisp : AutoLISP Schulung ja/nein?
Brischke am 22.07.2016 um 09:50 Uhr (1)
Hallo,ich hatte mit meiner Antwort noch ein wenig gewartet, da noch eine ausführliche Antwort hinsichtlich der Visionen kommen sollte.Egal. Das was bisher als Vision genannt ist, geht sicher mit Lisp.Zitat:Ich stelle mir das sehr kompliziert vor. Deshalb die Schulung um gewisse Basics zu lernen. Ich finde es irgendwie immer leichter wenn einem, der das Programm beherrscht, dieses erklärt.Dazu eine Anmerkung: Das Erlernen des Programmierens ist aus meiner Sicht nicht davon abhängig, welche Programmiersprach ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Zahl Hochzählen
Brischke am 17.02.2003 um 13:44 Uhr (0)
Hallo Heinz, Anmerkungen sind im Text ... Zitat: Original erstellt von Dober Heinz: Hallo Lispler Kann mir das Programm jemand so ändern das ich textstil und höhe selber vorher festlegen kann, ohne das ich den stil Standard änder muss, und Layer auf den Aktuellen. danke heinz (defun c:number (/ nr ipt ant th tlay prefix ) (setq prefix (getstring "
Textprefix: ") nr (if (setq ant(getint "
Startnummer 0 ")) (1- ant) 0 ) ) ;;neu (setq th (getreal "
Texthöhe:") tlay (getstring "
Ziellayer:") ;; (while ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Automatic Dimension AutoCAD LISP??
kadirozen am 02.08.2023 um 14:29 Uhr (1)
Ihr letzter Vorschlag wäre großartig, wenn ich ihn umsetzen könnte.Sie haben Recht mit der Catergorisierung. Anstatt +700 Elemente zu haben, könnten wir die Suche auf die Ebenen mit SEQ, NO_SEQ, CNC, CUT; usw. am Anfang beschränken. Das würde die Anzahl der Codezeilen erheblich reduzieren, und ich müsste in Zukunft keine einzige Codezeile mehr aktualisieren, weil unser Ebenennamensystem gleich bleibt (SEQ am Anfang zum Beispiel).Wenn wir eine neue Methode haben, kann ich einfach die Präfix-Liste aktualisie ...
|
| In das Form Lisp wechseln |
rotate3d.dwg.txt |
Lisp : 3drotate in Lisp
tappenbeck am 19.10.2012 um 10:46 Uhr (0)
Moin !ich muss den Fall nochmal aufnehmen da ich irgendwie nicht das Ergebnis bekomme wie ich es erwarte. Zunächst habe ich den Anfangs- und Endpunkt der Polylinie ermittelt im BKS Welt mit Draufsicht.Dann will ich die Polylinie um die Anfangs-End-Achse drehen.Nun habe ich das auf zwei wege versucht - komme aber an der Befehlszeile nicht zum Ergebnis.Die rote Linie ist die Ausgangslinie. Wenn ich das ganze manuell mit anklicken der Endpunkte (blau) und der Option 2Punkte mache, dann dreht sich das wie grün ...
|
| In das Form Lisp wechseln |
rotate3d.dwg.txt |
Lisp : 3drotate in Lisp
tappenbeck am 19.10.2012 um 10:46 Uhr (0)
Moin !ich muss den Fall nochmal aufnehmen da ich irgendwie nicht das Ergebnis bekomme wie ich es erwarte. Zunächst habe ich den Anfangs- und Endpunkt der Polylinie ermittelt im BKS Welt mit Draufsicht.Dann will ich die Polylinie um die Anfangs-End-Achse drehen.Nun habe ich das auf zwei wege versucht - komme aber an der Befehlszeile nicht zum Ergebnis.Die rote Linie ist die Ausgangslinie. Wenn ich das ganze manuell mit anklicken der Endpunkte (blau) und der Option 2Punkte mache, dann dreht sich das wie grün ...
|
| In das Form Lisp wechseln |
|
AutoLisp : max. Zeichenanzahl in Variablen / Funktionen
Paulchen am 07.12.2005 um 12:32 Uhr (0)
Vielen Dank an alle! Scheinbar habe ich einen kleineren Diskussionsbedarf geweckt...Entschuldigend muß ich gestehen, daß ich aus der "Nicht-Programmierer-sondern-Ingenieur-der-bißchen-mit-Lisp-rumspielt"-Ecke (so ähnlich laut mapcar ) komme. Ich möchte vermeiden, daß ich bereits am Anfang grobe Fehler mache. Eine gewisse Eleganz will ich mir schon selbst abverlangen, zumal man sich später viel Ärger und Arbeit erspart, vom "Spott" der wirklichen Lispler mal ganz abgesehen!@Holger: Danke für den Link, hätt ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Abfrage konstruktion
reltro am 15.06.2013 um 20:51 Uhr (0)
Hey...lambda ist ein verdammt einfaches Ding Wie alles in Lisp gibt es etwas zurück. Bei lambda ist das eine Funktion...ähnlich wie defun nur eben ohne namen, eine anonyme Funktion...wenn du zB. schreibst und ausführst:Code:(defun sample (a / ) (print a))(setq b (lambda (a / ) (print a)))Und dann in der Acad-Console eintipps:Code:!a;bzw!bKannst du die "Geimsamkeit" ausmachen...Der Aufruf ist grundätzlich ähnlich/gleich:Code:(a "das war defun")(b "das war lambda")Das Beispiel ist nicht sonderlich originell ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Mandelbrot
tom.berger am 27.03.2004 um 16:43 Uhr (0)
Zitat: Original erstellt von mapcar: Komplexe Zahlen als Liste von 2 Elementen speichern, dann ist realpart = car und imagpart = cadr. Die Zeiten, wo es noch ganz einfach ging (setq realpart car imagpart cdr) sind aber in AutoLisp leider vorbei. Hallo Axel, Warum? Das funktioniert noch wie schon immer: (setq realpart car) # SUBR @0222ef8c CAR (realpart (1 2 3)) 1 Sogar mein uraltes objectiveCAD funktioniert noch immer, das ja on the fly parametrische Objekte als LISP-Funktionen definiert. Was ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Drehwinkel von BKS
CAD-Huebner am 04.03.2006 um 12:13 Uhr (0)
Vorgestern abend war es schon so spät - da hats nur für ein Ja gereicht. Hier mal ein LISP-Programm für diesen speziellen Fall.Für Allgemeinfunktionalität muss zuvor noch die Drehung um die Z-Achse bestimmt werden und die Verschiebung des BKS Ursprungs berücksichtigt werden.Code:; Udo Hübner alias CAD-Huebner für CAD.de Beitrag:; http://ww3.cad.de/foren/ubb/Forum145/HTML/001558.shtml ; 3.3.2006;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;(DEFUN C:UCSROTATION ( / ); Xdir Ydir) ; Unterfunktionen (D ...
|
| In das Form AutoLisp wechseln |
|
Lisp : AutoCAD 2009 und UNDOCTL
archtools am 08.05.2008 um 19:58 Uhr (0)
Zitat:Original erstellt von archtools: Das erklärt die Totalabstürze bei VLX-Programmen, die diesen Code nutzen. Das ist ein ernstzunehmender Bug, wenn es sich nicht um eine angekündigte Änderung des Verhaltens von undoctl handelt. Bei älteren AutoCAD Versionen steht undoctl auf 5.Mit dem Aufruf über eine C:TEST Funktion wollte ich prüfen, ob AutoCAD 2009 eventuell neuerdings selbst Undo-Gruppen öffnet, wenn ein Lisp-Befehl aufgerufen wird. Daran liegts also nicht.Hier der Auszug aus der Online-Hilfe von ...
|
| In das Form Lisp wechseln |
