From: Otared Kavian <otared@gmail.com>
To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Subject: How to define an array of pens
Date: Mon, 22 Jun 2020 09:17:31 +0200 [thread overview]
Message-ID: <31C176F0-61C7-4A4C-8DCD-D46CDA697E60@gmail.com> (raw)
Hi Hans,
After learning from you how to define an array of colors and paths, I would like to know how is it possible to define a variable pen size.
In the following working example below, I would like to replace
MyPens[j] := pencircle scaled 2pt ;
by something like
MyPens[j] := pencircle scaled (2+j) pt ;
but this does not work (neither do (2+j)*pt).
Is it possible to specify the pen size according to the value of j, without using a structure like
if j == -1 :
MyPens[j] := pencircle scaled 1pt ;
elseif j == 0 :
MyPens[j] := pencircle scaled 2pt ;
else :
MyPens[j] := pencircle scaled 3pt ;
fi
(In my real example I have more than three values for j).
%% begin example-array.tex
\startMPpage
string MyColors[] ;
path MyPaths [] ;
pen MyPens[] ;
for j = -1 step 1 until 1 :
MyPens[j] := pencircle scaled 2pt ; % I would like to say here (2+j) pt
endfor
MyPaths[-1] := (-1.5cm,1.5cm) -- (1.5cm,1.5cm) ; MyColors[-1] := "magenta" ;
MyPaths[0] := (-2cm,2cm) -- (2cm,-2cm) ; MyColors[0] := "darkyellow" ;
MyPaths[1] := fullcircle scaled 3cm ; MyColors[1] := "darkred" ;
for j = -1 step 1 until 1 :
draw MyPaths[j] withpen MyPens[j] withcolor MyColors[j] ;
endfor
\stopMPpage
%% end example-array.tex
Best regards: Otared
___________________________________________________________________________________
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://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
next reply other threads:[~2020-06-22 7:17 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2020-06-22 7:17 Otared Kavian [this message]
2020-06-22 7:28 ` Taco Hoekwater
2020-06-22 9:23 ` Otared Kavian
2020-06-22 14:32 ` Alan Braslau
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=31C176F0-61C7-4A4C-8DCD-D46CDA697E60@gmail.com \
--to=otared@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).