On 8/24/2021 6:12 PM, Bruce Horrocks wrote:
Thanks. I'll wait for your upload and try again. i uploaded new bins
just for fun (yesterday i needed a distraction) i also added some basic mechanism for repeatable random numbers (i can add more if needed) (the usual tex / lua / mp interfaces) \starttext % \enabletrackers[system.randomizer.details] % empty == default \newrepeatablerandom\MyRandom {Welcome 2 America} \newrepeatablerandom\MyRandomN{\randomnumber{0}{1000}} \newrepeatablerandom\MyRandomM{\randomnumber{0}{1000}} \cldcontext{utilities.randomizer.getrepeatableseed()}\par \cldcontext{utilities.randomizer.getrepeatableseed("default")}\par \cldcontext{utilities.randomizer.getrepeatableseed("MyRandom")}\par \cldcontext{utilities.randomizer.getrepeatableseed("MyRandomN")}\par \cldcontext{utilities.randomizer.getrepeatableseed("MyRandomM")}\par \dorecurse{10}{\MyRandom\par} \startlinecorrection \startMPcode randomseed := repeatablerandom("MyRandom") ; draw image ( for i=1 upto 1000 : draw origin randomized 100 ; endfor ; ) withpen pencircle scaled 1 withcolor white withstacking 2 ; fill boundingbox currentpicture withcolor darkred withstacking 1 ; \stopMPcode \stoplinecorrection \startluacode context(utilities.randomizer.getrepeatableseed("MyRandom")) context.par() local rep = utilities.randomizer.getrepeatable("MyRandom") for i=1,5 do context(rep()) context.par() end \stopluacode \stoptext ----------------------------------------------------------------- Hans Hagen | PRAGMA ADE Ridderstraat 27 | 8061 GH Hasselt | The Netherlands tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl -----------------------------------------------------------------
participants (1)
-
Hans Hagen