It slipped away too fast.
load 'viewmat'
VISIBLE_jviewmat_=:GUI_jviewmat_=:0
RGB=:0 255{~#:i.8
GRB=:1 0 2{"1 RGB
RGB;GRB
GRB viewmat (-.0=*/~i:4);'PLUS'
GRB viewmat (i.8);'TOP'
GRB viewmat (,.i.8);'SIDE'
A=:<.0.5*(i.8 8)+|:i.8 8
B=:(i.8)<:/i.8
C=:63*(i.8)>/i.8
GRB viewmat (C+B*A);'BLEND'
VISIBLE_jviewmat_=:GUI_jviewmat_=:1
coclass 'qtdemo'
blendcolor_run=: 3 : 0
wd 'pc imdemo closeok escclose'
wd 'grid size 2 2'
wd 'cc pic image'
wd 'cc png1 image'
wd 'cc png2 image'
wd 'cc png3 image'
wd 'set pic image *' ,jpath '~temp/PLUS.png'
wd 'set png1 image *', jpath '~temp/TOP.png'
wd 'set png2 image *', jpath '~temp/SIDE.png'
wd 'set png3 image *', jpath '~temp/BLEND.png'
wd 'pshow'
)
blendcolor_close=: 3 : 0
wd 'pclose'
)
blendcolor_run''load 'viewmat'
VISIBLE_jviewmat_=:GUI_jviewmat_=:0
RGB=:0 255{~#:i.8
GRB=:1 0 2{"1 RGB
RGB;GRB
GRB viewmat (-.0=*/~i:4);'PLUS'
GRB viewmat (i.8);'TOP'
GRB viewmat (,.i.8);'SIDE'
A=:<.0.5*(i.8 8)+|:i.8 8
B=:(i.8)<:/i.8
C=:63*(i.8)>/i.8
GRB viewmat (C+B*A);'BLEND'
VISIBLE_jviewmat_=:GUI_jviewmat_=:1
coclass 'qtdemo'
blendcolor_run=: 3 : 0
wd 'pc imdemo closeok escclose'
wd 'grid size 2 2'
wd 'cc pic image'
wd 'cc png1 image'
wd 'cc png2 image'
wd 'cc png3 image'
wd 'set pic image *' ,jpath '~temp/PLUS.png'
wd 'set png1 image *', jpath '~temp/TOP.png'
wd 'set png2 image *', jpath '~temp/SIDE.png'
wd 'set png3 image *', jpath '~temp/BLEND.png'
wd 'pshow'
)
blendcolor_close=: 3 : 0
wd 'pclose'
)
blendcolor_run''
Linda
-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of Linda Alvord
Sent: Monday, May 25, 2015 10:57 PM
To: [email protected]
Subject: Re: [Jprogramming] Mixing Colors of Light
Here it is cleaned up a little. In a perfect world the image would fill the
boxes and stretch when the final image is stretched......
Thanks again. Linda
-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of Linda Alvord
Sent: Monday, May 25, 2015 10:26 PM
To: [email protected]
Subject: Re: [Jprogramming] Mixing Colors of Light
THAT'S BEAUTIFUL. i find the gray boxes a little strange, but I can cope with
them. I don't know how you did it, but I'll let you know if I can't figure it
out.
Thanks alot! Linda
-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of bill lam
Sent: Monday, May 25, 2015 10:06 PM
To: [email protected]
Subject: Re: [Jprogramming] Mixing Colors of Light
To recap, please copy and paste my code (beware line wrapping), and don't try
it in jhs.
load 'viewmat'
VISIBLE_jviewmat_=:GUI_jviewmat_=:0
RGB=:0 255{~#:i.8
GRB=:1 0 2{"1 RGB
RGB;GRB
PLUS=:-.0=*/~i:4
TOP=:i.8
SIDE=:|:i.8
A=:<.0.5*(i.8 8)+|:i.8 8
B=:(i.8)<:/i.8
GRB viewmat PLUS;'PLUS'
GRB viewmat TOP;'TOP'
E=.GRB viewmat SIDE;'SIDE'
C=:63*(i.8)>/i.8
BLEND=:C+B*A
GRB viewmat BLEND;'BLEND'
VISIBLE_jviewmat_=:GUI_jviewmat_=:1
coclass 'qtdemo'
blendcolor_run=: 3 : 0
wd 'pc imdemo closeok escclose'
wd 'grid size 2 2'
wd 'cc pic image'
wd 'cc png1 image'
wd 'cc png2 image'
wd 'cc png3 image'
wd 'set pic image *' ,jpath '~temp/PLUS.png'
wd 'set png1 image *', jpath '~temp/TOP.png'
wd 'set png2 image *', jpath '~temp/SIDE.png'
wd 'set png3 image *', jpath '~temp/BLEND.png'
wd 'pshow'
)
blendcolor_close=: 3 : 0
wd 'pclose'
)
blendcolor_run''
Пн, 25 май 2015, Linda Alvord написал(а):
> You are right. I knew I kept using cc png over and over but I did'nt
> understand how to put in a dummy message. Also D=:GRB viewmat PLUS;'SIDE'
> Didn't seem to change anything. It is still using only the upper rigt box
> and then putting in the three images on top of one another and ending with
> BLEND.png.
>
> Linda
>
> -----Original Message-----
> From: [email protected]
> [mailto:[email protected]] On Behalf Of bill
> lam
> Sent: Monday, May 25, 2015 7:51 PM
> To: Programming forum
> Subject: Re: [Jprogramming] Mixing Colors of Light
>
> I can not understand why you said that you could not open my
> attachment,
>
> http://jsoftware.com/pipermail/programming/2015-May/041835.html
>
> As I had said, ids of child were duplicated in your code, please confirm you
> can understand this first.
> On May 26, 2015 5:37 AM, "Linda Alvord" <[email protected]> wrote:
>
> > The two lines made it better, but it still puts three images in
> > position
> > 12 (according to buttons)
> >
> > load 'viewmat'
> > RGB=:0 255{~#:i.8
> > GRB=:1 0 2{"1 RGB
> > RGB;GRB
> > PLUS=:-.0=*/~i:4
> > ]A=:<.0.5*(i.8 8)+|:i.8 8
> > ]B=:(i.8)<:/i.8
> > ]C=:63*(i.8)>/i.8
> > C+B*A
> > PLUS=:-.0=*/~i:4
> >
> > VISIBLE_jviewmat_=:GUI_jviewmat_=:0
> > GRB viewmat PLUS;'PLUS'
> > GRB viewmat (i.8);'TOP'
> > E=.GRB viewmat (|:i.8);'SIDE'
> > GRB viewmat (C+B*A);'BLEND'
> > VISIBLE_jviewmat_=:GUI_jviewmat_=:1
> >
> > coclass 'qtdemo'
> > imdemo_run=: 3 : 0
> > wd 'pc imdemo closeok escclose'
> > wd 'grid size 2 2'
> > wd 'cc pic image'
> > wd 'cc png image'
> > wd 'cc png image'
> > wd 'cc png image'
> >
> > wd 'set pic image *' ,jpath '~temp/PLUS.png'
> > wd 'set png image *', jpath '~temp/TOP.png'
> > wd 'set png image *', jpath '~temp/SIDE.png'
> > wd 'set png image *', jpath '~temp/BLEND.png'
> >
> > wd 'pshow'
> > )
> >
> > imdemo_run''
> >
> >
> > Linda
> > -----Original Message-----
> > From: [email protected] [mailto:
> > [email protected]] On Behalf Of Linda Alvord
> > Sent: Monday, May 25, 2015 4:56 PM
> > To: [email protected]
> > Subject: Re: [Jprogramming] Mixing Colors of Light
> >
> > Bill, I haven't been able to open your attachment. I found that if
> > I have a script that runs correctly in jqt, I open it in JHS. Since
> > it has wd commands it won't run. However, if I copy the script from
> > the file, and baste it into an email, I don't get typos. That's how
> > I finally sent you the script. From JHS there are no extra lines inserted.
> >
> > Linda
> >
> > -----Original Message-----
> > From: [email protected] [mailto:
> > [email protected]] On Behalf Of bill lam
> > Sent: Monday, May 25, 2015 12:00 PM
> > To: [email protected]
> > Subject: Re: [Jprogramming] Mixing Colors of Light
> >
> > Sorry, there are typos again. The 2 lines should be
> >
> > VISIBLE_jviewmat_=:GUI_jviewmat_=:0
> >
> > VISIBLE_jviewmat_=:GUI_jviewmat_=:1
> >
> > if the images are too large, try set a smaller default size, eg.
> >
> > DEFWH_jviewmat_=: 200 200
> >
> >
> > Пн, 25 май 2015, bill lam написал(а):
> > > id of child dupldated in your code. Pls try the attached script.
> > >
> > >
> > > Пн, 25 май 2015, Linda Alvord написал(а):
> > > > When you look at the grid demo, you set where each button is to
> > > > be
> > located.
> > > > It seems impossible to tell the images which box place to go in
> > > > the
> > grid.
> > > > It doesn't seem willing to deal with several pngs. So ithe puts
> > > > them all in the same place.
> > > >
> > > > load 'viewmat'
> > > > RGB=:0 255{~#:i.8
> > > > GRB=:1 0 2{"1 RGB
> > > > RGB;GRB
> > > > PLUS=:-.0=*/~i:4
> > > > TOP=:i.8
> > > > SIDE=:|:i.8
> > > > A=:<.0.5*(i.8 8)+|:i.8 8
> > > > B=:(i.8)<:/i.8
> > > > GRB viewmat PLUS;'PLUS'
> > > > GRB viewmat TOP;'TOP'
> > > > E=.GRB viewmat SIDE;'SIDE'
> > > > C=:63*(i.8)>/i.8
> > > > BLEND=:C+B*A
> > > >
> > > > GUI_jviewmat_=:0
> > > > GRB viewmat BLEND;'BLEND'
> > > > GUI_viewmat_=:1
> > > >
> > > > coclass 'qtdemo'
> > > > blendcolor_run=: 3 : 0
> > > > wd 'pc imdemo closeok escclose'
> > > > wd 'grid size 2 2'
> > > > wd 'cc pic image'
> > > > wd 'cc png image'
> > > > wd 'cc png image'
> > > > wd 'cc png image'
> > > > wd 'set pic image *' ,jpath '~temp/PLUS.png'
> > > > wd 'set png image *', jpath '~temp/TOP.png'
> > > > wd 'set png image *', jpath '~temp/SIDE.png'
> > > > wd 'set png image *', jpath '~temp/BLEND.png'
> > > > wd 'pshow'
> > > > )
> > > >
> > > > blendcolor_close=: 3 : 0
> > > > wd 'pclose'
> > > > )
> > > > blendcolor_run''
> > > >
> > > > Linda
> > > >
> > > > -----Original Message-----
> > > > From: [email protected]
> > > > [mailto:[email protected]] On Behalf Of
> > > > bill lam
> > > > Sent: Thursday, May 21, 2015 9:46 PM
> > > > To: Programming forum
> > > > Subject: Re: [Jprogramming] Mixing Colors of Light
> > > >
> > > > try adding a dummy SIDE.png
> > > >
> > > > D=.GRB viewmat PLUS;'SIDE'
> > > >
> > > > the other png files should be artifacts of running viewmat under
> > > > jhs, probably harmless.
> > > > On May 22, 2015 9:06 AM, "Linda Alvord"
> > > > <[email protected]>
> > wrote:
> > > >
> > > > > I don't understand this very well yet. If you run your code
> > > > > and look at the files in temp, PLUS and the other three all
> > > > > have a mass of numbers including a date between PLUS and .png
> > > > >
> > > > > My code doesn't do that, but I don't know why it doesn't.
> > > > >
> > > > > Linda
> > > > >
> > > > > ----Original Message-----
> > > > > From: [email protected]
> > > > > [mailto:[email protected]] On Behalf Of
> > > > > Linda Alvord
> > > > > Sent: Thursday, May 21, 2015 8:43 PM
> > > > > To: [email protected]
> > > > > Subject: Re: [Jprogramming] Mixing Colors of Light
> > > > >
> > > > > I haven't gotten yours to work yet. Mine follows 'image demo'.
> > > > > It puts image 2 3 and 4 on top of one another in space 2 and
> > > > > nothing in the bottom row. (cut and paste in jqt)
> > > > >
> > > > > load 'viewmat'
> > > > > RGB=:0 255{~#:i.8
> > > > > GRB=:1 0 2{"1 RGB
> > > > > RGB;GRB
> > > > > PLUS=:-.0=*/~i:4
> > > > > ]A=:<.0.5*(i.8 8)+|:i.8 8
> > > > > ]B=:(i.8)<:/i.8
> > > > > ]C=:63*(i.8)>/i.8
> > > > > C+B*A
> > > > > PLUS=:-.0=*/~i:4
> > > > > GUI_jviewmat_=:0
> > > > > D=.GRB viewmat PLUS;'PLUS'
> > > > > E=.GRB viewmat (i.8);'TOP'
> > > > > GRB viewmat (C+B*A);'BLEND'
> > > > > GUI_viewmat_=:1
> > > > >
> > > > > coclass 'qtdemo'
> > > > > imdemo_run=: 3 : 0
> > > > > wd 'pc imdemo closeok escclose'
> > > > > wd 'grid size 2 2'
> > > > > wd 'cc pic image'
> > > > > wd 'cc png image'
> > > > > wd 'cc png image'
> > > > > wd 'cc png image'
> > > > >
> > > > > wd 'set pic image *' ,jpath '~temp/PLUS.png'
> > > > >
> > > > > d=.readimg_jqtide_ jpath '~temp/TOP.png'
> > > > > d writeimg_jqtide_ jpath '~temp/TOP.png'
> > > > > wd 'set png image *', jpath '~temp/TOP.png'
> > > > >
> > > > > d1=.|: d
> > > > > d1 writeimg_jqtide_ jpath '~temp/SIDE.png'
> > > > > wd 'set png image *', jpath '~temp/SIDE.png'
> > > > >
> > > > > d2=.readimg_jqtide_ jpath '~temp/BLEND.png'
> > > > > d2 writeimg_jqtide_ jpath '~temp/BLEND.png'
> > > > > wd 'set png image *', jpath '~temp/BLEND.png'
> > > > >
> > > > > wd 'pshow'
> > > > > )
> > > > >
> > > > > imdemo_run''
> > > > >
> > > > > Linda
> > > > >
> > > > > -----Original Message-----
> > > > > From: [email protected]
> > > > > [mailto:[email protected]] On Behalf Of
> > > > > bill lam
> > > > > Sent: Thursday, May 21, 2015 7:38 PM
> > > > > To: Programming forum
> > > > > Subject: Re: [Jprogramming] Mixing Colors of Light
> > > > >
> > > > > oop, sorry. SIDE.png had not been written.
> > > > > --------------------------------------------------------------
> > > > > --
> > > > > --
> > > > > ---- For information about J forums see
> > > > > http://www.jsoftware.com/forums.htm
> > > > >
> > > > > --------------------------------------------------------------
> > > > > --
> > > > > --
> > > > > ---- For information about J forums see
> > > > > http://www.jsoftware.com/forums.htm
> > > > >
> > > > > --------------------------------------------------------------
> > > > > --
> > > > > --
> > > > > ---- For information about J forums see
> > > > > http://www.jsoftware.com/forums.htm
> > > > >
> > > > ----------------------------------------------------------------
> > > > --
> > > > --
> > > > -- For information about J forums see
> > > > http://www.jsoftware.com/forums.htm
> > > >
> > > > ----------------------------------------------------------------
> > > > --
> > > > --
> > > > -- For information about J forums see
> > > > http://www.jsoftware.com/forums.htm
> > >
> > > --
> > > regards,
> > > ====================================================
> > > GPG key 1024D/4434BAB3 2008-08-24
> > > gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3 gpg
> > > --keyserver subkeys.pgp.net --armor --export 4434BAB3
> >
> > >
> > > load 'viewmat'
> > > VISIBLE_jviewmat_=GUI_jviewmat_=:0
> > > RGB=:0 255{~#:i.8
> > > GRB=:1 0 2{"1 RGB
> > > RGB;GRB
> > > PLUS=:-.0=*/~i:4
> > > TOP=:i.8
> > > SIDE=:|:i.8
> > > A=:<.0.5*(i.8 8)+|:i.8 8
> > > B=:(i.8)<:/i.8
> > > GRB viewmat PLUS;'PLUS'
> > > GRB viewmat TOP;'TOP'
> > > E=.GRB viewmat SIDE;'SIDE'
> > > C=:63*(i.8)>/i.8
> > > BLEND=:C+B*A
> > >
> > > GRB viewmat BLEND;'BLEND'
> > > VISIBLE_jviewmat_=GUI_jviewmat_=:1
> > >
> > > coclass 'qtdemo'
> > > blendcolor_run=: 3 : 0
> > > wd 'pc imdemo closeok escclose'
> > > wd 'grid size 2 2'
> > > wd 'cc pic image'
> > > wd 'cc png1 image'
> > > wd 'cc png2 image'
> > > wd 'cc png3 image'
> > > wd 'set pic image *' ,jpath '~temp/PLUS.png'
> > > wd 'set png1 image *', jpath '~temp/TOP.png'
> > > wd 'set png2 image *', jpath '~temp/SIDE.png'
> > > wd 'set png3 image *', jpath '~temp/BLEND.png'
> > > wd 'pshow'
> > > )
> > >
> > > blendcolor_close=: 3 : 0
> > > wd 'pclose'
> > > )
> > > blendcolor_run''
> > >
> >
> >
> > --
> > regards,
> > ====================================================
> > GPG key 1024D/4434BAB3 2008-08-24
> > gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3 gpg --keyserver
> > subkeys.pgp.net --armor --export 4434BAB3
> > --------------------------------------------------------------------
> > -- For information about J forums see
> > http://www.jsoftware.com/forums.htm
> >
> > --------------------------------------------------------------------
> > -- For information about J forums see
> > http://www.jsoftware.com/forums.htm
> >
> > --------------------------------------------------------------------
> > -- For information about J forums see
> > http://www.jsoftware.com/forums.htm
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
--
regards,
====================================================
GPG key 1024D/4434BAB3 2008-08-24
gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3 gpg --keyserver
subkeys.pgp.net --armor --export 4434BAB3
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
