scene
{
    camera
    {
        position <0, -120, 80>
        look_at <0, -40, 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
        }
    }
}