|
Lisp : Code für AutoCAD-Gruppen...
Dorfy am 05.03.2010 um 10:01 Uhr (0)
Hi,ich verweise mal aufUser FAQ oder/undFAQ: Arbeitsbereich (Workspace)oder aufs RuA-Brett dort ist die Frage imho besser aufgehoben.------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Lisp wechseln |
|
Lisp : Listen vergleichen
Dorfy am 11.03.2010 um 12:36 Uhr (0)
Zitat:Original erstellt von Andreas Kraus:...Ich habe zwei Listen mit den Objektdaten die man mit entget bekommt.Brauchen tu ich:Welches Element ist in Liste1 und NICHT in Liste2Welches Element ist in Liste2 und NICHT in Liste1Welches Element ist in Liste1 und VERÄNDERT in Liste2...ist bei über 30000 Elementen recht langsam.Hat jemand ne Idee wie ich eine solche Auswertung schneller machen kann ?30000 "Elemente" in der List die du mit entget erstellt hast?oder 30000 Objekte/Listen die miteinander/mit eine ...
|
| In das Form Lisp wechseln |
|
Lisp : Listen vergleichen
Dorfy am 11.03.2010 um 13:40 Uhr (0)
hi,reactor -Einsatz wäre mein erster gedanke...Edit: siehe Database reactor events ------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)[Diese Nachricht wurde von Dorfy am 11. Mrz. 2010 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Lisp über script starten
Dorfy am 11.03.2010 um 14:13 Uhr (0)
Zitat:Original erstellt von steppe2000:... aber kann ich den Dialog auch umgehen... Hi,ob du das kannst, kann und will ich nicht beurteilen aber machbar ist es sicherlich.Nur ohne Routine/Code sieht es schlecht aus... wende dich an den Ersteller wenn der Code nicht von dir ist Was sind denn das für Rückgabewerte? (Layer, Bemstil...)------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-le ...
|
| In das Form Lisp wechseln |
|
Lisp : Listen vergleichen
Dorfy am 11.03.2010 um 14:52 Uhr (0)
Zitat:Original erstellt von Andreas Kraus:Allerdings ist das schon Fummelei ....Hmmm...so richtig glücklich bin ich damit noch nicht, aber wenns schneller geht ... mal probiern.Ein wenig Bastelarbeit wird es schon werden, so oder so...siehe Beitrag von Tom - mit der Variante Vorher-Nachher-Vergleich, ist der Aufwand enorm.Und so brauchst du nur wenige Listen (drei ggf. vier Gesamtprotokoll)beim neu/ändern/löschen je nach Vorgang prüfen und ändern.------------------Mfg HeikoElefantenjagd in Afrika "... LIS ...
|
| In das Form Lisp wechseln |
|
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 |
|
Lisp : Grösste Kote
Dorfy am 17.03.2010 um 09:17 Uhr (0)
beim IE8 Haken bei Extras Kompatibilitätsansicht rein------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Lisp wechseln |
|
Lisp : Ausnahmebedingung bei GC 102 + 103 ???
Dorfy am 19.03.2010 um 10:11 Uhr (0)
hi,kann es im 07 nachvollziehen das hilft aber nicht weiter------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Lisp wechseln |
|
Lisp : Zahl (en) in einem Textstring herausfinden
Dorfy am 24.03.2010 um 11:45 Uhr (0)
Bin zwar nicht Andreas...aber probier mal in der Sub "mk_substr_list"(= (setq start (+ (nth...------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Lisp wechseln |
|
Lisp : Blöcke - einheitliche Skalierung
Dorfy am 23.03.2010 um 12:15 Uhr (0)
Hi,Blöcke und Blockdefinition siehe Beitrag oben von CADmiumBlöcke - FAQmit entsel kommst du nicht an die Definition------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Lisp wechseln |
|
Lisp : Probleme mit _Trim
Dorfy am 24.03.2010 um 10:40 Uhr (0)
Zitat:Original erstellt von GG-GREGOR:...leider bleiben immer einige linien stehn ? kennt einer eine saubere lösung ?Hi, ich weiß zwar nicht wie die Linien und der Quader genau aussehen, wie oft der Quader von der Linie geschnitten wird (1x oder 2x ...) aber hier könnte das Problem schon liegen.Händisch mit Zaun nachvollziehbar - wird die Linie an einem Ende getrimmt das andere bleibt unberücksichtigt - probier mal zwei oder mehr Durchläufe.------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Prog ...
|
| In das Form Lisp wechseln |
|
Lisp : Probleme mit _Trim
Dorfy am 24.03.2010 um 10:51 Uhr (0)
hmm Punktfänge und Co. mal verändert?snapmode, osnapcoord...Lad mal ein Beispiel hoch.Edit: probier mal rausgezoomt das ganze------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)[Diese Nachricht wurde von Dorfy am 24. Mrz. 2010 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Verzeichnis erstellen ergibt immer NIL
Dorfy am 02.04.2010 um 10:50 Uhr (0)
Morgen,Code:(defun mkdir (dirname / pos mddir) (if (and (setq pos (vl-string-position 92 dirname)) (setq mddir (substr dirname 1 pos)) ) (while pos (setq pos (vl-string-position 92 dirname (+ pos 1)) mddir (substr dirname 1 pos) ) (if (not (vl-directory-files mddir)) (vl-mkdir mddir) ) ) ))(mkdir "C: est est1 est2")(mkdir deinstring )ein paar Abfragen und Rückmeldungen fehlen noch...------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern ...
|
| In das Form Lisp wechseln |
