1 |
< |
/* Copyright (c) 1986 Regents of the University of California */ |
1 |
> |
/* Copyright (c) 1991 Regents of the University of California */ |
2 |
|
|
3 |
|
#ifndef lint |
4 |
|
static char SCCSid[] = "$SunId$ LBL"; |
70 |
|
|
71 |
|
if (ldot > FTINY && np->rdiff > FTINY) { |
72 |
|
/* |
73 |
< |
* Compute and add diffuse component to returned color. |
74 |
< |
* The diffuse component will always be modified by the |
75 |
< |
* color of the material. |
73 |
> |
* Compute and add diffuse reflected component to returned |
74 |
> |
* color. The diffuse reflected component will always be |
75 |
> |
* modified by the color of the material. |
76 |
|
*/ |
77 |
|
copycolor(ctmp, np->mcolor); |
78 |
|
dtmp = ldot * omega * np->rdiff / PI; |
107 |
|
} |
108 |
|
if (ldot < -FTINY && np->tspec > FTINY && np->alpha2 > FTINY) { |
109 |
|
/* |
110 |
< |
* Compute specular transmission. |
110 |
> |
* Compute specular transmission. Specular transmission |
111 |
> |
* is unaffected by material color. |
112 |
|
*/ |
113 |
|
/* roughness + source */ |
114 |
|
dtmp = np->alpha2 + omega/(2.0*PI); |
116 |
|
dtmp = exp((DOT(np->pr->rdir,ldir)-1.)/dtmp)/(2.*PI)/dtmp; |
117 |
|
/* worth using? */ |
118 |
|
if (dtmp > FTINY) { |
118 |
– |
copycolor(ctmp, np->mcolor); |
119 |
|
dtmp *= np->tspec * omega; |
120 |
< |
scalecolor(ctmp, dtmp); |
120 |
> |
setcolor(ctmp, dtmp, dtmp, dtmp); |
121 |
|
addcolor(cval, ctmp); |
122 |
|
} |
123 |
|
} |
129 |
|
register RAY *r; |
130 |
|
{ |
131 |
|
NORMDAT nd; |
132 |
< |
double ldot; |
133 |
< |
double omega; |
132 |
> |
double transtest, transdist; |
133 |
|
double dtmp; |
134 |
|
COLOR ctmp; |
135 |
|
register int i; |
155 |
|
raytexture(r, m->omod); |
156 |
|
nd.pdot = raynormal(nd.pnorm, r); /* perturb normal */ |
157 |
|
multcolor(nd.mcolor, r->pcol); /* modify material color */ |
158 |
+ |
transtest = 0; |
159 |
|
/* get specular component */ |
160 |
|
nd.rspec = m->oargs.farg[3]; |
161 |
|
|
196 |
|
if (nd.tspec > FTINY && nd.alpha2 <= FTINY) { |
197 |
|
RAY lr; |
198 |
|
if (rayorigin(&lr, r, TRANS, nd.tspec) == 0) { |
199 |
< |
VCOPY(lr.rdir, r->rdir); |
199 |
> |
if (DOT(r->pert,r->pert) > FTINY*FTINY) { |
200 |
> |
for (i = 0; i < 3; i++) /* perturb direction */ |
201 |
> |
lr.rdir[i] = r->rdir[i] - |
202 |
> |
.75*r->pert[i]; |
203 |
> |
normalize(lr.rdir); |
204 |
> |
} else { |
205 |
> |
VCOPY(lr.rdir, r->rdir); |
206 |
> |
transtest = 2; |
207 |
> |
} |
208 |
|
rayvalue(&lr); |
209 |
|
scalecolor(lr.rcol, nd.tspec); |
210 |
+ |
multcolor(lr.rcol, nd.mcolor); /* modified by color */ |
211 |
|
addcolor(r->rcol, lr.rcol); |
212 |
+ |
transtest *= bright(lr.rcol); |
213 |
+ |
transdist = r->rot + lr.rt; |
214 |
|
} |
215 |
|
} |
216 |
|
if (r->crtype & SHADOW) /* the rest is shadow */ |
243 |
|
} |
244 |
|
/* add direct component */ |
245 |
|
direct(r, dirnorm, &nd); |
246 |
+ |
/* check distance */ |
247 |
+ |
if (transtest > bright(r->rcol)) |
248 |
+ |
r->rt = transdist; |
249 |
|
} |