Brian,

you forgot to remove the closeok flag as what I suggested, that is the
reason why opengl_close had not been called.  Some modifications to
your codes.


(remove the closeok)

OPENGL=: 0 : 0
pc opengl;pn tgsj;

(in the tgsj_run)

try.
  wd 'psel opengl'
  glsel 'g'
  opengl_close ''
catch.
end.
assert. 0=#ogl

(smoutput just added for debugging)
opengl_close=: 3 : 0
smoutput 'opengl_close'

I noticed that opengl figures cannot not stop once set moving by
pressing the arrow keys, but I know very little opengl to pursuit
it further.

-- 
regards,
====================================================
GPG key 1024D/4434BAB3 2008-08-24
gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to