# Autor: Geraldo Clézio Oliveira Júnior
#Email: geraldoclezio@yahoo.com.br
#Data: 20 de Abril de 2005
#ultilização do FXDial para rotação
#OBS: Creio que na verdade ele não esta rotacionando o objeto e sim a camera em torno o objeto,
# pois se adicionar mais um objeto ele rotacionara todos juntos
require 'fox12'
require 'fox12/responder'
require 'fox12/colors'
begin
 require	'fox12/glshapes'
#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

#variaveis globais
$Cubo =false
$larg_x = FXDataTarget.new(25)
$larg_y = FXDataTarget.new(40)
$larg_z = FXDataTarget.new(60)
$coord_x = FXDataTarget.new(0)
$coord_y = FXDataTarget.new(0)
$coord_z = FXDataTarget.new(0)

#vetores com coordenadas de cada objeto
$CuboVet= Array.new 
$CuboVet[0,5]=[ (Float($coord_x.value)/100), (Float($coord_y.value)/100),(Float($coord_z.value)/100), (Float($larg_x.value)/100), (Float($larg_y.value)/100),(Float($larg_z.value)/100)] 

#definindo minha classe
class GLTestInicio< FXMainWindow

include Responder
  
  ID_QUERY_MODE = FXMainWindow::ID_LAST
  ID_GLVIEWER   = ID_QUERY_MODE + 1
  
  def cria()
  
	# Make a scene!
	@scene = FXGLGroup.new
	gp2 = FXGLGroup.new
	@scene.append(gp2)
	#if  then 
	
	if $Cubo ==true                 
	   gp2.append(FXGLCube.new( $CuboVet[0], $CuboVet[1], $CuboVet[2], $CuboVet[3], $CuboVet[4], $CuboVet[5]))
	end
	# Add scene to GL viewer
        @viewer.scene = @scene
end
def coodernadas(local)
	
	FXLabel.new(local, "Coordenada X em pixels:",nil,LABEL_NORMAL,0,0,0,0,+10,0,0,10)
       coord_x = FXTextField.new(local, 5,$coord_x, FXDataTarget::ID_VALUE,
       TEXTFIELD_INTEGER|JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK)
       $coord_x.connect(SEL_CHANGED){
			$CuboVet[0] = (Float($coord_x.value)/100)
			cria()	
		}
       
       FXLabel.new(local, "Coordenada y pixels:",nil,LABEL_NORMAL,0,0,0,0,10,0,20,10)
       coord_y = FXTextField.new(local, 5,$coord_y, FXDataTarget::ID_VALUE,
       TEXTFIELD_INTEGER|JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK)
       $coord_y.connect(SEL_CHANGED){
			$CuboVet[1] = (Float($coord_y.value)/100)
			cria()	
		}
 
       FXLabel.new(local, "Coordenada Z pixels:",nil,LABEL_NORMAL,0,0,0,0,10,0,20,10)
       coord_z = FXTextField.new(local, 5,$coord_z, FXDataTarget::ID_VALUE,
       TEXTFIELD_INTEGER|JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK)
       $coord_z.connect(SEL_CHANGED){
			$CuboVet[2] = (Float($coord_z.value)/100)
			cria()	
		}
end	 
	 
def dimensoes(local)
       
       FXLabel.new(local, "Largura X pixels:",nil,LABEL_NORMAL,0,0,0,0,10,0,20,10)
       larg_x = FXSpinner.new(local, 4,$larg_x, FXDataTarget::ID_VALUE,
       SPIN_NORMAL|FRAME_SUNKEN|FRAME_THICK|LAYOUT_SIDE_TOP)
       larg_x.range = -400..400
       $larg_x.connect(SEL_COMMAND){
			$CuboVet[3] = (Float($larg_x.value)/100)
			cria()	
		}
		
       FXLabel.new(local, "Largura Y pixels:",nil,LABEL_NORMAL,0,0,0,0,10,0,20,10)
      larg_y = FXSpinner.new(local, 4, $larg_y, FXDataTarget::ID_VALUE,
       SPIN_NORMAL|FRAME_SUNKEN|FRAME_THICK|LAYOUT_SIDE_TOP)
       larg_y.range = -400..400
       $larg_y.connect(SEL_COMMAND){
			$CuboVet[4] = (Float($larg_y.value)/100)
			cria()	
		}
 
       FXLabel.new(local, "Largura Z pixels:",nil,LABEL_NORMAL,0,0,0,0,10,0,20,10)
       larg_z= FXSpinner.new(local, 4, $larg_z, FXDataTarget::ID_VALUE,
       SPIN_NORMAL|FRAME_SUNKEN|FRAME_THICK|LAYOUT_SIDE_TOP)
       larg_z.range = -400..400
       $larg_z.connect(SEL_COMMAND){
			$CuboVet[5] = (Float($larg_z.value)/100)
			cria()	
		}
 end

