* Solution to a "superscript" problem?
@ 2011-10-12 19:43 Otso Helenius
2011-10-12 20:09 ` Hans Hagen
0 siblings, 1 reply; 4+ messages in thread
From: Otso Helenius @ 2011-10-12 19:43 UTC (permalink / raw)
To: ntg-context
Hello,
I've been trying to come up with a few methods to add definitions to
text with the help of the metafun and context manuals. The first method
adds the definition as sort of a "superscript" on top of the word, and
the second one marks multiple words with a curly bracket and adds the
definition on top of the tip of the bracket.
Here is the (ugly and hackish) code:
\startuniqueMPgraphic{defline}
path p; p:=(0,0)..controls (0,1) and (1,1)..(1,1)--(6,1)..controls(7,1)
and (7,1)..(7,2)--(7,2)..controls(7,1) and
(7,1)..(8,1)--(13,1)..controls(13,1) and (14,1)..(14,0);
draw (0,0)--(0,12pt) withcolor white;
draw p xscaled (\overlaywidth/15) yscaled 5 shifted (0,9mm) withpen
pencircle scaled 0.25mm withcolor red;
\stopuniqueMPgraphic
\defineoverlay[curlybracket][\includeMPgraphic{defline}]
\def\sentencedef[#1][#2]{\setbox\scratchbox=\hbox{#2}\hbox to
\the\wd\scratchbox{\cbox{\hbox{\tfxx\color[red]
#1}\\\hbox{\framed[background=curlybracket,frame=off]{#2}}}}}
\def\worddef[#1][#2]{\setbox\scratchbox=\hbox{#2}\hbox to
\the\wd\scratchbox{\cbox{\hbox{\rotate[rotation=25]{\tfxx\color[red]
#1}}\\\hbox{#2}}}}
\starttext
\hbox{\worddef[def1][Lorem] ipsum \worddef[def2][dolor] sit
\worddef[def3][amet] consectetur \worddef[def4][adipiscing] elit.}
\hbox{\sentencedef[def5][Lorem ipsum] dolor sit \sentencedef[def6][amet
consectetur] adipiscing elit.}
\stoptext
I haven't figured a way to add the curly bracket graphic neatly nor
position the definition correctly on top of it.
I would be very interested in any advice regarding these two functions
and how to rewrite both of them in a more elegant way.
Best regards,
--
* Otso Helenius
* Helsinki University, Faculty of Mathematics
* Aalto University, Faculty of Architecture
___________________________________________________________________________________
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
___________________________________________________________________________________
^ permalink raw reply [flat|nested] 4+ messages in thread* Re: Solution to a "superscript" problem? 2011-10-12 19:43 Solution to a "superscript" problem? Otso Helenius @ 2011-10-12 20:09 ` Hans Hagen 2011-10-12 20:26 ` Otso Helenius 2011-10-12 20:55 ` Aditya Mahajan 0 siblings, 2 replies; 4+ messages in thread From: Hans Hagen @ 2011-10-12 20:09 UTC (permalink / raw) To: context; +Cc: ntg-context On 12-10-2011 21:43, Otso Helenius wrote: > Hello, > > I've been trying to come up with a few methods to add definitions to > text with the help of the metafun and context manuals. The first method > adds the definition as sort of a "superscript" on top of the word, and > the second one marks multiple words with a curly bracket and adds the > definition on top of the tip of the bracket. > > Here is the (ugly and hackish) code: > > > > \startuniqueMPgraphic{defline} > path p; p:=(0,0)..controls (0,1) and (1,1)..(1,1)--(6,1)..controls(7,1) > and (7,1)..(7,2)--(7,2)..controls(7,1) and > (7,1)..(8,1)--(13,1)..controls(13,1) and (14,1)..(14,0); > draw (0,0)--(0,12pt) withcolor white; > draw p xscaled (\overlaywidth/15) yscaled 5 shifted (0,9mm) withpen > pencircle scaled 0.25mm withcolor red; > \stopuniqueMPgraphic > > \defineoverlay[curlybracket][\includeMPgraphic{defline}] > > \def\sentencedef[#1][#2]{\setbox\scratchbox=\hbox{#2}\hbox to > \the\wd\scratchbox{\cbox{\hbox{\tfxx\color[red] > #1}\\\hbox{\framed[background=curlybracket,frame=off]{#2}}}}} > > \def\worddef[#1][#2]{\setbox\scratchbox=\hbox{#2}\hbox to > \the\wd\scratchbox{\cbox{\hbox{\rotate[rotation=25]{\tfxx\color[red] > #1}}\\\hbox{#2}}}} > > \starttext > > \hbox{\worddef[def1][Lorem] ipsum \worddef[def2][dolor] sit > \worddef[def3][amet] consectetur \worddef[def4][adipiscing] elit.} > > \hbox{\sentencedef[def5][Lorem ipsum] dolor sit \sentencedef[def6][amet > consectetur] adipiscing elit.} > > \stoptext > > > > I haven't figured a way to add the curly bracket graphic neatly nor > position the definition correctly on top of it. > > I would be very interested in any advice regarding these two functions > and how to rewrite both of them in a more elegant way. Wikifyable ... \startuniqueMPgraphic{defline}{width} path p ; p := ( 0,0) .. controls (0,1) and ( 1,1) .. ( 1,1) -- ( 6,1) .. controls (7,1) and ( 7,1) .. ( 7,2) -- ( 7,2) .. controls (7,1) and ( 7,1) .. ( 8,1) -- (13,1) .. controls (13,1) and (14,1) .. (14,0) ; draw p xysized (\MPvar{width},ExHeight) withpen pencircle scaled .1ExHeight withcolor \MPcolor{red} ; \stopuniqueMPgraphic \defineoverlay[curlybracket][\includeMPgraphic{defline}] \unexpanded\def\WordDef {\dodoubleargument\doWordDef} \def\doWordDef[#1][#2]% {\dontleavehmode\hbox\bgroup \setbox\scratchbox\hbox{#2}% \raise\strutheight\hbox to \wd\scratchbox{\hss\rotate[rotation=25]{\tfxx\color[red]#1}\hss}% \hskip-\wd\scratchbox \box\scratchbox \egroup} \unexpanded\def\LineDef {\dodoubleargument\doLineDef} \def\doLineDef[#1][#2]% {\dontleavehmode\hbox\bgroup \setbox\scratchbox\hbox{#2}% \raise1.5\strutht\hbox to \wd\scratchbox{\hss\rotate[rotation=25]{\tfxx\color[red]#1}\hss}% \hskip-\wd\scratchbox \raise0.9\strutht\hbox to \wd\scratchbox{\uniqueMPgraphic{defline}{width=\the\wd\scratchbox}}% \hskip-\wd\scratchbox \box\scratchbox \egroup} \starttext \WordDef[def1][Lorem] ipsum \WordDef[def2][dolor] sit \WordDef[def3][amet] consectetur \WordDef[def4][adipiscing] elit. \LineDef[def5][Lorem ipsum] dolor sit \LineDef[def6][amet consectetur] adipiscing elit. \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 ___________________________________________________________________________________ ^ permalink raw reply [flat|nested] 4+ messages in thread
* Re: Solution to a "superscript" problem? 2011-10-12 20:09 ` Hans Hagen @ 2011-10-12 20:26 ` Otso Helenius 2011-10-12 20:55 ` Aditya Mahajan 1 sibling, 0 replies; 4+ messages in thread From: Otso Helenius @ 2011-10-12 20:26 UTC (permalink / raw) To: ntg-context > \unexpanded\def\WordDef > {\dodoubleargument\doWordDef} > > \def\doWordDef[#1][#2]% > {\dontleavehmode\hbox\bgroup > \setbox\scratchbox\hbox{#2}% > \raise\strutheight\hbox to > \wd\scratchbox{\hss\rotate[rotation=25]{\tfxx\color[red]#1}\hss}% > \hskip-\wd\scratchbox > \box\scratchbox > \egroup} Thank you! I will wikify the examples with an explanation on the syntax. However I would be interested in learning more about the bgrop, dontleavehmode, raise etc. commands. The cont-eni manual uses them but without explanation on their exact syntax and use cases. -- * Otso Helenius * Helsinki University, Faculty of Mathematics * Aalto University, Faculty of Architecture ___________________________________________________________________________________ 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 ___________________________________________________________________________________ ^ permalink raw reply [flat|nested] 4+ messages in thread
* Re: Solution to a "superscript" problem? 2011-10-12 20:09 ` Hans Hagen 2011-10-12 20:26 ` Otso Helenius @ 2011-10-12 20:55 ` Aditya Mahajan 1 sibling, 0 replies; 4+ messages in thread From: Aditya Mahajan @ 2011-10-12 20:55 UTC (permalink / raw) To: mailing list for ConTeXt users On Wed, 12 Oct 2011, Hans Hagen wrote: > On 12-10-2011 21:43, Otso Helenius wrote: >> Hello, >> >> I've been trying to come up with a few methods to add definitions to >> text with the help of the metafun and context manuals. The first method >> adds the definition as sort of a "superscript" on top of the word, and >> the second one marks multiple words with a curly bracket and adds the >> definition on top of the tip of the bracket. >> >> Here is the (ugly and hackish) code: >> >> >> >> \startuniqueMPgraphic{defline} >> path p; p:=(0,0)..controls (0,1) and (1,1)..(1,1)--(6,1)..controls(7,1) >> and (7,1)..(7,2)--(7,2)..controls(7,1) and >> (7,1)..(8,1)--(13,1)..controls(13,1) and (14,1)..(14,0); >> draw (0,0)--(0,12pt) withcolor white; >> draw p xscaled (\overlaywidth/15) yscaled 5 shifted (0,9mm) withpen >> pencircle scaled 0.25mm withcolor red; >> \stopuniqueMPgraphic >> >> \defineoverlay[curlybracket][\includeMPgraphic{defline}] >> >> \def\sentencedef[#1][#2]{\setbox\scratchbox=\hbox{#2}\hbox to >> \the\wd\scratchbox{\cbox{\hbox{\tfxx\color[red] >> #1}\\\hbox{\framed[background=curlybracket,frame=off]{#2}}}}} >> >> \def\worddef[#1][#2]{\setbox\scratchbox=\hbox{#2}\hbox to >> \the\wd\scratchbox{\cbox{\hbox{\rotate[rotation=25]{\tfxx\color[red] >> #1}}\\\hbox{#2}}}} >> >> \starttext >> >> \hbox{\worddef[def1][Lorem] ipsum \worddef[def2][dolor] sit >> \worddef[def3][amet] consectetur \worddef[def4][adipiscing] elit.} >> >> \hbox{\sentencedef[def5][Lorem ipsum] dolor sit \sentencedef[def6][amet >> consectetur] adipiscing elit.} >> >> \stoptext >> >> >> >> I haven't figured a way to add the curly bracket graphic neatly nor >> position the definition correctly on top of it. >> >> I would be very interested in any advice regarding these two functions >> and how to rewrite both of them in a more elegant way. > > Wikifyable ... > > \startuniqueMPgraphic{defline}{width} > > path p ; > p := > ( 0,0) .. controls (0,1) and ( 1,1) .. > ( 1,1) -- > ( 6,1) .. controls (7,1) and ( 7,1) .. > ( 7,2) -- > ( 7,2) .. controls (7,1) and ( 7,1) .. > ( 8,1) -- > (13,1) .. controls (13,1) and (14,1) .. > (14,0) ; > draw > p > xysized (\MPvar{width},ExHeight) > withpen pencircle scaled .1ExHeight > withcolor \MPcolor{red} ; > > \stopuniqueMPgraphic > > > \defineoverlay[curlybracket][\includeMPgraphic{defline}] > > \unexpanded\def\WordDef > {\dodoubleargument\doWordDef} > > \def\doWordDef[#1][#2]% > {\dontleavehmode\hbox\bgroup > \setbox\scratchbox\hbox{#2}% > \raise\strutheight\hbox to > \wd\scratchbox{\hss\rotate[rotation=25]{\tfxx\color[red]#1}\hss}% > \hskip-\wd\scratchbox > \box\scratchbox > \egroup} > > \unexpanded\def\LineDef > {\dodoubleargument\doLineDef} > > \def\doLineDef[#1][#2]% > {\dontleavehmode\hbox\bgroup > \setbox\scratchbox\hbox{#2}% > \raise1.5\strutht\hbox to > \wd\scratchbox{\hss\rotate[rotation=25]{\tfxx\color[red]#1}\hss}% > \hskip-\wd\scratchbox > \raise0.9\strutht\hbox to > \wd\scratchbox{\uniqueMPgraphic{defline}{width=\the\wd\scratchbox}}% > \hskip-\wd\scratchbox > \box\scratchbox > \egroup} > > > \starttext > > \WordDef[def1][Lorem] ipsum \WordDef[def2][dolor] sit \WordDef[def3][amet] > consectetur \WordDef[def4][adipiscing] elit. > > \LineDef[def5][Lorem ipsum] dolor sit \LineDef[def6][amet consectetur] > adipiscing elit. > > \stoptext Another solution, which might be easier to understand. This does not affect the lineheight. Depending on the usage, that may or may not be desirable. \unprotect \startuniqueMPgraphic{defline} path p ; p := ( 0,0) .. controls (0,1) and ( 1,1) .. ( 1,1) -- ( 6,1) .. controls (7,1) and ( 7,1) .. ( 7,2) -- ( 7,2) .. controls (7,1) and ( 7,1) .. ( 8,1) -- (13,1) .. controls (13,1) and (14,1) .. (14,0) ; draw p xysized (OverlayWidth,ExHeight) shifted (0,OverlayHeight) withpen pencircle scaled .1ExHeight withcolor \MPcolor{\framedparameter\c!framecolor} ; label.top((textext("\tfxx\color[red] \framedparameter\c!text") rotated 25), (OverlayWidth/2, OverlayHeight+ExHeight)); setbounds currentpicture to boundingbox OverlayBox ; \stopuniqueMPgraphic \defineoverlay[curlybracket][\includeMPgraphic{defline}] \defineframed[LineDef] [ \c!location=\v!low, \c!frame=\v!off, \c!background=curlybracket, \c!framecolor=red, ] \protect \starttext \leavevmode\LineDef[text=def5]{Lorem ipsum} dolor sit \LineDef[text=def6]{amet consectetur} adipiscing elit. \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://tex.aanhet.net archive : http://foundry.supelec.fr/projects/contextrev/ wiki : http://contextgarden.net ___________________________________________________________________________________ ^ permalink raw reply [flat|nested] 4+ messages in thread
end of thread, other threads:[~2011-10-12 20:55 UTC | newest] Thread overview: 4+ messages (download: mbox.gz / follow: Atom feed) -- links below jump to the message on this page -- 2011-10-12 19:43 Solution to a "superscript" problem? Otso Helenius 2011-10-12 20:09 ` Hans Hagen 2011-10-12 20:26 ` Otso Helenius 2011-10-12 20:55 ` Aditya Mahajan
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).