|
AutoLisp : INSERT LWPOLYLINE
Brischke am 01.08.2003 um 09:56 Uhr (0)
Hallo marvin, dein Gefühl hat Recht. Gehe in die Blocktabelle, und suche dir da den Block raus. (setq blk(tblobjname BLOCK TOLLERBLOCKNAME )) Mit (entnext..) die Elemente des Blockes durchhecheln, bis du an der Polylinie angekommen bist. Aus dieser suchst du dir dann den entsprechenden Punkt raus. Diesen kannst du dann mit (subst..) tauschen und mit (entmod..) aktualisieren. Dann mit (entupd..) den Block aktualisieren - fertig. Aber Achtung! Die Koordinaten, die du auf dem Monitor pickst musst du a ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Zeichenreihenfolge (draworder) sichern und wiederherstellen
Bernd10 am 22.03.2012 um 11:42 Uhr (0)
Hallo,ich möchte per Lisp die Zeichenreihenfolge für ein bestimmtes Objektt sichern, anschließend diese verändert und danach wieder auf den die urspüngliche Zeichenreihenfolge zurücksetzen. Bisher weiß ich nur, dass ich mit dem Befehl _draworder die Zeichenreihenfolge des Objektes ändern kann.Mein gewünschtes Vorgehen als Beispiel:(setq zeichenreihenfolge_sichern (????? objekt)) ; - sichern..(command "_.draworder" objekt "" "_f") ; ----------- ändern..(????? objekt zeichenreihenfolge_sichern) ; -------- zu ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Barcode erzeugen
Brischke am 18.08.2005 um 09:14 Uhr (0)
Hallo Wolfgang,suche mal im Internet nach Schriftarten, welche Barcode ausgeben. Das ist die einfachste Möglichkeit.Barcode unterliegt ja gewissen Regeln, welche sich auch in einem Lisp-Programm nachstellen lassen. Ich selbst habe mal ein Tool geschrieben, welches EAN-Codes erzeugt und als Block im Schriftfeld einer Zeichnung erzeugt.Prinzip ist einfach: Es werden Polylinien verschiedener Breite erzeugt un d als Block zusammengefasst. Anhängendes GIF zeigt das Dialogfenster.Bei Fragen ...Grüße Holger------ ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : DCL-Toggle funktion in Lisp einbinden
Jürgen Scheeren am 28.10.2004 um 15:48 Uhr (0)
Hallo Holger, so, hab ich gemacht, leider erscheint das Dialogfeld nur kurz und ist dann wieder weg. Muß ich da nochwas mit set_tile oder mode_tile machen ? Gruß Jürgen (prompt
Type Toggle to run..... ) (defun C:Toggle (/) ;;;;;;;;;;;;Load the dialog file and set a reference to it. (setq dcl_id (load_dialog Toggle.dcl )) (if (not (new_dialog Toggle dcl_id)) (exit ) ) ;;;;;;;;;;;;Dialogverbindung (action-tile tg1 (if (= $value 1 ) (Layn)) ) (action_tile cancel (done_dialog 0) ) (action_ ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Aufbau DCL-Masken
mapcar am 02.09.2005 um 10:48 Uhr (0)
Hi Kenny1,ich habe mal einen kurzen Blick reingeworfen, und da habe ich gleich gesehen: Alles globale Variablen, du machst nicht eine einziges Symbol lokal. Solche Programme enden meist im Chaos, und deshalb: Bevor du das nicht in Ordnung gebracht hast, werde ich nicht versuchen rauszukriegen, was da nicht läuft.Um aber deine abschließende Frage zu beantworten: Da habe ich keine Antwort. Ich habe das hier schon öfters angemault, aber es ist immer nochso: DCL ist so grottenalt, dass es schon stinkt - mittle ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Entwicklung einer allgemeinen *Error* Funktion...
mapcar am 24.02.2004 um 17:43 Uhr (0)
Hi Thomas, das ginge im Prinzip, aber ich versuche, die Sache so klein wie möglich zu halten. Mit deinem Code habe ich allerdings Probleme: Völlig unleserlich, da ohne Prinzip ein- und ausgerückt, und ich sehe, dass du mit (length..) auf ein Pair zugreifst - das erzeugt einen Fehler... Oder sind s keine Pairs, sondern Listen? Dann solltest du sie auch nicht Pair nennen;-) Mir gefällt der Gedanke aber nicht besonders, denn die Strukturen sind nicht gleich: Den Sysvars wird normalerweise beim Start des Err ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Parametrics Uservariable oder parameter
S235 am 08.10.2011 um 09:25 Uhr (0)
Liebe Experten,nun habe ich die von HofCad veröffentlichten Zeichnungen und auch das Programm DRIVEN angesehen, aber nirgendwo gefunden, ob und wie ich die Parameter auf der Befehlszeile (und damit wohl auch in Lisp) über den Namen ansprechen und ändern kann. HofCad geht m.E. über die Objektbeschreibung und die Attribute. Namentlich werden keine Parameter angesprochen. Wie Variabeln verhalten sich die Parameter nicht, denn die Geometrie und auch die Einträge im Benutzermanager ändern sich nicht. Habe besti ...
|
| In das Form Lisp wechseln |
|
Lisp : Hilfe bei lisp! Block Attrtibute rotation und position!
cadplayer am 15.02.2013 um 20:56 Uhr (0)
Mein Vorhaben ist, sobald ich die Position eines Attrib im Block verschiebe, das kommt häufiger vor, möchte ich die Verschiebung gleich auf andere Attrib übertragen. Da die Koord.unterschiede nicht gleich sind zw. BlockInsertpkt und AttribInsertPkt sobald die Blöcke gedreht sind muss ich eine Transform rechnen lassen bezüglich auf das OCS des Attrib zum BlockInsertPkt. Der GC 210 liefert dazu ein matrix mit der ich nicht umzugehen weiss. Also im Klartext was bedeutet (210 0.0 0.0 1.0). Bin in der Hilfe nic ...
|
| In das Form Lisp wechseln |
|
Lisp : Bestimmtes Attribut beim Blockeinfügen via Lisp per Textstring ausfüllen
cadffm am 24.03.2021 um 19:37 Uhr (1)
Wenn die vielen Beispiele dich noch nicht zum Ziel führten,warum dann nicht einfach die Attribute beim einfügen abfragen lassen und ausfüllen?Du benutzt ja ohnehin schon der nativen EINFÜGE-Befehl,also kannst du einfach ATTDIA aus, aber ATTREQ einschalten und die Attributwerte werden abgeffragt.Einfach zu verstehen, einfach umzusehen und das ganz ohne Programmierung (abgesehen vom Command).Also Attreq und Attdia setzen (fehlt übrigens auch in der aktuellen Fassung),und dann nach der Angabe der Drehung einf ...
|
| In das Form Lisp wechseln |
|
Lisp : Prozent zu Grad, Grad zu Prozent
ryfCAD am 20.08.2019 um 14:47 Uhr (1)
@cadffm:natürlich ist das Quatsch, mathematisch gesehen. Aber bei Neigungsberechnungen in der Architektur sind 45° eben doch 100%Die Umrechnung Prozent zu Winkel habe ich hin gekriegt:(setq Prozent (getreal "Prozent % eingeben: "))(setq Winkel (/ (* (ATAN (/ Prozent 100.0)) 180.0) pi))Die umgekehrte Operation jedoch nicht.Natürlich gibt es in VLisp keine Funktion TAN, Fehler von mir, aber es wird seltsamerweise keine Fehlermeldung ausgegeben.Die Funktion TAN lässt sich jedoch herstellen:(defun c:tan (x) (/ ...
|
| In das Form Lisp wechseln |
|
Lisp : 2 command-Befehle hintereinander
romi1 am 27.01.2014 um 15:42 Uhr (1)
Hallo!Ich möchte ein kleines Lisp mit folgendem Ziel erstellen:1. Rechteck zeichnen (2 Eckpunkte über Pickpunkte anklicken)2. gezeichnetes Rechteck in eine Revisionswolke umwandeln.Nun scheitere ich aber schon daran, daß der 2. command-Befehl nicht ausgeführt wird.Vorerst möchte ich da (beim 2. command) das Rechteck noch händisch auswählen.Was mache ich falsch?Code:(defun c:wolk () (command "_rectang") (command "_revcloud" "o" "") )In weiter Folge dann noch die Frage: wie kann ich dem 2. command-B ...
|
| In das Form Lisp wechseln |
 ZoomCmd.dll.txt |
Lisp : Zoom object
cadplayer am 03.05.2017 um 18:28 Uhr (1)
Hallo!Eine Frage zur Anwendung von (command "_zoom" "_o" (car (entsel "
Select Zoomobject!")) "") sollte doch auf das gewählte Objekt zoomen. Macht es zwar, jedoch nicht so das der "Zoomausschnitt" der Aussenumgrenzung vom gew. Objekt stimmt.Dazu habe ich zwar in .NET etwas gefunden, möchte es aber mit Lisp bewerkstelligen!.NETHabs als dll in 2017 version mal kompiliert.Zum test mal mit Befehl netload die dll laden und anschliessend Befehl ZE und ein Objekt wählenSiehe da, der Zoombereich entspricht genau ...
|
| In das Form Lisp wechseln |
|
Lisp : Befehl _layer / Farbbuch
cadffm am 17.02.2023 um 12:54 Uhr (1)
Zitat:Original erstellt von cadffm: AcadWE.. lasse die mal weg und teste erneut.Starte mal mit"C:Program FilesAutodeskAutoCAD 2020acad.exe" /safemode /p "TESTPROFIL" /t "V:asup2020 emplateM2020.dwt" /product ACADM /language "de-DE"Hier geht es darum "dein Zeug" aussen vor zu lassen, wenn durch die Zeile oben dennoch dein Zeug ausgeführt wird (wir kennen deine Anpassungen ja nicht),dann denke bitte selbst nach wie du da herum kommst.Am liebsten wäre mir der Original-Aufruf von dir, aber mit /safemode Parame ...
|
| In das Form Lisp wechseln |