|
Lisp : Zahl (en) in einem Textstring herausfinden
Andreas Kraus am 22.03.2010 um 16:23 Uhr (0)
Hallo Sven,ich hab mal was hier reingestellt was dir helfen könnte.LinkDie drei Funktionen könntest du folgendermaßen verwenden:Als Beispieltext nehmen wir mal "abc123def123.4 56ghi"(setq txt "abc123def123.4 56ghi")Mit:(zerlege_text txt (setq filter "*[~0123456789`.]*") 2)bekommst du die Zahlen als Liste.("123" "123.4" "56")Die Positionen bekommst du mit folgender Idee:Mit:(wcmatch_pos txt filter)bekommst du (weil wir ja mit dem Filter NICHT nach Zahlen und-color: #FFFF99'>suchen) die Positionen aller Strings die KEINE Zahl s ...
|
| In das Form Lisp wechseln |
|
Lisp : vl-ide keywords
GrassHopper am 31.05.2009 um 10:11 Uhr (0)
Hallo zusammen,Ich hab Noch ein kleiner Wurm innerhalb der CL:ERROR Funktion drindeswegen kann die Datei nicht geladen werden.Alte Funktion:;|(defun cl:error (msg args / msgn) (cond ((and (vl-symbolp msg) (eq -? msg)) (princ (VL-PRIN1-TO-STRING (cl:Error "Fehlermeldung Formatierung siehe (cl:Format -? nil nil)" [Wert | nil | (wert1 wert2 ...)))) == Hier hab ich das Anführungszeichen an der falschen Stelle (doof oder?) (prin1)) (CL:STRINGP msg) (setq msgn(cl:fo ...
|
| In das Form Lisp wechseln |
|
Lisp : Listenproblem
wronzky am 29.07.2008 um 20:26 Uhr (0)
Hallo Rolf,ich habe gerade gesehen, dass Dir HIER Tom schon vor kurzem mit einem sehr ähnlichen Problem geholfen hat.Du solltest ruhig auch mal verund-color: #FFFF99'>suchen, das Dir anvertraute auch zu verstehen. Die Funktion von Tom (split) teilt eine Liste an der nten Stelle auf die gleiche Art, wie (remove-pos) von Axel, nur dass Axel ein Element dann überspringt. Du hättest Dir also eigenllich auch leicht mit der split-funktion die "ersetzen"-Fuktion bauen können:Schritt 1: die Liste an der nten Stelle Teilen (split)Schr ...
|
| In das Form Lisp wechseln |
|
Lisp : Variable in Lisp aus Excel
Rabbit 007 am 16.03.2006 um 15:32 Uhr (9)
Hallo Zusammen !!!Leider stecke ich in genau der selben Klemme wie DolcettoDie Foren und Links habe ich auch schon alle durchforstetaber die Sachen sind zu einfach zu hoch und man findet nicht den richtigen Ansatz,weil die vlax- Befehle sind auch für mich ein Graus und auch kein durchkommen für mich in dem schönen Tutorial was es gibt.Einzelne Zeilen wären da wohl hilfreicher und lehrreicher als links zu komplexen Programmcodes. Aus einzelne Zeilen könnte man sich dann die zusammenhänge selber herausarbeit ...
|
| In das Form Lisp wechseln |
|
Lisp : Einfügen eines Block - ich stehe im Wald II (Block an Koord)
tappenbeck am 02.12.2013 um 14:17 Uhr (1)
HI !ich brauche nochmal die Taschenlampe nachdem ich schon mehrfach gegen einen Baum gelaufen bin.Es geht darum das ich Blöcke finden will an einer bestimmten Koordinate und dafür habe ich eine Filterliste aufgebaut und wollte mit folgedem Code und-color: #FFFF99'>suchen...Code: (setq filter_liste (list (cons 0 "INSERT") ;;(cons -4 "OR") ;;(cons 8 (avt_replace-char *avt_kanal_haltung_pline_ly* "?" ktype)) ;;(cons 2 *avt_kanal_block*) ;;(cons -4 "OR") );end-list );end-setq ;;hier werden die ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Textfahnen ??
CADchup am 22.03.2006 um 13:18 Uhr (0)
Hi,kenne keins, habe keins und weiß auch nicht, wo es eins gibt. Da dieses Forum grundsätzlich auf Hilfe zur Selbshilfe ausgelegt ist:Wenn es einen Bezug zwischen deinen Punkten und den zugehörigen Texten gibt (Textinhalt entspricht z. Bsp. Z_Koordinate eines Punkts) solltest du Punkte und Texte einsammeln,Textinhalte und Z-Koordinaten vergleichen und bei passender Zuordnung eine Führung zwischen Punkt und Text erzeugen lassen.Wenn der Text später verschoben wird, wandert die Führung autm. mit.Ich gehe al ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : einige lsp´s funzen nicht.
Brischke am 12.05.2004 um 08:48 Uhr (0)
Hallo Ines, es wird nichts nützen, wenn du in allen dir bekannten Foren immer die gleiche Anfrage postest. Lies dir doch die Antworten durch, und bleibe dann bei einem Thread, wenn danach immer noch Probleme auftauchen. Zur Erinnerung, deine Themen: http://ww3.cad.de/foren/ubb/Forum54/HTML/007251.shtml http://ww3.cad.de/foren/ubb/Forum145/HTML/000564.shtml http://www.autocad-magazin.de/forum/read.php?f=3&i=12062&t=12062#reply_12062 http://www.autocad-magazin.de/forum/read.php?f=3&i=12046&t=12046# ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Fehlermeldung beim Start ACAD 2005
CAD-Huebner am 14.12.2006 um 22:47 Uhr (0)
Zitat:Original erstellt von Bauvermesser:Ich bitte um Hinweise woher die Fehlermeldung kommen könnten:1. Beim laden der Acad.lsp obwohl alle Befehle auf aus!Regeneriert Modell.; Fehler: Fehlerhafte Funktion: 72___________________________________________2.Fehlermeldung aus einer lsp:Checking for duplicate objects...1 of 11; Fehler: Fehlerhafter Argumenttyp: numberp: nilIch bitte um kurze Hinweise zur Fehlersuche in ACAD 20051. Was heißt den das bitte : alle Befehle aus? So etwas gibt bei AutoCAD/Autolisp n ...
|
| In das Form Lisp wechseln |
|
Lisp : Blöcke an Linienenden platzieren und an Linie ausrichten
cadffm am 06.12.2016 um 10:08 Uhr (1)
Zitat:Original erstellt von furter:sollen nur die Linien gezeichnet werden, die eine Länge grösser 0, bezw. wo der Startpunkt der Linie dem Endpunkt entspricht.Der Fall wird genau NIE eintreten.Entweder ist die Linie Null oder der Start- und Endpunkt sind identisch.Aber wie auch immer:Du hast zwei Probleme, das eine wurde dir oben bereits näher gebracht IF und PROGNCode: (if (/= pA pE) (progn ; hier alles hinein, was ausgeführt werden soll wenn die Bedingung erfüllt ist (command "_.insert" "A ...
|
| In das Form Lisp wechseln |
|
Lisp : 3d länge
nebuCADnezzar am 06.02.2013 um 11:43 Uhr (0)
Hallo zusammen.Ich bin gerade drann n paar alte LISPs ins neue ACAD 2013 anzupassen. Eins davon macht mir gerade etwas schwierigkeiten (naja meine LISP skills waren schonmal besser...)Code:(defun C:3dlength () (setq LENGTH 0) (setq C nil) (setq PT2 nil) (setq ENAME (car (entsel "
3d Polyline: "))) (setq E (entget ENAME)) (if (= (cdr (assoc 0 E)) "POLYLINE") (progn (if (= (logand (cdr (assoc 70 E)) 1) 1) (setq C 1) ) (setq T C) (setq ENAME (entnext ENAME)) (setq E (entget ENAME)) ...
|
| In das Form Lisp wechseln |
|
Lisp : Schnittpunkt ohne Geometrie
archtools am 01.08.2011 um 11:59 Uhr (0)
Zitat:Original erstellt von Bernd10:Hallo Thomas,danke für Deine Antwort. Das übersteigt meine Mathe-Kenntnisse. Ich verstehe zwar noch, dass es die drei Fälle geben kann, aber dann ist es vorbei mit meinem Verständnis. Eine Umsetzung in eine Lisp-Funktion ist mir deshalb leider nicht möglich.Viele GrüßeBernd[Diese Nachricht wurde von Bernd10 am 01. Aug. 2011 editiert.]1. Zentrum des Kreises berechnen2. Normalvektor vom Zentrum des Kreises auf die Linie ermitteln3. Schnittpunkt der Linie, die der Normalv ...
|
| In das Form Lisp wechseln |
|
Lisp : Layer aus alt mach neu
nebuCADnezzar am 24.03.2023 um 17:05 Uhr (1)
HiIch versuch ja schon erst das internet abzugrasen und tools zu finden bevor ich hier fragen stelle :-) Die Programmierkentnisse nehmen leider auch immer mehr ab, aber hab nicht mal was gefunden was ich zusammenkopiern hätte können...LAYMRG / LAYZUSF hab ich ja auch gefunden, scheint das Mittel der Wahl hab ich auch rumgetestet. Was eigentlich an dem Befehl fehlt ist eben ne *Suchfunktion, ich will nicht auswählen/klicken. Gehe hin und nimm alle Layer wo irgendwo "Stahl_verdeckt" drinnsteht und führ die z ...
|
| In das Form Lisp wechseln |
|
Lisp : Ausnahmebedingung bei GC 102 + 103 ???
joern bosse am 19.03.2010 um 08:30 Uhr (0)
Hallo,ich habe ein Phänomen entdeckt was ich nicht ganz nachvollziehen kann.Folgender Code erzeugt eine Ausnahmebedingung:Code:(defun c:test (/ liste) (setq liste ( (102 . 0) (103 . 0) )) (setq liste (subst (cons 102 1) (assoc 102 liste) liste) liste (subst (cons 103 1) (assoc 103 liste) liste) ))Ergebnis:Befehl:Befehl: test; Fehler: Ausnahmebedingung aufgetreten: 0xC0000005 (Zugriffsverletzung)Befehl:Befehl: testFehler bei Aussage in Datei ..LOSIOLOSTERMWIN.CPP, Zeile 398:tp-GetBuf ...
|
| In das Form Lisp wechseln |
