From: DesdeChaves <desdechaves@gmail.com>
To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Subject: Re: Request for metapost
Date: Mon, 23 Dec 2013 14:31:31 +0000 [thread overview]
Message-ID: <CAPBmU9Gi07M1fzdc6ps=oM3JzO--jgv1RzO=H9kR-vwMs9aSCg@mail.gmail.com> (raw)
In-Reply-To: <52B72B17.3000702@wxs.nl>
[-- Attachment #1.1: Type: text/plain, Size: 5720 bytes --]
Thanks very much for your support.
Jorge
2013/12/22 Hans Hagen <pragma@wxs.nl>
> On 12/22/2013 3:57 PM, Hans Hagen wrote:
>
>> On 12/21/2013 12:50 PM, DesdeChaves wrote:
>>
>>>
>>> I know that metapost can send the variables "version", "number",
>>> "string", "point", "quad", "boolean" and "path" to Context.
>>> "triplet" variable can't pass. It will be very usefull if metapost can
>>> send a array to context.
>>>
>>> \startMPcode
>>>
>>> numeric x[];
>>> for i = 1 upto 10: x[i]:=random; endfor
>>>
>>> passvariable("array",x);
>>> passvariable("version","1.0") ;
>>> passvariable("number",x[1]) ;
>>> passvariable("string","whatever") ;
>>> passvariable("point",(1,2)) ;
>>> passvariable("triplet",(1,2,3)) ;
>>> passvariable("quad",(1,2,3,4)) ;
>>> passvariable("boolean",false) ;
>>> passvariable("path",fullcircle scaled 1cm) ;
>>>
>>>
>>> \stopMPcode
>>>
>>> \ctxluacode{inspect(metapost.variables)}
>>>
>>> \ctxcommand{mprunvar("array")}
>>>
>>> Thanks in advance
>>>
>>
>> that's less trivial (as automatism) so i provide passarrayvariable now
>> (next beta) ... of course the next request would concern complex arrays
>> so i also made a more low level flusher
>>
>> \starttext
>>
>> \startMPcode
>> numeric n[] ; for i=1 upto 10: n[i] := i + 1 ; endfor ;
>> path p[] ; for i=1 upto 10: p[i] := fullcircle scaled (i*cm) ;
>> endfor ;
>> numeric n[][] ; for i=1,4 : for j=1,3 : n[i][j] = uniformdeviate(1)
>> ; endfor ; endfor ;
>>
>> passvariable("x",12345) ;
>> passarrayvariable("n-array",n,1,7,1) ;
>> passarrayvariable("p-array",p,1,7,1) ;
>> passvariable("p",(1,1) .. (2,2)) ;
>>
>> % watch out: no ; in between
>>
>> startpassingvariable("b")
>> startarray
>> for i=1,4 :
>> startarray
>> for j=1,3 :
>> value(n[i][j])
>> endfor
>> stoparray
>> endfor
>> stoparray
>> stoppassingvariable ;
>>
>> startpassingvariable("a")
>> starthash
>> key("test1")
>> startarray
>> value(123)
>> value(456)
>> stoparray
>> key("test2")
>> starthash
>> key("test")
>> value(789)
>> stophash
>> stophash
>> stoppassingvariable ;
>>
>> draw fullcircle scaled 1cm ;
>> \stopMPcode
>>
>> \ctxluacode{inspect(metapost.variables)}
>>
>> \ctxcommand{mprunvar("x")}
>>
>> \stoptext
>>
>
> \starttext
>
> % \enabletrackers[metapost.variables]
>
> \startMPcode
> numeric n[] ; for i=1 upto 10: n[i] := 1/i ; endfor ;
> path p[] ; for i=1 upto 10: p[i] := fullcircle xyscaled
> (cm*i,cm/i) ; endfor ;
> numeric r[][] ; for i=1 upto 4 : for j=1 upto 3 : r[i][j] :=
> uniformdeviate(1) ; endfor ; endfor ;
> pair u[][] ; for i=1 step 0.5 until 4 : for j=1 step 0.1 until 2 :
> u[i][j] := (i,j) ; endfor ; endfor ;
>
>
> passvariable("x",12345) ;
> passarrayvariable("n-array",n,1,7,1) ;
> passarrayvariable("p-array",p,1,7,1) ;
> passvariable("p",(1,1) .. (2,2)) ;
>
> startpassingvariable("b")
> startarray
> for i=1 upto 4 :
> startarray
> for j=1 upto 3 :
> value(r[i][j])
>
> endfor
> stoparray
> endfor
> stoparray
> stoppassingvariable ;
>
> startpassingvariable("a")
> starthash
> key("test 1")
>
> startarray
> value(123)
> value(456)
> stoparray
> key("test 2")
> startarray
> index(0)
> value(123)
> value(456)
> value(789)
> slot(999,987)
> stoparray
> key("test 3")
> starthash
> key("first") value(789)
> entry("second",987)
> stophash
> stophash
> stoppassingvariable ;
>
> startpassingvariable("c")
> startarray
> for i=1 step 0.5 until 4 :
> index(i)
> startarray
> for j=1 step 0.1 until 2 :
> slot(j,u[i][j])
>
> endfor
> stoparray
> endfor
> stoparray
> stoppassingvariable ;
>
> draw fullcircle scaled 1cm ;
> \stopMPcode
>
> \ctxluacode{inspect(metapost.variables)}
>
> \ctxcommand{mprunvar("x")}
>
> \stoptext
>
>
>
> -----------------------------------------------------------------
> Hans Hagen | PRAGMA ADE
> Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
> tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com
> | www.pragma-pod.nl
> -----------------------------------------------------------------
> ____________________________________________________________
> _______________________
> If your question is of interest to others as well, please add an entry to
> the Wiki!
>
> maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/
> listinfo/ntg-context
> webpage : http://www.pragma-ade.nl / http://tex.aanhet.net
> archive : http://foundry.supelec.fr/projects/contextrev/
> wiki : http://contextgarden.net
> ____________________________________________________________
> _______________________
>
--
Atentamente
DesdeChaves
[-- Attachment #1.2: Type: text/html, Size: 7983 bytes --]
[-- Attachment #2: Type: text/plain, Size: 485 bytes --]
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://tex.aanhet.net
archive : http://foundry.supelec.fr/projects/contextrev/
wiki : http://contextgarden.net
___________________________________________________________________________________
next prev parent reply other threads:[~2013-12-23 14:31 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-12-21 11:50 DesdeChaves
2013-12-22 14:57 ` Hans Hagen
2013-12-22 18:10 ` Hans Hagen
2013-12-23 14:31 ` DesdeChaves [this message]
2013-12-23 15:52 ` DesdeChaves
2013-12-23 16:21 ` Hans Hagen
2013-12-25 14:53 ` Peter Rolf
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to='CAPBmU9Gi07M1fzdc6ps=oM3JzO--jgv1RzO=H9kR-vwMs9aSCg@mail.gmail.com' \
--to=desdechaves@gmail.com \
--cc=ntg-context@ntg.nl \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).