Извините, ничего не найдено.

Sayman · 04.04.2010, 20:30

Всем доброго времени. Сижу вот ковыряюсь в сабже, да наткнулся на проблему. суть в том, что я не могу сообразить, как правильно переключать приложение, написанное с преминением OpenGL, в полноэкранный режим. пробовал покапать в сторону glut - облом - при вызове функции glutInit вылетает ошибка MAV. попробовал поработать с ChangeDisplaySettings, но тут ещё сильнее закопался. по сути то перед вызовом этой функции, нужно было бы вызвать EnumDisplayDevices с целью определения девайса и прочих парамтеров. но функция эта среди параметров содержит адрес на массив... т.е. то что на бллице видимо сложновато сделать... может есть какой то способ, кто может подсказать? пример приложения привожу..он старый, но нанём пока отрабатываю.

Include "ogld_utils.bb"
Include "wgl_const.bb"
Include "gl_const.bb"
Include "glu_const.bb"
Include "blitz_gl.bb"
Include "CG.bb"
Const title$="OpenGL Direct - selection mode and name stack"
Const GLUT_RGB=0
Const GLUT_DOUBLE=2
Const GLUT_DEPTH=16
Global hRC   ; The OpenGL RenderContext
Global hMainDC  ; render window's  Device context
Global  bbHwnd  ; Windows handle.
Global GlWinW=1280 
Global GlWinH=720
Global xrot#
Global yrot#
Global xspeed# ;=.1
Global yspeed# ;=.2
; CG Vars to hold info
Global CGcontext,profile,vprogram
Global light,modelviewproj,modelviewit
Global teapotList
AppTitle title$
Global argc
Global argv
 
Graphics GlWinW,GlWinH,32,2
ChangeDisplaySettings(0,4)
AppTitle title$ 
frame=CreateTimer(60)
bbHwnd=ogld_GetWindow() ; 
If bbHwnd Then 
 pf.ogld_PixelFormat=ogld_MakeDefaultPixelFormat()
 hMainDC = ogld_SetUp_OpenGL(bbHwnd,pf)
 If Not hMainDC Then RuntimeError "Could not initialize OpenGl"
  ResizeViewport GlWinW, GlWinH
  initGL
 Else
  RuntimeError "Could not get a handle to the Blitz window"
EndIf
;glScissor 100,100,300,300
;glEnable GL_SCISSOR_TEST
While Not KeyHit(1)
WaitTimer(frame) 
 DrawGLscene
 SwapBuffers(hMainDC )
 glerr= glGetError()
 If glerr<>0 Then DebugLog "OpenGL Error:  " + glerr
    xrot = xrot + xspeed
    yrot = yrot + yspeed  
Wend 
FreeTimer(frame)  
wglMakeCurrent 0,0
If hMainDC Then
 wglDeleteContext hMainDC
End If  
If hMainDC Then
 ReleaseDC bbHwnd, hMainDC
End If       
End
Function DrawGLscene()
 glClear(GL_COLOR_BUFFER_BIT Or GL_DEPTH_BUFFER_BIT);   ; Clears the screen.
 glLoadIdentity();                   ;Reset modelview matrix for new frame.
 glMatrixMode(GL_MODELVIEW);
 glTranslatef(0,0,-10)
 glRotatef(xrot, 1.0, 0.0, 0.0);
 glRotatef( yrot, 0.0, 1.0, 0.0);
 ; Here we are binding the vertex shader To the hardware After you set the
 ; constants.
 
 ; Just like If you would like To have texture, you would need To enable texturing Right?
 ; Well To use the vertex program you must enable it like so...
 cgGLBindProgram(vprogram);
 cgGLEnableProfile(profile);
 cgGLSetParameter4f(light, 0.0, 0.0, 1.0, 1.0);
    cgGLSetStateMatrixParameter(modelviewproj, CG_GL_MODELVIEW_PROJECTION_MATRIX, CG_GL_MATRIX_IDENTITY);
    cgGLSetStateMatrixParameter(modelviewit, CG_GL_MODELVIEW_MATRIX, CG_GL_MATRIX_INVERSE_TRANSPOSE);
 glPushMatrix();
    
 glBegin(GL_QUADS);
  ;Front Face
  glNormal3f( 0.0, 0.0, 1.0);
  glVertex3f(-1.0, -1.0,  1.0);
  glVertex3f( 1.0, -1.0,  1.0);
  glVertex3f( 1.0,  1.0,  1.0);
  glVertex3f(-1.0,  1.0,  1.0);
  ;Back Face
  glNormal3f( 0.0, 0.0,-1.0);
  glVertex3f(-1.0, -1.0, -1.0);
  glVertex3f(-1.0,  1.0, -1.0);
  glVertex3f( 1.0,  1.0, -1.0);
   glVertex3f( 1.0, -1.0, -1.0);
  ;Top Face
  glNormal3f( 0.0, 1.0, 0.0);
   glVertex3f(-1.0,  1.0, -1.0);
  glVertex3f(-1.0,  1.0,  1.0);
  glVertex3f( 1.0,  1.0,  1.0);
  glVertex3f( 1.0,  1.0, -1.0);
  ;Bottom Face;
  glNormal3f( 0.0,-1.0, 0.0);
  glVertex3f(-1.0, -1.0, -1.0);
  glVertex3f( 1.0, -1.0, -1.0);
  glVertex3f( 1.0, -1.0,  1.0);
  glVertex3f(-1.0, -1.0,  1.0);
  ;Right face
  glNormal3f( 1.0, 0.0, 0.0);
  glVertex3f( 1.0, -1.0, -1.0);
  glVertex3f( 1.0,  1.0, -1.0);
  glVertex3f( 1.0,  1.0,  1.0);
  glVertex3f( 1.0, -1.0,  1.0);
  ;Left Face
  glNormal3f(-1.0, 0.0, 0.0);
  glVertex3f(-1.0, -1.0, -1.0);
  glVertex3f(-1.0, -1.0,  1.0);
  glVertex3f(-1.0,  1.0,  1.0);
  glVertex3f(-1.0,  1.0, -1.0);
 glEnd();
 glPopMatrix() 
 cgGLDisableProfile(vProfile);
    ;When we are done we disable the vertex program.
