!leoni iterazione in cerchio

in=100

n=9 !numero di oggetti

r= 7 !raggio crf

al=180 !angolo arco

k=0 !angolo rotazione oggetto

pen 1

mul a*in/100,b*in/100,zzyzx*in/100

for i=0 to n-1

add r*cos(al/n*i),r*sin(al/n*i),0

rotz al/n*i+k

add ox,oy,0

DEFINE MATERIAL "ci" 2, !MATTE

.62+rnd(.38)-rnd(.30),.26+i*.1/n,.06+i*.2/n !RGB

DEFINE MATERIAL "pi" 2, !MATTE

.96-i*.2/n,.72,.36+rnd(.50)-rnd(.30) !RGB

DEFINE MATERIAL "k" 2, !MATTE

.2,.1,.1 !RGB

DEFINE MATERIAL "w" 2, !MATTE

1,1,.8 !RGB

X=4+rnd(2)-rnd(1.5)

X1=.4

X2=2.2+rnd(.6)-rnd(.4)

X3=1.5+rnd(.3)-rnd(.5)

X4=.8

x5=1.2+rnd(.2)-rnd(.3)

X6=.9

X7=.8

X8=1.8+rnd(.2)-rnd(.3)

X9=.4

XA=.9+rnd(.4)-rnd(.3)

XB=.2

Y=2.4+rnd(.8)-rnd(.6)

Y1=.4

Y2=.8

Y3=.6+rnd(.3)-rnd(.2)

Y4=.5

Z=3+rnd(.6)-rnd(.8)

Z1=.4

Z2=1.8+rnd(.4)-rnd(.3)

Z3=2

Z4=.6

Z5=2.4+rnd(.3)-rnd(.1)

Z6=1.8+rnd(.6)-rnd(.5)

Z7=.8+rnd(.2)-rnd(.3)

Z8=.7+rnd(.2)-rnd(.1)

Z9=.6

ZA=1

ZB=.2

ZC=.5

MATERIAL "pi"

!zampe

XFORM 1, 0, x5/z2, 0, 0, 1, 0, 0, 0, 0, 1, 0

BLOCK x6, x6, z2

addy y-x6

BLOCK x6, x6, z2

del 2

addx x6

BLOCK x7+z4*x5/z2, x6, z4

addy y-x6

BLOCK x7+z4*x5/z2, x6, z4

del 2

addx x5+x-x6

BLOCK x6, x6, z2

addy y-x6

BLOCK x6, x6, z2

del 2

addx x5+x

BLOCK x7, x6, z4

addy y-x6

BLOCK x7, x6, z4

del 2

!pancia

add x5,0,z2

block x2,y,z3

del 1

!torso

add x5+x2 , y, z2

rotx 90

PRISM 4, y, 0,0, 0,z3, x-x2,z, x-x2,0

del 2

y5=.5*(y-y2)/(1+xa/x1)

base

Vert x5+x+x8+x1,y5,z+z2-z5

Vert x5+x+x8+x1,y5,z+z2-z9

Vert x5+x+x8+x1,y-y5,z+z2-z9

Vert x5+x+x8+x1,y-y5,z+z2-z5

Vert x5+x+x8,0,z+z2-z5

Vert x5+x+x8,0,z+z2

Vert x5+x+x8,y,z+z2

Vert x5+x+x8,y,z+z2-z5

EDGE 1, 2, -1, -1, 0

EDGE 2, 3, -1, -1, 0

EDGE 3, 4, -1, -1, 0

EDGE 4, 1, -1, -1, 0

EDGE 5, 6, -1, -1, 0

EDGE 6, 7, -1, -1, 0

EDGE 7, 8, -1, -1, 0

EDGE 8, 5, -1, -1, 0

EDGE 1, 5, -1, -1, 0

EDGE 2, 6, -1, -1, 0

EDGE 3, 7, -1, -1, 0

EDGE 4, 8, -1, -1, 0

PGON 4, 0, -1,-1,-4,-3,-2

PGON 4, 0, -1, 5, 6, 7, 8

PGON 4, 0, -1, 1,10,-5,-9

PGON 4, 0, -1, 2,11,-6,-10

PGON 4, 0, -1, 3,12,-7,-11

PGON 4, 0, -1, 4, 9,-8,-12

body -1

base

Vert x5+x+x8+x1+xa,y5+y5*xa/x1,z+z2-z9-zb-za

Vert x5+x+x8+x1+xa,y5+y5*xa/x1,z+z2-z9-zb

Vert x5+x+x8+x1+xa,y-y5-y5*xa/x1,z+z2-z9-zb

Vert x5+x+x8+x1+xa,y-y5-y5*xa/x1,z+z2-z9-zb-za

Vert x5+x+x8+x1,y5,z+z2-z9-zb-za

