090418 – back to basics 2 – Multi Attractors in Maxscript

abril 18, 2009

multi03

the last script, now working with multiple inputs.

f=$ as array
n= f.count

fn dist caja =(
d=#()
for q=1 to n do (
append d (distance caja f[q])
)
s=amin d
)

for i = 1 to 10 do (
a[i]=#()
for j = 1 to 10 do (
a[i][j]=#()
for k = 1 to 10 do (
a[i][j][k]=box pos:[i,j,k] width:.8 length:.8 height:.8
dist a[i][j][k]
a[i][j][k].scale = [s/10,s/10,s/10]
a[i][j][k].wirecolor = [255,0,(s*10)]
)
)
)

Anuncios

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s

A %d blogueros les gusta esto: