|
Lisp : Gaudi-Lisp
CADchup am 19.06.2008 um 09:06 Uhr (1)
Hi,auch schön sinnfrei:Code:(defun C:Kringels (/ lstGRREAD1 lstGRREAD2) (command "_undo" "_m") (while (setq lstGRREAD1 (grread T) lstGRREAD2 (grread T) ) (while (equal lstGRREAD1 lstGRREAD2) (setq lstGRREAD2 (grread T)) ) (if (= 5 (car lstGRREAD1) (car lstGRREAD2)) (entmake (list (cons 0 "CIRCLE") (cons 100 "AcDbEntity") (cons 100 "AcDbCircle") (cons 10 (cadr lstGRREAD1)) (cons 40 (distance (cadr lstGRREAD1) (cadr lstGRREAD2))) ) ) ) ) (princ))GrußCAD ...
|
| In das Form Lisp wechseln |
|
Lisp : Gaudi-Lisp
Entsorger01 am 19.06.2008 um 09:08 Uhr (1)
Zitat:Original erstellt von CADmium:einfach ausprobieren :D Für gewöhnlich werd ich stutzig, wenn obiges da steht. Und meine eigenen Lisp-Kenntnisse sind zu gering, um zu ersehen, was da dann abläuft.Also lass ich mal lieber die Finger davon ------------------GrußMichi"Personalführung ist die Kunst, die Mitarbeiter so schnell über den Tisch zu ziehen,dass sie die Reibungshitze als Nestwärme empfinden."
|
| In das Form Lisp wechseln |
|
Lisp : Gaudi-Lisp
CADmium am 19.06.2008 um 09:09 Uhr (1)
@cadchup: wenigstens setzte ein Undo .. hätte nicht was mit grdraw gereicht? ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Lisp wechseln |
|
Lisp : Gaudi-Lisp
CADmium am 19.06.2008 um 09:11 Uhr (1)
Zitat:Original erstellt von Entsorger01: Für gewöhnlich werd ich stutzig, wenn obiges da steht. Und meine eigenen Lisp-Kenntnisse sind zu gering, um zu ersehen, was da dann abläuft.Also lass ich mal lieber die Finger davon ;) Mann seid ihr feige ... so ein paar Zeilen .. ist nix Schlimmes .. ne "vlx" ist wohl vertrauenswürdiger? Zur Not verteil ich die Auflösung per PM ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der L ...
|
| In das Form Lisp wechseln |
swars.zip |
Lisp : Gaudi-Lisp
CADwiesel am 19.06.2008 um 10:14 Uhr (1)
Hier mal eine Slot Machine und ein Star War------------------Gruß CADwieselBesucht uns im CHAT
|
| In das Form Lisp wechseln |
|
Lisp : Ansichtsfenster Farbe und Linienart überschreiben
manndaten am 02.08.2008 um 16:48 Uhr (0)
Hallo Forum,ich möchte in einem Layout über Lisp sowohl die AF Farbe als auch den AF Linientyp ändern.Kann mir da jemand einen Tipp geben?------------------Grüßle aus KarlsruheArmin
|
| In das Form Lisp wechseln |
|
Lisp : Hilfe beim Rauschschreiben !!!
Andreas Kraus am 05.08.2008 um 11:30 Uhr (0)
Jetzt lob mich mal nicht zuviel, ich heb ja noch ab kurze Codeerklärung:Ich hole mir die Liste der Elementdaten eines angeklickten Objekts.Da ist aber noch keine Prüfung dabei ob das eine Polylinie ist(entget (car (entsel)))Die Liste speichere ich NICHT in einer Variablen, sondern verarbeite sie gleich weiter.Ich brauch ja nur die Stützpunkte, also alles was den Gruppencode 10 hat.vl-remove-if-not kann bestimmte Elemente aus einer Liste entfernen, man braucht nur zu sagen welche. Also entferne ich "alle E ...
|
| In das Form Lisp wechseln |
|
Lisp : Signaturen auf/in Bögen
Geos am 06.08.2008 um 15:30 Uhr (0)
Grüß EuchZwischen gebogene "Linien" - in der Regel ausgerundete PLINEs oder ARCs - sollen Signaturen gezeichnet werden.Im Beispiel (Bild) handelt es sich um eine ausgerundete PLINE, die Symbole (Blöcke) wurden mit _MEASURE eingefügt.Das zu proggen wäre auch kein Problem. Jetzt soll das Ganze aber noch behübscht werden - sprich die INSERTs gesprengt und die einzelnen Linien auf die Begrenzungslinien (blau) gedehnt / gestutzt werden.Seht Ihr da Lösungsmöglichkeiten (in LISP )?Bin auch für halbe Lösungen/Ans ...
|
| In das Form Lisp wechseln |
|
Lisp : Pause (2sec) in LispCode einfügen
THE_ONE am 07.08.2008 um 15:20 Uhr (0)
Hallo!Hat Lisp einen Pause Befehl oder gibt es sonst irgendwelche Möglichkeiten um Lispcode zu pausieren für eine bestimmte Zeit? LG THE_ONE ps.: Busy wait wäre wahrscheinlich eine Möglichkeit, aber da brauche ich wahrscheinlich 4 verschachtelte Schleifen , also ned ganz des optimale, noch dazu tue ich mir da schwer mit der Festlegung der Zeit.
|
| In das Form Lisp wechseln |
|
Lisp : Repeat hilfe!!!
wronzky am 08.08.2008 um 13:04 Uhr (0)
Hi,also letztes zuerst:geb mal _vlide in autocad ein (oder Menü Extras - AutoLisp - Visual Lisp Editor)und die ESC-Taste kannst Du nicht (so einfach) abfangen. Da ESC den Befehl normalerweise abbricht, müstest Du Dich mit Errorhandling auseinandersetzen...Mein Tipp: Lass es fürs erste.Grüsse, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : Repeat hilfe!!!
FiRePhoeniX am 08.08.2008 um 13:18 Uhr (0)
Ok, ich lasse es erst mal.Danke aber wegen der Console.Wusste nicht davon bin noch anfänger in Lisp.Kann geschlossen werden.FirePhoenix
|
| In das Form Lisp wechseln |
|
Lisp : Pause (2sec) in LispCode einfügen
fuchsi am 27.08.2008 um 09:08 Uhr (0)
Ich habe in einem der hier bereits verlinkten Threads bereits mal nachgefragt.Wofür benötigt man eine 2sek-Pause in Lisp ?
|
| In das Form Lisp wechseln |
|
Lisp : Objektwahl durch Punktangabe
Erich Klein am 12.08.2008 um 21:39 Uhr (0)
Hallo Heiko,Es ist so, dass die Linie oder der Bogen mein letztes Objekt ist. Deine Tipps waren goldrichtig. Ich habe aber trotzdem hiermit noch ein kleines Problem. Mit den beiden Tipps, die Du mir gegeben hast, wird das BKS an den Anfangspunkt des Elementes gesetzt. Es kommt in meinem Programm aber vor, dass ich das BKS aus der Lisp-Routine heraus an den Endpunkt z. B. des Bogens setzen muss. Hast Du vielleicht noch einen weiteren Tipp für mich?MfGErich
|
| In das Form Lisp wechseln |
