The script, below, should draw an opengl window with a red background.

When I run it in a fresh J session, I get a black background.

After I start the OpenGL Introduction lab, I get a red background from the 
script, below.



require'jzopengl' 

P=: 0 : 0
pc p;
xywh 0 0 50 50;cc c isigraph rightmove bottommove;
pas 6 6;pcenter;
rem form end;
)

p_run=: 3 : 0
wd P
 ogl=: ''conew'jzopengl'
wd 'pshow;'
)

p_close=: 3 : 0
 codestroy__ogl''
wd'pclose'
)

p_c_size=: 3 : 0
 alloc__ogl glqwh__ogl''
 p_c_paint''
)

p_c_paint=: 3 : 0
 glClear__ogl GL_COLOR_BUFFER_BIT
 draw_keep__ogl''
)

p_run''

-- 
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to