4 |
|
} |
5 |
|
and(a,b) : if(a,b,a); |
6 |
|
{ level selector } |
7 |
< |
cond = if(LV+.5, and($10-LV-.5,LV+.5-$10), 1); |
7 |
> |
lvl = $10; |
8 |
> |
wt = $11; |
9 |
> |
cond = and( wt-MW, if(LV+.5, and(lvl-LV+.5,LV+.5-lvl), 6.5-lvl) ); |
10 |
|
px = $1; py = $2; pz = $3; |
11 |
|
r0 = SF*$12; r1 = SF*$13; |
12 |
|
nx = $4; ny = $5; nz = $6; |
25 |
|
dgy = $19*uy + $20*vy; |
26 |
|
dgz = $19*uz + $20*vz; |
27 |
|
val = avr + avg + avb; { ambient position color } |
28 |
< |
agr = select($10+1, val, 0, 0, val, 0, val, val); |
29 |
< |
agg = select($10+1, 0, val, 0, val, val, 0, val/2); |
30 |
< |
agb = select($10+1, 0, 0, val, 0, val, val, val/2); |
28 |
> |
agr = select(lvl+1, val, 0, 0, val, 0, val, val); |
29 |
> |
agg = select(lvl+1, 0, val, 0, val, val, 0, val/2); |
30 |
> |
agb = select(lvl+1, 0, 0, val, 0, val, val, val/2); |
31 |
|
psiz = r0/10; |
32 |
|
{ base polygon vertices } |
33 |
|
px1 = px + r0*ux + r1*vx + .0001*nx; |