|
Lisp : Lisp Programmierung (ein Dorf in China?)
Obi-Wahn am 30.07.2007 um 16:33 Uhr (0)
Hallo!Ich lese schon lange dieses Forum, und es hat mir auch schon öfters geholfen. Da ich nun absolut keinen plan hab, melde ich mich auch mal zu wort.Ich suche eine einfach verständliche anleitung zu lisp.Kann auch ruhig in englisch sein.PS.: Sollte es das falsche Forum sein, so bitte ich das zu entschuldigen, und den Thread in das richtige Forum zu verschieben.Des weiteren hab ich vor, Menübuttons so zu gestalten, dass ich einfach draufklicke, und dass dann ein komplettes layout gezeichnet wird.Jedoch w ...
|
| In das Form Lisp wechseln |
|
Lisp : Erstellung eines segmentierten Kreises
KlaK am 18.01.2024 um 18:53 Uhr (1)
Hallo Kedir,Du hast uns nur den Code für die Berechnung eingestellt, gezeichnet wird dabei ja noch nichts.Was mich etwas wundert ist die While-Schleife, denn eigentlich brauchst Du die für die Berechnung doch gar nicht. Die Mindestaußenstärke ist doch immer 3 (mm?), damit bekommt man mit Radius und Steinstärke die benötigten Längen. So ganz habe ich auch noch nicht verstanden warum die Steinplatten dann nicht ganz auf der Schablone aufliegen aber vermutlich wegen Schutzfließ.Zitat:Wäre es besser, alle Punk ...
|
| In das Form Lisp wechseln |
|
Lisp : Texte nach Inhalt in Layer verschieben
jupa am 08.03.2016 um 14:33 Uhr (1)
Zitat:Original erstellt von Meldin: habe den code von Cadmium entwas umgebaut....((= (cdr (assoc 0 Y)) "TEXT")(wcmatch (getpropertyvalue (cadr X) "TextString")MATCHSTR))((= (cdr (assoc 0 Y)) "MTEXT")(wcmatch (getpropertyvalue (cadr X) "Text") MATCHSTR)))...[OT, gehört eigentlich ins LISP-Brett]@Wolfgang; Textobjekte haben eine mit getpropertyvalue auszulesende Eigenschaft "TextString", so weit klar. Woher hast Du die Kenntnis, daß MTextobjekte hingegen die Eigenschaft "Text" besitzen? Wenn ich in der Hilfe ...
|
| In das Form Lisp wechseln |
|
Lisp : Blockattribute drehen
Dorfy am 02.08.2011 um 13:42 Uhr (0)
ich versuch es mal(DEFUN c:rb ( / obj ele pkt wi ) (if ;if schleife auf( (setq obj (car (ENTSEL "Block wählen: "));bedingung( ele (entget obj);bedingung pkt (CDR (ASSOC 10 ele));bedingung );bedingung)(progn;fehlt hier sicherlich (COMMAND "_ucs" "_object" (CDR (ASSOC -1 ele)));koordinatensystem verschieben (SETQ wi ;neuen drehwinkel berechnen(+ ;du addierst (CDR(ASSOC 50 ele));die Drehung vom insert (GETANGLE ;mit einem Winkel aus Basispunkt und einer Eingabe(TRANS ;Transformieru ...
|
| In das Form Lisp wechseln |
 |
Lisp : Elemente auf eine definierte Einfügehöhe verschieben
ChristianBermpohl am 15.03.2016 um 16:47 Uhr (1)
Es ist richtig, grundsätzlich läuft das Programm unter 2012.Nur eben nicht beim Zeichnen von einem Kreis ("CIRCLE") . Das ist mein Problem. Die Funktion EH_WORK setzt die neue Z-Position auf den Wert z_Set. Siehe Anhang... Aufgefallen ist mir das der DXF code 10 zu dem Zeitpunkt keine XYZ-Koordinaten hat, steht immer auf 0,0,0. Das ist bei allen anderen Elementen nicht so. Oder gibt es eine andere Möglichkeit den Kreis zu verschieben?Sorry, hier die fehlenden Funktionen....################################# ...
|
| In das Form Lisp wechseln |
|
AutoLisp : ansichtsfenster koordianten
mapcar am 17.02.2003 um 13:53 Uhr (0)
Ich bin mir ziemlich sicher, weil ich schon mehrere Programme geschrieben habe, die Geometrie deckungsgleich vom Papier- in den Modellbereich verschieben/kopieren und umgekehrt. Solange keine BKS in den Mansfens vorliegen, geht das mit den erwähnten Operationen. Trans funktioniert da auf jeden Fall! Ätzend wird es nur, wenn BKS, DVIEW usw. ins Spiel kommen. Da muss man sich dann durch die EEDs quälen, die - soweit ich weiss - nirgends dokumentiert sind (ausser in dem Buch Maximizing AutoLisp , wenn ich mi ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Bemmasung ein / aus blenden
archtools am 30.07.2011 um 16:34 Uhr (0)
Zitat:Original erstellt von runkelruebe:@cadffm Ergänzung: seit 2011 (SubscriptionBonusTools oder 2012 dann für alle) gibt es noch das Bordmittel _hideobjects, welches viele z.B. ACAler ja schon länger kennen. Das ist imho zwar immer noch böse, weils noch nicht jeder kennt, aber nicht mehr sooo böse wie der selbstgeproggte GC60.Oder greift der auf dasselbe zu? Weiß ich gar nicht. Jedenfalls gibt es seit 2012 dafür ne rote bzw. gelbe Lampe in der Statusbar Nun, mit nem kleinen Lispprogramm könnte man das ...
|
| In das Form Lisp wechseln |
|
AutoLisp : einzelne Stützpunkte einer Polylinie gemeinsam schieben
andi2050 am 20.01.2006 um 00:37 Uhr (0)
Hallo nochmal...Hier ein Stück Code zum Verschieben einzelner Vertices.Code:(defun c:test2 (/ basept ename grpt obj p3 p4 vek) (vl-load-com) (setq ename (car (entsel "
Polylinie wählen: ")) basept (getpoint "
Basispunkt: ") obj (vlax-ename-vla-object ename) ;; Koordinaten von 3. und 4. Vertex holen p3 (vlax-safearray-list (vlax-variant-value (vlax-get-property obj coordinate 2)) ) p4 (vlax-safearray-list (vlax-variant-value (vlax-get-property obj coordinate 3)) ) ) (while (= 5 (car (setq grpt ...
|
| In das Form AutoLisp wechseln |
|
Lisp : LinienBlock???
Bauvermesser am 25.02.2007 um 22:00 Uhr (0)
Hallo, schon aus dem Betreff geht meine Unsicherheit zu diesem Thema hervor, Habe folgende Frage:Ich verwende zwei LSP für das Zeichnen von Böschungsschraffuren (aus dem Forum). Beide haben Vor- und Nachteile. In der einen wird die Schraffur als Block erstellt und kann nur nach Auflösung im einzelnen bearbeitet werden ,dies ist von Nachteil weil eine spätere Bearbeitung zu aufwendig wird. Eine neue Blockerstellung wäre eine etwas umständliche Lösung.In der anderen werden die Böschungslinien wie in einem Li ...
|
| In das Form Lisp wechseln |
|
Lisp : Zeichnung vom Modellbereich in den Layoutbereich verschieben
Doc40 am 20.05.2009 um 21:22 Uhr (0)
Hallo fuchsi!Ich konnte folgendes Verhalten feststellen:Nach dem Öffnen der zu bearbeitenden Zeichnung rufe ich mir die Lisproutine mittels Tastatureingabe auf. Die Routine läuft durch,wobei zum Schluss auf dan LayoutTab umgeschaltet, jedoch nichts eingefügt wird. Das bedeutet, dass werder im Modell- noch im Layout-Bereich Zeichnungsobjekte zu sehen sind. (sind wohl in der Windows Zwischenablage)Ich schließe nun die Zeichnung (ohne zu speichern) und öffne sie wieder.Beim erneuten Aufrufen der Routine läuft ...
|
| In das Form Lisp wechseln |
|
Lisp : sssetfirst und Attribute
cadffm am 20.10.2011 um 11:50 Uhr (0)
Also OK, dann wollen wir mal sagen das es sich in Lisp 100% genau so verhalt wie auf ganz normalerAnwenderebene.Hat man die Attribute gewählt und gibt sie zB. der _Copy-Funktion zum Fraß, so wird Acad einemauc hdie Inserts kopieren und nicht die Attribute.. Und genau so verhalt sich der Auswahlsatz auch -im Auswahlsatz sind ebenfalls die übergeordneten Objekte (die Insert) enthalten !Das Besondere ist eben das sich AutoCADbei jedem Auswahlsatz auch genau merkt wie dieser erstellt wurde,Und in deinem Fall h ...
|
| In das Form Lisp wechseln |
|
AutoLisp : pnetz aus 2d
mapcar am 16.09.2005 um 18:34 Uhr (0)
Erzeuge dir mit edgesurf ein flaches Netz. Anschließend kannst du jeden Knoten über den Griff anwählen und über Koordinateneingaben verschieben. Dazu brauchst du überhaupt kein Lisp oder sonstwas.Das Problem ist aber, dass du dann Viereckflächen hast, die nicht mehr planar sind, sobald du Eckpunkte verschiebst - d.h. die Flächen werden geknickt. Ds ist letztendlich der Unterschied zwischen einem Tisch mit vier Beinen und einem mit drei Beinen - der dreibeinige kann nicht wackeln, weil Dreiecksflächen immer ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Einpassen von ALKIS Daten
Vino am 16.03.2021 um 12:59 Uhr (1)
Hallo,so ganz genau verstehe ich deine Frage noch nicht.Transformation über mehrere Passpunkte sollte jedes Vermessungsprogramm können, das den Namen verdient.Die Methode, die dahinter steht heißt Helmert-Transformation.Ein Programm namens Helmer(t) kenne ich nicht, aber das ist wohl ein Programm, das das so macht.Du redest von Blöcken, die du aufteilen musst... Ein Block (also eine Blockreferenz) ist ein Punkt-Objekt.Die Transformationsprogramme die ich kenne verschieben dir zwar den Einfügepunkt, verände ...
|
| In das Form Lisp wechseln |