def rotacao(local)


    FXLabel.new(local, "Rotação en torno do eixo X:")
    FXTextField.new(local, 6, @viewer, FXGLViewer::ID_ROLL,
    TEXTFIELD_INTEGER|JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK)
    rotacao_x = FXDial.new(local, @viewer, FXGLViewer::ID_DIAL_X,
    (FRAME_SUNKEN|FRAME_THICK|DIAL_CYCLIC|DIAL_HORIZONTAL|
    LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_CENTER_Y),
    0,0, 160, 14, 0, 0, 0, 0)
    
    FXLabel.new(local, "Rotação en torno do eixo Y:")
    FXTextField.new(local, 6, @viewer, FXGLViewer::ID_PITCH,
      TEXTFIELD_INTEGER|JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK)
    rotacao_y = FXDial.new(local, @viewer, FXGLViewer::ID_DIAL_Y,
      (FRAME_SUNKEN|FRAME_THICK|DIAL_CYCLIC|DIAL_HORIZONTAL|
       LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_CENTER_Y),
      0, 0, 160, 14, 0, 0, 0, 0)
  
    FXLabel.new(local, "Rotação en torno do eixo Z:")
    FXTextField.new(local, 6, @viewer, FXGLViewer::ID_YAW,
      TEXTFIELD_INTEGER|JUSTIFY_RIGHT|FRAME_SUNKEN|FRAME_THICK)
    rotacao_z = FXDial.new(local, @viewer, FXGLViewer::ID_DIAL_Z,
      (FRAME_SUNKEN|FRAME_THICK|DIAL_CYCLIC|DIAL_HORIZONTAL|
       LAYOUT_FIX_WIDTH|LAYOUT_FIX_HEIGHT|LAYOUT_CENTER_Y),
      0, 0, 160, 14, 0, 0, 0, 0)

end
  
#inicializa a classe GLTestInicio
def initialize(app)
	
	#define nome e tamanho da janela
	super(app, "ultilização do FXDial para rotação", nil, nil, DECOR_ALL, 0, 0, 800, 600)
			
	toolbar = FXToolBar.new(self, LAYOUT_SIDE_TOP|LAYOUT_FILL_X,
        0, 0, 0, 0, 4, 4, 0, 0, 0, 0)
	
	# Contents
        frame = FXHorizontalFrame.new(self,
        LAYOUT_SIDE_TOP|LAYOUT_FILL_X|LAYOUT_FILL_Y, 0, 0, 0, 0, 0, -1700, 0, 0, 0, 0)
	
	# Nice sunken box around GL viewer
        box = FXVerticalFrame.new(frame,
        FRAME_SUNKEN|FRAME_THICK|LAYOUT_FILL_X|LAYOUT_FILL_Y, 0, 0, 0, 0,0, 0,0)
	
	
	#  area da janela MDI Client
        @mdiclient = FXMDIClient.new(box, LAYOUT_FILL_X|LAYOUT_FILL_Y)
   		
        # Make MDI Window Menu
        @mdimenu = FXMDIMenu.new(self, @mdiclient)
    
	# Make an MDI Child
	mdichild = FXMDIChild.new(@mdiclient, "OpenGl", @mdiicon,
	@mdimenu, MDI_NORMAL, 30, 30, 400, 400)
	
	@glvisual = FXGLVisual.new(getApp(), VISUAL_DOUBLEBUFFER)

	#inreracao com os valores de criacao  Make it active
        @mdiclient.setActiveChild(mdichild)

	# Drawing gl canvas
	@viewer = FXGLViewer.new(mdichild, @glvisual, self, ID_GLVIEWER,
	LAYOUT_FILL_X|LAYOUT_FILL_Y|LAYOUT_TOP|LAYOUT_LEFT)
	
	#local dos chek buttons
	frame2 = FXVerticalFrame.new(frame,
        LAYOUT_SIDE_TOP|LAYOUT_FILL_X|LAYOUT_FILL_Y, 0, 0, 0, 0, 0,-70, 0, 0, 0, 0)
	
         
       cubo = FXCheckButton.new(frame2, "Cubo", nil,0,
       ICON_BEFORE_TEXT,0,0,0,0,20,0,20,20)
       cubo.connect(SEL_COMMAND) { 
       print "\n::",cubo.check
       $Cubo = cubo.check
	cria()
       }
       
       coodernadas(frame2)
       dimensoes(frame2)
       rotacao(frame2)
	
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