|
Lisp : Befehlszeilenoption für _.save ??
joern bosse am 26.09.2005 um 10:29 Uhr (0)
Hallo,ich habe in einem LISP folgende Zeile verwendet:(command "_.save" "")In ACADMAP2004 wird der Benutzer aufgefordert, das Überschreiben der Datei mit "_y" zu bestätigen, in ACAD2005 pur wurde die Datei einfach gespeichert. Wird diese (scheinbar optionale) Abfrage über eine Systemvariable gesteuert?------------------viele GrüßeJörn
|
| In das Form Lisp wechseln |
|
AutoLisp : Rückgabe einer Funktion
CADchup am 26.09.2005 um 11:05 Uhr (0)
Hi,hier noch eine ActiveX-Variante:Der Funktion (vlax-3d-point) ist es egal, ob sie mit 2d- oder 3d-Koordinaten gefüttert wird, sie bastelt immer 3d-Punkte.Fehlt die Z-Koordinate oder ist sie nil, wird 0.0 eingesetzt.Code:(defun ax-3d (p) (vlax-safearray-list (vlax-variant-value (vlax-3d-point (car p)(cadr p)(caddr p)) ) ) )Nachteil der AcitveX-Variante: Weil die Funktion den Punkt in einen Variant und wieder zurück konvertiert, wird sie wahrscheinlich ab ein paar tausend Punkten etwas langsamer sein ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Befehlszeilenoption für _.save ??
joern bosse am 26.09.2005 um 12:27 Uhr (0)
@fuchsiwarum, naja, ich wußte einfach nicht, daß es den Befehl gibt. Ich werde es mal damit testen.@holgerich habe eine leere Zeichnung aufgemacht, es wurden in dem Zuge ein paar LISP-Funktionen geladen, aber es wird keine ausgeführt. (getvar "CMDACTIVE")=1Irgendwas ist doch dann bei mir komisch, vielleicht weißt Du ja noch einen Rat.------------------viele GrüßeJörn
|
| In das Form Lisp wechseln |
|
AutoLisp : Linie mit mehreren Haltepunkten
Rabbit 007 am 26.09.2005 um 16:18 Uhr (0)
HalloFolgende Sache ,habe in meinem Lisp meine Linien mit (command "plinie" erstellt dabei einen Start und einen Endpunktangegeben.Nun möchte ich aber das jeweils Punkte zum verändern der linie inabständen gesetzt werden.Habe unten mal rumgesponnen weis nicht obes je so klappen könnte.Wäre schön wenn jemand einen Tip hat Oder muß ich alles mit entmake neu schreiben ???danke euch schon mal !!!!Code:(setq x 10)(setq y 10)(setq pos1 (list x y))(setq x1 110)(setq y1 10)(setq pos2 (list x1 y1))(setq Zählen 0) ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Linie mit mehreren Haltepunkten
Rabbit 007 am 27.09.2005 um 08:28 Uhr (0)
Hallo HolgerDas war nicht ganz das was ich meinte habe mal ein JPG im Anhangund mal die untere rote linie angeklickt.Weil so erstellt mir mein Lisp die Zeichnung .Und die PLinie wird automatisch von Links unten nach rechts dann nach oben und zurück Oben links.Da die elemente in nem 35 Abstand auf der linie liegen möchte ich auch jeweils da einen punkt von der plinie haben so das man die einzelnen Elemente dann verschieben kann und damit dann auch die linie ziehen kann.
|
| In das Form AutoLisp wechseln |
|
AutoLisp : (ssget _cp ...) nicht sichtbarer Objekte
WolfgangGutke am 27.09.2005 um 11:08 Uhr (0)
Hallo Georg,das zoom auf eine GetBoundingbox reicht schon, da du ja mit ssget "_c" bzw "_cp" ja die Objekte "greifst".Andere Möglichkeit gibt es leider (noch) nicht Vielleicht hat aber irgendjemand irgendwann DIE Idee - man muß sich einfach "nur" die Vertexe der Polylinie und die InsertPoint der Blöcke nehmen und eine Schnittmenge bilden ;-))------------------ LISP = Lots of Insane Stupid Parantheses
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Nummern
tunnelbauer am 28.09.2005 um 12:32 Uhr (0)
Hi Zec,herzlich willkommen auf cad.de/augce.de !Zu deiner Frage:Suche mal mit der Forumssuche nach einen Lisp Tool namens Nummer - da hat es dann auch die Erweiterungen mit Kreis gegeben - und ich bilde mir ein, dass der Ansatz mit der Hinweislinie auch andiskutiert wurde.------------------GrüsseThomas
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Nummern
WolfgangGutke am 29.09.2005 um 11:25 Uhr (0)
Aus gibt aus der Autocad 10 (glaub ich) Zeit ein Tool, dass BALLON heißt, das deinem Wunsch entspricht.VGWolfgang------------------ LISP = Lots of Insane Stupid Parantheses
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Text kopieren und ändern
cad-intensiv am 29.09.2005 um 12:13 Uhr (0)
Zitat:Original erstellt von Dober Heinz:Hallo LisplerBin AnfängerHabe einen Text 111/9 will ihn kopieren und die neun um eine erhöhen.Nach abfrage bekomme ich das zurück "111/9" wie muss ich das umwandeln um den Text bearbeiten zu können bzw. die 9 auf 10 umwandeln.Hallo Heinz,das sollte doch in dem gerade von Dir absolvierten LISP Seminar in Wien behandelt worden sein, oder hat Herr Berger das versäumt? Wenn Du mir sagst, wo Du dabei noch Probleme hast, dann kann vielleicht auch ich Dir hier weiter helfe ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Text kopieren und ändern
Dober Heinz am 29.09.2005 um 16:25 Uhr (0)
Hallo AntonDanke auch dirwerde versuchen das ihn mein Lisp einzuarbeiten.------------------ Heinz
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Text kopieren und ändern
cad-intensiv am 29.09.2005 um 16:44 Uhr (0)
Zitat:Original erstellt von Dober Heinz:damit geht es schon besser aber manche sachen sind wir noch nicht so klar wie ich den Text "220/1.1" umwandle und letzte Zahl um eins erhöhe.Naja, es kommt halt prinzipiell drauf an, welche Texte da so auf einen zukommen können, und was die alles enthalten können. Die Frage ist schon mal die, ob in diesem Fall die letzte Zahl die letzte "1" ist, oder ob das die "1.1" ist. Meine oben gezeigte Funktion gibt letzteres zurück. Diese 1.1 auf 2.1 hochzuzählen ist simpel, ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Text kopieren und ändern
cad-intensiv am 29.09.2005 um 21:55 Uhr (0)
Zitat:Original erstellt von Dober Heinz:Hallo Cad-inwenn ich mir meinen Text so einlese ist das überhaupt ein string den ich bearbeiten kann.(setq textw (car (entsel))) (setq abfrage (entget textw)) (setq letzteob (cdr (assoc 1 abfrage))) Du solltest mehr prüfen und solltest die Variablen so benennen, dass sie wenigstens irgend was mit dem Inhalt zu tun haben und nicht völlig falsche Namen haben.Beispiel:Code:(if (and (setq text-entityname (car (entsel "
Textelement wählen: "))) (setq text-entgetlist ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Dateidatum setzen mit DOSLIB?
Peter2 am 01.10.2005 um 13:08 Uhr (0)
Guten Tagich möchte gerne für Dateien ein Dateidatum setzen und habe mir mal schnell DOSLib angeschaut. Da gibt es einiges zum Auslesen von Dateidatum und -zeit und auch was zum Setzen der üblichen Attribute (hidden, read-only usw...)Aber wie kann ich ein für eine Datei im System ein Datum setzen? (Lisp, Vlsip, Doslib, ..???)Schöens WochenendePeter------------------Für jedes Problem gibt es eine einfache Lösung.Die ist aber meistens falsch. ;-)
|
| In das Form AutoLisp wechseln |
