ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
* How to define an array of pens
@ 2020-06-22  7:17 Otared Kavian
  2020-06-22  7:28 ` Taco Hoekwater
  2020-06-22 14:32 ` Alan Braslau
  0 siblings, 2 replies; 4+ messages in thread
From: Otared Kavian @ 2020-06-22  7:17 UTC (permalink / raw)
  To: mailing list for ConTeXt users

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
___________________________________________________________________________________

^ permalink raw reply	[flat|nested] 4+ messages in thread

end of thread, other threads:[~2020-06-22 14:32 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2020-06-22  7:17 How to define an array of pens Otared Kavian
2020-06-22  7:28 ` Taco Hoekwater
2020-06-22  9:23   ` Otared Kavian
2020-06-22 14:32 ` Alan Braslau

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).