Doris
simple.lua
This is a very simple example which just creates a window and adds a rotator with
which you can spin the scene around.
Screenshot
Source Code
-- Simple example
-- $Id: simple.lua,v 1.7 2002/06/24 07:06:31 trout Exp $
-- create a matrix
rotatemat = Matrix:new()
-- The callback function which renders our scene.
function renderScene()
-- Clear the screen and depth buffer
glClear(GL_DEPTH_BUFFER_BIT + GL_COLOR_BUFFER_BIT)
-- Tell the camera/eye what to look at
gluLookAt(0,0,10, 0,0,0, 0,1,0)
glMatrixMode(GL_MODELVIEW)
-- Draw the scene.
glPushMatrix()
glLoadMatrix(rotatemat)
glutWireCube(5)
Render:teapot{}
glPopMatrix()
end
-- Create our window and specify a name and window rendering function
wmain = Window:create{
title = "Doris: Simple example",
render = renderScene -- specify the redraw function for this window
}
-- Put a sub window at the bottom of the screen
sw=SubWindow{ parent=wmain, side="bottom" }
-- Add an object rotator to the bottom of the screen that
-- manipulates the matrix we created.
ro=Rotator{
parent=sw, -- parent of this widget
text="Rotate scene", -- text label for this widget
value=rotatemat, -- matrix that rotator manipulates
line="|", -- vertical spacing line drawn
spin=0.99 -- allow the rotator to spin with little damping when released
}
Back