fart/scenes/for-test.fart
Josh Holtrop 9fbdb9d84c added test scenes for "for" and "if" statements
git-svn-id: svn://anubis/fart/trunk@359 7f9b0f55-74a9-4bce-be96-3c2cd072584d
2010-10-07 17:10:59 +00:00

42 lines
611 B
Plaintext

scene
{
camera
{
position <0, 0, 40>
look_at <0, 100, 5>
}
light
{
position <100, -100, 50>
}
define material mat
{
color <0, 0.8, 1>
}
plane
{
position <0, 0, 1>, 0
material
{
color <0, 0.7, 0>
}
}
for (local $x := -200; $x <= 200; $x := $x + 40)
{
for (local $y := 0; $y <= 4000; $y := $y + 40)
{
sphere
{
radius 10
translate <$x, $y, 10>
material mat
}
}
}
}