xrot=xrot+.5
yrot=yrot+.5
End Function
Function CGERROR()
cgerror=cgGetError( )
If cgerror>0
DebugLog cgGetErrorString(cgerror )
EndIf
End Function

Function ResizeViewport(nWidth,nHeight)
 Local aspect#
 If nHeight = 0 Then nHeight = 1
 glViewport 0,0,nWidth,nHeight
 glMatrixMode GL_PROJECTION
 glLoadIdentity
 aspect#=Float(nWidth)/Float(nHeight)
 gluPerspective 55.0,aspect,1.0,100.0
 glMatrixMode GL_MODELVIEW    
End Function
Function initGL()
 glClearColor (0.0, 0.0, 0.0, 0.5);        ; Black Background
 glClearDepth (1.0);            ; Depth Buffer Setup
 glDepthFunc (GL_LEQUAL);           ; The Type Of Depth Testing
 glEnable (GL_DEPTH_TEST);           ; Enable Depth Testing
 glShadeModel (GL_SMOOTH);           ; Select Smooth Shading
 glHint (GL_PERSPECTIVE_CORRECTION_HINT, GL_NICEST);     ; Set Perspective Calculations To Most Accurate
 
 ; Now we take that source code And create the vertex shader out of it.
 ;cgIsProgram(program)
 If (cgGLIsProfileSupported(CG_PROFILE_ARBVP1))
  profile = CG_PROFILE_ARBVP1;
 Else If (cgGLIsProfileSupported(CG_PROFILE_VS_2_0))
       profile = CG_PROFILE_VP20;
  Else
        RuntimeError("Vertex programming extensions (GL_ARB_vertex_program or GL_NV_vertex_program) Not supported, exiting...")
 EndIf 
 CGcontext = cgCreateContext();
 
 vprogram = cgCreateProgramFromFile(CGcontext,CG_SOURCE, "simple.cg",profile, 0,0);
 cgGLLoadProgram(vprogram);
    
    Light = cgGetNamedParameter(vProgram, "LightVec");
    ModelViewProj = cgGetNamedParameter(vProgram, "ModelViewProj");
    modelviewit = cgGetNamedParameter(vprogram, "ModelViewIT");
 
End Function
 
Type ogld_PixelFormat
 Field index%
 Field Size%
 Field Version%
 Field Flags%
 Field PixelType%
 Field ColorBits%
 Field RedBits%
 Field RedShift%
 Field GreenBits%
 Field GreenShift%
 Field BlueBits%
 Field BlueShift%
 Field AlphaBits%
 Field AlphaShift%
 Field AccumBits%
 Field AccumRedBits%
 Field AccumGreenBits%
 Field AccumBlueBits%
 Field AccumAlphaBits%
 Field DepthBits%
 Field StencilBits%
 Field AuxBuffers%
 Field LayerType%
 Field Reserved%
 Field wLayerMask%
 Field wVisibleMask%
 Field wDamageMask%
End Type
 
