Lisp für Spalten mit Blöcken

[lattu]

Ich benutze oft Punkt-Divid-Funktion mit Blöcken und in bestimmten Projekten wird es wirklich eine repetitive Arbeit bis zum Ende.
Ist es möglich, einen Deckel zu haben, der diese Operationen zumindest teilweise automatisiert und die Berechnungen vereinfacht?
Ich dachte an einen Befehl, der Linien, Bögen, Polylinese und Polylinee 3d verwaltet; einmal ausgewählt, fragt das Objekt direkt den Namen des Blocks und anstatt es zu sagen, wie viele Punkte in den Wert der Kreuzung eingeben und mit einer Reihe von Annahmen berechnet es automatisch die Divisionen. Ein Fenster ist vielleicht in Ordnung.

Ich mache ein Beispiel:
Blockname: Pol
Polylinea Länge zu teilen: 2158,7523
zwischen den Blöcken: 150
14,39 Unterteilungen auf 14 gerundet werden
die lisp fügt mir den Block "palo" mit 14 Unterteilungen

Danke.

ps: wenn es zu viel Arbeit ist, wie nicht gesagt!

 

[GP.]

schnell geschrieben, sehen, ob es funktioniert..

 

[lattu]

Tut mir leid, dass ich nicht zuerst geantwortet habe. Es scheint so perfekt zu sein. Wenn es etwas gibt, sage ich es Ihnen. Vielen Dank!
Übrigens bemerkte ich, dass Sie die automatische Ausrichtung des Blocks eingefügt haben, Sie sind großartig!

 

[lattu]

Können Sie das "Problem" umgehen, das Sie mit dem Einfügen von Blöcken auf gekippten Ebenen als Beispiel anhängen?

 

[GP.]

Bypassato...

 

[lattu]

Wirklich? Heute Abend versuche ich es.

 

[lattu]

Ich konnte jetzt nur überprüfen. Ich schulde Ihnen ein paar Bier.

 

[lattu]

Hi, ich fand einen kleinen Fehler: Wenn ich einen Block habe, der einen Namen hat, der aus zwei oder mehr Wörtern besteht, funktioniert der Deckel nicht perfekt, das ist die Leertaste nimmt es als Sendebefehl.
Kannst du es reparieren?

 

[GP.]

Geben Sie t in dieser Position im Code:
(setq nb) t (strcat "\nnome del bloc" (if nb (strcat " <" nb ">: ")): "))

 

[lattu]

Hallo, andere Korrektur auf der lisp div getan werden, d.h. wenn ich schlecht tippe, verdau mich der Name eines Blocks, indem ich den Befehl ohne etwas zu tun und ohne Fehler hervorzuheben, wie kann ich es beheben?
Ich ändere die neueste Version

 

[GP.]

...

 

[lattu]

Vielen Dank.