|
AutoLisp : DCL
Brischke am 18.10.2004 um 20:19 Uhr (0)
Hallo Kenny1, die Datei wird in einem Suchpfad gesucht. Es kann allerdings auch daran liegen, dass du die Parameter im (slide-image ..) so gesetzt hast, dass du das bild aus dem sichtbaren Bereich geschoben hast. Bei Fragen ... 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 |
|
AutoLisp : Eigene Daten in eigenen Reaktor speichern
mapcar am 18.10.2004 um 20:52 Uhr (0)
Mit richtig speichern meine ich: In ein Dictionary (benanntes oder Extension-Dictionary) oder als EEDs (Extended Entity Data), aber nicht als LData. Da solche Entscheidungungen für den Betrieb meistens auf viele Jahre hinaus Konsequenzen haben, solltest du die Entscheidung in Ruhe treffen und sorgfältig überlegen. Mach ein paar Übungen mit Funktionen wie Dictsearch und Dictadd, und dann wirst du schon verstehen, wie das geht. EEDs sind etwas komplizierter, aber auch dazu gibt es Beiträge hier, wie man es ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : DCL
Brischke am 19.10.2004 um 08:43 Uhr (0)
Hallo Kenny, lass mal das (fill-image ..) weg. Wozu erst füllen, wenn dann doch ein Bild rein soll. Da das viele Ursachen haben kann, ist es sinnvoll, wenn du einfach mal die lsp/dcl/sld-Dateien hier reinstellst. Dann kann man gezielter nach der Ursache suchen. 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 |
|
AutoLisp : Text Kopieren und ändern
Dober Heinz am 20.10.2004 um 06:50 Uhr (0)
Guten Morgen Habe eine Frage, kann mir bitte ein Lispprofi das folgende Lisp änder das ich auch mtexte kopieren und gleich ändern kann (defun C:KOTA (/ OBJEKT) (while (setq OBJEKT (ssget _:S ((0 . *TEXT )))) (setq OBJEKT (ssname OBJEKT 0)) (command _.copy OBJEKT (cdr (assoc (if ( 0 (cdr (assoc 72 (entget OBJEKT)))) 11 10 ) ; ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Befehlswiederholung (ODCL)
mapcar am 20.10.2004 um 14:58 Uhr (0)
Ich hab mit ODCL nix am Hut - aber es könnte daran liegen, dass sie als Funktion gestartet werden: (c:myFunc) = keine Wiederholung myFunc = wiederholbar Kann aber auch sein dass nur der Aufruf des Dialogs wiederholbar ist, selbst wenn er modeless ist. Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Sub/Function möglich ??
Frank88 am 21.10.2004 um 08:48 Uhr (0)
Guten Morgen, gibt es eigentlich in Lisp eine Möglichkeit, ähnlich wie in anderen Programmiersprachen, Subs oder Functions anzulegen, auf die von anderen Programmteilen aus zugegriffen wird? Gruß, Frank
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Sub/Function möglich ??
fuchsi am 21.10.2004 um 08:56 Uhr (0)
natürlich geht das z.B.: du musst des öfteren 2 werte addieren (ok. sehr einfachjes Beispiel aber was solls) dann kannst du dir dazu eine eigene funktion schreiben, die das macht z.B.: (defun Addiere ( wert1 wert2 / ) (+ wert1 wert2 )) die funktion heisst nun addiere und hat 2 übergabepaarameter. zurückgegeben wird das ergebniis der letzten klammer (+ wert1 wert2) diese funktion kannst du nun in allen Lisp-Programmen verwenden. z.B.: (setq w1 (getreal bitte wert1 eingeben )) (setq w1 (getreal bitte wert2 ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : verschieben von block/text mitte von zwei punkten
michelangelo am 21.10.2004 um 16:50 Uhr (0)
ETWA SO STELLE ICH MIR DAS VOR NUR HABE ICH NICHT SO VIEL AHNUNG VON LISP DAS ICH WEISS WIE ICH DAS RICHTIG SCHREIBEN MUSS. (defun C:SBM ( / AUSWAHL p1 p2 p3) (setq AUSWAHL (ssget C ) (setq OSC_old (getvar osnapcoord )) (setvar osnapcoord 1) (setq p1 (getpoint
Ersten Punkt wählen )) (setq p2 (getpoint
zweiten Punkt wählen )) (setq p3 (strcat (rtos (+ (car p1) (* (- (car p2) (car p1)) 0.5)) 2 8) , (rtos (+ (cadr p1) (* 0.5 (- (cadr p2) (cadr p1)))) 2 8) ,0.0 )) (setvar osnapcoord (pri ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : verschieben von block/text mitte von zwei punkten
Brischke am 21.10.2004 um 17:47 Uhr (0)
Hallo michelangelo, dafür reicht ein einfacher Lisp-Ausdruck auf einer Schaltfläche Code: (if cal (cal plt(end,end,0.5) )(progn(arxload geomcal )(cal plt(end,end,0.5) ))) Vortiel ist, du kannst es transparent aufrufen, und auch bei jedem Befehl verwenden. Das Ganze ist nur die Verwendung des im AutoCAD enthaltenen Geometrierechners, den man ohnehin transparent in jedem Befehl nutzen kann. Wer sich über die Möglichkeiten informieren möchte, der sollte mal unter dem Stichwort kal in der Acad-Hil ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : verschieben von block/text mitte von zwei punkten
Brischke am 21.10.2004 um 17:51 Uhr (0)
Zitat: Original erstellt von michelangelo: ETWA SO STELLE ICH MIR DAS VOR NUR HABE ICH NICHT SO VIEL AHNUNG VON LISP DAS ICH WEISS WIE ICH DAS RICHTIG SCHREIBEN MUSS. ... Hallo michelangelo, Ich gehe mal davon aus, dass du das nur versehentlich so groß [geschrien] geschrieben hast. Mal abgesehen von der Schreibweise, hier im Forum werden die Fragen (hoffentlich) nur aus den von dir genannten Grund gepostet. Dazu ist das Forum da, und braucht nicht extra betont werden. Grüße Holger ---------------- ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Linientypen laden
GWH am 03.07.2019 um 13:15 Uhr (5)
Hallo Lipsler.Da meine Kenntnisse gleich null sind und ich auch keinen passenden Ansatz gefunden habe meine Frage an Euch:Ich will Linientypen aus unserer Linientypdatei laden (ist nur der erste Teil des Lisp). Habe hierfür was gefunden und es funktioniert auch, aber nur wenn keine dieser Linentypen bereits vorhanden ist. Denn dann kommt eben die Abfrage von AutoCAD, ob diese neu geladen werden soll. Wie muss nun diese Codezeile aussehen, damit die Abfrage mit Ja oder Nein bestätigt wird, und das so lange ...
|
| In das Form Lisp wechseln |
|
AutoLisp : durch ersetzen
tappenbeck am 22.10.2004 um 12:56 Uhr (0)
hi ! ich möchte aus einer dos-pfadangabe eine LISP-konforme schreibweise machen und hierfür aus = zu machen ! hierfür nutze ich eine replace-funktion (siehe unten), die eigentlich funktioniert. vielmehr habe ich das problem mit den -zeichen. wäre klasse, wenn mir jemand von euch weiterhelfen könnte. Gruß Jan :-) hier der code (DEFUN rprof$replstr ;suchen und ersetzen eines Strings (line ;Zeichenkette oldstr ;alter String newstr ;neuer String / iline idx ;Replace Old Str ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : durch ersetzen
mapcar am 22.10.2004 um 13:49 Uhr (0)
Ich glaube, du hast da ein Ansatzproblem. Das hier: (str-replace myString "" "") kann es nicht geben, weil es nur einen Fehler verursacht (nicht geschlossene Zeichenkette). Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form AutoLisp wechseln |