Vert x5+x+x8+x1,y5,z+z2-z9

Vert x5+x+x8+x1,y-y5,z+z2-z9

Vert x5+x+x8+x1,y-y5,z+z2-z9-zb-za

EDGE 1, 2, -1, -1, 0

EDGE 2, 3, -1, -1, 0

EDGE 3, 4, -1, -1, 0

EDGE 4, 1, -1, -1, 0

EDGE 5, 6, -1, -1, 0

EDGE 6, 7, -1, -1, 0

EDGE 7, 8, -1, -1, 0

EDGE 8, 5, -1, -1, 0

EDGE 1, 5, -1, -1, 0

EDGE 2, 6, -1, -1, 0

EDGE 3, 7, -1, -1, 0

EDGE 4, 8, -1, -1, 0

PGON 4, 0, -1,-1,-4,-3,-2

PGON 4, 0, -1, 5, 6, 7, 8

PGON 4, 0, -1, 1,10,-5,-9

PGON 4, 0, -1, 2,11,-6,-10

PGON 4, 0, -1, 3,12,-7,-11

PGON 4, 0, -1, 4, 9,-8,-12

body-1

base !coda

Vert x5-x3-z1,y/2-z1/2,z3+z2-x3

Vert x5-x3,y/2-z1/2,z3+z2-x3

Vert x5-x3,y/2+z1/2,z3+z2-x3

Vert x5-x3-z1,y/2+z1/2,z3+z2-x3

Vert x5,y/2-z1/2,z3+z2

Vert x5,y/2-z1/2,z3+z2-z1

Vert x5,y/2+z1/2,z3+z2-z1

Vert x5,y/2+z1/2,z3+z2

EDGE 1, 2, -1, -1, 0

EDGE 2, 3, -1, -1, 0

EDGE 3, 4, -1, -1, 0

EDGE 4, 1, -1, -1, 0

EDGE 5, 6, -1, -1, 0

EDGE 6, 7, -1, -1, 0

EDGE 7, 8, -1, -1, 0

EDGE 8, 5, -1, -1, 0

EDGE 1, 5, -1, -1, 0

EDGE 2, 6, -1, -1, 0

EDGE 3, 7, -1, -1, 0

EDGE 4, 8, -1, -1, 0

PGON 4, 0, -1,-1,-4,-3,-2

PGON 4, 0, -1, 5, 6, 7, 8

PGON 4, 0, -1, 1,10,-5,-9

PGON 4, 0, -1, 2,11,-6,-10

PGON 4, 0, -1, 3,12,-7,-11

PGON 4, 0, -1, 4, 9,-8,-12

body-1

add x5+x+x8-x9-.001,0,z2+z+y3*z7/(y/2+y3)

block x9,y4,z8 !orecchie

addy y-y4

block x9,y4,z8

del 2

MATERIAL "k"

base !naso

vert x5+x+x8+x1+xa+xb,y/2, z+z2-z9-zb !vertice

vert x5+x+x8+x1+xa, y/2-y2/2, z+z2-z9-zb

vert x5+x+x8+x1+xa, y/2+y2/2, z+z2-z9-zb

vert x5+x+x8+x1+xa, y/2, z+z2-z9-zb-zc

EDGE 1, 2, -1, -1, 0

EDGE 2, 3, -1, -1, 0

EDGE 3, 1, -1, -1, 0

EDGE 1, 4, -1, -1, 0

EDGE 2, 4, -1, -1, 0

EDGE 3, 4, -1, -1, 0

PGON 3, 0, -1,-1,-3,-2

PGON 3, 0, -1, 1, 5,-4

PGON 3, 0, -1, 2, 6,-5

PGON 3, 0, -1, 3, 4,-6

body -1

add x5+x+x8+x1*.8,y*.25,z2+z-z9/2

mulx .4

sphere .3*z9 !pupille

addy y/2

sphere .3*z9

del 3

MATERIAL "w"

add x5+x+x8+x1/2,y*.25,z2+z-z9/2

mulx .5

sphere .5*z9 !occhi

addy y/2

sphere .5*z9

del 3

base !zanna dex

Vert x5+x+x8+x1+xa, (y-y2)/2,z+z2-z9-zb-za

Vert x5+x+x8+x1+3/4*xa, (y-y2)/2,z+z2-z9-zb-za

Vert x5+x+x8+x1+3/4*xa,(y-y2)/2+xa/4,z+z2-z9-zb-za

Vert x5+x+x8+x1+xa, (y-y2)/2+xa/4,z+z2-z9-zb-za

Vert x5+x+x8+x1+7/8*xa,(y-y2)/2+xa/8,z+z2-z9-zb-za-xa/2

EDGE 1, 2, -1, -1, 0

EDGE 2, 3, -1, -1, 0

