|
Lisp : Polyline / Messen / Block
nebuCADnezzar am 28.09.2012 um 16:28 Uhr (0)
Hallo CADmiumHa auf deinen Eintrag habi doch gewartet :-)Zitat:nimm die vlax-curve.... Funktionen !!! (einfach mal F1) .. damit ist Stationierung und Blockrichtung überhaupt kein ProblemDie ACAD 2013 Hilfe kennt den ausdruck nicht...Zitat:Entsprechenden Beispielcode sollte im Forum zu finden sein. (was fertiges nicht ganz passendes : http://ww3.cad.de/foren/ubb/Forum54/HTML/018178.shtml )In das komm ich ja nicht rein, aber geht in die richtige Richtung...Zitat:http://ww3.cad.de/foren/ubb/Forum145/HTML/0035 ...
|
| In das Form Lisp wechseln |
|
Lisp : Layer aus alt mach neu
nebuCADnezzar am 27.03.2023 um 16:34 Uhr (1)
HalloHatte mich zu früh gefreut. Leider funktionieren beide Ansätze nicht ganz... der einte vereinigt Layer nicht wenn schon bestehend und der andere macht nen neuen Layer_2 (oder auch _3 _4 _5 _6 je nach dem wiviele male der selbe Layer in verschiedenen XREFS vorkommt).Bin noch am und-color: #FFFF99'>Suchen wie ich dass abfange... Einmal ne grosse Liste machen und alles abfangen :-)Code:(command "LAYZUSF" "N" "LAYER_2" "" "N" "LAYER" "J")(command "LAYZUSF" "N" "LAYER_3" "" "N" "LAYER" "J")(command "LAYZUSF" "N" "LAYER_4" "" ...
|
| In das Form Lisp wechseln |
|
Lisp : bem faktor global
nebuCADnezzar am 29.02.2008 um 14:29 Uhr (0)
Hallo@CADmium ich suche ne wertabfrage mit der ich die Variable "dimscale" im obigen beispilcode durch den massstab des aktuellen ansichtsfensters ersetzen kann.Damit hab ich dann im layout bemassungen automatisch auf dem richtigen layer estellen! (dimscale ist bei mir immer 0 darum nützt die mir nix)Hab hier auch noch nen code gefunden der diesen massstab in einm auszuwählenenden (nicht aktuellen) af anzeigt. Aber der code überfordert meine kleinen lispkenntnisse, ich krieg den nich so auseinander gebaut ...
|
| In das Form Lisp wechseln |
|
Lisp : 3d länge
nebuCADnezzar am 06.02.2013 um 11:43 Uhr (0)
Hallo zusammen.Ich bin gerade drann n paar alte LISPs ins neue ACAD 2013 anzupassen. Eins davon macht mir gerade etwas schwierigkeiten (naja meine LISP skills waren schonmal besser...)Code:(defun C:3dlength () (setq LENGTH 0) (setq C nil) (setq PT2 nil) (setq ENAME (car (entsel "
3d Polyline: "))) (setq E (entget ENAME)) (if (= (cdr (assoc 0 E)) "POLYLINE") (progn (if (= (logand (cdr (assoc 70 E)) 1) 1) (setq C 1) ) (setq T C) (setq ENAME (entnext ENAME)) (setq E (entget ENAME)) ...
|
| In das Form Lisp wechseln |
|
Lisp : Layer aus alt mach neu
nebuCADnezzar am 24.03.2023 um 17:05 Uhr (1)
HiIch versuch ja schon erst das internet abzugrasen und tools zu finden bevor ich hier fragen stelle :-) Die Programmierkentnisse nehmen leider auch immer mehr ab, aber hab nicht mal was gefunden was ich zusammenkopiern hätte können...LAYMRG / LAYZUSF hab ich ja auch gefunden, scheint das Mittel der Wahl hab ich auch rumgetestet. Was eigentlich an dem Befehl fehlt ist eben ne *Suchfunktion, ich will nicht auswählen/klicken. Gehe hin und nimm alle Layer wo irgendwo "Stahl_verdeckt" drinnsteht und führ die z ...
|
| In das Form Lisp wechseln |
