Raul, After using this code with cube 3 try this.

12 9$256 256 256 #."1 paint
       0        0        0 16711935 16711807 16711680     0       0        0
       0        0        0 16744447 16744319 16744192     0       0        0
       0        0        0 16777215 16777087 16776960     0       0        0
16711935 16744447 16777215 16777215 16777087 16776960     0       0        0
 8323327  8355839  8388607  8388607  8388479  8388352     0       0        0
     255    32767    65535    65535    65407    65280     0       0        0
       0        0        0    65535    65407    65280 65280 8388352 16776960
       0        0        0    32767    32639    32512 32512 8355584 16744192
       0        0        0      255      127        0     0 8323072 16711680
       0        0        0      255      127        0     0       0        0
       0        0        0  8323327  8323199  8323072     0       0        0
       0        0        0 16711935 16711807 16711680     0       0        0

When I interchange rgb for grb I can tell where the biggest numbers in a
viewmat are. Can you using rgb? All I have done here is take each color
triple in thecube pattern viewmat and converted it to its :real countsing
number in the 256^3 position in the more than 16 million numbers.  The white
area can be spoted pretty easily.

Linda

-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of Raul Miller
Sent: Tuesday, July 28, 2015 4:12 PM
To: Programming forum <[email protected]>
Subject: Re: [Jprogramming] Trouble making patter for a color cube

I think this is what you are asking for:

load 'viewmat'

'E B G C R M Y W'=:#:i.8
V=:<E;E;E
FRONT=:<M;R;W
LEFT=:<M;W;B
TOP=:<W;Y;C
BACK=:<C;G;B
RIGHT=:<G;Y;E
BASE=:<B;E;M

face=: 4 :0
  'O X Y'=.y
  brush=.D=: <.255*O+"1](%x-1)*((i.x)*/Y-"1 O)+"1/(i.x)*/X-"1 O
)

cube=: 3 :0
  plan=: 4 3$V,FRONT,V,LEFT,TOP,V,V,BACK,RIGHT,V,BASE,V
  paint=:,/,/>,"_1 each/"1 C=:y face each plan
  paint viewmat i.4 3*y
)

cube 5

Personally, I prefer ('rgb' viewmat image), but your approach can certainly
be made to work.

Thanks,

--
Raul


On Tue, Jul 28, 2015 at 3:25 PM, Linda Alvord <[email protected]>
wrote:
> Here's how far I got translating it to Raul's method.  I can't generalize
to
> nxn squares.
>
> load 'viewmat'
>
> 'E B G C R M Y W'=:#:i.8
> V=:<E;E;E
> FRONT=:<M;R;W
> LEFT=:<M;W;B
> TOP=:<W;Y;C
> BACK=:<C;G;B
> RIGHT=:<G;Y;E
> BASE=:<B;E;M
>
> face=: 3 :0
> 'O X Y'=.y
> brush=.D=: <.255*O+"1]0.5*((i.3)*/Y-"1 O)+"1/(i.3)*/X-"1 O
> )
>
> cube=: 3 :0
> plan=:4 3$V,FRONT,V,LEFT,TOP,V,V,BACK,RIGHT,V,BASE,V
> paint=:,/,/>,"_1 each/"1 C=:face each plan
> paint viewmat i.12 9
> )
>
> cube ''
>
> Linda
>
> -----Original Message-----
> From: [email protected]
> [mailto:[email protected]] On Behalf Of Linda
Alvord
> Sent: Tuesday, July 28, 2015 3:05 PM
> To: [email protected]
> Subject: Re: [Jprogramming] Trouble making patter for a color cube
>
> Here's my latest which folds so the base has blue riht, red forward and
> green up. Then the upper right front corner is white.
>
> load 'viewmat'
> ColorCube=: 3 : 0
> N=:y
> G=:<.(i.N)*255%<: N
> A=:#:i.8
> B=:(((<:N)#0),G),.G,(<:N)#255
> BIGBOX=:<"2(|."2)1 0 2{"1(|:"2)(8 3 ,<:2*N)$,|:(,A){"1 B 'BLACK BLUE RED
> MAGENTA GREEN CYAN YELLOW WHITE'=:>BIGBOX
> LYELLOW=:(i.N){"2 YELLOW
> LCYAN=:(i.N){"2  CYAN
> LMAGENTA=:(i.N){"2 MAGENTA
>    GREEN=:((<:N)+i.N){"2 GREEN
> RED=:((<:N)+i.N){"2 RED
> BLUE=:((<:N)+i.N){"2 BLUE
> BACK=:((*:N), 3)$,LMAGENTA<."1/LYELLOW
> TOP=:((*:N), 3)$,LCYAN<."1/LYELLOW
> LEFT=:((*:N), 3)$,LMAGENTA<."1/LCYAN
> FRONT=:((*:N), 3)$,GREEN+"1/BLUE
> RIGHT=:((*:N), 3)$,GREEN+"1/RED
> BASE=:((*:N), 3)$,RED+"1/BLUE
> F=:i.2#N
> T=:(<:6*N^2),((<:N),N)$0
> L=:|:T
> R=:|:|.T
> WOW1=:(R,.(|.F),.L),((|:|.(N^2)+F),.((2*N^2)+F),.|.T)
>
> WOW2=:WOW1,(T,.((3*N^2)+F),.|:|.|:(4*N^2)+F)
> WOW3=:WOW2,(R,.(|.(5*N^2)+F),.L),"2,N(#"0) 0, (6*N^2), 0
> ALL=:BACK,LEFT,TOP,FRONT,RIGHT,BASE(,"2)0 0 0 ALL viewmat WOW3;'Color
Cube'
> )
>
> ColorCube 30
>
> I think only one line wrapped.  Another email follows With Raul's style
> which I can't generalize to nxn squares.
>
> Linda
> -----Original Message-----
> From: [email protected]
> [mailto:[email protected]] On Behalf Of David
Lambert
> Sent: Tuesday, July 28, 2015 1:09 PM
> To: programming <[email protected]>
> Subject: Re: [Jprogramming] Trouble making patter for a color cube
>
> This delightful color cube!  I rotated one of the arms so the pattern
won't
> look like a cross, which is beside the point.
>
> Has anyone yet virtually folded the image for display in perspective on
> opengl?  I need a color chooser and this looks more fun than a flat
display.
> With 5% probability I'll undertake the task but as it happens my
> understanding of homogeneous coordinates doesn't translate directly to
> "knowing how to use opengl".
>
>     boxdraw_j_ 1
>
>     4 3$<'  ' NB. with simple editing, fixed width font please
>     +--+
>     |  |
> +--+--+
> |  |  |
> +--+--+--+
>     |  |  |
>     +--+--+
>     |  |
>     +--+
>
> ----------------------------------------------------------------------
> 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

Reply via email to