_Water

_sys:addPath('res')
_dofile('cameracontrol.lua')
amblight = _AmbientLight.new()
skylight = _SkyLight.new()
skylight.direction = _Vector3.new(-1, -1, -1)

sky = _SkyDome.new()
sky:setSkyMap('X+.bmp|X-.bmp|Y+.bmp|Y-.bmp|Z+.bmp|Z-.bmp')
sen = _Scene.new('water-scene.sen')

water = _Water.new()
water.x1 = -1250
water.x2 = 1250
water.y1 = -1250
water.y2 = 1250

water.depth = 50.0
water.height = 1.5
water.normalMap = 'normal.jpg'
water.color = 0x88002233
water.lightColor = _Color.Green
water.lightDir = _Vector3.new(-1, -1, -1)

water.reflectColor = 0xFF00FF00
water.lightShine = 200
water.alpha = 0.7

water.direction1 = _Vector2.new(1,-1)
water.speed1 = 4.0
water.direction2 = _Vector2.new(1,1)
water.speed2 = 5.0
water.waves = 0.50
water.distort = 50
water.mode = _Water.Lighting + _Water.Fresnel

teapot = _mf:createTeapot()

mat1 = _Matrix3D.new():setScaling(20, 20, 20):mulTranslationRight(0, 0, 20)
mat2 = _Matrix3D.new():setTranslation(0, 0, -10)

_rd.camera.eye = _Vector3.new(100, 100, 100)

function render_obj()
    _rd:useLight(amblight)
    _rd:useLight(skylight)
    _rd:pushMatrix3D(mat1)
        teapot:drawMesh()
    _rd:popMatrix3D()
    _rd:popLight()
    _rd:popLight()
end

function render_scene()
    _rd:pushMatrix3D(mat2)
        sen.terrain:draw()
    _rd:popMatrix3D(mat2)
end

_app:onIdle(function(e)
    if water:refractionBegin() then
        render_scene()
        water:refractionEnd()
    end

    if water:reflectionBegin() then
        sky:draw()
        render_obj()
        render_scene()
        water:reflectionEnd()
    end

    render_obj()
    render_scene()

    sky:draw()
    water:draw()
end)