I guess using gl2 commands would be a better choice. The graph addon is seldom maintained.
On 05.05.2014, at 23:39, Cliff Reiter <[email protected]> wrote: > Hi, > I have started puttering with J8.01 and in particular have been looking to > create an analog of the graphics/fvj3/dwin.ijs addon that allows users to > declare a range for x and y coordinates and open a window for plotting > polygons and doing simple animations. > I have essentially duplicated that script using the graphics/graph/graph > addon which seemed to be very nice starting place. > But I wonder > (1) is there an easy way in the graphics addon to control or hint about the > desired window size or aspect ratio? > (2) is there an easy way to label the window with something other than the > parent name? > (3) should I really be using wd gl2 commands instead? > (4) I wonder if there isn't a bug in gdarc01? Below is a fairly short example > illustrating the point. > Best, Cliff > > require '~addons/graphics/graph/graph.ijs' > > NB. ------------------------------------------------ > > NB.* dwin v Opens a drawing window > > NB. Example: > > NB. _2 _3 2 3 dwin 'example' > > NB. opens a drawing window where coordinates range > > NB. from _2 to 2 in x and _3 to 3 in y and > > NB. window name "example" > > dwin=: 3 : 0 NB. pixel sized window drawing > > 0 0 1 1 dwin y > > : > > 'a b c d'=.x > > SC=:((-&(a,b)) %((c-a),d-b)"1)"1 > > gdopen y > > gdshow'' > > ) > > > NB. (0 0 255;3 0) darc x y w h x0 y0 x1 y1 > > NB. where x,y is a corner of the circumscribing box; > > NB. w h is the extent; > > NB. x0 y0 is on a ray from the center to the start point; > > NB. x1 y1 is on a ray from the center to the end point; > > darc=:3 : 0"1 > > (0 0 0;1 0) darc y > > : > > if. 32=3!:0 x do. > > gdpencolor >{.x > > gdpen >{:x > > else. gdcolor x end. > > 'a b c d'=.4 2$y > > 'A B C D'=.SC a,(a+b),c,:d > > gdarc01 x:^:_1 A,(B-A),C,D > > gdshow'' > > ) > > > _2 _2 2 2 dwin 'si' > > (0 255 255;3 0) darc 0 0 2 2 2 0 0 2 > > > draws the arc as though the circle's center is _1 1 instead of 1 1 > > > -- > Clifford A. Reiter > Lafayette College, Easton, PA 18042 > http://webbox.lafayette.edu/~reiterc/ > > ---------------------------------------------------------------------- > For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
