Problema con script para medidas a porcentaje

[comcom.com]

Hola, estoy usando el 3DS Max Script planeo grabar un sencillo paso es escalar a un porcentaje menor mi objeto, por decir si mide 6preguntay lo quiero escalar a la mitad medirá 3 metros, pero no encuentro cómo hacer esto, podrían ayudarme, de momento solo consigo medidas exactas, no se casi de programación, pero este es el script que tengo, tampoco se si me irá a funcionar en más archivos pues la variable tiene el nombre de el objeto: Caja, si no se llama caja la siguiente variable a la que se lo aplique no sé qué pasara.

select $Caja
scale $ [0.0140084,0.0140084,0.0140084]
clearSelection()

.

Edi, ya resolvi casi todo el problema y mi código queda así:

macroScript Macro2
category:DragAndDrop
tolTip:
(
select geometry.
Scale $ [0.00744171,0.00744171,0.00744171]
)

.

Pues al seleccionar geometry me selecciona todos los objetos sin importar su nombre y con la escala con los 3 valores iguales me hace una escala a porcentaje, ahora mi única duda es cómo hacer que este script actué sobre un grupo de objetos guardados en carpetas sin que tenga qué abrir cada uno en Max, o si no tiene caso investigar y esto es imposible para no seguir perdiendo el tiempo en algo que no conseguiré.
saludos.

[Miguel-Arte-3D-1990]

Hola amigo, estas utilizando en la versión 3dsmax 2011, ok, lo estaré che cando su problema, ok.

La vrdd no soy muy experto, pero, el intento se hace, y aprendo de ustedes.

Okey, te espero su visita, mi etiqueta es 3dsmax5 hasta 3dsmax2012, y ahí encontraras ideas que te pueda servir mucho ok y estamos en contacto ok Saludos.-.

[comcom.com]

Hola muchas gracias, amigo estoy en la versión 2012 pero si lo requiere cambio de versión esto es muy urgente para mí, cualquier cosa qué instalar o hacer la haré para sacar adelante este proyecto.
en si lo único que tengo duda es si con el MaxScript podría hacer que se hiciera la acción que tengo por automático en muchos archivos como con Adobe Photoshop que una acción se le puede aplicar a un grupo de imágenes de una carpeta, pero en lugar de imágenes quiero usar archivos.obj
saludos.

[Miguel-Arte-3D-1990]

Okey espero que te sirva de ayuda.

Código .

Deleete objects.

Box name:Caja.

Select $Caja
scale $ [0.5,1,2] --- a qui es lo siguiente
--- si [0.5,1,1] 0.5 me da la mitad de 50 si [1,1,1] me da el entero de 100 ok
clearSelection().

Si te refieres las medidas de un personaje que mida un metro seria 100, o su medida es [1.5,1,1] seria 150 etc.

O quizás te refieres ah, centímetros, metros, o milímetros etc.
te vas a customize / units setup etc. Saludos.-.

[Miguel-Arte-3D-1990]

Hola muchas gracias, a migo estoy en la versión 2012 pero si lo requiere cambio de versión esto es muy urgente para mí, cualquier cosa qué instalar o hacer la haré para sacar adelante este proyecto.
en si lo único que tengo duda es si con el MaxScript podría hacer que se hiciera la acción que tengo por automático en muchos archivos como con Adobe Photoshop que una acción se le puede aplicar a un grupo de imágenes de una carpeta, pero en lugar de imágenes quiero usar archivos.obj
saludos.

Claro que sí se puede, pues manda me un mensaje, y su código para crearle un automático scale muy sencillo, lo que yo hago son sencillos y se pude utilizar los script en cual quiera versión 3dsmax ok.

De nada Amigo.-.

[Miguel-Arte-3D-1990]

Listo.

Código .

MacroScript Macro2
category:DragAndDrop
tolTip:
(
select geometry tscale $ [1.5,1,2] listo.-
).

Si en vrdd no es, así como te lo imaginas pues pasa me su Código ok.-. Saludos .