EDGE 3, 4, -1, -1, 0

EDGE 4, 1, -1, -1, 0 !termina contorno base

EDGE 1, 5, -1, -1, 0

EDGE 2, 5, -1, -1, 0

EDGE 3, 5, -1, -1, 0

EDGE 4, 5, -1, -1, 0

PGON 4, 0, -1,-1,-4,-3,-2

PGON 3, 0, -1, 1, 6,-5

PGON 3, 0, -1, 2, 7,-6

PGON 3, 0, -1, 3, 8,-7

PGON 3, 0, -1, 4, 5,-8

body -1

base !zanna sin

Vert x5+x+x8+x1+xa, (y+y2)/2-xa/4,z+z2-z9-zb-za

Vert x5+x+x8+x1+3/4*xa, (y+y2)/2-xa/4,z+z2-z9-zb-za

Vert x5+x+x8+x1+3/4*xa,(y+y2)/2,z+z2-z9-zb-za

Vert x5+x+x8+x1+xa, (y+y2)/2,z+z2-z9-zb-za

Vert x5+x+x8+x1+7/8*xa,(y+y2)/2-xa/8,z+z2-z9-zb-za-xa/2

EDGE 1, 2, -1, -1, 0

EDGE 2, 3, -1, -1, 0

EDGE 3, 4, -1, -1, 0

EDGE 4, 1, -1, -1, 0 !termina contorno base

EDGE 1, 5, -1, -1, 0

EDGE 2, 5, -1, -1, 0

EDGE 3, 5, -1, -1, 0

EDGE 4, 5, -1, -1, 0

PGON 4, 0, -1,-1,-4,-3,-2

PGON 3, 0, -1, 1, 6,-5

PGON 3, 0, -1, 2, 7,-6

PGON 3, 0, -1, 3, 8,-7

PGON 3, 0, -1, 4, 5,-8

body -1

MATERIAL "ci"

base !pennello coda

Vert x5-x3-z1-(x4-z1)/2,y/2-z1/2-(x4-z1)/2,z3+z2-x3-x4

Vert x5-x3+(x4-z1)/2,y/2-z1/2-(x4-z1)/2,z3+z2-x3-x4

Vert x5-x3+(x4-z1)/2,y/2+z1/2+(x4-z1)/2,z3+z2-x3-x4

Vert x5-x3-z1-(x4-z1)/2,y/2+z1/2+(x4-z1)/2,z3+z2-x3-x4

Vert x5-x3-z1,y/2-z1/2,z3+z2-x3

Vert x5-x3,y/2-z1/2,z3+z2-x3

Vert x5-x3,y/2+z1/2,z3+z2-x3

Vert x5-x3-z1,y/2+z1/2,z3+z2-x3

EDGE 1, 2, -1, -1, 0

EDGE 2, 3, -1, -1, 0

EDGE 3, 4, -1, -1, 0

EDGE 4, 1, -1, -1, 0

EDGE 5, 6, -1, -1, 0

EDGE 6, 7, -1, -1, 0

EDGE 7, 8, -1, -1, 0

EDGE 8, 5, -1, -1, 0

EDGE 1, 5, -1, -1, 0

EDGE 2, 6, -1, -1, 0

EDGE 3, 7, -1, -1, 0

EDGE 4, 8, -1, -1, 0

PGON 4, 0, -1,-1,-4,-3,-2

PGON 4, 0, -1, 5, 6, 7, 8

PGON 4, 0, -1, 1,10,-5,-9

PGON 4, 0, -1, 2,11,-6,-10

PGON 4, 0, -1, 3,12,-7,-11

PGON 4, 0, -1, 4, 9,-8,-12

body-1

!criniera

add x5+x , -y3, z2+z-z5

rotx 90

roty 90

PRISM 5, x8, 0,0, 2*y3+y,0, 2*y3+y,z5, (2*y3+y)/2,z5+z7, 0,z5

del 3

base

vert x5+x+x8,-y3,z+z2-z5

vert x5+x,-y3,z+z2-z5

vert x5+x,y+y3,z+z2-z5

vert x5+x+x8,y+y3,z+z2-z5

vert x5+x+x8,Y/2,z+z2-z5-z6 !vertice

edge 1,2,-1,-1,0

edge 2,3,-1,-1,0

edge 3,4,-1,-1,0

edge 4,1,-1,-1,0

edge 1,5,-1,-1,0

edge 2,5,-1,-1,0

edge 3,5,-1,-1,0

edge 4,5,-1,-1,0

pgon 3,0,-1,1,6,-5

pgon 3,0,-1,2,7,-6

pgon 3,0,-1,3,8,-7

pgon 3,0,-1,4,5,-8

pgon 4,0,-1,-4,-3,-2,-1

body -1

del 3

next i

end