|
Lisp : BULLZIP Printer über Lisp konfigurieren
cadffm am 21.07.2015 um 19:19 Uhr (1)
Ok, mir fehlt die Erfahrung damit, aber die Aufgabe gibt es ja öfters (ähnlich).Grundsätzlich kannst du ja einfach 2 Drucker installieren, einmal für tif, einmal für PDF, oder geht das nicht??Kann leider nicht mittesten, Daumendrück.------------------CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD
|
| In das Form Lisp wechseln |
|
Lisp : Parameter mittels Lisp festlegen
kamehama am 10.07.2007 um 10:57 Uhr (0)
Hallo und Danke für deine HilfeIch habe meinen Testblock nun als Anlage beigelegt.Dabei habe ich einen Parameter mit dem Namen "Laenge" erstellt um die Funktion und den Abruf gleich direkt aus dem Vorlagebeispiel übernehmen zu können.Leider funktioniert dabei irgend etwas nicht.Bitte um Hilfe was ich falsch mache, bzw. ob dieser Zugriff unter ACAD 2008 so nicht mehr möglich ist.Besten DankKamehama
|
| In das Form Lisp wechseln |
|
Lisp : Objekte verlängern mit Lisp
wronzky am 23.07.2008 um 21:11 Uhr (0)
Hiohne gross zu rechnen, kannst Du ja auch den Befehl Länge mit der Option Delta benutzen. Das ist für den Anfang auch einfacher zu verstehen. Bin mal so frei, Dir ein schnelles Beispiel zukommen zu lassen:Code:(defun c:vox-lengthen () (setq lg 0.2) (setq ele (car (entsel))) (setq ele_eig (entget ele)) (if (= (cdr (assoc 0 ele_eig)) "LINE") (setq p1 (cdr (assoc 10 ele_eig)) p2 (cdr (assoc 11 ele_eig)) ) ) (if (= (cdr (assoc 0 ele_eig)) "ARC") (setq p1 (polar (cdr (assoc 10 ele_eig)) (cdr (assoc 50 e ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp ACAD 2010
archtools am 26.11.2010 um 13:29 Uhr (0)
Zitat:Original erstellt von CADLUIS:Hallo,kannst du vergessen der Aufwand ist es nicht wert grüsseAloisAch so? Aber der Aufwand der Dir zu Hilfe eilenden Forumsmitglieder wäre Dir die Sache wohl wert gewesen. Klar, das kostet auch nix.Das ist IMO wieder mal ein gutes Beispiel dafür, dass es sich für gewerbliche Programmierer nicht lohnt, kostenlose Appetithäppchen unters Volk zu verteilen in der Hoffnung, dass sich daraus mal lohnende Aufträge entwickeln könnten. Ich hab sowas vor zig Jahren auch mal ein ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp Datei für Dynamische Blöcke
CAD-Huebner am 30.08.2009 um 21:04 Uhr (0)
Zitat:Original erstellt von Christian B.:Hallo,Hab mal eine Frage als Anfänger.......über den Sichtbarkeitsparameter geben will; wie kann ich so etwas in etwa Programmieren?So in etwa:Code:(setq blkProps (vlax-safearray-list (vlax-variant-value (vla-GetDynamicBlockProperties blkObj))))(foreach blkProp blkProps (cond ((and (= (vla-Get-PropertyName blkProp) "Anzeige") ...) ; Sichtbarkeitsname (vla-Put-Value blkProp "Länge 4,0m") ; Sichtbarkeit )...------------------Mit freundlichem GrußUdo Hübnerwww.CAD ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Lisp und Schraffuren
SilkeRS am 12.05.2006 um 13:04 Uhr (0)
Habe momentan ein für mich unlosbares Problem beim automatischen generieren von Schraffuren. Ich habe Punkte (auch mal 1000) die alle innerhalb einer geschlossenen Fläche liegen auf der eine Schraffur generiert werden soll. So nun sind aber die Gitterweiten der einelnen Flächen sehr sehr unterschiedlich. Beim automatischen Erzeugen der Schraffuren steigt das Programm aber irgendwann aus, da er einfach zu viele Objekte am Bildschirm hat (das macht ja die Schraffur im Handbetrieb auch, daß sie fragt, ob man ...
|
| In das Form AutoLisp wechseln |
|
Lisp : _Copy & Koordinaten - LISP
CAD-Huebner am 02.11.2016 um 18:26 Uhr (1)
Es geht auch, ohne einen Basispunkt zu wählen.Außerdem hab ich noch eine zusätzliche Anfrage sowie eine Meldung falls nichts gewählt wird eingebaut.Code:(defun C:DeckLinie (/ gelaende ) (Prompt "Bitte Geländeoberkante(n) wählen:") (if (setq gelaende (SSGET)) ;Geländeoberkante wird ausgewählt (command "_Copy" gelaende "" (list 0.0 -1.1) "") ;Geländeoberkante 1.1m nach unten kopieren ;else (prompt "nichts zu kopieren gewählt.") ) (prin1); nil am Ende unterdrücken) ;end defun------------------Mit freun ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp-DXF-Zugriff auf Layer frieren in aktuellen Ansichtsfenstern
Peter2 am 21.09.2010 um 14:33 Uhr (0)
Tja, wie oben schon gesagt: wie finde ich den obigen DXF-Code? Irgendwo hat er sich doch versteckt ....Peter------------------Für jedes Problem gibt es eine einfache Lösung.Die ist aber meistens falsch. ;-)
|
| In das Form Lisp wechseln |
|
AutoLisp : Layer in vorh. Lisp ändern
AsSchu am 17.09.2003 um 10:34 Uhr (0)
Hi Mapcar, das habe ich eben auch herausbekommen. So klappt das auch bei mir. ;; Blockdefinition fuer temp. Linienbloecke erzeugen: (setq clayer (getvar CLAYER )) ; (entmake ((0 . BLOCK )(2 . BOESCH )(10 0.0 0.0 0.0)(70 . 0))) (entmake (list (0 . LINE ) (10 0.0 0.0 0.0) (if (minusp d) (11 0.0 0.0001 0.0) (11 0.0 -0.0001 0.0) ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Script und Lisp in Zeichnung ziehen Fehler
Manuel486 am 26.07.2021 um 12:20 Uhr (1)
Auf jeden Fall ist es jetzt kein AutoCAD Thema mehr (es sei denn es wurde ein Zusatzprogramm in AutoCAD implementiert welches die Aktionen ins Leere laufen lässt).Das war ein sehr guter Hinweis von dir. Wäre ich sonst wahrscheinlich nie drauf gekommen.Habe mal den Support angeschrieben, mal sehen was die meinen.------------------GrußManuel
|
| In das Form Lisp wechseln |
|
Lisp : Lisp-Befehl: read-line
marmora am 18.09.2006 um 14:37 Uhr (0)
Hallo!Wie kann ich bewirken, dass "read-line", nach dem es den benötigten Wert aus einer Datei gefunden hat (und diesen an das Hauptprogramm weitergegeben hat), beim nächsten Durchlauf - bei der Suche nach dem nächsten Wert - wieder in der ersten Zeile beginnt?Ich hoffe, ich hab mich kurz und verständlich eusgedruckt... ;-)Für Eure Antworten bedanke ich mich schon im Voraus,marmora
|
| In das Form Lisp wechseln |
|
Lisp : Script aus Lisp mit Command aufrufen
Peter2 am 11.09.2007 um 16:29 Uhr (0)
So, jetzt habe ich die Probleme umgedreht: Zitat:Original erstellt von fuchsi:...(LAYMRG+ (LIST AltLayer) NeuLayer)...Dafür, wie ich ich mit Listen arbeite, sollte mir das nicht passieren. Sorry und danke. Das scheint nun zu laufen.Umgekehrt gibt es nun bei deinem "invoke" Mystisches. Folgender Programmaufbau:Code: (setq layerliste (list (list "alt1" "neu1") (list "alt2" "neu2") )) (foreach paar layerliste (progn (setq altlayer (car paar) neulayer (cadr paar)) (princ (str ...
|
| In das Form Lisp wechseln |
|
Lisp : MText Hintergrundfarbe in Lisp einbauen
cadffm am 20.10.2011 um 12:48 Uhr (0)
Erstelle in Acad doch mal einen MText und kopiere den, dann gebe einem von beiden die gewüschte Einstellung und vergleiche beide.Da ich das soweit möglich mit AutoLisp mache gehen mir die VisualLisp Begriffe nicht so leichtvon der Hand, aber da auch hier die Doku sowie die Möglichkeit von vlax-dump-object recht gut ist wirstdu es schon alleine schaffen, die Antwort ist: JaBeispielLink: Klick------------------CAD.de System-Angaben - CAD on demand - User:FAQ(Acad)
|
| In das Form Lisp wechseln |
