|
AutoLisp : Dateinahmen über Auswahlfenster
spider_dd am 21.12.2003 um 18:54 Uhr (0)
Hallo Werner, der Lisp Befehl (getfiled ...) öffnet die Standard-Dialogbox zur Dateiauswahl und liefert den Namen der ausgewählten Datei. Dies in einer Schleife sollte zum Ziel führen. Gruss Spider
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Maßtext auslesen, nochmals
spider_dd am 09.02.2005 um 17:25 Uhr (0)
Hallo Werner, EED (oder auch XDaten) sind Extended Entity Data AutoCAD Hilfe sagt dazu (unter Entwicklerdoc, DXF-Referenz, Entities, Dimension): XDaten, die zur Anwendungs-ID ACAD gehören, folgen einem Bemaßungselement, wenn Bemaßungsüberschreibungen auf dieses Element angewendet wurden. Siehe Überschreibungen von Bemaßungsstilen. und dort: Überschreibungen von Bemaßungsstilen können auf Bemaßungs-, Führungs- und Toleranzelemente angewendet werden. Die Überschreibungen werden in den ei ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Excel datei öffnen im höhren Pfad
spider_dd am 12.05.2005 um 15:57 Uhr (0)
Hallo Bernd, (setq akt_pfad (getvar "dwgprefix") liefert Dir den Pfad zur Zeichnung (vl-string-position (ascii "") akt_pfad nil t) liefert die Position des letzen "", damit sollte es möglich sein sich so nach und nach den pfad nach oben zu hangeln und dann dort nach der Exel-Datei zu suchen. Viele Grüße spider
|
| In das Form AutoLisp wechseln |
|
Lisp : ACADIN umprogrammieren HILFE
spider_dd am 11.08.2006 um 09:05 Uhr (0)
dies könnte so gehenCode: in Function "readmc" (repeat (1+ acadin-mc) (setq acadin-zl (read-line datmc)) )und dann die Zeile für MC=0 als erste Zeile der def Datei.Da liest das Prog für 0 die 1. Zeile, für 1 die 2. usw.Ich würde aber wahrscheinlich (wenn dus umschreibst) die gesamte def Datei nur einmal zu Anfang einlesen, die Datenzeile als Liste speichern und dann bei jedem Punkt immer nur die entsprechende Zeile aus der Liste holen, spart das ständige Einlesen der Datei.lgThomas
|
| In das Form Lisp wechseln |
|
Lisp : Übersetzungstabelle
spider_dd am 16.08.2006 um 16:36 Uhr (0)
Hallo Ernst,vielleicht als Idee ...bedeutet aber auch (einmalige?) Änderung Deiner Programme:Alle verwendeten Layernamen, Blocknamen u.ä werden in fester Reihenfolge in Textdatei eingetragen.Die gibt es dann einmal für Deine Bezeichnungen und jeweils einmal entsprechend angepasst für die entsprechenden AGs.Datei wird am Anfang abgefragt und geladen, Namen für Layer u. ä. werden entsprechenden Variablen zugewiesen. Das Schalten der Layer und Einfügen der Blockreferenzen erfolgt dann nicht mehr direkt mit de ...
|
| In das Form Lisp wechseln |
|
Lisp : Textzeile Einlesen
spider_dd am 24.08.2006 um 13:57 Uhr (0)
Hallo Rabbit,hast Du Dir mal im einzelnen angesehen was Du einliest? Und dann sieh Dir Deine Datei mal in einem Hex-Editor an.Bei mir endet die erste gelesene Zeile mit "Modemn", in der Datei kommt danach ein 0x0D (= CR).Die zweite gelesenen Zeile endet mit "uXm", in der Datei kommt danach ein 0x1A (= SUB) was auch immer das ist.Danach werden bei mir keine weiteren Daten gelesen (read-line liefert nil)Springt der Zeiger dort ans Dateiende?Also wie Udo schon sagte, wahrscheinlich besser Zeichenweise lesen u ...
|
| In das Form Lisp wechseln |
|
Lisp : Block kopieren und drehen
spider_dd am 19.12.2006 um 17:19 Uhr (0)
Hallo Partick,ein gutes Tutorial ist das Tutorial von Mapcar.Außerdem bietet die AutoCAD-Entwicklerhilfe auch noch so einiges zum Thema Lisp.Und für Deine Prog-zeile, versuchs mal hiermit.Code: (command "_.copy" (setq OBJECT(car(entsel)))"" )HTHLGThomas
|
| In das Form Lisp wechseln |
|
Lisp : lisp aus lisp
spider_dd am 03.04.2008 um 16:42 Uhr (0)
Zitat:Original erstellt von AutoCADuser:....mehrere LSP-Dateien hintereinander ablaufen zu lassen, ohne dass ich die codes jeder einzelnen LSP-Datei in eine LSP-Datei zusammenkopiere geht wahrscheinlich doch nicht...doch geht, Du musst nur die Datei die dan auszuführenden Code enthält vorher laden,Code:z. B. so: Datei "MeineLisp.lsp" enthält auszuführendes Prog TuDies (mit (defun c:TuDies (...)) definiert:(if C:TuDies ; Pruefung ob Funktion TuDies schon vorhanden (geladen) ist (C:TuDies) ; wenn ja, dann ...
|
| In das Form Lisp wechseln |
|
Lisp : Bogen zeichnen mithilfe der Krümmung
spider_dd am 09.05.2008 um 12:20 Uhr (0)
Hallo Erich, mit command würde es z. B. so gehenCode:(command "_arc" P1 "_end" P2 "_direction" Deine_Startrichtung)Aber: Autocad macht die Bögen immer gegen den Uhrzeigersinn, wenn Deine Startrichtung in Uhrzeigersinn läuft, werden beim gezeichneten Bogen Start- und Endpunkt getauscht (einfach mal ausprobieren).LGThomas
|
| In das Form Lisp wechseln |
|
Lisp : Punktkoordinaten aus Datei auslesen
spider_dd am 28.01.2009 um 08:45 Uhr (0)
Hallo PsychoDad, Zitat:Original erstellt von PsycoDad:Geht auch mit der txt nicht.Muss an was anderm liegen.Wie erzeugst Du Deine Datei? Irgendwie sieht die zwar mit einem Texteditor betrachten auf den ersten Blick ganz OK aus, aber geh mal in die VL-Editor Konsole und führe die folgenden Zeilen aus:Code:(setq file (getfiled "Verzeichnisliste" "" "" 2))(setq file_f (open file "r"))(setq zeile (read-line file_f))Bei mir erscheint dann sowas:"ÿþ0 000 000 000 000 000 000 000 000 000 001 000 00 00 00 00 00 ...
|
| In das Form Lisp wechseln |
|
Lisp : Punktkoordinaten aus Datei auslesen
spider_dd am 28.01.2009 um 09:11 Uhr (0)
Auch noch ein kleiner Nachtrag,wenn, wie Jörg 6 Beiträge weiter oben gesagt hat, das QUOTE weggelassen wird, liefertCode:setq LISTE (read(strcat "(" zeile ")")))bei Jörgs Datei (1. Zeile) gleich (10 9.951 9.093 0.0)das vl-string-left-trim sollte damit nicht gebraucht werden. Mit (car liste) kommst Du dann an die Punktnummer und mit (cdr liste) an die Punktkoordinate. Das KonstruktCode:(list (nth 1 LISTE) (nth 2 LISTE) (nth 3 LISTE)) wird damit auch nicht erforderlich.LGThomas
|
| In das Form Lisp wechseln |
|
Lisp : neue datei anlegen
spider_dd am 01.12.2010 um 08:03 Uhr (0)
Hallo Theo,ohne Angabe eines Pfades wird die neue Datei im Verzeichnis der Zeichnungsdatei abgelegt. Wenn Du eine neue Zeichnung noch nicht abgespeichert hast, ist es halt das von Dir angegebene.GrußThomas
|
| In das Form Lisp wechseln |
|
Lisp : neue datei anlegen
spider_dd am 01.12.2010 um 16:27 Uhr (0)
Zitat:ohne Angabe eines Pfades wird die neue Datei im Verzeichnis der Zeichnungsdatei abgelegt.Habe noch mal ein wenig rumgestestet und muss mich da etwas korrigieren. - Starte ich ACAD durch Doppelklick auf Zeichnungsdatei legt open die Datei im Zeichnungsverzeichnis ab.- Öffne ich nun eine neue Datei legt open die Datei im von Theo genannten Verzeichnis ab, egal in welcher Zeichnung ich open ausführe.- Starte ich Autocad über das Desktop-Icon legt open die Datei unter "Eigene Dateien" ab- die Hilfe sagt ...
|
| In das Form Lisp wechseln |
