|
Lisp : Punkte einer Polylinie in Datei schreiben
mhol25 am 17.04.2008 um 13:51 Uhr (0)
Hallo Community,erst einmal vielen Dank für das hier von euch geteilte Wissen!Ich stehe vor der Aufgabe, Raumpolygone in eine räumliche Datenbank (MS SQL SERVER 2008) zu überführen. Mittels des Beitrags von Holger vom 23.08.05 (http://ww3.cad.de/foren/ubb/Forum145/HTML/001248.shtml#000005) konnte ich die X- und Y-Koordinaten aller relevanten Raumpolygone einer Zeichnung in eine Textdatei extrahieren (Vielen Dank für die Hilfe! 10 unities sind überwiesen)Zur Überführung in die Datenbank ist jedoch ein spez ...
|
| In das Form Lisp wechseln |
|
Lisp : Fangfunktion bei Länge Null
Theodor Schoenwald am 01.04.2013 um 21:21 Uhr (0)
Hallo Jürgen,es freut mich, dass es Dir darum ging: "was macht der denn", Dein hartnäckiges "Dranbleiben" ist in Ordnung.Zu "was macht er": Teil 1, ich erstelle Software zur CNC-Generierung in ACAD, BricsCad und ZWCAD.Da richte ich mich nach den Wünschen der Anwender und auch deren Umgang mit z.B. ACAD, manche Anwender haben gute Ideen, die ich, wenn möglich, umsetze.Teil 2 meine "Eurofreie Zone":Software mit Lisp erstellen, um Werkstücke mit meiner selbst gebauten CNC-Maschine zu bearbeiten.Welche Werkstü ...
|
| In das Form Lisp wechseln |
 |
Lisp : Variabler Loop für Punktauswahl beim Bildzuschnitt
Archäologie Bubi am 19.08.2021 um 17:02 Uhr (15)
Hallo LISP GemeindeIch arbeite an einem Bildmanager, der auf unsere Bedürfnisse zugeschnitten ist. Eine der Funktionen ist der Bild zuschnitt.An sich hatte ich damit keine Probleme. Da die Funktion aber im restlichen Code eingebaut ist (wird über einen Button in DCL gestartet), will das Programm weiter bevor ich alle Punkte wählen konnte (ist gerade natürlich auch nur eine Pause festgelegt). Die Anzahl der Punkte ist aber für jedes Bild anders und ich würde auch gerne die [Close] und [Undo] Funktionen von ...
|
| In das Form Lisp wechseln |
|
Lisp : Dynamischen Block via Lisp steuern
reltro am 16.06.2013 um 19:35 Uhr (0)
Warum sollte das nicht gehn?Hab jetzt mal nicht deine Funktion hergenommen, da da ein Fehler auftritt... Denke das liegt daran dass hier(*) etwas fehlt, nähmlich die umwandlung in den passenden Typ Code:(defun dySet (DynBlockRef Name NewValue / Property) (if (setq property (dyGet DynBlockref Name)) (progn (vlax-put-property property Value NewValue) ;---- **hier (vlax-release-object Property) ;braucht es das? (unsicher) ) ))Code:(defun BlockRef:SetDynamicPropValue (block prop value / ) (setq prop ...
|
| In das Form Lisp wechseln |
|
Lisp : Nummern automatisch an Text anfügen
THE_ONE am 21.01.2008 um 11:23 Uhr (0)
Hallo!So habe es jetzt endlich fertig!Code:(defun c:addnumber (/ START_NUMBER Object stringeintrag stringelement x) (initget 5) ;lässt kein NULL (also nur ENter drücken) und keine negativen Zahlen zu (if (setq START_NUMBER (getint "Enter a number:")) ;liest einen Integer ein (progn (initget 0) (while (setq Selection (entsel "Wähle Text")) ;solange bis der User Enter drückt ;entsel liefert eine Liste mit zwei Elementen: 1stes Element ist der Name, ;zweites Element ist die Cursorposition an der der Curs ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Datenrückgabe Funktion
Brischke am 17.10.2005 um 11:14 Uhr (0)
Zitat:Original erstellt von Gerd_Ecke:Hallo Mitstreiter,beginne mich ein wenig mit LISP zu beschäftigen.Erstelle eine Routine die Blöcke und Attribute in eine Textdatei schreibt.Mit folgenden Zeilen schreibe ich die XYZ werte in besagte Datei, ohne Probleme :(Princ (rtos (car (cdr (assoc 10 (entget aa)))) 2 3) Datei )(Princ "; " Datei)(Princ (rtos (cadr (cdr (assoc 10 (entget aa)))) 2 3) Datei )(Princ "; " Datei)(Princ (rtos (caddr (cdr (assoc 10 (entget aa)))) 2 3) Datei )Da aber mein Excel als de ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Plotstil zuweisen
wronzky am 29.07.2008 um 21:25 Uhr (0)
Hallo Heiko, Zitat:Original erstellt von Heiko-T:(defun c:_plstimbl ()Da Du ja ernsthaft versuchst Lisp zu lernen (gehe ich zumindest von aus, sonst braucht man das Kochbuch ja nicht;) ), und schon so einen grossartigen Anfang hingelegt hast, füge ich noch ein paar wenige Zeilen hinzu, damit Du auch nicht nur Boa sagst, sondern vielleicht auch verstehst, was da eigentlich abgeht. Vielleicht verstehst Dus ja noch nicht alles, aber mal als Anreiz:Code:(defun c:_plstimbl (/ bl ele) (vl-load-com) (if (= (getva ...
|
| In das Form Lisp wechseln |
|
Lisp : Trennen von Linien
Amadeo52 am 14.06.2005 um 04:18 Uhr (0)
Hallo mal,ich habe diese kleine Lisproutine noch irgendwo bei mir auf dem Rechner gefunden um sich kreuzende Linie in einem Schema zu trennen. Die obere Line ist durchgehend und die untere Linie soll mit einem vorgegeben Abstand getrennt werden. Soweit funktioniert das ganz nett, nur lästig ist das ich jedesmal den Befehl neu aufrufen muss, auch wenn ich 250 mal das gleiche Nacheinander mache und das ich jedesmal den Abstand eingeben muss. Das wäre angenehmer, wenn ich den Abstand nur am Anfang eingebe und ...
|
| In das Form Lisp wechseln |
|
AutoLisp : MFIt Zusatzprogramm für AutoCAD
tom.berger am 21.07.2004 um 19:40 Uhr (0)
Zitat: Original erstellt von wolfa: Ich besitze seitJahren für AutoCAD ein kleines Zusatzprogramm zum Erstellen von 3D Netzen über Polylinien. Leider funktioniert dieses Program nur mit der Englischen Version von AutoCAD. Das Progam heißt MFIT. Ich habe versucht es in Deutsch zu übersetzen. Leider gelingt mir das nur zum Teil. Gibt es jemanden der das Program in der Deutschen Version zum Laufen bringen kann? Ich bin für jede hilfe sher dankbar, da ich dieses Progam dringend für meine Arbeiten benötige ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Probleme mit Lambda ?
mapcar am 31.03.2003 um 09:12 Uhr (0)
Hi Andi, zwei Kleinigkeiten noch, um Holgers Ausführungen zu ergänzen. Ich kenne mich zwar mit dem Lisp-Editor kaum aus, da ich ihn nicht benutze, aber ich weiss, dass es hier angebracht ist, das QUOTE durch FUNCTION zu ersetzen, also: (mapcar(function(lambda... Und dann noch ein Tipp, der mit der Sache an sich nichts zu tun hat: Wenn man mit mapcar eine Liste bearbeitet, sollte man einen deskriptiven Namen für das Argument auswählen, z.B. so: (mapcar (function (lambda(vertex / ) ... ) ) ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Layer aufruf aus DCL
Brischke am 29.07.2003 um 17:08 Uhr (0)
Hallo Waldemar, so wie es Helmut beschrieben hat, sollte es gehen. Ich halte eine derartige Vorgehensweise jedoch nicht für so gut. Ich trenne in den Funktionen generell die Benutzereingaben von der eigentlichen Arbeitsfunktion . Somit hat man sehr leicht die Möglichkeit aus einem Tool mit Dialogfenster eines zu basteln, welches nur in der Befehlszeile arbeitet. Außerdem ist es in vielen Fällen so, dass die Dialogfenster vom Aufbau her gleich sind, nur eben die Bezeichner der Felder, oder die Listen mit a ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Common Lisp - Funktionen überladen
toxot am 22.09.2009 um 23:32 Uhr (0)
... noch was: Du solltest (und hast es hier auch ... mir fällt kein besseres Wort ein - gottseidank - öffentlich gemacht) schon wissen, das A in dieser Sache gar nichts machen wird. Es wäre wider Ihren Absichten.Sie klauen Uns (den Programmierern) Alles. Rüchsichtslos und Kostenlos!Polieren Ihre Appi damit auf und verkaufen es als DIE Neue Release.Doch alles im Internet verfügbar. Oder?Zurücklehnen und nehmen(Ich sag mal so dazu)Denk doch mal nach.Bei jeder neuen kannst Du zuschauen, was Sie schon wieder D ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Algorithmensammlung gesucht
CADmium am 29.11.2005 um 10:26 Uhr (0)
Zitat:Original erstellt von s.wickel:Hallo Forum!Weiss vielleicht jemand von euch eine Internetseite oder ein Buch mit Algorithmen für die Programmierung?.. ein bißchen sehr allgemein .. der Grundalgorithmus eines Programms(Moduls) wäre "Datenbereitstellung" - "Aufgabenlösung" - "Datenausgabe" solche Module lassen sich dann zu übergeordneten Modulen und ganzen Programmen erweitern. Zitat:Original erstellt von s.wickel: Z. B. wenn ich die Schnittpunkte zwischen zwei Kreisen suche (nur ein Beispiel) könnte ...
|
| In das Form AutoLisp wechseln |