|
AutoLisp : Pfad einer Datei ermitteln
CADmium am 30.08.2005 um 14:10 Uhr (0)
Zitat:Original erstellt von AB-CAD: Wie kann ich den Pfad einer nicht aus der Autocadumgebung geladenen Datei (also kein findfile etc.) ermitteln, ohne nochmals über getfiled eingeben zu lassen??.. mit Lisp : geht nicht! Zitat:PS2: Wetten, Holger hat schon eine Idee? .. wetten nicht?!------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Runden von einer reellen Zahl in Gazzahl
Brischke am 28.06.2004 um 14:51 Uhr (0)
Hallo Manuel, die Funktion fix schneidet einfach die Nachkommastellen ab. Wenn also die berechnete Zahl nicht exakt oder größer 750 ist, dann kommt es zu dieser Erscheinug. Du solltest also auch die Nachkommastellen prüfen. um dann zu entscheiden, ob auf oder abgerundet wird. Nachkommastellen = Zahl - fix(Zahl) Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat!
|
| In das Form AutoLisp wechseln |
|
Lisp : command hatch einbauen
cadplayer am 05.05.2011 um 15:51 Uhr (1)
so hatte ich auch gedacht... nur wird die gewählte Polylinie nicht schraffiertim Textfenster erscheint folgendes Command: (command "_hatch" "ansi31" "2" "0" OBJ "")_hatchEnter a pattern name or [?/Solid/User defined/Gradient] ANSI31: ansi31Specify a scale for the pattern 1.0000: 2Specify an angle for the pattern 0: 0 Select objects to define hatch boundary or direct hatch,Select objects:Command: U (Lisp Expression) GROUP
|
| In das Form Lisp wechseln |
|
Lisp : Offset um die Länge einer bestimmten Polyline
LiebGuck am 05.04.2019 um 09:48 Uhr (4)
Hallo, mein erster Lispkurs ist erst ende dieses Jahres und ....ich brauch dringend eure Hilfe. Könnt ihr mir bitte ein kurzes Lisp schreiben. In ca. so:offset, auf die Linie klicken die versetzt werden soll, auf die Polylinie klicken (welche aus Bögen oder Linien oder beides bestehen kann) welche die Länge gemessen werden soll, voila .... Vielen Dank
|
| In das Form Lisp wechseln |
|
Lisp : Gaudi-Lisp
Rabbit 007 am 19.06.2008 um 12:55 Uhr (1)
Hier das fand ich auch ganz spaßig !http://ww3.cad.de/foren/ubb/Forum145/HTML/001952.shtml#000000Code:(defun SayIt (Phrase$ / Sapi) (setq Sapi (vlax-create-object "Sapi.SpVoice")) (vlax-invoke Sapi "Speak" Phrase$ 0) (vlax-release-object Sapi) (princ));defun SayIt[Diese Nachricht wurde von Rabbit 007 am 19. Jun. 2008 editiert.]
|
| In das Form Lisp wechseln |
|
AutoLisp : Buch für Lisp
cadffm am 22.12.2003 um 18:39 Uhr (0)
Hallo dakneifer, ich kann selber diesem Buch nichts sagen, ein Unternehmer aus Darmstadt sagt mir die Tage allerdings das er damit recht zufrieden war. (Dumm: Ich weiß nicht welche Vorkenntnisse er vor dem Buch hatte, um zu beurteilen wie gut es für einen Anfänger? ist) Dazu aber was allgemeines von mir : Ich selbst war/bin in letzter Zeit auf der Suche nach solcher Lektüre, mein Fazit: alle gleich ! (Im Grunde) Wenn mich zZeit jmd nach einem AutoLisp Buch fragen würde, meine Antwort wäre: Handbuch für ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Dynamische Blöcke mit LISP
joern bosse am 28.06.2007 um 07:30 Uhr (0)
Hallo Andreas,so ähnlich wie Du habe ich auch mal gedacht, daß ich alle Blöcke über entmake erstellen wollte, weil es schneller geht. Ich bin aber letztendlich wieder bei "richtigen" Blöcken zum einfügen gelandet, weil dann auch jeder AutoCAD-Bearbeiter diese Blöcke mit ACAD-Bordmitteln ändern und anpassen kann.Tja, und zu Deinem eigentlichen Problem kann ich Dir aber leider nicht weiterhelfen.------------------viele GrüßeJörn
|
| In das Form Lisp wechseln |
|
AutoLisp : Lisp zum zeichnen einer Perspektive
MOAB am 24.09.2004 um 18:06 Uhr (0)
Danke erst einmal für das Anschaun des Codes. Die Zeilen Zitat: set $Fx = 0 bewirken ja, dass die Punkte deffiniert werden. Die Zeilen Zitat: set $Wi = 0 sollen bewirken, dass nach der Eingabe die Punkte deffiniert werden, da die Punkte variabel sein müssen. Legende: Wi = Winkel Ms = Maßstab Z0 = Augenhöhe Di = Distanz Nochmal Danke MOAB
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Kann programm nicht starten
Ackermann am 15.11.2004 um 13:58 Uhr (0)
Hallo, Ich bin Lisp Neuling. Ich versuche gerade die Übungen aus dem ACAD 2000 Programm zu erlernen. Leider schlägt der Probestart im Texteditor fehl. Der Compiler hat allerdings keine Fehler im Bearbeitungsfenster gefunden, alles O.K.. Habe Niemanden, den ich fragen kann, auch an der Arbeit nicht, "Anderes Zeichenprogramm". Wo könnte der Fehler liegen, bzw gibt es einen älteren Chat, in dem ich nachgucken könnte? Mit freundlichem Gruß ein verzweifelter Ackermann
|
| In das Form AutoLisp wechseln |
|
Lisp : Explorer starten, Pfadname nur teilweise bekannt
Orchard am 18.07.2017 um 14:20 Uhr (1)
Hallo,vielen Dank CADmium, funktioniert perfekt. Verstehen will ich dass mal lieber nicht.Folgendes folgenschweres Problem habe ich noch: Ist in meinem Ordnernamen ein Komma vorhanden,dann öffnet sich der Explorer NICHT im übergebenen Projektordner sondern in c:UsersNameDocuments.....Benenne ich den Ordner um ohne Komma, dann funktioniert mein Lisp. Gibts dafür noch ne Lösung?Danke vorabGruß Stefan
|
| In das Form Lisp wechseln |
|
AutoLisp : Kehrwert in Lisp
benwisch am 18.10.2005 um 16:49 Uhr (0)
Hallo dan_rather, Zitat:Vieleicht gibts ja einen Befehl der mir die reziproke Zahl zurückgibt?Soweit mir bekannt ist: Nein.Schreibe dir doch eine Funktion und lege sie in deiner Bibo ab (ist nix dolles)Formel: Vorschlag:Code:; Funktion gibt den reziproken Wert einer Zahl zurück.; Argument: Integer oder Realzahl(defun :math:rezpro (#num) (cond ((= 0 #num) nil) ((expt #num -1.0)) ))Beispiele Funktionsaufruf:(:math:rezpro 5) = 0.2 ; (:math:rezpro -0.2) = -5.0(:math:rezpro 0) = nil
|
| In das Form AutoLisp wechseln |
|
Lisp : Nummern automatisch an Text anfügen
THE_ONE am 21.01.2008 um 08:43 Uhr (0)
Hallo!Ich habe MTexte/Text auf dem Bildschirm. Kann ich es mit Lisp schaffen das ich einen Befehl kreiere der folgendes bewirkt:1.Beim starten des Befehls fragt er mich nach einer Nummer danach klicke ich nach der Reihe Mtexte/Texte an, bei jedem klick auf einen Mtext/Text wird die Nummer um eins erhöht und dann dem Mtext/Text angefügt.MFG THE_ONE
|
| In das Form Lisp wechseln |
|
Lisp : Attribute abfragen
vision am 06.11.2018 um 12:37 Uhr (1)
Hallo,in dem Lisp möchte ich noch den Wert vom Attribut BEZEICHNUNG2 im Block abfragen.Für ein Beispiel hierzu währe ich sehr dankbar.(if(and(SETQ ent (car(ENTSEL "
Text-Block anklicken: "))) (setq gg (assoc 10 (entget ent))) (=(cdr(assoc 66 (entget ENT)))1) ) (WHILE (AND (SETQ ent (ENTNEXT ent)) (/= (CDR (ASSOC 0 (ENTGET ent))) "SEQEND") ) (IF(AND (=(CDR (ASSOC 0 (ENTGET ent))) "ATTRIB") (=(strcase(CDR (ASSOC 2 (ENTGET ent)))) "BEZEICHNUNG1") ;Attributname 1! ) (progn (SETQ BLATT ...
|
| In das Form Lisp wechseln |
