# Autor: Geraldo Clézio Oliveira Júnior
#Email: geraldoclezio@yahoo.com.br
#Data: 14 de março de 2005
# Descrição: Desenha um circulo 

require 'fox12'
begin
	require 'opengl'
rescue LoadError
	require 'fox12/missingdep'
	MSG = <<EOM
	Este exemplo depende da extensão de OpenGL.
	Por favor confira os Arquivos de Aplicação de Ruby 
	para uma apropriada execução.
EOM
	  missingDependency(MSG)
end


include Fox
#definindo minha classe
class GLTestInicio< FXMainWindow

def Circulo()

	redMaterial   = [ 1.0,  0.0, 0.0, 1.0]
	numero_linhas=1000
        angle =0
	i=0
	
	GL.Material(GL::FRONT, GL::AMBIENT, redMaterial)
	GL.Material(GL::FRONT, GL::DIFFUSE, redMaterial)

	GL.Begin(GL::LINE_LOOP)
         for i in 1..10000
		i+=1
		angle =i*2*3.1415/numero_linhas
		GL.Vertex2f((1.5*Math.cos(angle)),(1.5*Math.sin(angle)))           
          end
        GL.End()  
end

def drawScene
	lightPosition = [15.0, 10.0, 5.0, 1.0]
	lightAmbient  = [ 0.1,  0.1, 0.1, 1.0]
	lightDiffuse  = [ 0.9,  0.9, 0.9, 1.0]
	
	width = @gltela.width.to_f
	height = @gltela.height.to_f
	aspect = width/height
  
	# Faça corrente de contexto
	@gltela.makeCurrent()
    
	#posição onde o objeto deverar ser desenhado    
	GL.Viewport(0, 0, @gltela.width, @gltela.height)
 	
	#define cor de fundo da tela
	GL.ClearColor(0.0,0.8, 0.1,0.0)
	GL.Clear(GL::COLOR_BUFFER_BIT|GL::DEPTH_BUFFER_BIT)
	GL.Enable(GL::DEPTH_TEST)
    
	GL.Disable(GL::DITHER)
  
	GL.MatrixMode(GL::PROJECTION)
	GL.LoadIdentity()
	GLU.Perspective(30.0, aspect, 1.0, 100.0)
  
	GL.MatrixMode(GL::MODELVIEW)
	GL.LoadIdentity()
	GLU.LookAt(5.0, 10.0, 15.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0)
  
	GL.ShadeModel(GL::SMOOTH)
	GL.Light(GL::LIGHT0, GL::POSITION, lightPosition)
	GL.Light(GL::LIGHT0, GL::AMBIENT, lightAmbient)
	GL.Light(GL::LIGHT0, GL::DIFFUSE, lightDiffuse)
	GL.Enable(GL::LIGHT0)
	GL.Enable(GL::LIGHTING)
  
	GL.PushMatrix()
	Circulo()
	
	GL.PopMatrix()
    
	# Troca se é dobrar-buffered
	if @glvisual.isDoubleBuffer
	      @gltela.swapBuffers
	end
    
	#Faça contexto non-atual
	@gltela.makeNonCurrent
end

#inicializa a classe GLTestInicio
def initialize(app)
	
	#define nome e tamanho da janela
	super(app, "Primeiro Exemplo de Opengl no Ruby", nil, nil, DECOR_ALL, 0, 0, 600, 500)

	#Construa os elementos de janela principais
	frame = FXHorizontalFrame.new(self, LAYOUT_SIDE_TOP|LAYOUT_FILL_X|LAYOUT_FILL_Y)
	frame.padLeft, frame.padRight = 0, 0
	frame.padTop, frame.padBottom = 0, 0
    
	#Vidraça certa para os botões
	buttonFrame = FXVerticalFrame.new(frame, LAYOUT_FILL_Y|LAYOUT_TOP|LAYOUT_LEFT)
	buttonFrame.padLeft, buttonFrame.padRight = 0,0 #define o espaco entre botão e tela
	buttonFrame.padTop, buttonFrame.padBottom = 0, 0
      
	# Etiquete sobre os botões
	FXLabel.new(buttonFrame, "Label teste", nil,
        JUSTIFY_CENTER_X|LAYOUT_FILL_X)
  
	#Linha de divisor horizontal, fixada entre o label e o botão
	FXHorizontalSeparator.new(buttonFrame, SEPARATOR_RIDGE|LAYOUT_FILL_X)
  
	#botão sair
	sair= FXButton.new(buttonFrame, "&Sair", nil,
	getApp(), FXApp::ID_QUIT,
        FRAME_THICK|FRAME_RAISED|LAYOUT_FILL_X|LAYOUT_TOP|LAYOUT_LEFT)
        sair.padLeft, sair.padRight = 10,10 #largura do botão e posição do texto
	sair.padTop, sair.padBottom = 5,5 #altura do botão e posição do texto
		
	# Vidraça direita para conter o objeto opengl
	telaopenglFrame = FXVerticalFrame.new(frame,
        LAYOUT_FILL_X|LAYOUT_FILL_Y|LAYOUT_TOP|LAYOUT_LEFT)
	telaopenglFrame.padLeft, telaopenglFrame.padRight = 0, 0 #posição da vidraça
	telaopenglFrame.padTop, telaopenglFrame.padBottom = 0, 0
  
	#Etiquete sobre a area do objeto opengl
	FXLabel.new(telaopenglFrame, "Tela do Objeto OpenGL Frame", nil,
        JUSTIFY_CENTER_X|LAYOUT_FILL_X)
  
	#Linha de divisor horizontal
        FXHorizontalSeparator.new(telaopenglFrame, SEPARATOR_GROOVE|LAYOUT_FILL_X)
  
	#criando painel
	glpanel = FXVerticalFrame.new(telaopenglFrame, (FRAME_SUNKEN|FRAME_THICK|
        LAYOUT_FILL_X|LAYOUT_FILL_Y|LAYOUT_TOP|LAYOUT_LEFT))
        glpanel.padLeft, glpanel.padRight = 0, 0 #posição do painel dentro da vidraça
        glpanel.padTop, glpanel.padBottom = 0,0
      
      
	 
	# Um visual puxar OpenGL
	@glvisual = FXGLVisual.new(getApp(), VISUAL_DOUBLEBUFFER)
  
	# Glcanvas puxando
	@gltela = FXGLCanvas.new(glpanel, @glvisual, nil, 0,
	LAYOUT_FILL_X|LAYOUT_FILL_Y|LAYOUT_TOP|LAYOUT_LEFT)
	@gltela.connect(SEL_PAINT) {
	      drawScene
	}
	@gltela.connect(SEL_CONFIGURE) {
        if @gltela.makeCurrent
		GL.Viewport(0, 0, @gltela.width, @gltela.height)
		@gltela.makeNonCurrent
        end
       }
    
end#final de initialize

  # Crie e inicialize
def create
	super
	    show(PLACEMENT_SCREEN)
end



end#final de clase

if __FILE__==$0
	application = FXApp.new("GLTest", "FoxTest")
	application.disableThreads
	GLTestInicio.new(application)
	application.create
	application.run
end