|
Lisp : Lisp Autonummerierun Erweitern
Jungspunt am 14.06.2009 um 14:00 Uhr (0)
HalloIch würde gern folgende lisp erweitern und zwar das man die Text größe wählen kann.Weis aber nicht wie. Also die Abfrage schaf ich noch aberwo ist die Variable für die Textgröße? Code:(defun c:number (/ nr ipt ant) (setq nr (if (setq ant(getint "
Startnummer 0")) (1- ant) 0 ) ) (while (setq ipt (getpoint (strcat "
Einfügepunkt: " (itoa (setq nr (1+ nr))) ":"))) (entmake(list (0 . "TEXT") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbText") (cons 10 ...
|
| In das Form Lisp wechseln |
|
Lisp : Ersthilfe - Höhenkote
erdmännlein am 21.06.2009 um 06:54 Uhr (0)
Hi lLsp -Professoren,Folgendes Anliegen:Möchte mir gerne meine Höhenkote, die ich mir bereits als Block gebastelt habe , lispln und zwar sollte sie je nachdem wo ich sie im Raum hinsetzte ( Fangpunkt des Blocks) den Z - wert reinschreiben.Habe mit Lisp absolut nichts am Hut - täte aber gerne damit beginnen - nun die (1.)Frage ob ich diese Sache als blutiger Anfänger mit ein bisschen Grundwissen - daß ich mir am besten WO ? (2. Frage) hole - ALLEIN schaffen könnte, oder ob das sehr aufwändig wird? Wer kann ...
|
| In das Form Lisp wechseln |
|
Lisp : Brauche Hilfe Für ein Schriftfeld Flächentool für AutoCAD 2010
runkelruebe am 17.06.2009 um 19:35 Uhr (0)
Hi,hmm, Dein Ausgangslisp funktioniert doch in ACAD2010. Also bei mir tut es das.Was heißt ACAD findet die ObjectID nicht? - Welcher Fehler wird ausgegeben? Genauer Wortlaut bitte.Kann es sein, dass es sich an (if (= (cdr (assoc 0 (entget hElement ))) "LWPOLYLINE") aufhängt? Der dazu (wenn z.B. PLINETYP = 0) gehörige Fehler wäre: Raumpolygon wählen:Es wurde keine Polylinie gewählt!Was hast Du für Polylinien? Typ?Schau Dir mal PLINETYPE (Vorgabe = 2 und so steht es bei mir) bzw. KONVERT dazu an.Nur mal so e ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp Autonummerierun Erweitern
Jungspunt am 30.06.2009 um 20:35 Uhr (0)
Hiwie muss ich die lisp erweitern damit ich einen Vortext oder Nachtext hinzufühen kann?bei (cons 1 (itoa nr))mit einer Abfrage wie bei der Startnummer.(setq nr (getint "
Startnummer:"))Danke
|
| In das Form Lisp wechseln |
|
Lisp : Verschachtelte Elemente schieben
Geos am 01.07.2009 um 19:40 Uhr (0)
Wollt Euch noch nachliefern, was draus geworden ist - zwar eine etwas "russische" Gschichte, aber mir hats geholfen.Übrigens - die Original-Xref-Datei wird dadurch nicht verändert.Code:;Funktion (f#DeleteObjectFromBlock) von Jimmy Bergmarks http://www.jtbworld.com/lisp/axblock.htm ;;; Deletes the specified subentity from its block definition;;; Arguments: the entity name of an item within a block reference;;; Returns: the remaining item count of the block definition;;; The drawing must be regenerated for ...
|
| In das Form Lisp wechseln |
|
Lisp : Verschachtelte Elemente schieben
Geos am 11.06.2009 um 12:11 Uhr (0)
Nachdem ich mir die Funde von vla-move und Deinen Code, Thomas, zu Gemüte geführt habe, muss ich zu dem Schluß kommen, dass ich ich mein Ziel nicht gut genug beschrieben habe.Bei Jimmy Bergmarks http://www.jtbworld.com/lisp/axblock.htm konnte ich zwar sehen, wie man ein Objekt aus einem Block/Xref entfernt und zusammen mit trexblk.lsp aus den Express-Tools eine Krücke bauen, aber eben nur eine Krücke ...Ich würde also gerne das "neue File" (mit aktuellerem Inhalt) als Xref einfügen, kann dann bequem die Xr ...
|
| In das Form Lisp wechseln |
|
Lisp : Block im Block sprengen
autocart am 01.07.2009 um 17:43 Uhr (0)
also...nix entmod, da wird man ja wahnsinning!ActiveX ist hier das Zauberwort. (vl-load-com) und dann für jedes Vielflächennetz:Code:(setq ename ...); hier irgentwie den ename des Vielflächennetzes finden - ich habs testweise mit (car(entsel)) gemacht, ist aber für die Automatisierung natürlich nicht zu empfehlen(vla-put-layer (vlax-ename-vla-object ename) "0")Am einfachsten wäre vielleicht im obigen Lisp die Zeile(setq EDATA(subst (cons 8 "0")(assoc 8 EDATA)EDATA));changes layer to 0auszukommentieren und ...
|
| In das Form Lisp wechseln |
|
Lisp : Startgruppe
lutzc am 02.07.2009 um 16:01 Uhr (0)
Hallo,ich möchte eine LISP automatisch laden bzw. zur Startgruppe hinzufügen.Anbei ein Zitat aus dem Forum das schon etwas älter ist.Wie mache ich das ganze unter ACAD2008, da gibts ja keine MNL-Dateien mehr, nur noch CUI.Danke für eure Hilfe.Gruß ChristianDein Vorgehen ist prinzipiell richtig. Damit jedoch die LISP-Dateien beim Aufruf geladen und gestartet werden musst du dir zusätzlich noch eine Menülisp-Datei anlegen. Diese MUSS den selben Namen wie die Menü datei haben, damit die darin enthaltenen Anwe ...
|
| In das Form Lisp wechseln |
|
Lisp : Block im Block sprengen
Jungspunt am 14.06.2009 um 14:10 Uhr (0)
HiIch habe bei Cadwiesel eine Lisp gefunden wie man die Layer innerhalb eines Blockes auf Layer 0 setzt und als Layerfarbe vonLayer.Damit Nehmen die Blöcke automatisch die Farbe des Layers an.Bei meine Blöcken geht das aber leider nicht, denn es befinden sich innerhalb des Blockesnoch Blöcke die auch gesprengt werden müssen. Damit würde sich dann auchder Layer automatisch auf 0 Setzen.Wie muss ich jetzt die Lisp erweitern damit das geht?Code:;Redefines ALL objects in any block in the drawing on layer 0.;(c ...
|
| In das Form Lisp wechseln |
|
Lisp : Block im Block sprengen
Jungspunt am 15.06.2009 um 22:10 Uhr (0)
Hallo cadffm un dautocart. Es geht damit leider auch nicht. Wenn ich den Block anschließend öffne dannist zwar innerhalb des blockes alles auf Layer 0 gestellt. Trotzdem nimmt der Block nicht die Layerfarbe an. (Ist ziemlich paradox ich weiß)Es muss unbedingt alles gesprengt werden innerhalb des Blockes.Warum das so ist weiß ich auch nicht der block ist ein Element das mit Pit Cad erstellt wurde.Einer Erweiterung für Autocad.Die hab ich aber nicht. Bisher musste ich also immer um den Block die Layerfarbe a ...
|
| In das Form Lisp wechseln |
|
Lisp : Startgruppe
Jürgen Scheeren am 04.05.2004 um 10:42 Uhr (0)
Hallo Autolisper,wer kann mir mitteilen wie ich mit Autolisp ein Lisp Programmin die Startgruppe Laden kann.Habe die Autocad-Hilfe schon bemüht bin aber nicht fündig geworden.Ich arbeite mit Autocad 2002Gruß Jürgen
|
| In das Form Lisp wechseln |
|
Lisp : Problem LWPOLYLINE
GG-GREGOR am 13.07.2009 um 15:05 Uhr (0)
Hallo, habe folgendes Problem das Koordinaten in der Y-ebenen gerundet werden und ich nicht dahinterkomme warum?Aus der liste Bei Punkt X= 8146.300 Y=221134.070 Z= 0.000 Bei Punkt X= 8150.530 Y=221132.600 Z= 0.000 Bei Punkt X= 8155.470 Y=221131.050 Z= 0.000 Bei Punkt X= 8160.460 Y=221130.220 Z= 0.000 Bei Punkt X= 8162.370 Y=221130.610 Z= 0.000 Bei Punkt X= 8162.740 Y=221133.550 Z= 0.000 Bei Punkt X= 8164.530 Y=221137 ...
|
| In das Form Lisp wechseln |
|
Lisp : Selbsterstellte Massstabsleiste automatisiert skalieren
Dorfy am 07.07.2009 um 14:05 Uhr (0)
Hi,dann schieb ich mal zur vlide noch ne Anleitung von Jörn Bosse nach.Mit dem Button Hilfe ( ? ) kannst du nach dem einladen von lisp-code, diesen nun selbst schnell auskommentieren.mfg heiko
|
| In das Form Lisp wechseln |
