Chip 2000 August

home *** CD-ROM | disk | FTP | other *** search

/ Chip 2000 August / chip_08_2000.iso / aktualnosci / shareware / Rhinoceros / rh11eval_20000320.exe / %MAINDIR% / RIB / rh_shinymetal.slc < prev next >

Wrap

Text File | 2000-06-08 | 3.4 KB | 274 lines

version BMRT 2.4.0b surface rh_shinymetal param float Ka 1 param float Kd 0.2 param float Ks 1 param float Kr 0.8 param float roughness 0.05 param float blur 0 param float samples 1 local normal Nf 0 0 0 local vector IN 0 0 0 local color ev 0 0 0 local vector Rdir 0 0 0 local float _8$jitter 0 code local color _8$C 0 0 0 local float _8$bluramt 0 local float _8$nrays 0 local vector _11$uoffset 0 0 0 local vector _11$voffset 0 0 0 local vector _11$Tu 0 0 0 local vector _11$Tv 0 0 0 local float _11$i 0 local float _11$j 0 local vector _15$R 0 0 0 local point _15$Pray 0 0 0 initcode 6 return code pushv I pushv N normalize faceforward popv Nf pushv I normalize popv IN pushv Nf pushv IN reflect normalize popv Rdir pushif 1 popf _8$jitter pushif 0 cset _8$C pushif 1e-006 pushv Rdir area sqrt fmax addF blur popf _8$bluramt pushif 0 raylevel feqf ifz 1 pushf samples sqrt ceil pushif 1 fmax jump 2 label 1 pushif 1 label 2 popf _8$nrays pushif 1 pushf _8$nrays gt pushif 0 pushf _8$bluramt gt or ifz 3 pushv Rdir xcomp pushv Rdir ycomp subff pushv Rdir zcomp pushv Rdir xcomp subff pushv Rdir ycomp pushv Rdir zcomp subff normalize mulFv blur popv _11$uoffset pushv _11$uoffset pushv Rdir cross popv _11$voffset pushf du pushif 1.5 mulff pushv P Duv mulvf popv _11$Tu pushf dv pushif 1.5 mulff pushv P Dvv mulvf popv _11$Tv pushif 0 popf _11$i label 5 pushf _8$nrays pushf _11$i lt ifz 7 pushif 0 popf _11$j label 8 pushf _8$nrays pushf _11$j lt ifz 10 pushv _11$voffset pushif 0.5 pushf _8$nrays pushif 0 raylevel feqf ifz 12 pushif 0.5 random subff mulF _8$jitter pushif 0.5 addff jump 13 label 12 pushif 0.5 label 13 label 11 addF _11$j divff subff mulfv pushv _11$uoffset pushif 0.5 pushf _8$nrays pushif 0 raylevel feqf ifz 15 pushif 0.5 random subff mulF _8$jitter pushif 0.5 addff jump 16 label 15 pushif 0.5 label 16 label 14 addF _11$i divff subff mulfv addV Rdir addvv popv _15$R pushv _11$Tv pushif 0.5 pushf _8$nrays pushif 0 raylevel feqf ifz 18 pushif 0.5 random subff mulF _8$jitter pushif 0.5 addff jump 19 label 18 pushif 0.5 label 19 label 17 addF _11$i divff subff mulfv pushv _11$Tu pushif 0.5 pushf _8$nrays pushif 0 raylevel feqf ifz 21 pushif 0.5 random subff mulF _8$jitter pushif 0.5 addff jump 22 label 21 pushif 0.5 label 22 label 20 addF _11$j divff subff mulfv addV P addvv popv _15$Pray pushv _15$R normalize pushv P trace addC _8$C popc _8$C label 9 pushif 1 addF _11$j popf _11$j jump 8 label 10 label 6 pushif 1 addF _11$i popf _11$i jump 5 label 7 mulFF _8$nrays _8$nrays pushc _8$C divcf popc _8$C jump 4 label 3 pushv Rdir pushv P trace popc _8$C label 4 pushc _8$C label 0 mulFc Kr popc ev return_area pushf roughness pushv IN negv pushv Nf specular mulFc Ks pushc ev pushv Nf diffuse mulFc Kd ambient mulFc Ka addcc addcc addcc mulC Cs popc Ci pushif 1 cset Oi return