Oh, good point, it's old.

Thanks,

-- 
Raul

On Sat, May 31, 2014 at 9:29 PM, bill lam <[email protected]> wrote:
> what is your JVERSION?
>
> 01.06.2014, в 9:22, Raul Miller <[email protected]> написал(а):
>
>> Is it that the timer is not working, or that paint events are stalled?
>>
>> Here's a clock program, under jqt:
>>
>> require'plot'
>> N=:0.01*i.629
>> O=: [: j./ 1 2 o./ ]
>> delay=:6!:3    NB. "sleep"
>> clock=: [: plot (O N),N*/~0.07 0.11 0.15(*O) 2r24p1 2r60p1
>> 2r60p1*_3{.6!:0 bind ''
>>
>> delay@1:@clock^:9e99''
>>
>> That works fine, initially. But if the window loses focus, it stops
>> updating. But if you use jbreak to regain control you should see a
>> final update which indicates that it continued to update.
>>
>> Now... this is not using the timer. But I think it does indicate the
>> kind of problem you can get into, isolating display update issues.
>>
>> Thanks,
>>
>> --
>> Raul
>>
>>
>> On Sat, May 31, 2014 at 5:53 PM, bill lam <[email protected]> wrote:
>>> I don't see why form timer will not work when a form does not have input 
>>> focus. You can verify this by running shader together with another demo at 
>>> the same time.
>>>
>>> I am unfamiliar with opengl or shading language.  Perhaps you can help to 
>>> write a more impressive demo. Thanks.
>>>
>>> 01.06.2014, в 0:01, "'Pascal Jasmin' via Beta" <[email protected]> 
>>> написал(а):
>>>
>>>>
>>>>
>>>> regarding the shader demo, I guess its related to gl_paint only working 
>>>> with active window rather than any bug in the timer code?
>>>>
>>>> I will note that its extremely unusual to intend for a form's timer event 
>>>> to get suspended on losing focus, and I'd suggest the demo would be more 
>>>> impressive to see multiple spinning cubes.
>>>>
>>>>
>>>>
>>>> ----- Original Message -----
>>>> From: bill lam <[email protected]>
>>>> To: 'Pascal Jasmin' via Beta <[email protected]>
>>>> Cc:
>>>> Sent: Saturday, May 31, 2014 10:27:45 AM
>>>> Subject: Re: [Jbeta] [Jprogramming] opportunity to show off jhs or qt
>>>>
>>>> I disagree. It would be written differently if intended to run multiple 
>>>> instances.
>>>>
>>>> I have difficulty to follow your timer example, in contrast,
>>>> Joe's is more readable to me. ymmv.
>>>>
>>>> Сб, 31 май 2014, JBeta написал(а):
>>>>> There is a bug in the shader demo.  When you launch 2 instances only the 
>>>>> window with mousefocus gets timer events.
>>>>>
>>>>>
>>>>> Thanks to Joe, here is a class that allows "formless timers".  It can be 
>>>>> coinserted into another locale (renaming new if name conflict).  kill 
>>>>> works without needing stop.  the stop,resume,kill verbs can be copied 
>>>>> into a " real form" locale, as long as it holds/sets a form variable, and 
>>>>> probably provide more reliable way to stop/resume timers from multiple 
>>>>> form instances.
>>>>>
>>>>> cocurrent 'timer'
>>>>> create =: 3 : 0
>>>>> form=:  'a', (> 18!:5 '')
>>>>> wd 'pc ' , form
>>>>> resume y
>>>>>
>>>>> )
>>>>> stop =: 3 : 0
>>>>>
>>>>> wd 'psel '  , form
>>>>> wd 'ptimer 0'
>>>>> )
>>>>> resume =: 3 : 0
>>>>> wd 'psel '  , form
>>>>> wd 'ptimer ', ": y
>>>>> )
>>>>> kill =: 3 : 0
>>>>> wd 'psel '  , form
>>>>> wd 'pclose'
>>>>> codestroy ''
>>>>> )
>>>>> timerexample =: 3 : 'smoutput (> 18!:5 '''') ,'': '', ": (6!:0) '''''
>>>>> loc_z_=: (,&'_'@[ ,&'_'@, ":@>@])"1 0
>>>>>
>>>>> new =: 3 : 0
>>>>> '' new y
>>>>> :
>>>>> o =. y conew  (> 18!:5 '')
>>>>> if. 0=#x do. x =.'timerexample' loc o end.
>>>>> ('a', (> o), '_timer__o') =: 3 : (x , ' ''''')
>>>>> o
>>>>> )
>>>>>
>>>>>  a =. 'smoutput (> 18!:5 '''') ,'': '', ": (6!:0)' new_timer_ 5000
>>>>>  b =. new_timer_ 6000                  NB. uses locale's timerexample 
>>>>> (overridable) as callback
>>>>>
>>>>>
>>>>> kill__a ''
>>>>> stop__b ''
>>>>> resume__b 3000
>>>>> kill__b ''
>>>>> ________________________________
>>>>> From: Joe Bogner <[email protected]>
>>>>> To: Pascal Jasmin <[email protected]>
>>>>> Cc: "[email protected]" <[email protected]>
>>>>> Sent: Saturday, May 31, 2014 5:46:51 AM
>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>
>>>>>
>>>>>
>>>>> You can use 'wd psel' to set the current form instance which is then used 
>>>>> by 'wd ptimer 0'
>>>>>
>>>>> NB. run two timers
>>>>> NB. works on j802 beta from 5/28
>>>>> wd 'pc c'
>>>>> wd 'ptimer 1000'
>>>>>
>>>>> c_timer =: 3 : 'smoutput@:<''c'';(6!:0) '''''
>>>>>
>>>>> wd 'pc d'
>>>>> wd 'ptimer 1000'
>>>>>
>>>>> d_timer =: 3 : 'smoutput@:<''d'';(6!:0) '''''
>>>>>
>>>>> wd 'psel c'
>>>>>
>>>>> wd 'ptimer 0' NB. stop c
>>>>>
>>>>> wd 'psel d'
>>>>>
>>>>> wd 'ptimer 0' NB. stop d
>>>>>
>>>>> wd 'psel c'
>>>>> wd 'ptimer 1000' NB. resume c
>>>>>
>>>>>
>>>>> determined from source: 
>>>>> http://www.jsoftware.com/download/j802/qtide/jqt-source.tar.gz
>>>>>
>>>>> A tip I used while testing is to use f8 to paste from keyboard. This 
>>>>> keeps the output from interfering with the input
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>
>>>>> On Sat, May 31, 2014 at 12:26 AM, Pascal Jasmin <[email protected]> 
>>>>> wrote:
>>>>>
>>>>>
>>>>>>
>>>>>> skipping the pshow command,
>>>>>>
>>>>>> I can get both of your timers to run, but can only get one of them to 
>>>>>> stop.  It appears as though
>>>>>> wd 'ptimer xx' affects the most recent wd 'pc X' command, so for 
>>>>>> instance, this sequence of commands:
>>>>>>
>>>>>>
>>>>>> c_timer =: 3 : 'smoutput@:<''c'';(6!:0) '''''
>>>>>>
>>>>>> d_timer =: 3 : 'smoutput@:<''d'';(6!:0) '''''
>>>>>> wd 'pc c'
>>>>>> wd 'ptimer 6000'
>>>>>> NB. runs as expected
>>>>>>  wd 'ptimer 0' NB. stops as expected.
>>>>>> wd 'pc d'
>>>>>> wd 'ptimer 6000'  NB. runs only d
>>>>>> wd 'pc c'
>>>>>> NB. still runs only d
>>>>>> wd 'ptimer 6000' NB. will run both on independent timers
>>>>>>
>>>>>> wd 'timer 0' NB.only stops C
>>>>>> wd 'pc d'
>>>>>> wd 'timer 0' NB. still d won't stop.
>>>>>>
>>>>>> erase 'd_timer'  NB. stops d
>>>>>>
>>>>>> using pshow and pclose doesn't change the result.
>>>>>>
>>>>>> it turns out that I can get my object instance timers to also run, but 
>>>>>> have the same problems stopping them... except its worse due to 
>>>>>> difficulty setting timer off.
>>>>>>
>>>>>> a =. 6000 conew't'
>>>>>> b =. 7000 conew't'
>>>>>> runs both ok.
>>>>>> stop__a ''  NB. stops b... the last pc command.
>>>>>> kill__b '' NB. runs ok apparently.  But does not stop a timer
>>>>>>
>>>>>> cannot run stop__a '' or kill__a '' effectively.  erase 'a' does 
>>>>>> nothing.  Quitting J is easiest, even this direct command fails
>>>>>>
>>>>>>  kill_0_''
>>>>>> |pclose : no parent selected: wd
>>>>>>
>>>>>> though this works: (where 0 is first locale...one part of smoutput)
>>>>>>  erase 'a0_timer_0_'
>>>>>>
>>>>>> _________________________
>>>>>> From: Joe Bogner <[email protected]>
>>>>>> To: Pascal J <[email protected]>
>>>>>> Sent: Friday, May 30, 2014 11:20:26 PM
>>>>>>
>>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>>
>>>>>>
>>>>>>
>>>>>> [off list]
>>>>>>
>>>>>> Hey Pascal, did you try the code that I posted with multiple timers? 
>>>>>> That worked for me... I didn't run yours but perhaps it's something with 
>>>>>> the locales... Just wanted to check first to see if you were successful 
>>>>>> with a more basic implementation of multiple timers
>>>>>>
>>>>>>
>>>>>>
>>>>>>
>>>>>>
>>>>>> On Fri, May 30, 2014 at 11:00 PM, 'Pascal Jasmin' via Programming 
>>>>>> <[email protected]> wrote:
>>>>>>
>>>>>> thank you Bill and Joe, with new version it works.  Also wd 'pshow' is 
>>>>>> not necessary.
>>>>>>>
>>>>>>> multiple timers may not work though.
>>>>>>>
>>>>>>> cocurrent 't'
>>>>>>> create =: 3 : 0
>>>>>>> ('a', (> 18!:5 ''), '_timer') =: 3 : 'smoutput (> 18!:5 '''') ,'': '', 
>>>>>>> ": (6!:0) '''''
>>>>>>> wd 'pc ' , 'a', (> 18!:5 '')
>>>>>>> resume y
>>>>>>> )
>>>>>>> NB. a_timer =: 3 : 'smoutput (> 18!:5 '''') ,'': '', ": (6!:0) '''''
>>>>>>> stop =: 3 : 0
>>>>>>> wd 'ptimer 0'
>>>>>>> )
>>>>>>> resume =: 3 : 0
>>>>>>> wd 'ptimer ', ": y
>>>>>>> )
>>>>>>> kill =: 3 : 0
>>>>>>> wd 'pclose'
>>>>>>> codestroy ''
>>>>>>> )
>>>>>>>
>>>>>>>  a =. 4000 conew 't'  NB. will start timer
>>>>>>>
>>>>>>> stop__a '' NB. will stop timer
>>>>>>>
>>>>>>>   a
>>>>>>> ┌─┐
>>>>>>> │1│
>>>>>>> └─┘
>>>>>>>
>>>>>>>  ] b =. 4000 conew 't'  NB. will start new timer ... replacing old.
>>>>>>> ┌─┐
>>>>>>> │2│
>>>>>>> └─┘
>>>>>>> NB. you will see that only timer from b runs.   resume__a 2000 will run 
>>>>>>> the timer from b.  This error will repeat if you create a 3rd instance. 
>>>>>>>  Only timer from last instance runs, even though they all have 
>>>>>>> different "forms" a1 and a2.  stop__a '' will stop the timer even if 
>>>>>>> only b is running.
>>>>>>>
>>>>>>>  a1_timer__a ''  NB. a1 comes from using the locale number for variable 
>>>>>>> a
>>>>>>> 1: 2014 5 30 22 28 48.138
>>>>>>>
>>>>>>>   a2_timer__b ''  NB. a2 comes from using the locale number for 
>>>>>>> variable b
>>>>>>> 2: 2014 5 30 22 29 17.594
>>>>>>>
>>>>>>> If you kill either a or b, then resume__a 3000 will fail, as both 
>>>>>>> "forms" are killed.
>>>>>>>
>>>>>>>   resume__a 3000
>>>>>>> |ptimer : no parent selected: wd
>>>>>>>
>>>>>>>
>>>>>>> Perhaps this is related to my poor understanding of how to run multiple 
>>>>>>> copies of a form?
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> ----- Original Message -----
>>>>>>> From: Joe Bogner <[email protected]>
>>>>>>> To: [email protected]
>>>>>>> Cc:
>>>>>>>
>>>>>>> Sent: Friday, May 30, 2014 9:21:00 PM
>>>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>>>
>>>>>>> Pascal, you need to update to the latest.
>>>>>>>
>>>>>>> Engine: j701/2011-01-10/11:25
>>>>>>>
>>>>>>> Library: 8.02.06
>>>>>>>
>>>>>>> Qt IDE: 1.1.2/5.3.0
>>>>>>>
>>>>>>> Platform: Win 32
>>>>>>>
>>>>>>> Installer: J802 install
>>>>>>>
>>>>>>> InstallPath: c:/users/joe/j802
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> This works on the latest
>>>>>>>
>>>>>>>
>>>>>>> NB. run two timers
>>>>>>>
>>>>>>> NB. works on j802 beta from 5/28
>>>>>>>
>>>>>>> wd 'pc c'
>>>>>>>
>>>>>>> wd 'pshow'  NB. shows empty form
>>>>>>>
>>>>>>> wd :: empty 'ptimer 1000'
>>>>>>>
>>>>>>>
>>>>>>> c_timer =: 3 : 'smoutput@:<''c'';(6!:0) '''''
>>>>>>>
>>>>>>>
>>>>>>> wd 'pc d'
>>>>>>>
>>>>>>> wd 'pshow'  NB. shows empty form
>>>>>>>
>>>>>>> wd :: empty 'ptimer 1000'
>>>>>>>
>>>>>>>
>>>>>>> d_timer =: 3 : 'smoutput@:<''d'';(6!:0) '''''
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> This worked on the previous
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> NB. worked previous j802 beta
>>>>>>>
>>>>>>> wd 'pc a'
>>>>>>>
>>>>>>> wd 'cc g opengl version 2.0 flush'
>>>>>>>
>>>>>>> wd 'pshow'  NB. shows empty form
>>>>>>>
>>>>>>> wd 'set g timer 1000'
>>>>>>>
>>>>>>> a_g_timer =: 3 : 'smoutput@:<''a'';(6!:0) '''''
>>>>>>>
>>>>>>>
>>>>>>> wd 'pc b'
>>>>>>>
>>>>>>> wd 'cc g opengl version 2.0 flush'
>>>>>>>
>>>>>>> wd 'pshow'  NB. shows empty form
>>>>>>>
>>>>>>> wd 'set g timer 1000'
>>>>>>>
>>>>>>> b_g_timer =: 3 : 'smoutput@:<''b'';(6!:0) '''''
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> I was stuck on it too
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> On Fri, May 30, 2014 at 9:12 PM, 'Pascal Jasmin' via Programming <
>>>>>>> [email protected]> wrote:
>>>>>>>
>>>>>>>> Engine: j701/2011-01-10/11:25
>>>>>>>> Library: 8.02.06
>>>>>>>> Qt IDE: 1.1.1/5.3.0
>>>>>>>> Platform: Win 64
>>>>>>>>
>>>>>>>>
>>>>>>>> ----- Original Message -----
>>>>>>>> From: bill lam <[email protected]>
>>>>>>>> To: "[email protected]" <[email protected]>
>>>>>>>> Cc:
>>>>>>>> Sent: Friday, May 30, 2014 8:12:21 PM
>>>>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>>>>
>>>>>>>> what is your JVERSION ?
>>>>>>>>
>>>>>>>> 31.05.2014, в 8:03, "'Pascal Jasmin' via Programming" <
>>>>>>>> [email protected]> написал(а):
>>>>>>>>
>>>>>>>>> the shader demo works.  cube rotates, etc...
>>>>>>>>>
>>>>>>>>> when I try those 3 lines from the base locale (jqt802 console 
>>>>>>>>> session),
>>>>>>>> the error shown occurs.
>>>>>>>>>
>>>>>>>>>
>>>>>>>>> ----- Original Message -----
>>>>>>>>> From: bill lam <[email protected]>
>>>>>>>>> To: "[email protected]" <[email protected]>
>>>>>>>>> Cc:
>>>>>>>>> Sent: Friday, May 30, 2014 8:00:24 PM
>>>>>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>>>>>
>>>>>>>>> did the cube rotate? did you test on the latest j802/jqt beta?
>>>>>>>>>
>>>>>>>>> 31.05.2014, в 7:48, "'Pascal Jasmin' via Programming" <
>>>>>>>> [email protected]> написал(а):
>>>>>>>>>
>>>>>>>>>> from base,
>>>>>>>>>>
>>>>>>>>>>    wd 'pc a;'  NB. or 'pc a'
>>>>>>>>>>     wd 'pshow'  NB. shows empty form
>>>>>>>>>>     wd 'ptimer 2000'
>>>>>>>>>> |ptimer : parent command not found: ptimer: wd
>>>>>>>>>>
>>>>>>>>>>
>>>>>>>>>>     a_timer_base_
>>>>>>>>>> 3 : 'smoutput@:(6!:0) '''''
>>>>>>>>>>
>>>>>>>>>> is this something related to base locale?
>>>>>>>>>>
>>>>>>>>>> shader demo works ok.
>>>>>>>>>>
>>>>>>>>>>
>>>>>>>>>> ----- Original Message -----
>>>>>>>>>> From: bill lam <[email protected]>
>>>>>>>>>> To: "[email protected]" <[email protected]>
>>>>>>>>>> Cc:
>>>>>>>>>> Sent: Friday, May 30, 2014 6:40:53 PM
>>>>>>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>>>>>>
>>>>>>>>>> You didn't even create a form. To recap, a form is created using wd 
>>>>>>>>>> cmd
>>>>>>>> eg
>>>>>>>>>>
>>>>>>>>>> wd'pc  foo'
>>>>>>>>>>
>>>>>>>>>> the locale of a form is the current locale when that wd'pc foo' is
>>>>>>>> executed.
>>>>>>>>>>
>>>>>>>>>> 31.05.2014, в 0:49, "'Pascal Jasmin' via Programming" <
>>>>>>>> [email protected]> написал(а):
>>>>>>>>>>
>>>>>>>>>>> sorry for previous message, was running timer and not ptimer.
>>>>>>>>>>>
>>>>>>>>>>> It does not appear as though you can get a timer into an arbitrary
>>>>>>>> locale by just doing wd 'pc a' there.  The form has to be visible, or 
>>>>>>>> needs
>>>>>>>> an initial show?
>>>>>>>>>>>
>>>>>>>>>>>
>>>>>>>>>>>
>>>>>>>>>>>
>>>>>>>>>>> ----- Original Message -----
>>>>>>>>>>> From: 'Pascal Jasmin' via Programming <[email protected]>
>>>>>>>>>>> To: "[email protected]" <[email protected]>
>>>>>>>>>>> Cc:
>>>>>>>>>>> Sent: Friday, May 30, 2014 12:23:37 PM
>>>>>>>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>>>>>>>
>>>>>>>>>>> Nice, thank you.
>>>>>>>>>>>
>>>>>>>>>>> You can also use a timer in any arbitrary locale (I think)
>>>>>>>>>>>
>>>>>>>>>>>      a_timer_ =: show_base_
>>>>>>>>>>>      wd_a_ 'timer 2000'
>>>>>>>>>>>
>>>>>>>>>>> or
>>>>>>>>>>>
>>>>>>>>>>>    aa =. conew 'a'
>>>>>>>>>>>    wd__aa 'timer 2000'
>>>>>>>>>>>
>>>>>>>>>>> acts a little weird with just one plot window, but that might be 
>>>>>>>>>>> plot
>>>>>>>> related?
>>>>>>>>>>>
>>>>>>>>>>>
>>>>>>>>>>> ----- Original Message -----
>>>>>>>>>>> From: bill lam <[email protected]>
>>>>>>>>>>> To: 'Pascal Jasmin' via Programming <[email protected]>
>>>>>>>>>>> Cc:
>>>>>>>>>>> Sent: Friday, May 30, 2014 11:19:17 AM
>>>>>>>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>>>>>>>
>>>>>>>>>>> Oh sorry!  I thought ptimer was documented but not yet. Basically
>>>>>>>>>>> it is very simple, if your form id is 'foo' then the name of the
>>>>>>>>>>> timer callback verb is 'foo_timer' in the form's locale.  Each form
>>>>>>>>>>> has its own timer. wd'ptimer xx' will start or stop timer attached
>>>>>>>>>>> to the current form.  Unlike the old wd timer, form timers will not
>>>>>>>>>>> break existing code. In qt shader demo, the cube is rotated by a
>>>>>>>>>>> form timer.
>>>>>>>>>>>
>>>>>>>>>>> Пт, 30 май 2014, jprogramming написал(а):
>>>>>>>>>>>> good news about wd 'timer' for forms.  A wishlist would include a 
>>>>>>>>>>>> way
>>>>>>>> for minimal library load for jconsole support.
>>>>>>>>>>>>
>>>>>>>>>>>> I don't see it mentioned here though
>>>>>>>> http://www.jsoftware.com/jwiki/System/ReleaseNotes/J802
>>>>>>>>>>>>
>>>>>>>>>>>> I did see that the timer qt demo app has been updated, but its hard
>>>>>>>> to understand without a "qtdemo form"
>>>>>>>>>>>>
>>>>>>>>>>>> there is no mention of wd 'ptimer' here:
>>>>>>>> http://www.jsoftware.com/jwiki/Guides/Window%20Driver/Command%20Reference
>>>>>>>>>>>>
>>>>>>>>>>>>
>>>>>>>>>>>> ----- Original Message -----
>>>>>>>>>>>> From: bill lam <[email protected]>
>>>>>>>>>>>> To: [email protected]
>>>>>>>>>>>> Cc:
>>>>>>>>>>>> Sent: Friday, May 30, 2014 10:08:14 AM
>>>>>>>>>>>> Subject: Re: [Jprogramming] opportunity to show off jhs or qt
>>>>>>>>>>>>
>>>>>>>>>>>> sleep will halt current thread, not a feature of jqt.  One can
>>>>>>>>>>>> use wd'timer' to fire event.  Furthermore J802 introduce form timer
>>>>>>>>>>>> for each form, see high-lights.
>>>>>>>>>>>>
>>>>>>>>>>>> Пт, 30 май 2014, Raul Miller написал(а):
>>>>>>>>>>>>> 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
>>>>>>>>>>>>
>>>>>>>>>>>> --
>>>>>>>>>>>> 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
>>>>>>>>>>>
>>>>>>>>>>> --
>>>>>>>>>>> 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
>>>>>>>>> ----------------------------------------------------------------------
>>>>>>>>> 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
>>>>>>> ----------------------------------------------------------------------
>>>>>>> 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
> ----------------------------------------------------------------------
> 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