Function ogld_MakeDefaultPixelFormat.ogld_PixelFormat()
 pf.ogld_PixelFormat=New ogld_PixelFormat
 pf\Size=40
 pf\Version=2
 pf\Flags=PFD_SUPPORT_OPENGL Or PFD_DRAW_TO_WINDOW Or PFD_DOUBLEBUFFER
 pf\PixelType=PFD_TYPE_RGBA 
 pf\ColorBits=32
 ;pf\RedBits=
 ;pf\RedShift=
 ;pf\GreenBits=
 ;pf\GreenShift=
 ;pf\BlueBits=
 ;pf\BlueShift=
 pf\AlphaBits=16
 ;pf\AlphaShift=
 ;pf\AccumBits=
 ;pf\AccumRedBits=
 ;pf\AccumGreenBits=
 ;pf\AccumBlueBits=
 pf\AccumAlphaBits=16
 pf\DepthBits=16
 pf\StencilBits=8
 ;pf\AuxBuffers=
 ;pf\LayerType=
 ;pf\Reserved=
 pf\wLayerMask=PFD_MAIN_PLANE 
 ;pf\wVisibleMask=
 ;pf\wDamageMask=
 Return pf
End Function
 
Function ogld_SetUp_OpenGL(hWnd,pf.ogld_PixelFormat)
 hDC=GetDC(hWnd)
 
 If hDC Then
  lpPixelFormat=ogld_SetupPixelFormat(hDC,pf)
 
     hRC = wglCreateContext(hDC)
     If Not hRC Then
       RuntimeError  "wglCreateContext() failed"
     End If
     wglMakeCurrent hDC, hRC  
 
 
  Return hDC
 
 Else
  RuntimeError "Can't get DC"
 EndIf
End Function

Hurrit · 04.04.2010, 20:50

монсьер, к чему все эти извращения с опенджиэлом?

Sayman · 04.04.2010, 20:57

Сообщение от Hurrit

монсьер, к чему все эти извращения с опенджиэлом?

никаких ихвращений. в примере выше там кроме огл ещё и цг от нвидиа. но проблема пока именно в fullscreen режиме...

Hurrit · 04.04.2010, 21:56

да нет же, само использование опенджиэла в блиц3д, имхо, большое извращение, не лучше ли бмакс взять? он вроде бы для этого и предназначен

Sayman · 05.04.2010, 08:29

blitzmax для меня это пока шибко большой изврат, связанный с уклоном на ооп. а опенгл в данном случае, в б3д, используется напрямую, без всяких враперов. это уже холрошо и кроме того, язык от нвидиа - цг, тоже минуя враперы напрямую. лучше помогите процедуркой или алгоритмом каким, как переводить его в полноэкранный режим.

Sayman · 21.04.2010, 15:35

значит в итоге, вся работа по сути через апи винды, т.е. с контекстами и прочим хламом. однако при использовании полноэкранного режима, чёрный экран. точнее говоря, в хр работает, но не на всех компах почему то, на висте и семёрке на всех чёрный экран. если в пиксельформате выставить для cAlphaBits какое то значение, то работать на весь экран будет. но тогда без аппаратной подержки, очень тормозно а на некоторых компах ещё и с глюками.
всё таки, кто сталкивался с такой бедой? или все сидят чисто на блицмаксе? судя по местным постам, макс не шибко то восстребован...

Reks888 · 21.04.2010, 16:59

все сидят чисто на блицмаксе?

Все мучают чисто DirectX 7/9, а для OpenGL блиц не предназначен

Sayman · 21.04.2010, 20:13

Блиц предназначен для дх7...9й мимо или при помощи ксорса. если есть возможность юзать 9ку, значит и огл можна. примеров больше десятка лежит в архиве...проблема только в фуллскрин режиме...

Reks888 · 21.04.2010, 20:42

Я конечно понимаю, но это..

cgGLBindProgram(vprogram);
cgGLEnableProfile(profile);
cgGLSetParameter4f(light, 0.0, 0.0, 1.0, 1.0);
cgGLSetStateMatrixParameter(modelviewproj, CG_GL_MODELVIEW_PROJECTION_MATRIX, CG_GL_MATRIX_IDENTITY);
cgGLSetStateMatrixParameter(modelviewit, CG_GL_MODELVIEW_MATRIX, CG_GL_MATRIX_INVERSE_TRANSPOSE);
glPushMatrix();

