54 lines
1018 B
Plaintext
54 lines
1018 B
Plaintext
|
|
scene
|
|
{
|
|
camera
|
|
{
|
|
position <0, -80, 80>
|
|
look_at <0, 0, 5>
|
|
}
|
|
|
|
light
|
|
{
|
|
position <100, -100, 100>
|
|
}
|
|
|
|
define material mat { color <0, 0.8, 1> }
|
|
define material mat2 { color <1, 0.7, 0> }
|
|
define material mat3 { transparency 0.5 reflectance 0.7 }
|
|
|
|
plane
|
|
{
|
|
position <0, 0, 1>, 0
|
|
material
|
|
{
|
|
color <0, 0.7, 0>
|
|
}
|
|
}
|
|
|
|
local $m := 0
|
|
for (local $x := -100; $x <= 100; $x := $x + 40)
|
|
{
|
|
for (local $y := -100; $y <= 100; $y := $y + 40)
|
|
{
|
|
sphere
|
|
{
|
|
radius 10
|
|
translate <$x, $y, 10>
|
|
if ($m % 3 = 0)
|
|
{
|
|
material mat
|
|
}
|
|
elsif ($m % 3 = 1)
|
|
{
|
|
material mat2
|
|
}
|
|
else
|
|
{
|
|
material mat3
|
|
}
|
|
}
|
|
$m := $m + 1
|
|
}
|
|
}
|
|
}
|