Rad mit Referenz und Kopie

[jim78b]

Ich habe diese Lippe, die sich mit Bezug dreht

(defun c:rt (/ Kran)
(Setq Kran)

(wenn Kran)
(Progn)
(Befehl "_rotate" Kran)
(princ "\nbase Punkt und erster Eckpunkt: "
(Befehlspausen)
(Befehl (getvar "lastpoint")
(princ "\nsecond corner point): "
(Befehlspausen)
(princ "\nangolo ende: "
(Befehlspausen)
)
)

(princ)
)



aber würde ich Sie brauchen, um mit Bezug zu drehen und dann kopieren, wie sollte ich es ändern?

Danke.

 

[confutatis]

Warum verwenden Sie nicht den Mocoro Befehl der Express-Tools? Tun Sie es, bevor...

 

[jim78b]

Hallo, ich versuche es, aber wenn ich rotiere, ist es wie normales Rad! sagt mir nicht, den Grundpunkt der Rotation zu geben, oder vielmehr die Achse

 

[confutatis]

Wenn Sie die Auswahl von Objekten machen, bitten Sie, den Grundpunkt auszuwählen, nach dieser Operation werden Sie einige Optionen vorschlagen:[Move/Copy/Rotate/Scale/Base/Undo]<exit>:
Weitere Informationen finden Sie in der Mocoro-Sprache die Hilfe der Express-Tools.
Alternativ kann die Kommandozeile sein.</exit>

 

[jim78b]

aber dann fragt es mich nicht einen weiteren Bezugspunkt auf der Achse zur Rotation. Ich benutze den Deckel nicht und dann kopieren

 

[confutatis]

Dann sollte es so etwas sein. .

(defun c:rtc (/ Kran)
(Setq Kran)

(wenn Kran)
(Progn)
(Befehl "_copy" Kran "" (Liste 0)(Liste 0 0))
(Befehl "_rotate" "_p"")
(princ "\nbase Punkt und erster Eckpunkt: "
(Befehlspausen)
(Befehl (getvar "lastpoint")
(princ "\nsecond corner point): "
(Befehlspausen)
(princ "\nangolo ende: "
(Befehlspausen)
)
)

(princ)
)

 

[jim78b]

Danke, dass Sie beweisen, dass ich ein paar Tage weg bin

 

[jim78b]

ok funktioniert vielen Dank!