Success with glGetLightfv is a follows.
glGetLightfv=: ' glGetLightfv > n i i *f' & (15!:0)
glGetLight_jzopenglutil_=: 4 : 0
r=. x#0.1 NB. needs floating point number 0.1
glGetLightfv y,<r NB. needs y,<r instead of y;r
r
)
4 glGetLight_jzopenglutil_ GL_LIGHT0_jzopenglutil_;GL_POSITION_jzopenglutil_
0 0 1 0
BUT, I am Still fighting with glIsEnabled which has
the following descriptors definition. No matter what
argument I supply to glIsEnabled_jzopenglutil_ I get an
empty appearing returned when I expect either 1 or 0 . Any
guidance here?
glIsEnabled=: ' glIsEnabled > c i' & (15!:0)
]x =: glIsEnabled_jzopenglutil_ GL_LIGHTING_jzopenglutil_
x
$x
#x
1
On Sun, 1 Oct 2006, Brian Schott wrote:
+ I am now looking at Oleg's anim.ijs and see how he
+ has accomplished this with the following code.
+
+ glGetInteger_jzopenglutil_=: 4 : 0
+ r=. x#_1
+ glGetIntegerv y;r
+ r
+ )
+
+ I will experiment with it further.
+
+ (B=)
+
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm