|
AutoLisp : ATTSYNC: als command in Lisp, (acet-attsync) usw.
marc.scherer am 16.11.2005 um 16:28 Uhr (0)
Hi,poste doch mal den Code und die Testdatei.Dann findet sich der Fehler bestimmt RuckZuck.Ich hatte folgendes als Attsync im Einsatz (Attsynct aber alle Blöcke...)Code:(defun DT:ATTSYNC (/) (if (DT:GET-BLOCKDEFS-WITH-ATTDEF "*") (command "_.attsync" "name" "*") (princ "
Keine Attributierten Blöcke in Zeichnung definiert!") ) (princ))Die Abfrage ob attributierte Blöcke in der Zeichnung existieren ist notwendig, weil die command attsync Anweisung sonst nen Fehler produziert. Das attsync synchronisiert so ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : ATTSYNC: als command in Lisp, (acet-attsync) usw.
Peter2 am 16.11.2005 um 17:31 Uhr (0)
Hoi Marcin der Zwischenzeit bin ich wieder etwas schlauer:a) der schwierige Aufruf und die Abstürze:Das ist anscheinend bekannt. Gefunden bei http://ww3.cad.de/foren/ubb/Forum54/HTML/008359.shtml#000004 - letzter Beitrag von Mapcar.b) die Schleife:Das habe ich auch hier im Forum gefunden (Link leider vergessen) - sie ist wirklich sinnlos, weil man mit "*" alle Blöcke updaten kann. Das ist blöderweise in der Hilfe nicht dokumentiert, sondern es wird extra von Instanzen eines bestimmten Blocks gesprochen - ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Koordinatenbemassung mit Ergänzung
Bassi am 16.11.2005 um 20:58 Uhr (0)
Hallo,ich wollte das ganze noch einwenig verbessern und erweitern, aber irgendwie klappt das nicht. Es kommt immer wieder Syntaxfehler.(DEFUN c:ordi (/ nprpfpcpDXXDXDYYDYP1P2P3)(COMMAND "bks" "o" pause)(COMMAND "_dimordinate" (SETQ np (GETPOINT "
Startpunkt")) (setq fp (GETPOINT "
Führungspunkt"))) (if fp (progn (setq DXX (- (car fp) (car np)) DX (- (car np) (car fp)) DYY (- (cadr fp) (cadr np)) DY (- (cadr np) (cadr fp)) ) (if (and ( DYY DXX) ( DX ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Block einfügen und bearbeiten
Dober Heinz am 17.11.2005 um 07:59 Uhr (0)
Hallo LisplerWenn ich eine Block über DesignCenter einfüge, kann ich den dan gleich mit einenm Lisp weiterarbeiten. um Block auf linie ausrichten und die linie dan Brechen.siehe Beilagedanke------------------ Heinz
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Lisp implode gesucht
thika am 17.11.2005 um 09:44 Uhr (0)
Hallo zusammen,nach einem Totalabsturz fehlt mir ein bestimmtes Lisp, welches aus dem Forum stammt. (prima Sache )Name: imp (implode) bewirkt das Gegenteil von explode (ach..).Hab gesucht, aber nix gefunden, hat jemand einen Tip?Vielen Dank, Thika.
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Lisp implode gesucht
tunnelbauer am 17.11.2005 um 09:47 Uhr (0)
Hi,schau mal hier - unter Other Goddies findest du es.------------------GrüsseThomas
|
| In das Form AutoLisp wechseln |
|
AutoLisp : ATTSYNC: als command in Lisp, (acet-attsync) usw.
marc.scherer am 17.11.2005 um 09:59 Uhr (0)
Zitat:Original erstellt von Peter2:Damit bleibt nur noch eine Frage von oben:Frage 2:Wie kann ich (acet-attsync) gezielt laden / aktivieren?Antwort:(arxload "battman.arx")------------------Ciao,Marc
|
| In das Form AutoLisp wechseln |
|
AutoLisp : ATTSYNC: als command in Lisp, (acet-attsync) usw.
Peter2 am 17.11.2005 um 10:15 Uhr (0)
Zitat:Original erstellt von marc.scherer:Da hättest Du auch selber drauf kommen können!?Doch, da hatte ich auch schon, hatte den battman aber zu wenig ernst genommen. Nun ja, ich sollte manchmal früher schlafen gehen .. DankePeter------------------Für jedes Problem gibt es eine einfache Lösung.Die ist aber meistens falsch. ;-)
|
| In das Form AutoLisp wechseln |
|
AutoLisp : ATTSYNC: als command in Lisp, (acet-attsync) usw.
marc.scherer am 17.11.2005 um 10:41 Uhr (0)
Batman muss man immer ernst nehmen ;-)------------------Ciao,Marc
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Block einfügen und bearbeiten
marc.scherer am 17.11.2005 um 10:48 Uhr (0)
Hi DoberHeinz,vielleicht könnte man da was mit nem Reaktor hinbasteln...Aber wozu?Bau Dir doch n Lisp, wo die Einfügeprozedur gleich mit verhaftet ist.Warum das DesignCenter.Wenn Du das schlau anstellst, übergibst Du Deiner Routine dann noch den Blocknamen als Variable (z.B.: (DoberHeinzInserter "DoberHeinzensBlock1")) und Du kannst Deine Prozedur auch noch mit unterschiedlichen Blöcken betreiben.------------------Ciao,Marc
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Lisp implode gesucht
thika am 17.11.2005 um 10:51 Uhr (0)
..schneller als der Wind.... und ich hab gebummelt ...Vielen Dank, genau da hatte ich es ursprünglich her (nur vergesse..)Grüße zurück, Thika.
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Textsize mit Lisp steuern
Bernd P am 17.11.2005 um 11:32 Uhr (0)
ServusKann mir jemand bei der Erweiterung helfen. Es soll die Möglichkeit zur Auswahl geben Aktuelle Höhe bei dieser Auswahl soll Masstab und Einheit übersprungen (fett markiert im Code)werden. Die Variable Thohe auf den aktuellen Wert von textsize gesetzt werdenCode:(defun c:Texthöhe (/ THohew LEinheit LEinheit2 LMasstab Thohe Objekte) (setq Objekte (ssget)) (setq THohew (atof (DIA:Liste ("Aktuelle Höhe" "1" "1.25" "1.5" "1.75" "2" "2.25" "2.5" "2.75" "3" "3.25" "3.5" "3.75" "4" "4.5" "5" "5.5" "6" ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Textsize mit Lisp steuern
Bernd P am 17.11.2005 um 13:33 Uhr (0)
Servus die 2.Soda hab das Problem gefunden atof hatte ich verwendet um die Rückgabe von der Liste in einen Zahl zu ändern.Nächste Problem bei wählen einer neuen Texthöhe/Massstab/Einheit bekomme ich die Fehlermeldung ; Fehler: Fehlerhafter Argumenttyp: stringp 10.0Code:;Hauptfunktion(defun c:Texthöhe (/) (setq Objekte (ssget)) (setq THohew (DIA:Liste ("aktuelle Hoehe" "1" "1.25" "1.5" "1.75" "2" "2.25" "2.5" "2.75" "3" "3.25" "3.5" "3.75" "4" "4.5" "5" "5.5" "6" "6.5" "7") ) ) (if (not THohew) (ex ...
|
| In das Form AutoLisp wechseln |
