04-19-2018
02:07 PM
- Marcar como nuevo
- Favorito
- Suscribir
- Silenciar
- Suscribirse a un feed RSS
- Resaltar
- Imprimir
- Denunciar
04-19-2018
02:07 PM
It sounds like you only want to do three things:
- change the scale factor to 1,
- change the dimension scale to what the scale factor was, and then
- scale the drawing in model space to what the scale factor was.
I am not sure what you mean by item #1. Was the drawing not created in model space to full size? How would you go about determining the scale factor?
#2 can be change with the dimscale command
#3 is done with the scale command.
I'm no vlisp whiz but it sounds like following vlisp program might do much of what you want. It prompts the user for what the scale factor was. This could be changed to get the scale factor if you identify where that is stored. It then changes dimscale to that value and thaws and turns on all layer before scaling everything by 1/s.
(defun c:fixit (/) (setq s (getreal "\nEnter what the scale factor was:")) ; do something to adjust scale factor (command "dimscale" s) (command "-layer" "t" "*" "on" "*" "") (command "scale" "all" "" "0,0,0" (/ 1 s)) )
lee.minardi