Here is a simpified version without mplayer . However it is still necessary
to activate the 1 button:
require 'bmp gl2'
study_g_paint=: 3 : 0
glpixels_jgl2_ (0 0,|.$DAT),,DAT
)
STUDY=: 0 : 0
pc study closeok;
)
study_P0_button=: 3 : 0
wd STUDY
u=: 'xywh 0 0 32 30;cc P1 button;cn 1;'
v=: 'xywh 32 0 32 30;cc P2 button;cn 2;'
AA=:u,:v
wd AA
wd 'pshow;ptop'
DAT=: readbmp 'c:\jsoftware\j602\system\examples\data\toucan.bmp'
DAT=:256 #. [256 256 256 #: DAT
wd Q=:'xywh ',(":40 40 120 100),' ;cc g isigraph'
wd 'pas 0 0'
NB.wd 'winexec "c:\jsoftware\j602\lla\mplayer2.exe
c:\jsoftware\j602\lla\00will.wav";'
wd 'setfocus P1;'
)
study_P1_button=: 3 :0
DAT=: readbmp 'c:\jsoftware\j602\system\examples\data\jbox.bmp'
DAT=:256 #. [256 256 256 #: DAT
wd Q
NB.wd 'winexec "c:\jsoftware\j602\lla\mplayer2.exe
c:\jsoftware\j602\lla\01will.wav";'
wd 'setfocus P2;'
)
study_P0_button ''
**************************************
See AOL's top rated recipes
(http://food.aol.com/top-rated-recipes?NCID=aoltop00030000000004)
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
