Difference between revisions of "textext positioning"

From Wiki
Jump to navigation Jump to search
(Created page with "<context source="yes"> \define[1]\MyFont{\definedfont[#1]\ignorespaces} \starttext \startMPpage draw (0cm,0cm)--(20cm,0cm)--(20cm,20cm)--(0cm,20cm)--cycle withpen penci...")
 
m
Line 1: Line 1:
<context source="yes">
+
<context mode="mkiv" source="yes">
  
 
\define[1]\MyFont{\definedfont[#1]\ignorespaces}
 
\define[1]\MyFont{\definedfont[#1]\ignorespaces}

Revision as of 09:27, 20 December 2020


\define[1]\MyFont{\definedfont[#1]\ignorespaces}
 
\starttext

\startMPpage

draw (0cm,0cm)--(20cm,0cm)--(20cm,20cm)--(0cm,20cm)--cycle
  withpen pencircle
  scaled 0.5mm
  withcolor red;

%------------------------------------------------------------------------------

pair PA ;  PA := (10cm,16cm) ;
  
draw textext.urt("\ruledhbox{\MyFont{name:dejavusans*default at 25pt}  URT Aujourd'hui}") shifted PA;
draw textext.ulft("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} ULFT Aujourd'hui}") shifted PA;

draw textext.llft("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} LLFT Aujourd'hui}") shifted PA;
draw textext.lrt("\ruledhbox{\MyFont{name:dejavusans*default at 25pt}  LRT Aujourd'hui}")  shifted PA;

draw PA withpen pencircle scaled 1.5mm  withcolor red;

%------------------------------------------------------------------------------

pair PB ;  PB := PA shifted (0cm,-2cm) ;
  
draw textext.drt("\ruledhbox{\MyFont{name:dejavusans*default at 25pt}  DRT Aujourd'hui}") shifted PB;
draw textext.dlft("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} DLFT Aujourd'hui}") shifted PB;

draw PB withpen pencircle scaled 1.5mm  withcolor red;

%------------------------------------------------------------------------------

pair PC ;  PC := PB shifted (0cm,-2cm) ;
  
draw textext.d("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} D Aujourd'hui}") shifted PC;


draw PC withpen pencircle scaled 1.5mm  withcolor red;

%------------------------------------------------------------------------------

pair PD ;  PD := PC shifted (0cm,-2cm) ;
  
draw textext.bot("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} BOT Aujourd'hui}")  shifted PD;
draw textext.top("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} TOP Aujourd'hui}") shifted PD;

draw PD withpen pencircle scaled 1.5mm  withcolor red;

%------------------------------------------------------------------------------

pair PE ;  PE := PD shifted (0cm,-2cm) ;
  
draw textext.lft("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} LFT Aujourd'hui}") shifted PE;
draw textext.rt("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} RT Aujourd'hui}") shifted PE;

draw PE withpen pencircle scaled 1.5mm  withcolor red;

%------------------------------------------------------------------------------

pair PF ;  PF := PE shifted (0cm,-2cm) ;
  
draw textext("\ruledhbox{\MyFont{name:dejavusans*default at 25pt} Aujourd'hui}") shifted PF;

draw PF withpen pencircle scaled 1.5mm  withcolor red;

%------------------------------------------------------------------------------

pair PG ;  PG := PF shifted (0cm,-2cm) ;
  
draw textext.origin("\ruledhbox{\MyFont{name:dejavusans*default at 25pt}ORIGIN Aujourd'hui}") shifted PG;

draw PG withpen pencircle scaled 1.5mm  withcolor red;

%------------------------------------------------------------------------------

pair PH ;  PH := PG shifted (0cm,-2cm) ;
  
draw textext.raw("\ruledhbox{\MyFont{name:dejavusans*default at 25pt}RAW Aujourd'hui}") shifted PH;

draw PH withpen pencircle scaled 1.5mm  withcolor red;

%------------------------------------------------------------------------------

\stopMPpage

\stoptext