|
Lisp : (= Abfrage) komisches Ergebnis
kist am 19.07.2011 um 08:05 Uhr (0)
Zitat:Original erstellt von CADwiesel:wenn du anstelle von = auch nochmal equal versuchen könntest... manchmal hilftsbei einer Abfrage mit nur equal (ohne fuzz-Wert) ist das Ergebnis ebenfalls "NIL"------------------schöne Grüsse
|
| In das Form Lisp wechseln |
|
Lisp : Bemmasung ein / aus blenden
cadffm am 28.07.2011 um 11:22 Uhr (0)
Also da die sichtbarkeit in AutoCAD eigentlich über Layer gesteuert wird und dieVerwendung von Bemaßungstilen layerunabhängig erfolgt geht das nicht, wenn dann nur perZufall wenn die Struktur dementsprechend ist (BemStil1=Layer1).Bem.wählenLayer ermittelnLayer frierenDavon unabhängig gibt es noch eine andere Möglichkeit des ein- und ausblendens welcheich jedoch nicht weiter unterstütze (gc60 - siehe auch noshow von CADwiesel).Bem. wählenStil ermittelnZeichnung durchlaufen und bei jedem Objekt auf dem BemSt ...
|
| In das Form Lisp wechseln |
|
Lisp : Systemeinstellungen
bu am 08.08.2011 um 15:00 Uhr (0)
Hallo CADwiesel,das war mir schon fast klar, dass das geht. Ich gebe zu zu, die Frage hatte auch einen rethorischen Tatsch. Die Frage die bleibt ist das wie. Wie komme ich an entsprechende Variablen bzw. wie kriege ich die mit geänderten Werten wieder rein. Ich kann schon so einigermaßen Lisp, viele werden sich mit Grauen an meine Fragen von früher erinnern, nur eben beim ActivX steig ich aus. Sollte die Frage aber zu direkt und konkret sein, ziehe ich diese gerne zurück.------------------Gruss bu
|
| In das Form Lisp wechseln |
|
Lisp : Alle Stützpunkte eine Polylinie verändern?
snoopyonline am 07.10.2011 um 14:13 Uhr (0)
Hallo Lispler,ich bin nicht gerade die größte Leuchte, was die Lisp Programmierung angeht. Daher ist es mir auch nur "gerade so" gelungen, eine im WWW (z.B. bei Cadwiesel.de) vorhandene "smash.lsp" die eigentlich zum "Plätten" von Zeichnungsobjekten dient, so zu verbiegen, dass bei Linien etc. die Koordinaten der Start- und Endpunkte nicht nur auf Z=0 gesetzt werden sondern auch deren X- und Y-Werte "gerundet" werden um vorhandene Zeichenungenauigkeiten zu korrigieren.Das Script funktioniert soweit auch ei ...
|
| In das Form Lisp wechseln |
|
Lisp : script zur Bereinigung von Export DXF/DWG
cadffm am 18.10.2011 um 11:43 Uhr (0)
Zu deiner Anleitung im Anhang:"Export in ACAD 2007" = Vorarbeit"Zeichnung in ACAD 2012 öffnen" = Das macht man 1x und lässt dann ein Batchprogramm laufenwelches nacheinander die ausgewählten Dateien durchläuft: öffnen, abarbeitet, schließen. *SCRIPTPRO von AutoDesk (ist super, nur leider durch ungewöhnliche Arbeitsweise sehr langsam) *SCC2 von CADwiesel.de, einfaches Lispprogramm welches im SDI-Modus ein Script pro Datei ausführt.und ab hier kann man ein Lisp/Script einsetzen:vorab zB. Befehl _.MODEL (um i ...
|
| In das Form Lisp wechseln |
|
Lisp : Open DCL: Stimmungsumfrage
joern bosse am 24.11.2011 um 12:04 Uhr (0)
@CADwiesel Zitat:@Björn die Bricscad Leute sind auch um einiges schneller und aufnahmefähiger als die Entwickler bei Adesk. Macht so langsam auch echt Spass damit zu arbeiten.Ich denke mal Du meinst mich und nicht Björn Ich bin der Meinung die BRICSCAD Leute waren schon von Anfang an so schnell, es scheinen eher die Autodesk Leute immer langsamer zu werden (eine normale Supportanfrage ist da manchmal echt ein K(r)ampf)------------------viele GrüßeJörnhttp://www.bosse-engineering.comStammtisch in Wolfsburg ...
|
| In das Form Lisp wechseln |
|
Lisp : Platzhalter in Attributen
sponk-mg am 08.12.2011 um 22:29 Uhr (0)
Besten Dank @ CADWiesel(defun attribloe (/ AWS INSERT INDEX ATTDATA wc) (if (setq AWS (ssget "_X" (list (0 . "INSERT")(66 . 1)))) (progn (setq INDEX -1) (repeat (sslength AWS) (setq INSERT(ssname AWS (setq INDEX (1+ INDEX)))) (setq ATTDATA(entget(entnext INSERT))) (setq wc(cdr(assoc 1 ATTDATA))) (while (and(=(cdr(assoc 0 ATTDATA)) "ATTRIB") (or (wcmatch (cdr(assoc 1 ATTDATA)) "VZ*") (wcmatch (cdr(assoc 1 ATTDATA)) "RVZ*"))) (entmod(subst(cons 1 "")(assoc 1 ATTDATA )ATTD ...
|
| In das Form Lisp wechseln |
|
Lisp : Plotten aller Layer (separat!) im akt. Layout mit akt. Seiteneinrichtung
CADwiesel am 04.05.2012 um 08:13 Uhr (0)
Schau dir mal auf Cadwiesel.de das Programm Ladoc an. Das kann sowas------------------Gruß CADwieselBesucht uns im CHAT
|
| In das Form Lisp wechseln |
|
Lisp : Plotten aller Layer (separat!) im akt. Layout mit akt. Seiteneinrichtung
EDVGeorge am 04.05.2012 um 12:30 Uhr (0)
Wie bekomm ich am sinnvollsten denn das "isolieren" der einzelnen Layer nacheinander hin. 1. Auslesen aller vorhandenen Layer - in eine Liste schreiben2a. Isolieren der in der Liste befindlichen objekte durch den Isolieren-Befehl, oder gibt es dort was "besseres"?(3. Plotbefehl absetzen - das bekomm ich glaub ich noch hin )---zum Auslesen könnte man sicherlich ähnlich verfahren wie hier?! Layerprinter.lsp von CADwiesel:(defun C:Layerprinter ( / C_LAY LYR_DATA LYR_NM LYR_THAWED? LYR_ON? LYRS ll MD_ZAEHLER ...
|
| In das Form Lisp wechseln |
|
Lisp : Steigung einer 3d-Linie anschreiben
mueller-spies am 06.09.2012 um 15:13 Uhr (0)
Hallo,ich bin auf der Suche nach einer Routine, die mir die Steigung einer Linie anzeigt. Ich habe bis jetzt nur Routinen gefunden, die mir die Steigung berechnet aus der x und y-Koordinate anzeigt. Ich benötige aber die Steigung aus der z-Koordinate (Höhe).Die Routine von CADWiesel habe ich gefunde, aber sie bringt mich nicht weiter.Gibt es eine solche Routine?GrußA. Müller-Wissmann
|
| In das Form Lisp wechseln |
|
Lisp : Steigung einer 3d-Linie anschreiben
mueller-spies am 07.09.2012 um 14:40 Uhr (0)
Hallo zusammen,erstmal danke für die Hilfe.Nun aber das nächste Problem.Ich habe die Routine in die Routine von CADwiesel eingefügt, aber sie läuft nicht richtig. Hier die geänderte Routine:; Lisp-Programm zum Absetzen eines Textes für %o-Angabe(defun c rozenthoehe ( / ech sli li proz sel el diff L P1 P2 X1 X2 Y1 Y2 Z1 Z2 S) (setq ech (getvar "CMDECHO")) (setvar "CMDECHO" 0) (princ "") (princ "Angabe über %-Neigung einer Linie") (princ "Wert durch Ersetzen eines vorhandenen Textes absetzen") (princ "von tg ...
|
| In das Form Lisp wechseln |
|
Lisp : Dateien overkill.lsp und overkillsup.lsp
Bernd10 am 10.10.2012 um 10:12 Uhr (0)
Hallo CADwiesel,danke für Deine Informationen.Zitat:Original erstellt von CADwiesel:Du hast sicherlich festgestellt, das die Dateien gar nicht mehr im Expressverzeichnis vorhanden sind. oder?Aber der Befehl ist immer noch verfügbar.Da könnte ich mir vorstellen, das die Overkill Dateien in Acad integriert wurden.Den Befehl Overkill habe ich inzwischen gefunden. Ich muss mir die Hilfe dazu aber noch genauer anschauen.Zitat:Original erstellt von CADwiesel:Vielleicht hilft es dir ja die Dateien aus deiner 2009 ...
|
| In das Form Lisp wechseln |
|
Lisp : Dateien overkill.lsp und overkillsup.lsp
CADwiesel am 10.10.2012 um 09:59 Uhr (0)
Du hast sicherlich festgestellt, das die Dateien gar nicht mehr im Expressverzeichnis vorhanden sind. oder?Aber der Befehl ist immer noch verfügbar.Da könnte ich mir vorstellen, das die Overkill Dateien in Acad integriert wurden.Vielleicht hilft es dir ja die Dateien aus deiner 2009er Version zu benutzen. Alternativ kannst du ja mal Doppelt von CADwiesel.de versuchen.------------------GrußCADwieselBesucht uns im CHAT
|
| In das Form Lisp wechseln |
