|
AutoLisp : Linie mit mehreren Haltepunkten
Rabbit 007 am 26.09.2005 um 16:18 Uhr (0)
HalloFolgende Sache ,habe in meinem Lisp meine Linien mit (command "plinie" erstellt dabei einen Start und einen Endpunktangegeben.Nun möchte ich aber das jeweils Punkte zum verändern der linie inabständen gesetzt werden.Habe unten mal rumgesponnen weis nicht obes je so klappen könnte.Wäre schön wenn jemand einen Tip hat Oder muß ich alles mit entmake neu schreiben ???danke euch schon mal !!!!Code:(setq x 10)(setq y 10)(setq pos1 (list x y))(setq x1 110)(setq y1 10)(setq pos2 (list x1 y1))(setq Zählen 0) ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Schnittpunkt ohne Geometrie
Bernd10 am 01.08.2011 um 11:30 Uhr (0)
Hallo Thomas,danke für Deine Antwort. Zitat:Original erstellt von tunnelbauer:Welchen der beiden Schnittpunkte?Wenn ich alle Schnittpunkte hätte, könnte ich vielleicht durch eine weitere Analyse meinen gewünschten Schnittpunkt herausfinden. Zitat:Original erstellt von tunnelbauer:Siehe: http://www.unet.univie.ac.at/~a9907818/kreisund.htm http://de.answers.yahoo.com/question/index?qid=20081204075108AABfb0U Das übersteigt meine Mathe-Kenntnisse. Ich verstehe zwar noch, dass es die drei Fälle geben kann, a ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Trassen zeichnen
CADmium am 20.01.2005 um 14:54 Uhr (0)
Zitat Holger Brischke : ..ein Hinweis: Das Forum ist hier keine Tauschbörse von Lisp-Tools. Es ist dazu da, Fragen zur Programmierung zu beantworten. Deine Anfrage erweckt jedoch den Anschein, dass du hie nur auf der Suche nach einer fertigen Lösung bist, und selber kein Interesse hast zu programmieren. (ich kann mich aber auch täuschen, und du hast das Posting nur unglücklich formuliert) Ich weise deshalb darauf hin, weil in letzter Zeit das Forum immer öfter Zweckentfremdet genutzt wird... Wenn du dich ...
|
| In das Form AutoLisp wechseln |
|
Lisp : quit
Martin_0103 am 03.09.2003 um 12:55 Uhr (0)
Hallo Forum,ich suche händeringend nach einer Lösung für folgendes Problem:AutoCad R2002 starten - Zeichnung öffnen - bestimmte LA frieren - Zeichnung drucken - und mit Quit verlassen (OHNE SPEICHERN) und weiter mit der Routiene...Bis auf das Quit läuft alles, d.h. wir starten AutoCad mittels einer Batch Datei und übergeben dort den Zeichnungsnamen und eine Scriptdatei die ein Lispdatei lädt und ausführt:C:ProgrammeAutodeskMDT6acad.exe 12345678 /b DRUCK-SCRC:ProgrammeAutodeskMDT6acad.exe ABCDEFGH /b DRUCK- ...
|
| In das Form Lisp wechseln |
 |
Lisp : tatsächlicher Winkel einer Linie
jörg.jwd am 15.11.2017 um 15:03 Uhr (15)
Hallo zusammen,die Frage hört sich wahrscheinlich trivial an, aber ich bin seit Jahren aus der Lispprogrammierung raus und muss jetzt wieder loslegen.Ich suche eine Möglichkeit den tatsächlichen Winkel einer Linie zu bekommen. Wenn ich mir die mit _list anschaue zeigt mir die Kiste den Winkel in der xy-Ebene an. Genau diesen Winkel würde ich gern über Lisp ermitteln um damit weiter zu arbeiten. Mir (angle Punkt1 Punkt2) komme ich da nicht weiter da dieses Ergebnis ja davon abhängt in welcher Reihenfolge ic ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Linie versetzen um Prozentwert der Länge
Brischke am 26.11.2003 um 11:54 Uhr (0)
Hallo Walter, so geht s: Code: (defun c:mvs (/ ld ln abst prze) (princ
Linie wählen: ) (setq ld (ssget _:S ((0 . LINE )))) (if ld (progn (setq prze (getreal (strcat
Prozentwert (if prz (rtos (* 100.0 prz) 2 2) 100 ) : ) ) prz (if prze (/ prze 100.0) prz) ld (entget (setq ln (ssname ld 0))) abst (* prz (distance (cdr(assoc 10 ld))(cdr(assoc 11 ld)))) ) (command _.offset abst ln) ) (progn(princ
Keine Linie ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Einfügen mit Referenzen
Brischke am 30.06.2004 um 08:39 Uhr (0)
Hallo Martin, wenn ich das richtig verstehe, dann ist dein Problem, dass in einer Referenz verschachtelte Referenzen als Block eingefügt werden. Da gibt es nur eine Lösung, dass man diese verschachtelten Referenzen aus der Referenz löst und in der Zielzeichnung als eigenständige Referenzen einfügt. Ab AutoCAD 2005 wird dieses Vorgehen mit dem Manager für Planunterlagen sehr gut unterstützt. Vorher, so würde ich meinen, ist nur eine Programmierlösung möglich. Mittels Active-X kannst du ja im Hintergrund auf ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Popupmenü laden / entfernen
benwisch am 30.06.2005 um 14:38 Uhr (0)
Hallo Wolfgang, Zitat: wie kann man ein Popupmenü aus einer eigenen mnc mit LISP oder ActiveX laden und entfernen? Sichtbar/Unsichtbar schalten geht ganz einfach mit AchtiveX... sammeln der Menüs...(hier als Bsp. die Menügruppe Menue Code: (setq menupopup (vla-get-menus (vla-item (vla-get-menugroups (vlax-get-acad-object)) Menue ) ) ) speichern des MenüPopups mit dem Namen: ToolBox Code: (setq popname (vla-item menupopup ToolBox )) Die für die Sichtba ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Eigenes Programm auf fremder HP
archtools am 28.06.2007 um 17:16 Uhr (0)
Zitat:Original erstellt von CADchup:Viel wichtiger ist doch, dass nur noch selten fremder Code hier gepostet wird, und das ist IMHO durchaus auf eine allgemein intensivere Auseinandersetzung mit dem Thema zurückzuführen.Da hast Du recht. Mir ist das auch schon aufgefallen, aber dass das auf mich zurück geht, wage ich dann doch zu bezweifeln :-) Ich vermute eher, dass v.a. wegen VBA und auch wegen des wachsenden Funktionsumfangs von AutoCAD das Interesse an Lisp zurück geht, und dass deshalb weniger als fr ...
|
| In das Form Lisp wechseln |
|
AutoLisp : RGB -> ACI
CADmium am 08.02.2005 um 12:50 Uhr (0)
Frage: Wie rechnet ACAD RGB-Farben in AutocadColorIndex-Farben um? Mit activX kann man ja auf folgende Möglichkeit zurückgreifen: (defun DT:COLOR-RGB- ACI ( RGB / COLOROBJ ACI ) (if(and (=(type RGB) LIST)(=(length RGB)3) (setq COLOROBJ (vla-getinterfaceobject (vlax-get-acad-object) AutoCAD.AcCmColor.16 ) ) (not(vl-catch-all-error-p (vl-catch-all-apply ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Gruppieren mit AutoLISP
cadffm am 22.02.2017 um 15:02 Uhr (1)
Es bleibt dir überlassen die Objekte per Hand zu wählen, oder das Programmso anzupassen das es selbstständig die Objekte ermittelt und dem Gruppen-Befehl übergibt.Ich denke du wirst durch ProgeCAD und Lisp nicht eingeschränkt an dieser Stelle Code:(progn(setq NewElements (ssadd))(setq ELEM (entlast)) ; hier merken, welches Objekt aktuell "das Letzte" ist(command "_.CIRCLE" "20,20" "5")(command "_.CIRCLE" "20,20" "6")(if ELEM ; Wenn vorher bereits Objekte vorhanden waren (while (setq elem (entnext ELEM)); ...
|
| In das Form Lisp wechseln |
|
Lisp : Befehl _.style unter Windows 7 32-Bit
Bernd10 am 28.03.2012 um 13:19 Uhr (0)
Hallo,wegen einem Rechnerwechsel habe ich nun Windows 7 Professional 32-Bit und nicht mehr Windows XP Professional. Auf beiden Rechner ist Mechanical 2009 installiert und es gibt dafür eine VLX-Anwendung von mir. Unter Windows 7 habe ich nun ein Problem mit dem Befehl _.style.Unter Windows XP hat Folgendes funktioniert:(command "_.style" "Test18" "LSRM____.TTF" "" "" "" "" "")Unter Windows 7 steht bei der Ausführung der oben genannten Zeile dies im Textfenster:_.style Namen des Textstils eingeben oder [?] ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Num.LSP (Einfügepunkt)
fuchsi am 06.08.2004 um 11:51 Uhr (0)
aus der Lisp-Hilfe (DXF-Referenz) 72 Typ für Horizontale Textausrichtung (optional; Vorgabewert = 0); Ganzzahlcodes, nicht bitcodiert 0 = Links, 1 = Oben, 2 = Rechts 3 = Ausgerichtet (falls vertikale Ausrichtung = 0) 4 = Zentriert (falls vertikale Ausrichtung = 0) 5 = Angepaßt (falls vertikale Ausrichtung = 0) 73 Typ für vertikale Textausrichtung (optional; Vorgabewert = 0): Ganzzahlcodes (nicht bitcodiert): 0 = Basislinie; 1 = Unten; 2 = Mitte; 3 = Oben Weitere Informationen finden Sie in den Tabellen d ...
|
| In das Form AutoLisp wechseln |