RosettaCodeData/Task/Xiaolin-Wus-line-algorithm/J/xiaolin-wus-line-algorithm-2.j

   wd'pc win closeok; xywh 0 0 300 200;cc g isigraph; pas 0 0; pshow;' NB. J6 or earlier
   wd'pc win closeok; minwh 600 400;cc g isidraw flush; pshow;'        NB. J802 or later
   glpaint glclear ''
   glpaint drawLine 10 10 590 390
March 2014 update 2014-04-02 16:56:35 +00:00			`wd'pc win closeok; xywh 0 0 300 200;cc g isigraph; pas 0 0; pshow;' NB. J6 or earlier`
Just another update 2015-02-20 00:35:01 -05:00			`wd'pc win closeok; minwh 600 400;cc g isidraw flush; pshow;' NB. J802 or later`
			`glpaint glclear ''`
all tasks 2013-04-11 01:07:29 -07:00			`glpaint drawLine 10 10 590 390`