|
Lisp : Grösste Kote
Dorfy am 16.03.2010 um 17:47 Uhr (0)
Zitat:Original erstellt von Steff179:...so ich hoffe mein problem ist klar beschrieben und natürlich hoffe ich das mir jemand einen lösungsansatz geben kann....... ob ich das richtig verstanden hab ich würde die Koten in Listen packen und auswertenCode:(setq a "399.93")(setq b "400.03")(setq lista (vl-string-list a))(setq listb (vl-string-list b)) (mapcar (lambda (a b) (if (not (equal a b)) b ) ) lista listb )-- (52 48 48 nil 48 nil)evtl. vorher nach Trennzeichen suchen und die Listen teilen ...
|
| In das Form Lisp wechseln |
|
Allgemeines und sonstige CAM Systeme : 2(2,5)D zur Bearbeitung von Schrägen
MartinKern am 13.10.2008 um 19:35 Uhr (0)
Hallo!Also im Unternehmen verwenden wir ArtCam von Delcam. Hier verwenden wir das reine 2D Modul. Es kann aber auch "Tiefe" fräsen, also in Z zustellen. (Ist es jetzt damit ein 2,5D? Kontur fräsen, zustellen, Kontur fräsen, zustellen usw....) Weiters verwende ich zum erstellen von Fräskonturen und Drehkonturen ein Lisp-programm für AutoCAD, welches mir dann G-Code ausgibt. Das könnte ich zur Verfügung stellen. (Ist auch irgendwo im Forum versteckt....). Weiters habe ich früher mit Hypermill gearbeitet. Das ...
|
| In das Form Allgemeines und sonstige CAM Systeme wechseln |
|
CoCreate Programmierung : Vierkant und Rund LISP-Macro
der_Wolfgang am 06.11.2008 um 19:21 Uhr (0)
Zitat:Original erstellt von highway45:Kann man das vielleicht so umschreiben, das gd_properties.lsp nicht zwingend geladen sein muß ?ja. Also zumindest bei Rundstab.lsp, was ich mir soeben beäuge.Auch das anzeigen des images im oberen Teil kann man machen. Allerdinge wuerde ich dann auch die help action verbiegen mit einer URL auf eine einschlägig bekannte Seite. ;-) wo der Original Autor dann ja auch genannt wird.was sich mir momentan (beim lesen von ) allerdings gar nicht erschliesst istCode: (Farbe2 ...
|
| In das Form CoCreate Programmierung wechseln |
|
CoCreate Programmierung : Vierkant und Rund LISP-Macro
der_Wolfgang am 06.11.2008 um 19:21 Uhr (0)
Zitat:Original erstellt von highway45:Kann man das vielleicht so umschreiben, das gd_properties.lsp nicht zwingend geladen sein muß ?ja. Also zumindest bei Rundstab.lsp, was ich mir soeben beäuge.Auch das anzeigen des images im oberen Teil kann man machen. Allerdinge wuerde ich dann auch die help action verbiegen mit einer URL auf eine einschlägig bekannte Seite. ;-) wo der Original Autor dann ja auch genannt wird.was sich mir momentan (beim lesen von ) allerdings gar nicht erschliesst istCode: (Farbe2 ...
|
| In das Form CoCreate Programmierung wechseln |
|
Rund um Autocad : polyl. verbinden, erst ja dann nicht, wqarum ???
CAD-Huebner am 13.01.2006 um 10:37 Uhr (0)
Allgemeine Info zum Befehl MPEDIT (aus den Expresstools).Diesen Befehl gibt es auch noch als MAP Befehl in AutoCAD MAP und Autodesk CIvil 3D als Bearbeitungsbefehl für MPOLYGON-Objekte.MPEDIT aus den Expresstools (definiert in mpedit.lsp) kollidiert mit diesem BefehlCode:Befehl: MPEDIT Polygon auswählen:Option eingeben [Hinzufügen/Löschen/Verschieben/bEarbeiten/Trennen/Umgrenzungstyp/Füllen/Neuausgleichen/Beenden]BeendenSobald ein MPolygon-Befehl wie MPOLYGON, MPSPLIT, MPFILL oder (MPEDIT) aufgerufen wird, ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : ACAD 2010: Einfachste Blöcke einer Zeichnung für 60 weitere neu definieren
Mann am 11.03.2016 um 12:46 Uhr (1)
Hallo Kollegen,Meine Aufgabe:ca. 20 ganz schlichte Blöcke ohne jegliche Attribute und sonstiges Gedöns aus einer DWG-Vorlage auf ca 60 weitere Zeichnungen übertragen. Ich möchte einfach vermeiden, jedes der 20 Icons 60mal per Rechtsklick einzeln übertragen zu müssen, wie das DC in Acad 2010 es vorgibt. Eine Lösung, die ich hier gefunden habe, ist blöd, weil ich dazu ACAD 2016 als Testversion installieren lassen müsste (defun tools). Stresst mich. Eine andre Lösung ist das vorab-Abspeichern per WBlock und d ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Afenster Maßstab mit Text verknüpfen?
Proxy am 24.03.2004 um 18:46 Uhr (0)
Als Gedankenstütze: Code: (defun c:textallscale ( / ALISTE) (setq ALISTE (ssget X ((-4 . or ) (0 . TEXT ) (0 . MTEXT ) (-4 . or ) ) ) ) Hier fängt die Verknüpfung mit dem AF-Zoomscale (if ALISTE (progn (while (not(setq tfac (getreal
Skalierfaktor für alle Texte eingeben: )))) (mapcar (lambda (el) (txtvaria (entget el) tfac) ) (bau_elemli ALISTE) ) ) ) (princ) );defun (defun txtvaria (ad fac /) (entmod (s ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : linie einfügen - vom mittelpunkt zur Umgrenzung
Yolanda am 31.08.2003 um 23:33 Uhr (0)
hallo Friedhelm, wie Du sicherlich merkst bin ich ahnungslos: was ist ein Thermal??? Also ich versuche etwas zu plotten, nämlich eine Art Schablone. Der Einstichpunkt soll nicht direkt auf der Kante sein, sondern im Zentrum. Von dort aus soll das ganze dann zur Aussenkontur fahren und die Figur, sprich das Pad schneiden. Ich weiss dass es solche Software gibt, allerdings kenne ich nur eine und die ist nur in zusammenhang mit einem Nd-Yag Laser zu erwerben wenn ich richtig informiert wurde. Da ich mir besti ...
|
| In das Form Rund um Autocad wechseln |
|
Autocad VBA : Makroaufruf mit Parameterübergabe
Mike_mair am 10.06.2005 um 07:32 Uhr (0)
Ich habe das mit dem Übergeben mal Probiert, aber genau wissen tu ich es auch nicht mehr. Da schreibt man im VBA Code ein Anweisung die auf eine Eingabe von AutoCAD wartet. Somit würde dann deine Anweisung davor den Macro aufrufen und dann die Werte eingeben . Ist meiner meinung nach aber keine gute lösung. Du wirst sie bei der AutoCAD Hilfe im FAQ (Englisch)... jedenfalls ist es im 2002 da gestanden. ----------------- Wenn du dir aber das mit der Registry ersparen willst dann würde ich dir wirklich empf ...
|
| In das Form Autocad VBA wechseln |
|
AutoLisp : Neuen Layer frieren
Kramer24 am 19.09.2003 um 18:46 Uhr (0)
Hallo Lispler, habe eine Lisp gefunden, das - so wie ich es verstehe- einen neuen Layer in allen Ansichtsfenstern friert, so dass man diesen nur in den Af tauen muss, in denen man den Layer wirklich braucht. Das läuft aber bei mir nicht (AC,ADT2004). Vielleicht kriegt Ihr s hin...:confused; Lothar =====BEGIN CODE HERE======= ;Creates a layer that is frozen in existing vports ;From the gang at CADalog...thanks folks! ; ; (defun c:crelayfrz (/ ) (While (/= layname ) (setq layname (Getstring
New l ...
|
| In das Form AutoLisp wechseln |
|
Autodesk.NET/ARX : ARX-Experten nach China!
poliki am 13.09.2004 um 14:49 Uhr (0)
Hallo zusammen, nachdem ich alles durchgelesen habe möchte ich mich nun auch dazu äußern. Ich habe mir OptimumCAD 6 runtergeladen und eine halbe Stunde drin rumgespielt . Dazu muss man sagen ich kenne AutoCAD seit 14 Jahren. Mein Fazit: AutoCAD 12 mit vereinzelten 14er Funktionen, allerdings LT! Mein erster Eindruck war eigentlich positiv, bis ich versucht habe eine Lisp Routine zu laden. Von denen die ich zur Verfügung habe sind 100% nicht gelaufen. Immerhin ließen sich AutoCAD 2004 Dateien öffnen, wobei ...
|
| In das Form Autodesk.NET/ARX wechseln |
 |
Lisp : Xaml help file mit url verknüpfen
cadplayer am 06.04.2017 um 08:56 Uhr (15)
Hallo!Meine Frage hat nicht unmittelbar etwas mit Lisp zu tun. Und zwar möchte ich meine cuix-menu datei so gestalten, dass ein vidoclip (gif oder url) am Button in tool- oder ribbonbar anzeigt wird. Ich hab mir in der Hilfe folgendes zusammengebasteltCode:ResourceDictionary xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" xmlns:src="clr-namespace:Autodesk.Windows;assembly=AdWindows" src:RibbonToolTip x:Key="MYEH_CMD_0001" src:RibbonT ...
|
| 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 |