(22K)
//以下為知難行易的第一個材質實驗的程式部分(藍-白的大理石)
/*
�歈�������������������������������������������������������������������������
�� ��
�� KNOW.B = Bitmapped to Raytracing ��
�� Requires : color.bc, greys.map, know.bo ��
�� ��
�裺�������������������������������������������������������������������������
*/
#include color.bc
studio {
from -10 -80 15
at 2 0 5
up 0 0 1
angle 50
res 640 480
antialias adaptive
threshold 4
aspect 1.333
ambient .1 .1 .1
}
// light sources
light {
type point
falloff 0
position -10 -200 100
color 1 1 1
}
// ground plane
surf {
spec .5 .5 .5
fuzz 0.05
no_antialias // speed things up a bit - since it is a fuzzy surface
}
ring { center 0 0 0 normal 0 0 1 radius 10000 }
// Four chinese words KNOW
surf {
texture {
pattern spherical
turbulence {
terms 7
amp 6
}
blend .8
radius 1
radius 4
surf { diff 0 .1 .2 shine 20 white }
surf { diff .8 .8 .8 shine 20 white }
}
}
transform { scale 1.2 }
transform { translate -23 0 .1 }
#include know.bo
transform_pop
transform_pop
//========================================================