|
AutoLisp : copy, rotate ,move
RoyCAD am 04.02.2005 um 08:50 Uhr (0)
Verschieben und drehen solle aber alle Objekte !!!!!!!!!!!
|
| In das Form AutoLisp wechseln |
|
AutoLisp : 2 ode 3 letzte Elemente
RoyCAD am 26.01.2005 um 16:06 Uhr (0)
Hallo Ich will zwei oder drei letzt gezeichnete Elemente verschieben, drehen, und kopieren. Jedoch es ist mir noch nicht klar wie soll ich das definieren. Wenn ich will nur das letzte Element kopiren, drehen, verschieben dann geht es so: ---------------------------------------------------------------------- (command _pline pr1u schrpow6 schrpow6 sp4 sp4 pt11 pt10 _a _r 48.3 pr1u ) (command _.copy (ENTLAST) (cdr(assoc 10 (entget (ENTLAST)))) pause _rotate (ENTLAST) ptm 165.0 _.mo ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : copy, rotate ,move
RoyCAD am 03.02.2005 um 16:12 Uhr (0)
Um genauer zu sein das kopierte Element soll sich noch drehen und verschieben. Leider dreht sich nur ein Teil (plinie) der Rest (arc kreis text ) bleibt nach kopieren so wie es war.
|
| In das Form AutoLisp wechseln |
|
AutoLisp : copy, rotate ,move
RoyCAD am 03.02.2005 um 16:19 Uhr (0)
Klammer vorm command vergessen. ptm nicht definiert? ............................................ Die Klammer ist da und ptm habe ich auch definiert aber so wie gesagt das Element, das kopiert wurde ist ein neues Objekt und dem will ich noch drehen und verschieben. Gruß Roy
|
| In das Form AutoLisp wechseln |
|
AutoLisp : copy, rotate ,move
RoyCAD am 03.02.2005 um 12:25 Uhr (0)
Weiterentwicklung das Problem liegt daran, das 4 Objekte habe und will ich kopieren drehen und so weiter aber wenn meht als ein Objekt auf der liste steht kann ich nicht mit ENTGET rein und ich will das er mir alle sich kopieren drehen und verschieben . (command kreis numpower 9.0 ) (setq obj-lst (cons (entlast) obj-lst)) (command _text einf_t1 8.0 -30.0 1) (setq obj-lst (cons (entlast) obj-lst)) (command _arc cncbog2 e cncbog1 r 48.30) (setq obj-lst (cons (entlast) obj-lst)) (com ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : copy, rotate ,move
RoyCAD am 03.02.2005 um 10:02 Uhr (0)
Hallo Ich habe ein kleines Problem es geht um drei Objekte, die will ich gleichzeitig kopieren, drehen und verschieben. Kann mir jemand sagen was ich falsch gemacht habe? (command kreis numpower 9.0 ) (setq OBJ1 (entlast)) (setq ss (ssadd)) (command _text einf_t1 8.0 -30.0 1) (setq OBJ2 (entlast)) (setq ss (ssadd)) (command _arc cncbog2 e cncbog1 r 48.30) (setq OBJ3 (entlast)) (setq ss (ssadd)) (command _pline pt6 pt7 pt7 ptpower pts _a _r 48.3 pt6 ) (setq OBJ4 (entlas ...
|
| In das Form AutoLisp wechseln |