I made the hour hand be a 24 hour hour-hand. To make it the more typical 12
hour hour-hand, change 2r24p1 2r60p1 2r60p1 to 2r12p1 2r60p1 2r60p1.

And the window freezing issue is a "feature" of jqt. To avoid that issue
with current versions of jqt, always close (or position) the plot window
before starting the clock.

Thanks,

-- 
Raul



On Fri, May 30, 2014 at 4:43 AM, Jan-Pieter Jacobs <
[email protected]> wrote:

> Nice!
> I tried your code in JQT (on windows 8), some remarks:
>
> The hour hand is pointing about the exact oposite direction it should.
> Somehow, switching windows also causes the plot window to freeze, and J to
> become unresponsive
>
>
> Jan-Pieter
>
>
> 2014-05-30 3:18 GMT+02:00 Raul Miller <[email protected]>:
>
> > Here's another approach (beware of email induced line wrap in definition
> of
> > show):
> >
> > N=:0.01*i.629
> > O=: [: j./ 1 2 o./ ]
> > delay=:6!:3    NB. "sleep"
> >
> > show=: [: plot (O N),N*/~0.07 0.11 0.15(*O) 2r24p1 2r60p1 2r60p1*_3{.6!:0
> > bind ''
> >
> > show@delay@1:^:9e9''
> >
> > I think this should work with both jqt and the j602 ide.
> >
> > Thanks,
> >
> > --
> > Raul
> >
> >
> >
> > On Thu, May 29, 2014 at 1:39 PM, David Lambert <[email protected]>
> > wrote:
> >
> > > http://rosettacode.org/wiki/Draw_a_clock#J
> > >
> > > The next author need only replace the draw dyad, or rewrite the
> > > contribution.
> > > x is the current session time, y is the session time when the verb
> > starts.
> > >
> > > round=: [: <. 0.5&+
> > > PICTURES=: u:16b2190+i.4      NB. arrows
> > > draw=: [: smoutput PICTURES ((|~ #)~ { [) [: round -
> > >
> > > ----------------------------------------------------------------------
> > > 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