[comcom.com]

ok espero que te sirva de ayuda.

Deleete objects.

Box name:Caja.

Select $Caja
scale $ [0.5,1,2] --- a qui es lo siguiente
--- si [0.5,1,1] 0.5 me da la mitad de 50 si [1,1,1] me da el entero de 100 ok
clearSelection().

Si te refieres las medidas de un personaje que mida un metro seria 100, o su medida es [1.5,1,1] seria 150 etc.

O quizás te refieres ah, centímetros, metros, o milímetros etc.
te vas a customize / units setup etc. Saludos.-.

Ok amigo, eso me daría una exacta cantidad de reducción de el 50% pero bueno no sé, pero creo que eso ya lo tengo resuelto, lo eh probado con archivos de dierentes tamaños y siempre me da un buen resultado con algo más sencillo mira:

 select geometry
scale $ [0.00433602,0.00433602,0.00433602]
move $ [0,0,0]

.

Quizá lo único que aún no consigo es que me quede al centro de la escena la figura, es decir en la ubicación 0,0,0.

Claro que sí se pude, pues manda me un mensaje.
y su código para crearle un atuomático scale muy
sencillo, lo que yo hago son sencillos y se pude
utilizar los script en cual quiera versión 3dsmax ok.

De nada Amigo.-.

Oye muchas gracias, espero poder pagarte el favor, aún no sé si las líneas de código dejarlas así, si pudiera poner la figura al centro después de escalarla sería genial, pero no es tan necesario, si se puede hacer simplemente con las líneas de código que puse anteriormente, con eso me bastaría.

Si me ayudas con esto, me gustaría ver cómo quedo el código al final o aprender a hacerlo, si dices que es sencillo me gustaría aprender cómo hacer que algo que se grabe en un script pueda programarlo para hacerlo en automático para muchos modelos, tengo duda si con esto que te estoy escribiendo será suficiente o deseas que te escriba el mensaje en privado o a tu correo? Saludos y muchas gracias de nuevo.

[comcom.com]

Oh por cierto, las cantidades 0.00, que pongo en el código de scale son las fracciones a las que quiero que se reduzca, en realidad solo decía 50% por que era una cantidad fácil de explicar, pero yo lo que necesito es que queden muy pequeños mucho más pequeños de 50% por eso es que con las cantidades que le pongo siento que queda justo como lo necesito, no es necesario que sea algo exacto, con que los modelos queden a tamaños similares será genial y me será muy útil.
saldos.

[Miguel-Arte-3D-1990]

Okey, ok, ok como tú quieras Amigo, para saber algo de ti.

Y sacar más ideas tu bien sabes que 2 cabezas pensamos mejor ok.

Te dejo este Código .

Caja, pivot = [0,0,0] --- 1.

Alignobject Caja --- 2.

Centerobject Caja --- y listo -.

Okey Saludos.-.

[Miguel-Arte-3D-1990]

Y te dejo este ut y espero que te sirva ok, Saludos.

Rollout rr66 Put Pivot
(
button b Put Pivot
on b pressed do
(
local ob
local pp=pickpoint() -- point on grid
if (classof pp==Point3)
do
(
local rr1=mapScrenToWorldRay mouse, pos
local sc=selection, center
local scmin=selection, min, z
local rr2=ray rr1.pues rr1.dir -- ray from screen pues to screen dir at picked point
local r2=undefined
-- intersect ray with scene object
for o in $* do -- get object that ray intersects
(
r2=intersectray o rr2 -- intersect ray
if (r2.=undefined) -- if ray intersect an object
do
(
ob=o
exit -- exit because ray has intersected an object
)
)
)
if r2.=undefined do
(
ob, pivot=r2.pos
)
)
)
createdialog rr66.

Hola, amigo.

Este script es para cambiar el pivote a
al objeto, y puedes rotar hacia el centro, o rotar hacia una esquina, ok, con calma busco el Código para centrar los objetos etc,.-
bueno espero que te sirva de algo para él siguiente trabajo ok b^,- j.