Screen.Resolution.Set(512, 384)
Screen.Set(BACK)
Pattern.Display("avo\bubble.gif")
Screen.End()
@camera = Camera.Create(0.0, 0.0, -100.0, 0.0, 0.0, 0.0)
@viewport = Viewport.Create()
Viewport.Camera.Set(@viewport, @camera)
Mesh.Rotation.Stack(-30, 30, 0)
Mesh.Color.Stack(COLOR_AQUA)
@mesh = Mesh.Cube.Create(40)
Mesh.Display(@mesh)
Viewport.Display(@viewport)
Screen.Set(FRONT)
Text.Display("Press a key to exit.", CENTER, 350)
Keyboard.Wait()
Screen.End()
Mesh.Kill(@mesh)
Viewport.Kill(@viewport)
Camera.Kill(@camera)
Script.Stop()