How can I see one toucan and then, after a pause, see the upsidedown toucan?

require 'bmp gl2'

dat=:256 #. [: |."1 [: [ 256 256 256 #: [: readbmp jpath

foo=: 3 : 0
wd 'pc test closeok'
DAT=:dat '~system\examples\data\toucan.bmp'
wd 'xywh 0 0 150 150;cc g isigraph'
wd glpaint''
6!:3 (5)
DAT=:|.dat '~system\examples\data\toucan.bmp'
wd 'xywh 0 0 150 150;cc g isigraph'
wd 'pas 0 0;pshow'
)

test_g_paint=: 3 : 0
glpixels_jgl2_ (40 40 ,|.$DAT),,DAT
)

foo''

Thanks,   Linda
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to