Show the letters of the alphabet with a loop (Metapost)
The idea is to display the first 25 letters of the alphabet. The code below shows the letter a to show what I want to do. Thank you. Fabrice \starttext \startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft("A", (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode \stoptext
On 2/2/19 10:47 PM, Fabrice Couvreur wrote:
The idea is to display the first 25 letters of the alphabet. The code below shows the letter a to show what I want to do. Thank you. Fabrice
Use char and ASCII. \starttext \startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode \stoptext
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft("A", (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
___________________________________________________________________________________ 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 ___________________________________________________________________________________
Hi Henri,
Great ! I would also like these letters to be randomly colored.
Thank you.
Fabrice
Le sam. 2 févr. 2019 à 11:16, Henri Menke
On 2/2/19 10:47 PM, Fabrice Couvreur wrote:
The idea is to display the first 25 letters of the alphabet. The code below shows the letter a to show what I want to do. Thank you. Fabrice
Use char and ASCII.
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft("A", (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
___________________________________________________________________________________
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
___________________________________________________________________________________
___________________________________________________________________________________ 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
___________________________________________________________________________________
On 2/2/19 11:49 PM, Fabrice Couvreur wrote:
Hi Henri, Great ! I would also like these letters to be randomly colored.
You should play with randomseed, the starting color (here white) and the randomization amplitude (1,1,1). You mileage may vary. \starttext \startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) withcolor white randomized (1,1,1) ; endfor ; endfor ; \stopMPcode \stoptext
Thank you. Fabrice
Le sam. 2 févr. 2019 à 11:16, Henri Menke
a écrit : On 2/2/19 10:47 PM, Fabrice Couvreur wrote:
The idea is to display the first 25 letters of the alphabet. The code below shows the letter a to show what I want to do. Thank you. Fabrice
Use char and ASCII.
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft("A", (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
___________________________________________________________________________________
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
___________________________________________________________________________________
___________________________________________________________________________________ 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
___________________________________________________________________________________
___________________________________________________________________________________ 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 ___________________________________________________________________________________
Hi Henry
Thank you for everything.
Fabrice
Le sam. 2 févr. 2019 à 20:58, Henri Menke
On 2/2/19 11:49 PM, Fabrice Couvreur wrote:
Hi Henri, Great ! I would also like these letters to be randomly colored.
You should play with randomseed, the starting color (here white) and the randomization amplitude (1,1,1). You mileage may vary.
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) withcolor white randomized (1,1,1) ; endfor ; endfor ; \stopMPcode
\stoptext
Thank you. Fabrice
Le sam. 2 févr. 2019 à 11:16, Henri Menke
a écrit : On 2/2/19 10:47 PM, Fabrice Couvreur wrote:
The idea is to display the first 25 letters of the alphabet. The code below shows the letter a to show what I want to do. Thank you. Fabrice
Use char and ASCII.
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft("A", (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
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
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
___________________________________________________________________________________
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
___________________________________________________________________________________
___________________________________________________________________________________ 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
___________________________________________________________________________________
Sorry Henri, but I still have a question : how to have the letters in bold
type ?
Thank you.
Fabrice
Le dim. 3 févr. 2019 à 10:12, Fabrice Couvreur
Hi Henry Thank you for everything. Fabrice
Le sam. 2 févr. 2019 à 20:58, Henri Menke
a écrit : On 2/2/19 11:49 PM, Fabrice Couvreur wrote:
Hi Henri, Great ! I would also like these letters to be randomly colored.
You should play with randomseed, the starting color (here white) and the randomization amplitude (1,1,1). You mileage may vary.
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) withcolor white randomized (1,1,1) ; endfor ; endfor ; \stopMPcode
\stoptext
Thank you. Fabrice
Le sam. 2 févr. 2019 à 11:16, Henri Menke
a écrit : On 2/2/19 10:47 PM, Fabrice Couvreur wrote:
The idea is to display the first 25 letters of the alphabet. The code below shows the letter a to show what I want to do. Thank you. Fabrice
Use char and ASCII.
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft("A", (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
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
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
___________________________________________________________________________________
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
___________________________________________________________________________________
___________________________________________________________________________________ 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
___________________________________________________________________________________
On 4/02/19 12:50 AM, Fabrice Couvreur wrote:
Sorry Henri, but I still have a question : how to have the letters in bold type ?
Use the infont operator. That info is a bit hidden in “2.10 Analyzing pictures” of the MetaFun manual. \starttext \startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft( char(i*5+j+ASCII "A") infont "SerifBold*default", (4*i*cm,4*j*cm) ) withcolor white randomized (1,1,1) ; endfor ; endfor ; \stopMPcode \stoptext
Thank you. Fabrice
Le dim. 3 févr. 2019 à 10:12, Fabrice Couvreur
a écrit : Hi Henry Thank you for everything. Fabrice
Le sam. 2 févr. 2019 à 20:58, Henri Menke
a écrit : On 2/2/19 11:49 PM, Fabrice Couvreur wrote:
Hi Henri, Great ! I would also like these letters to be randomly colored.
You should play with randomseed, the starting color (here white) and the randomization amplitude (1,1,1). You mileage may vary.
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) withcolor white randomized (1,1,1) ; endfor ; endfor ; \stopMPcode
\stoptext
Thank you. Fabrice
Le sam. 2 févr. 2019 à 11:16, Henri Menke
a écrit : On 2/2/19 10:47 PM, Fabrice Couvreur wrote:
The idea is to display the first 25 letters of the alphabet. The code below shows the letter a to show what I want to do. Thank you. Fabrice
Use char and ASCII.
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft(char(i*5+j+ASCII "A"), (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
\starttext
\startMPcode for i=0 upto 3 : for j=0 upto 3 : draw unitsquare scaled 4cm shifted (4*i*cm,4*j*cm) ; endfor ; endfor ; for i=0 upto 4 : for j=0 upto 4 : label.llft("A", (4*i*cm,4*j*cm)) ; endfor ; endfor ; \stopMPcode
\stoptext
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
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
___________________________________________________________________________________
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
___________________________________________________________________________________
___________________________________________________________________________________ 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
___________________________________________________________________________________
___________________________________________________________________________________ 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 ___________________________________________________________________________________
Hi,
@ Henri Thank you
@ Alan How to use it in my code ?
Thank you
Fabrice
Le dim. 3 févr. 2019 à 21:26, Alan Braslau
On Mon, 4 Feb 2019 09:19:26 +1300 Henri Menke
wrote: Use the infont operator.
Easier yet, the string can contain the font switch \bf:
draw textext("\bf "&char(i)) ;
___________________________________________________________________________________ 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
___________________________________________________________________________________
participants (3)
-
Alan Braslau
-
Fabrice Couvreur
-
Henri Menke