Fügen Sie einen Block von lisp erstellt

[Cristallo]

Sie können den Namen des Blocks zu einem Zeitpunkt ändern, vielleicht durch Eingabe einer Typsteuerung

(setq suf (+ 1 suf))
so dass bei jeder Ausführung der Wert von suf zunimmt
dann den Wert in einen String transformieren
(setq suftxt (rtos suf 2 0))
und alles im Blocknamen verketten
(setq head (strcat "head" suftxt))

Natürlich wird die Schaffung des Blocks(Befehl "-block" testa "0,0" lista "")

 

[abelli12]

OK; ich werde versuchen, diesem Weg zu folgen.
Vielen Dank.