|
Lisp : Lisp soll nach Blöcken suchen
Geos am 09.04.2009 um 07:21 Uhr (0)
Die Zeilen von Thomas - erweitert um exitCode:(if(or(tblobjname "BLOCK" "A-RAHMEN") (tblobjname "BLOCK" "B-RAHMEN") ) (progn (alert "Falscher Rahmen") (exit) ;bricht nach der Meldung ab ))am besten vor Code:(setvar "filedia" 1)einfügen------------------Schöne GrüßeErnst www.geopaint.at
|
| In das Form Lisp wechseln |
|
Lisp : Linienverfolgung?
nahe am 09.04.2009 um 12:27 Uhr (0)
Hallo Ernstmal eine blöde Frage warum kommst Du mit PEDIT nicht zurecht?Du brauchst ja nur das erste Element wählen, dann "V" für verbinden und ziehst ein Auswahlfenster über alle Objekte die Du verbinden willstund Pedit sucht sich die Reihenfolge selbst zusammen ohne, dass Du die Objekte einzeln anwählen musst.------------------GrüßeHeinzSorry hab die obigen Postings scheinbar überlesen, damit ist meiner Meinung nach schon alles gesagtP.S. ich hab mal ein LISP geschrieben das, dass Gewünschte bewerkstelli ...
|
| In das Form Lisp wechseln |
|
Lisp : Linienverfolgung?
CAD-Huebner am 09.04.2009 um 09:21 Uhr (0)
Zitat:Original erstellt von cadffm:PEDIT(mehrere Objekte)Ja, ganz der Meinung von cadffm.Befehl: PEDIT Option Mehrere ObjekteFürher machte man das noch mit PLJOIN aus den Expresstools oder versch. anderen Lisp-RoutinenSiehe auch hier: http://ww3.cad.de/foren/ubb/Forum461/HTML/000592.shtml#000001 oder zu PLJOIN und Lisp Routinen: http://ww3.cad.de/foren/ubb/Forum54/HTML/005626.shtml http://ww3.cad.de/foren/ubb/Forum54/HTML/008217.shtml ------------------Mit freundlichem GrußUdo Hübnerwww.CAD-Huebner.de
|
| In das Form Lisp wechseln |
|
Lisp : Block einfügen
gerhard123 am 15.04.2009 um 11:50 Uhr (0)
Halle zusammen,habe da ein ganz witziges Problem beim Einfügen von Blöcken.Ich habe die Geometrie der erstellten WBlöcke (Einfügepunkt) am 0,0,0 Punkt liegen. Habe auch die Variable insbase aus 0,0,0 gesetztWenn ich nun einen Block mehrfach einfüge mit Wert 0, 300, 600, 900 (siehe Lisp) dann wird der Block irgendwie eingefügt aber nicht mit X-Abstand wie zuvor beschrieben.Woran kann das liegen??Programm zu testen(defun c:aa () (setq pfad "W:ALLTypengeneratorBloecke2009 478.dwg") (setq wert (getint "
...
|
| In das Form Lisp wechseln |
|
Lisp : Block einfügen
Hunchback am 15.04.2009 um 12:20 Uhr (0)
Aslo bei mir funktionierts (mit einem meiner Blöcke).Stell vielleicht mal deinen Block hier rein.GrüßeMartin------------------You seem (in my (humble) opinion (which doesnt mean much)) to be (or possibly could be) more of a Lisp programmer (but I could be (and probably am) wrong).
|
| In das Form Lisp wechseln |
|
Lisp : Layer und Farbe umschalten
bu am 15.04.2009 um 10:25 Uhr (0)
Hi Jörn,das Problem ist dass der Befehl _Mtext überlaufen wird. Wenn ich "initdia" nicht benutze wird die Mtext-Maske unterdrückt. Soweit ich das jetzt beurteilen kann wird Layer und Farbe gesetzt, dann die Line erzeugt- soweit ok. Nun wird Mtext gestartet und das Lisp läuft im Hintergrund weiter. Weshalb auch Layer und Farbe wieder zurückgesetzt werden. So, und deshalb greifen auch deine Zeilen nicht. Wenn du das Prog 2x hintereinander aufrufst (die Linie hab ich rausgenommen) wird der Text aus dem ersten ...
|
| In das Form Lisp wechseln |
|
Lisp : Block einfügen
cadffm am 15.04.2009 um 16:07 Uhr (0)
wenn du sagst das es mit dem Dialog gehtm nur im Lisp nicht, dannist sicher nicht osmode "schuld" sondern die andere, von Thomas genannte,Systemvariable ------------------die alte SUCHfunktion.. - System-Angaben - User:FAQ(Adesk)
|
| In das Form Lisp wechseln |
|
Lisp : Addition mit 3 Stellen nach Komma
malsehn am 16.04.2009 um 11:53 Uhr (0)
Servus Beisammen,bin etwas unerfahren wie alle am Anfang und möchte gerne ein kleines Lisp-Programm verwenden. Verändert habe ich dieses:(defun c:ADD ( / Z1 Z2 OBJEKT OBJEKTDATEN ) (if (setq Z1(getreal "
Zahl eingeben: ")) (while (setq OBJEKT (car(entsel "
Text wählen : "))) (setq OBJEKTDATEN(entget OBJEKT ("*"))) (if (member(cdr(assoc 0 OBJEKTDATEN)) ("TEXT" "MTEXT")) (progn (setq Z2 (atof (cdr(assoc 1 OBJEKTDATEN)))) (setq OBJEKTDATEN (subst(cons 1 (rtos (+ Z1 Z2) 2 2)) (a ...
|
| In das Form Lisp wechseln |
|
Lisp : Addition mit 3 Stellen nach Komma
CADmium am 16.04.2009 um 11:55 Uhr (0)
(setq OBJEKTDATEN (subst(cons 1 (rtos (+ Z1 Z2 Z3) 2 3))reicht aus .. Nicht einfach immer nur Copy&Paste , sonder auch mal überlegen und evtl. mal in der Lisp-Hilfe nach den Funktionsparametern suchen!!!------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Lisp wechseln |
|
Lisp : Wie kann ich eine Schleife für eine Abfrage machen ?
aufi am 16.04.2009 um 14:47 Uhr (0)
Hallo an alle,Habe wieder erneut ein Problem habe eine Punktwolke und will einen Block (stoptafel)setzten,(anbei mein Lisp), kann allerdings immer nur 1 Block setzen danach ist schlußmit dem Lisp.Ich will aber wenn ich in punktnummer drinnen bin eine schleife haben.Bitte kann mir wer helfen oder weiss wer eine bessere Lösung??*****************************(defun C:t5 ( / anfpkt npkt auswahl lausw obj pkt orig vlaobj opkt para vlawink winkrad wink) (setvar "CMDECHO" 1) (if (= ALT_WINK nil) (setq ALT_WINK ...
|
| In das Form Lisp wechseln |
|
Lisp : vl-ide keywords
CADmium am 14.11.2008 um 09:53 Uhr (0)
Es werden die per externer dll / arx vorhandenen Funktionen farblich gekennzeichet ... du kannst dir z.B. per .NET ne Funktionsbibliothek erstellen, die per netload laden und schon werden die Funktionen eingefärbt dargestellt. In Lisp gibt es keine User-eigenen Funktionen, nur Listen und Symbole ... ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Lisp wechseln |
|
Lisp : vl-ide keywords
Hunchback am 14.11.2008 um 09:24 Uhr (0)
Wie viele Lispler hab auch ich eine inzwischen umfangreiche Sammlungvon praktischen Funktionen die ich in einer vielzahl von Programmen verwende. Jetzt kann ich in Notpad++ hergehen und meine eigenen Funktionen in eine Liste eintragen sodas sie im Code farblich hervorgehoben werden.Weil ich aber auch sehr oft mit der vl-ide arbeite frage ich mich, ob schon irgendjemand versucht hat, eigene Funktionswörter in die vl-ide einzubinden.Hat jemand von euch schon mal versucht eine der ide-dlls (welche?) mit resha ...
|
| In das Form Lisp wechseln |
|
Lisp : vl-ide keywords
Hunchback am 14.11.2008 um 10:09 Uhr (0)
Verstehe. Nun ja, wir sind eh gerade dabei, ein paar andauernd genutzte Lisps nach C# zu portieren.Thx und GrüßeMartin------------------You seem (in my (humble) opinion (which doesnt mean much)) to be (or possibly could be) more of a Lisp programmer (but I could be (and probably am) wrong).
|
| In das Form Lisp wechseln |
