|
AutoLisp : Text-Justify
Proxy am 02.03.2004 um 11:29 Uhr (0)
Denke schön. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF
|
| In das Form AutoLisp wechseln |
|
AutoLisp : DesignCenter Datei-Erweiterungs-Enabler
Proxy am 03.03.2004 um 07:23 Uhr (0)
Ich meiente einfach paar Leerzeichen hier und da der Optik wegen und die Rechtschreibung bei manchen Wörtern ist grausam geDenglished ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Bemaßung (Überschreibung)
Proxy am 03.03.2004 um 07:37 Uhr (0)
Hallo, hat da ein Webfund und wollte diesen etwas meinen Wünschen entsprechend anpassen. Code: ; Dim2asoc.Lsp - This routine changes all ASSOCIATIVE dimensions ; that have had their values changed by the user ; and resets them all to their default values. ; Warning - works on all layers, whether frozen or not. ; (defun c:dim2asoc( / ss e ent n spin c ) (defun spin( c ) (cond ((= c | ) / ) ((= c / ) - ) ((= c - ) ) ((= c ) | ) ) ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Bemaßung (Überschreibung)
Proxy am 03.03.2004 um 09:03 Uhr (0)
ich habe viele Zeichnungen mit über 1000 Bemassungen auf unterschiedlichen Layern unterschiedliche Bem-Styles, usw. usw (teilweise mit echt doofen Überschreibungen). Will mit einem Klick feststellen und konvertieren mit folgenden Regeln: 1. Wenn innerhab der Bemassungzahl vor dem -Zeichen ein String existiert dann setz diesen Wert als Bemassungszahlpräfix. 2. Wenn innerhalb der Bemassungszahl nach dem -Zeichen ein String existiert dann schiebe diesen Wert als Bemassungszahlsuffix 3. Entferne das -Ze ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Bemaßung (Überschreibung)
Proxy am 03.03.2004 um 10:13 Uhr (0)
Also doch nicht so ganz verstanden. Wie am Screenshot gezeigt (Rote Pfeile) sollen die Werte in die Bemassungsfelder (Prefix und Suffix) übertragen werden wenn das -Zeichen vorhanden ist, danach soll es gelöscht/entfernt werden, damit die echte Maßzahl sichtbar wird. Wenn es jedoch nicht vorhanden ist (screenshot n° 1) soll die Bemassung nicht modifiziert werden. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-departm ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Bemaßung (Überschreibung)
Proxy am 03.03.2004 um 10:36 Uhr (0)
leider ist die Struktur so angelegt BTW die Verzwiegung für Masszahllose Bemassung, somit eigentlich ein MText mit Pfeilen ist: Code: (if (and(not(wcmatch DIM-TXT * * ))(/= DIM-TXT )) (if (not OVERRIDEN) (setq OVERRIDEN(ssadd (ssname SS IDX))) (setq OVERRIDEN(ssadd (ssname SS IDX) OVERRIDEN)) ) ) ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-departmen ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Bemaßung (Überschreibung)
Proxy am 03.03.2004 um 12:31 Uhr (0)
1a, klappt wunderbar mit Axels-Lispcode, ich poste dann in der nahen Zukunft meine Ergebnisse. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Bemaßung (Überschreibung)
Proxy am 07.03.2004 um 21:10 Uhr (0)
BTW . wie kann ich eigentlich sauber den Wert aus (setq DIM-TXT-REAL (cdr (assoc 42 E1))) mit dem aus den GC 1 einer (einzelenen) Bemassung überprüfen mit Berücksichtung der Bemassungsgenauigkeit einer einzigen Bemassung ? Hab da keine Logik für GC(41) != GC(1) gefunden, da die Genaugkeit nicht im Objekt selber gespeichter zu sein scheint. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world fo ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : entget (car (entsel( ....... ) (0 . "INSERT")
Proxy am 08.03.2004 um 13:40 Uhr (0)
Code: (setq blname (cdr (assoc 2 (entget (car (entsel Block für Verarbeitung wählen: ))) ) ) ) Wie bekomme ich die Auswahl dazu nur Blöcke auszuwählen ? ein Vermischung mit ssget müsste zwar gehen stehe aber gerade voll auf dem Schlauch. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : entget (car (entsel( ....... ) (0 . "INSERT")
Proxy am 08.03.2004 um 13:50 Uhr (0)
Aha, also doch nur mit einer Hilfsvariablen Danke schön. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF
|
| In das Form AutoLisp wechseln |
|
AutoLisp : entget (car (entsel( ....... ) (0 . "INSERT")
Proxy am 08.03.2004 um 14:02 Uhr (0)
Zitat: Original erstellt von cadffm: Was meinst du mit Hilfsvariablen ??? (setq blname (cdr(assoc 2(entget(ssname(ssget _:S ((0 . INSERT )))0))))) OBJEKT = Megalange Verklammerung ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF
|
| In das Form AutoLisp wechseln |
|
AutoLisp : ***POP **OBJECT_INSTERT und Attribute
Proxy am 16.03.2004 um 18:49 Uhr (0)
Hallo, ist es eigentlich möglich mit Diesel bzw. Lisp bei dem Anklicken eines Instert zu prüfen ob dieser mit Attributen versehen ist und dann entsprechend das Menü anzupassen wie z.B. [$(if,$(or,$(eq,$(getvar,block_hat_attribute),true),$(eq,$(getenv,username),Proxy))Befehl_1_von_2,Befehl_2_von_2] ? Das wäre perfekt z.B. beim _explode um ihn dann entsprechend logischer bzw parametrisierbar anzupassen. P.S. habe da bestimmt eine Klammer vergessen ------------------ Lisp?!?! Why the Hell did ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : ***POP **OBJECT_INSTERT und Attribute
Proxy am 16.03.2004 um 20:22 Uhr (0)
Zitat: Original erstellt von marc.scherer: Hi Proxy, solche IMHO kruden Wünsche lassen immer auf IMHO merkwürdige Arbeitsweisen schließen. Da aber mit ActiveX so ziemlich nix unmöglich scheint, glaube ich schon das so etwas machbar ist. (aber dann bestimmt nicht mit $(getvar,block_hat_attribute) ) Hmm, wie soll es sonst gehen ? Ich habe Blöcke die möglicherweise Attribute besitzen und wenn ich (oder ein Endanwender dem es echt sche** egel ist was Attribute sind) den _explode Befehl anwendet dan ...
|
| In das Form AutoLisp wechseln |
