090418 – back to basics – attractors in maxscript

abril 18, 2009

13

Here is one  simple script written in max script.

14

— create an empy array named a

a=#()

— the force (attractor)
ori= $atr.pos

–iteration loop
for i = 1 to 12 do (
a[i]=#()
for j = 1 to 12 do (
a[i][j]=#()

for k = 1 to 12 do (

— create the boxes

a[i][j][k]=box pos:[i,j,k] width:1 length:1 height:1
)
)
)

— function that returns the distance from each box to the force
fn dist ori caja =(
distance ori caja
)

— iteration loop for function of distance

for i= 1 to 12 do (
d[i]=#()
for j= 1 to 12 do (
d[i][j]=#()
for k = 1 to 12 do (
d[i][j][k]= dist ori a[i][j][k].pos
)
)
)

–transformation loop

for i= 1 to 12 do (
for j = 1 to 12 do (
for k = 1 to 12 do (
a[i][j][k].scale = [d[i][j][k]/10,d[i][j][k]/10,d[i][j][k]/10]
a[i][j][k].wirecolor = [0,0,0]
a[i][j][k].wirecolor = [d[i][j][k]*2,d[i][j][k]*8,d[i][j][k]*12]
)
)
)

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: