|
AutoLisp : ein LISP-Tool für Parallelbemaßung
joern bosse am 09.02.2005 um 13:14 Uhr (0)
Hallo Jan, ich habe die Objektfänge so wie Du es beschrieben hast eingefügt und es klappt. Du kannst ja mal die Codes vergleichen: (defun c:bem_bks (/ ucs pkt1 pkt2 aws_line osmode_alt) (setq osmode_alt (getvar OSMODE )) (if (= (getvar WORLDUCS ) 1) (progn (setvar osmode 512);Ofang nächster (if (setq pkt1 (getpoint
Startpunkt der Bemassung eingeben. )) (progn (setvar osmode 128);Ofang Lot (setq pkt2 (getpoint pkt1
Endpunkt der Bemassung eingeben. ))) ) (if (and ...
|
| In das Form AutoLisp wechseln |
|
AutoCAD Mechanical : Blockbearbeitung
Harald Beiter am 26.06.2003 um 13:47 Uhr (0)
Hallo an alle da draußen, bin schier am Verzweifeln, da unsere Kollegen mir ein für meine Verhältnisse zu schweres Ding zum Knacken gegeben haben. Folgende Problemstellung: unsere Zusammenbauzeichnungen sind sehr umfangreich und werden aus den versch. Baugruppen mittels Blöcken zusammmengefügt. Damit dürfte schon klar sein, das sehr viele Linien aufeinandertreffen und dementsprechen viel schwarz ist. Für die Dokumentation (Bauteillage etc.) soll nun nur noch die dementsprechende Baugruppe dick -bei uns 0,3 ...
|
| In das Form AutoCAD Mechanical wechseln |
|
Lisp : X-ref Layer
cadffm am 24.09.2012 um 15:48 Uhr (0)
Genau, DXF-Gruppencode 70Bit 1 gesetzt = gefroren, Bit 1 nicht gesetzt = getautBefehl: (setq q1 (entget(tblobjname "LAYER" "eininsert221000|kfw_5_moeb_-")))((-1 . Objektname: 75c38238 ) (0 . "LAYER") (5 . "19F") (102 . "{ACAD_XDICTIONARY") (360 . Objektname: 75c38240 ) (102 . "}") (330 . Objektname: 75c34d10 ) (100 . "AcDbSymbolTableRecord") (100 . "AcDbLayerTableRecord") (2 . "einInsert221000|MOEB") (70 . 49) (62 . 4) (6 . "CONTINUOUS") (290 . 1) (370 . -3) (390 . Objektname: 75c34c68 ) (347 . Objektname: ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Z wird gefangen trotz OSNAPZ 1
hanns-g am 24.06.2016 um 14:12 Uhr (1)
Hallo Ihr Profis,Ich hol kurz aus weil ich scheinbar das Prinzip nicht verstehe.Ich arbeite mit OSNAPZ auf 1, also wird der Z-Wert doch mit BKS-Höhe ersetzt (ViewCube steht bei mir immer auf WKS).Also wird beim Objetfang kein Z-Wert genommen, sprich Null.Damit bekomme ich beim Messen wie gewünscht waagerechte Längen.Beim Konstruieren landen Linien/Blöcke usw nicht auf den Z-Werten von gefangenen Objekten.Gestrichelte Linien werden in der Draufsicht richtig dargestellt weil waagerecht usw.Nur beim Ermitteln ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Drucken
GWS am 09.09.2002 um 10:27 Uhr (0)
Hallo zusammen, es geht alles noch wunderbar mit Lisp. Im Anhang ist ein kleines Lispfile, das die Limiten und den Maßstab einer Zeichnung auswertet, Format und Maßstab erkennt und entsprechend den Drucker / Plotter auswählt. Das Programm ist nicht perfekt und deckt nicht alle Eventualitäten ab, aber es funktioniert bei uns in der Firma gut und ist die Basis für automatische Scriptplots. Die Limiten stehen immer auf den Ecken des Zeichnungsrahmen, gezeichnet wird 1=1, d.h. der Rahmen ist je nach Maßstab ve ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Probleme mit Lisp ... Blockwahl
Dober Heinz am 06.12.2008 um 09:59 Uhr (0)
Hallo Przemoso gehts auch mit einer Zeile(defun c:raum (/ corner1 corner2 columns rows roomwidth roomheight colspacing rowspacing)(setq Blockn (getstring "Blockname? "))(setq corner1 (getpoint "erste Ecke im Raum: ")corner2 (getpoint "gegenüber liegende Ecke: ")columns (getint "Anzahl X Richtung: ")rows (getint "Anzahl Y Richtung: ")roomwidth (abs (- (car corner1) (car corner2)))roomheight (abs (- (cadr corner1) (cadr corner2)))colspacing (/ roomwidth columns)rowspacing (/ roomheight rows)lowerleft(list(mi ...
|
| In das Form Rund um AutoCAD wechseln |
|
Autocad LT : Bereinigen von Dateien durch XRefs per Script???
cadffm am 18.07.2005 um 16:52 Uhr (0)
LT-EXTENDER macht für wenig Geld aud deinem LT eine 99%ige Vollversion, die Demo läuft ohne Einschränkungen 200 Starts. Unter anderem ist in dem 2000er-LT die LISP-Schnittstelle lahmgelegt, das Prog macht sie wieder nutzbar.. Da du aber über ACAD-Vollversion verfügst, ist dies in diesem Fall nicht nötig. Für den Betrieb deiner LT-Version aber sehr interessant. SCC2 ist ein Programm welches EIN SCRIPT über mehrere (auszuwählende) Dateien laufen lassen kann. (das Script habe ich gepostet - nutze es mit der 2 ...
|
| In das Form Autocad LT wechseln |
|
Rund um Autocad : Skriptdatei läuft nicht mehr in ACAD 2006
cadffm am 21.03.2006 um 19:20 Uhr (0)
OK Leutz, hat mich ja nicht mehr losgelassen Das Skript funktioniert in ACAD2006 weiterhin fehlerfrei !Soweit die gute Nachricht......nun die schlechte:Es gibt mal wieder eine SysVar mehr ! Sie dient demAUTOMATISCHEN REGENERIEREN der Ansicht und nennt sich:INTELLIGENTUPDATEInteressiert besonders bei LISP und SCRIPT -Verarbeitung !Hier der Hilfetext: INTELLIGENTUPDATEVariablentyp: Ganzzahl Gespeichert in: Registrierung Ausgangswert: 20 Steuert die Grafikaktualisierungsrate. Der Vorgabewert beträgt 20Rahmen ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Screen Refresh in Lisp-Schleife
HPW am 23.02.2012 um 08:21 Uhr (0)
Hallo,Ich nutze es nun erst mal so:Code:(defun c:pdia ( / rfile techo shell );Öffnen pdScript Dialog (princ "
Warte auf Dialog Ende
") ; (setq rfile (strcat (getenv "TEMP") "~pdia_return.txt" )) ;Resultfile für Return-Data und Ende-Signal in der Startapp-Version (setq techo(getvar "CMDECHO")) ; (setvar "CMDECHO" 0) ;aus (if (findf ...
|
| In das Form Lisp wechseln |
|
PTC Creo Elements/Programmierung : STRING in Einzelteile Zerlegen
Seele am 02.01.2017 um 19:23 Uhr (5)
Hallo, ...erst mal wünsche ich allen hier ein gesundes, glückliches und zufriedenes 2017 !!! ich hab ein Problem mit dem zerlegen eines Strings: (halt wieder schlechte LISP-Kenntnisse)angenommen STRING sieht so aus:(setq *GESAMTSTRING* "P236-DS-FP-Schieberführung-Schieber-01-K01")Gesamtlänge des STRINGs erhalte ich so: (length *GESAMTSTRING*)= funktioniert schondiesen möchte ich zerlegen in seine Einzelteile wie folgt:"P236" = immer die ersten 4 Zeichen = erhalte ich durch (subseq *GESAMTSTRING* 0 4) = fun ...
|
| In das Form PTC Creo Elements/Programmierung wechseln |
|
AutoLisp : Lisp zeitlich limitieren?
Langenhorst am 29.03.2006 um 19:10 Uhr (0)
Hallo nano,wenn jemand nur genügend Kenntnisse und Energie hat, wird er einen Weg finden, jeden Schutz auszuschalten. Aber ob sich so jemand überhaupt ein Programm kaufen wollte, wage ich zu bezweifeln. Denn mit manchen Fähigkeiten könnte er dieses doch auch selbst erstellen.Was die Zurückstellung des Systemdatums angeht und den Aufwand mal beiseite gelassen: Du kannst die Zeitabfrage auch etwas komplizierter gestalten, indem du nicht nur das aktuelle Systemdatum ausliest, sondern evtl. auch noch die Zeit ...
|
| In das Form AutoLisp wechseln |
|
OneSpace Modeling : Explode Darstellung / Eine Ebene
Extruder am 25.04.2008 um 09:28 Uhr (0)
Hallo Zusammen,aus aktuellem Anlass:Die "Ex-Darstellung" aus der Werkzeugkiste zerlegt ja immer die komplette Baugruppe.Ich suche soetwas wie einen Schalter "Eine Ebene" damit mir nur die direkt unter der ausgewählten BG liegenden BG und Teile "explodiert" werden.Oder gibt es eine Andere Möglichkeit zu verhindern das durch diesen Befehl BG komplett zerlegt werden?Ich würde nämlich gerne für eine Dokumentation/Ersatzteilliste eine Ex-Darstellung (als Formation) machen.Leider zerlegt mir der Befehl auch jede ...
|
| In das Form OneSpace Modeling wechseln |
|
CoCreate Modeling : Splines in Annotation hervorheben
Walter Geppert am 14.03.2009 um 17:52 Uhr (0)
Zitat:Original erstellt von highway45:Hi Walter Es reicht doch eigentlich auch nur[i](oli::sd-execute-annotator-command :cmd "show select global splines all add global bsplines all confirm red")auf einen Button zu legen ?Angezeigt werden dann alle Splines in rot, aber die Geometrie-Eigenschaften bleiben erhalten, also weiß zu Beispiel, selbst beim Speichern. Und wenn man eine andere Zeichnung lädt, ist die Anzeige wieder normal. Sogar aktualisieren macht alle Linien wieder normal.Hab ich das rich ...
|
| In das Form CoCreate Modeling wechseln |