glBegin(GL_QUADS);
;Front Face
glNormal3f( 0.0, 0.0, 1.0);
glVertex3f(-1.0, -1.0, 1.0);
glVertex3f( 1.0, -1.0, 1.0);
glVertex3f( 1.0, 1.0, 1.0);
glVertex3f(-1.0, 1.0, 1.0);
;Back Face
glNormal3f( 0.0, 0.0,-1.0);
glVertex3f(-1.0, -1.0, -1.0);
glVertex3f(-1.0, 1.0, -1.0);
glVertex3f( 1.0, 1.0, -1.0);
glVertex3f( 1.0, -1.0, -1.0);
;Top Face
glNormal3f( 0.0, 1.0, 0.0);
glVertex3f(-1.0, 1.0, -1.0);
glVertex3f(-1.0, 1.0, 1.0);
glVertex3f( 1.0, 1.0, 1.0);
glVertex3f( 1.0, 1.0, -1.0);
;Bottom Face;
glNormal3f( 0.0,-1.0, 0.0);
glVertex3f(-1.0, -1.0, -1.0);
glVertex3f( 1.0, -1.0, -1.0);
glVertex3f( 1.0, -1.0, 1.0);
glVertex3f(-1.0, -1.0, 1.0);
;Right face
glNormal3f( 1.0, 0.0, 0.0);
glVertex3f( 1.0, -1.0, -1.0);
glVertex3f( 1.0, 1.0, -1.0);
glVertex3f( 1.0, 1.0, 1.0);
glVertex3f( 1.0, -1.0, 1.0);
;Left Face
glNormal3f(-1.0, 0.0, 0.0);
glVertex3f(-1.0, -1.0, -1.0);
glVertex3f(-1.0, -1.0, 1.0);
glVertex3f(-1.0, 1.0, 1.0);
glVertex3f(-1.0, 1.0, -1.0);
glEnd();
glPopMatrix()
cgGLDisableProfile(vProfile);

и это:

img=LoadTexture("tex.png")
cube=CreateCube()
EntityTexture cube, img

Мне больше нравится второе, а тебе? Зачем опенГЛ под блиц тебе нужен?

Sayman · 21.04.2010, 21:08

мне больше нра первый вариант, потому, что:
1. есть доступ к шейдерам, включая последние, а не только 2.0 из кривущего ксорса (да ещё и платного).
2. нет потребности во враперах, т.к. доступ к большинству функций, по сути, напрямую (opengl32.dll через файл деклс).
3. огл это бесплатный и кросс платформеный двиг (хотя это в данном случае не так важно).
4. контролируеш любуюю модель с точностью до вертекса. процедура погрузки моделей можно наваять свою под любой доступный и известный формат...
но это правда и к минусам относица, т.к. сваять просутю тестовую модель потом проблема сходу её погрузить...
ну и проблема с экраном. этот вопрос нужно решить. в целом, через библиотеку SDL работает нормально, но использовать сдл пока не желаю... хотя несколько функций я перекинул уже...без враперов...
собственно по теме шейдеров - даже без нвидиа ЦГ, я пробовал инициализировать glsl, пока ошибок и вылетов небыло...встал чисто изза фуллскрина..
а на макса я переходить не буду изза ООП...да и вобще по многим форумам, макс спросом не пользуется....

cgGLBindProgram(vprogram);
cgGLEnableProfile(profile);
cgGLSetParameter4f(light, 0.0, 0.0, 1.0, 1.0);
cgGLSetStateMatrixParameter(modelviewproj, CG_GL_MODELVIEW_PROJECTION_MATRIX, CG_GL_MATRIX_IDENTITY);
cgGLSetStateMatrixParameter(modelviewit, CG_GL_MODELVIEW_MATRIX, CG_GL_MATRIX_INVERSE_TRANSPOSE);

вот это к делу не относится...
создали окно, нашли контекст, передали его в огл, сделали инициализаци, рисуем...а то что я выделил, это от нвидиа Цг и не является обязательным пунктом.

Arton · 21.04.2010, 21:45

А Xors к блицу тяжело подключить?! И шейдеры и проча есть (dx9). Или тебе OpenGL из интереса с блицем заюзать хочется?!

St_AnGer · 21.04.2010, 21:51

Сообщение от Arton

А Xors к блицу тяжело подключить?! И шейдеры и проча есть (dx9). Или тебе OpenGL из интереса с блицем заюзать хочется?!

Помоему автор явно указал почему не хочет использовать Xors3d и почему хочет пользоваться OpenGL.

З.Ы. на счёт Blitz Basic'a и OpenGL идея не очень хорошая. Лучше всё таки что то вроде Делфи или С++ использовать... ну а там как удобнее ))) когда то давно пробовал использовать OpenGL на блитце, но как то тогда не очень старался....

.Squid · 21.04.2010, 21:53

Сообщение от Arton

А Xors к блицу тяжело подключить?! И шейдеры и проча есть (dx9).

Ты тупой!!!!!!!!! Ксорс кривущий и шейдеры только 2.0!!!!!!!!!!!!

Arton · 21.04.2010, 22:00

21.04.2010, 22:46

Sayman
используй C++, потому что скорость выполнения команд на блице очень медленная, если без блица ну совсем никуда - делай dll'ку, а OGL это не движок

да и попробуй blitzmax, там с этим куда проще