* Re: Optimize code to create a environnementt with Metafun ? [not found] <mailman.1.1469613601.14470.ntg-context@ntg.nl> @ 2016-07-28 13:17 ` Jeong Dal 2016-07-28 13:36 ` Wolfgang Schuster 0 siblings, 1 reply; 13+ messages in thread From: Jeong Dal @ 2016-07-28 13:17 UTC (permalink / raw) To: ntg-context [-- Attachment #1.1: Type: text/plain, Size: 2626 bytes --] Dear Fabrice and Wolfgang, I tried the following code of yours, but I got “! undefined control sequence” error. Would you please tell me where I should to correct? Thank you so much, Best regards, Dalyoung %%%%%%%%%%%%%%% \setupbodyfont[pagella,11pt] \setupcolors[state=start] \defineframedtext [MyFrame] [before={\blank}, after={\blank}, frame=off, background=MyFrame, %width=\textwidth, width=max, height=fit, style=italic] \definelabel [Définition] [headstyle=\bf\smallcaps] \startuseMPgraphic{MyFrame} path b; picture p; %p := textext.rt("\white\Définition"); p := textext.rt("\white\framedtextparamemter{Title}"); %p := textext.rt("\white\getvariable{text}{text1}"); p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; fill OverlayBox withcolor lightgray; %\MPcolor{ fill b withcolor darkred; draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor darkred; draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor darkred; draw p; setbounds currentpicture to boundingbox currentpicture enlarged 2mm; \stopuseMPgraphic \defineoverlay [MyFrame] [\useMPgraphic{MyFrame}] \starttext \showframe \startMyFrame[Title=Hans] \input knuth \stopMyFrame \startMyFrame[Title=Hagen] \input knuth \stopMyFrame \stoptext ….. tex error > tex error on line 52 in file /Users/graph/Documents/TeXfiles/test.tex: ! Undefined control sequence <argument> ... p := textext.rt("\white \framedtextparamemter {Title}"); p := p shifted ... \meta_process_graphic ...currentMPformat }data {#1 ;}initializations {\meta_f... \meta_handle_use_graphic ...a_process_graphic {#3} \endgroup \meta_use_graphic ...me \??mpgraphic #1\endcsname \empty \meta_end_graphic_g... <to be read again> \else \executedefinedoverlay ...e \everyoverlay #2\else \lower \d_framed_target_dp... ... l.52 \stopMyFrame 42 43 \defineoverlay 44 [MyFrame] 45 [\useMPgraphic{MyFrame}] 46 47 \starttext 48 49 \showframe 50 \startMyFrame[Title=Hans] 51 \input knuth 52 >> \stopMyFrame 53 54 \startMyFrame[Title=Hagen] 55 \input knuth 56 \stopMyFrame 57 58 \stoptext [-- Attachment #1.2: Type: text/html, Size: 9124 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-28 13:17 ` Optimize code to create a environnementt with Metafun ? Jeong Dal @ 2016-07-28 13:36 ` Wolfgang Schuster 2016-07-28 16:08 ` Jean-Pierre Delange 0 siblings, 1 reply; 13+ messages in thread From: Wolfgang Schuster @ 2016-07-28 13:36 UTC (permalink / raw) To: mailing list for ConTeXt users [-- Attachment #1.1: Type: text/plain, Size: 905 bytes --] > Jeong Dal <mailto:haksan@me.com> > 28. Juli 2016 um 15:17 > Dear Fabrice and Wolfgang, > > I tried the following code of yours, but I got “! undefined control > sequence” error. > Would you please tell me where I should to correct? > > Thank you so much, > > Best regards, > > Dalyoung > > %%%%%%%%%%%%%%% > \setupbodyfont[pagella,11pt] > > \setupcolors[state=start] > > \defineframedtext > [MyFrame] > [before={\blank}, > after={\blank}, > frame=off, > background=MyFrame, > %width=\textwidth, > width=max, > height=fit, > style=italic] > > \definelabel > [Définition] > [headstyle=\bf\smallcaps] > > \startuseMPgraphic{MyFrame} > path b; > picture p; > %p := textext.rt("\white\Définition"); > p := textext.rt("\white\framedtextparamemter{Title}"); You have a extra "m" in \framedtextparameter (fourth letter from the end). Wolfgang [-- Attachment #1.2: Type: text/html, Size: 2721 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-28 13:36 ` Wolfgang Schuster @ 2016-07-28 16:08 ` Jean-Pierre Delange 0 siblings, 0 replies; 13+ messages in thread From: Jean-Pierre Delange @ 2016-07-28 16:08 UTC (permalink / raw) To: mailing list for ConTeXt users [-- Attachment #1.1: Type: text/plain, Size: 1660 bytes --] This frame seems very nice in order to use it as a summary, or a chapter's conclusion. Thank you Fabrice, Wolfgang and Dalyoung ! Le 28/07/2016 à 15:36, Wolfgang Schuster a écrit : >> Jeong Dal <mailto:haksan@me.com> >> 28. Juli 2016 um 15:17 >> Dear Fabrice and Wolfgang, >> >> I tried the following code of yours, but I got “! undefined control >> sequence” error. >> Would you please tell me where I should to correct? >> >> Thank you so much, >> >> Best regards, >> >> Dalyoung >> >> %%%%%%%%%%%%%%% >> \setupbodyfont[pagella,11pt] >> >> \setupcolors[state=start] >> >> \defineframedtext >> [MyFrame] >> [before={\blank}, >> after={\blank}, >> frame=off, >> background=MyFrame, >> %width=\textwidth, >> width=max, >> height=fit, >> style=italic] >> >> \definelabel >> [Définition] >> [headstyle=\bf\smallcaps] >> >> \startuseMPgraphic{MyFrame} >> path b; >> picture p; >> %p := textext.rt("\white\Définition"); >> p := textext.rt("\white\framedtextparamemter{Title}"); > You have a extra "m" in \framedtextparameter (fourth letter from the end). > > Wolfgang > > > ___________________________________________________________________________________ > 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 > ___________________________________________________________________________________ [-- Attachment #1.2: Type: text/html, Size: 5140 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
[parent not found: <mailman.803.1469714420.6154.ntg-context@ntg.nl>]
* Re: Optimize code to create a environnementt with Metafun ? [not found] <mailman.803.1469714420.6154.ntg-context@ntg.nl> @ 2016-07-28 14:16 ` Jeong Dal 0 siblings, 0 replies; 13+ messages in thread From: Jeong Dal @ 2016-07-28 14:16 UTC (permalink / raw) To: ntg-context Dear Wolfgang, Thank you for the correction, It works fine. I couldn’t see extra ‘m’ when I check. Thanks again. Best regards, Dalyoung ___________________________________________________________________________________ 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] 13+ messages in thread
* Optimize code to create a environnementt with Metafun ? @ 2016-07-26 8:18 Fabrice Couvreur 2016-07-26 10:34 ` Hans Hagen 0 siblings, 1 reply; 13+ messages in thread From: Fabrice Couvreur @ 2016-07-26 8:18 UTC (permalink / raw) To: mailing list for ConTeXt users [-- Attachment #1.1: Type: text/plain, Size: 1236 bytes --] Hello, Hans and Wolfgang really helped me to create new environments with Metafun. I think Hans continuous development Metafun. So my question is simple: can we optimize this code ? Thanks, Fabrice \setupbodyfont[pagella,11pt] \setupcolors[state=start] \defineframedtext [MyDefinition] [before={\blank}, after={\blank}, frame=off, background=MyFrame, width=\textwidth, height=fit, style=italic] \definelabel [Définition] [headstyle=\bf\smallcaps] \startuseMPgraphic{MyFrame} path b; picture p; p := textext.rt("\white\Définition"); p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; fill OverlayBox withcolor \MPcolor{lightgray}; fill b withcolor darkred; draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor darkred; draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor darkred; draw p; setbounds currentpicture to boundingbox currentpicture enlarged 2mm; \stopuseMPgraphic \defineoverlay [MyFrame] [\useMPgraphic{MyFrame}] \starttext \showframe \startMyDefinition \input knuth \stopMyDefinition \stoptext [-- Attachment #1.2: Type: text/html, Size: 2259 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-26 8:18 Fabrice Couvreur @ 2016-07-26 10:34 ` Hans Hagen 2016-07-26 12:20 ` Fabrice Couvreur 2016-07-26 13:12 ` Fabrice Couvreur 0 siblings, 2 replies; 13+ messages in thread From: Hans Hagen @ 2016-07-26 10:34 UTC (permalink / raw) To: ntg-context On 7/26/2016 10:18 AM, Fabrice Couvreur wrote: > Hello, > Hans and Wolfgang really helped me to create new environments with Metafun. > I think Hans continuous development Metafun. So my question is simple: > can we optimize this code? in what sense ... speed? not much to gain correctness? mayhe use "lightgray" and "darkred" for consistency typography? sure, but more a discussion topic at the ctx meeting > Thanks, > Fabrice > > \setupbodyfont[pagella,11pt] > > \setupcolors[state=start] > > \defineframedtext > [MyDefinition] > [before={\blank}, > after={\blank}, > frame=off, > background=MyFrame, > width=\textwidth, > height=fit, > style=italic] > > \definelabel > [Définition] > [headstyle=\bf\smallcaps] > > \startuseMPgraphic{MyFrame} > path b; > picture p; > p := textext.rt("\white\Définition"); > p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); > b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; > fill OverlayBox withcolor \MPcolor{lightgray}; > fill b withcolor darkred; > draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor > darkred; > draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor > darkred; > draw p; > setbounds currentpicture to boundingbox currentpicture enlarged 2mm; > \stopuseMPgraphic > > \defineoverlay > [MyFrame] > [\useMPgraphic{MyFrame}] > > \starttext > > \showframe > > \startMyDefinition > \input knuth > \stopMyDefinition > > \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 > ___________________________________________________________________________________ > -- ----------------------------------------------------------------- Hans Hagen | PRAGMA ADE Ridderstraat 27 | 8061 GH Hasselt | The Netherlands tel: 038 477 53 69 | www.pragma-ade.nl | 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-26 10:34 ` Hans Hagen @ 2016-07-26 12:20 ` Fabrice Couvreur 2016-07-26 14:14 ` Hans Hagen 2016-07-26 13:12 ` Fabrice Couvreur 1 sibling, 1 reply; 13+ messages in thread From: Fabrice Couvreur @ 2016-07-26 12:20 UTC (permalink / raw) To: mailing list for ConTeXt users [-- Attachment #1.1: Type: text/plain, Size: 3328 bytes --] Hi Hans, So the code is "perfect" ? : =) typography? sure, but more a discussion topic at the ctx meeting Seriously, where can we read the conference proceedings ? Thanks Fabrice 2016-07-26 12:34 GMT+02:00 Hans Hagen <pragma@wxs.nl>: > On 7/26/2016 10:18 AM, Fabrice Couvreur wrote: > >> Hello, >> Hans and Wolfgang really helped me to create new environments with >> Metafun. >> I think Hans continuous development Metafun. So my question is simple: >> can we optimize this code? >> > > in what sense ... > > speed? not much to gain > > correctness? mayhe use "lightgray" and "darkred" for consistency > > typography? sure, but more a discussion topic at the ctx meeting > > Thanks, >> Fabrice >> >> \setupbodyfont[pagella,11pt] >> >> \setupcolors[state=start] >> >> \defineframedtext >> [MyDefinition] >> [before={\blank}, >> after={\blank}, >> frame=off, >> background=MyFrame, >> width=\textwidth, >> height=fit, >> style=italic] >> >> \definelabel >> [Définition] >> [headstyle=\bf\smallcaps] >> >> \startuseMPgraphic{MyFrame} >> path b; >> picture p; >> p := textext.rt("\white\Définition"); >> p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); >> b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; >> fill OverlayBox withcolor \MPcolor{lightgray}; >> fill b withcolor darkred; >> draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor >> darkred; >> draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor >> darkred; >> draw p; >> setbounds currentpicture to boundingbox currentpicture enlarged 2mm; >> \stopuseMPgraphic >> >> \defineoverlay >> [MyFrame] >> [\useMPgraphic{MyFrame}] >> >> \starttext >> >> \showframe >> >> \startMyDefinition >> \input knuth >> \stopMyDefinition >> >> \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 >> >> ___________________________________________________________________________________ >> >> > > -- > > ----------------------------------------------------------------- > Hans Hagen | PRAGMA ADE > Ridderstraat 27 | 8061 GH Hasselt | The Netherlands > tel: 038 477 53 69 | www.pragma-ade.nl | 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 > > ___________________________________________________________________________________ [-- Attachment #1.2: Type: text/html, Size: 6083 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-26 12:20 ` Fabrice Couvreur @ 2016-07-26 14:14 ` Hans Hagen 0 siblings, 0 replies; 13+ messages in thread From: Hans Hagen @ 2016-07-26 14:14 UTC (permalink / raw) To: ntg-context On 7/26/2016 2:20 PM, Fabrice Couvreur wrote: > Hi Hans, > So the code is "perfect"? : =) > > typography? sure, but more a discussion topic at the ctx meeting > > > Seriously, where can we read the conference proceedings? such things don't end up in proceedings ... btw, it's those (and other) discussions that make tex meetings interesting Hans ----------------------------------------------------------------- Hans Hagen | PRAGMA ADE Ridderstraat 27 | 8061 GH Hasselt | The Netherlands tel: 038 477 53 69 | www.pragma-ade.nl | 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-26 10:34 ` Hans Hagen 2016-07-26 12:20 ` Fabrice Couvreur @ 2016-07-26 13:12 ` Fabrice Couvreur 2016-07-26 14:15 ` Hans Hagen 1 sibling, 1 reply; 13+ messages in thread From: Fabrice Couvreur @ 2016-07-26 13:12 UTC (permalink / raw) To: mailing list for ConTeXt users [-- Attachment #1.1: Type: text/plain, Size: 4208 bytes --] Hi Hans, How to pass the "SomeText" parameter ? \setupbodyfont[pagella,11pt] \setupcolors[state=start] \defineframedtext [SomeText] [before={\blank}, after={\blank}, frame=off, background=MyFrame, width=\textwidth, height=fit, style=italic] \startuseMPgraphic{MyFrame} path b; picture p; p := textext.rt("\white SomeText"); p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; fill OverlayBox withcolor lightgray; fill b withcolor darkred; draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor darkred; draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor darkred; draw p; setbounds currentpicture to boundingbox currentpicture enlarged 2mm; \stopuseMPgraphic \defineoverlay [MyFrame] [\useMPgraphic{MyFrame}] \starttext \startSomeText{SomeText1} \input knuth \stopSomeText \startSomeText{SomeText2} \input knuth \stopSomeText \stoptext Thanks Fabrice 2016-07-26 12:34 GMT+02:00 Hans Hagen <pragma@wxs.nl>: > On 7/26/2016 10:18 AM, Fabrice Couvreur wrote: > >> Hello, >> Hans and Wolfgang really helped me to create new environments with >> Metafun. >> I think Hans continuous development Metafun. So my question is simple: >> can we optimize this code? >> > > in what sense ... > > speed? not much to gain > > correctness? mayhe use "lightgray" and "darkred" for consistency > > typography? sure, but more a discussion topic at the ctx meeting > > Thanks, >> Fabrice >> >> \setupbodyfont[pagella,11pt] >> >> \setupcolors[state=start] >> >> \defineframedtext >> [MyDefinition] >> [before={\blank}, >> after={\blank}, >> frame=off, >> background=MyFrame, >> width=\textwidth, >> height=fit, >> style=italic] >> >> \definelabel >> [Définition] >> [headstyle=\bf\smallcaps] >> >> \startuseMPgraphic{MyFrame} >> path b; >> picture p; >> p := textext.rt("\white\Définition"); >> p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); >> b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; >> fill OverlayBox withcolor \MPcolor{lightgray}; >> fill b withcolor darkred; >> draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor >> darkred; >> draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor >> darkred; >> draw p; >> setbounds currentpicture to boundingbox currentpicture enlarged 2mm; >> \stopuseMPgraphic >> >> \defineoverlay >> [MyFrame] >> [\useMPgraphic{MyFrame}] >> >> \starttext >> >> \showframe >> >> \startMyDefinition >> \input knuth >> \stopMyDefinition >> >> \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 >> >> ___________________________________________________________________________________ >> >> > > -- > > ----------------------------------------------------------------- > Hans Hagen | PRAGMA ADE > Ridderstraat 27 | 8061 GH Hasselt | The Netherlands > tel: 038 477 53 69 | www.pragma-ade.nl | 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 > > ___________________________________________________________________________________ [-- Attachment #1.2: Type: text/html, Size: 6728 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-26 13:12 ` Fabrice Couvreur @ 2016-07-26 14:15 ` Hans Hagen 2016-07-26 18:21 ` Fabrice Couvreur 0 siblings, 1 reply; 13+ messages in thread From: Hans Hagen @ 2016-07-26 14:15 UTC (permalink / raw) To: ntg-context On 7/26/2016 3:12 PM, Fabrice Couvreur wrote: > Hi Hans, > How to pass the "SomeText" parameter? with setvariables and getvariable > \setupbodyfont[pagella,11pt] > > \setupcolors[state=start] > > \defineframedtext > [SomeText] > [before={\blank}, > after={\blank}, > frame=off, > background=MyFrame, > width=\textwidth, > height=fit, > style=italic] > > \startuseMPgraphic{MyFrame} > path b; > picture p; > p := textext.rt("\white SomeText"); > p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); > b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; > fill OverlayBox withcolor lightgray; > fill b withcolor darkred; > draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor > darkred; > draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor > darkred; > draw p; > setbounds currentpicture to boundingbox currentpicture enlarged 2mm; > \stopuseMPgraphic > > \defineoverlay > [MyFrame] > [\useMPgraphic{MyFrame}] > > \starttext > > > \startSomeText{SomeText1} > \input knuth > \stopSomeText > > \startSomeText{SomeText2} > \input knuth > \stopSomeText > > \stoptext > > Thanks > Fabrice > > 2016-07-26 12:34 GMT+02:00 Hans Hagen <pragma@wxs.nl > <mailto:pragma@wxs.nl>>: > > On 7/26/2016 10:18 AM, Fabrice Couvreur wrote: > > Hello, > Hans and Wolfgang really helped me to create new environments > with Metafun. > I think Hans continuous development Metafun. So my question is > simple: > can we optimize this code? > > > in what sense ... > > speed? not much to gain > > correctness? mayhe use "lightgray" and "darkred" for consistency > > typography? sure, but more a discussion topic at the ctx meeting > > Thanks, > Fabrice > > \setupbodyfont[pagella,11pt] > > \setupcolors[state=start] > > \defineframedtext > [MyDefinition] > [before={\blank}, > after={\blank}, > frame=off, > background=MyFrame, > width=\textwidth, > height=fit, > style=italic] > > \definelabel > [Définition] > [headstyle=\bf\smallcaps] > > \startuseMPgraphic{MyFrame} > path b; > picture p; > p := textext.rt("\white\Définition"); > p := p shifted (2BodyFontSize,OverlayHeight-ypart center > p+.25ExHeight); > b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; > fill OverlayBox withcolor \MPcolor{lightgray}; > fill b withcolor darkred; > draw bottomboundary OverlayBox withpen pencircle scaled 1pt > withcolor > darkred; > draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor > darkred; > draw p; > setbounds currentpicture to boundingbox currentpicture enlarged > 2mm; > \stopuseMPgraphic > > \defineoverlay > [MyFrame] > [\useMPgraphic{MyFrame}] > > \starttext > > \showframe > > \startMyDefinition > \input knuth > \stopMyDefinition > > \stoptext > > > > ___________________________________________________________________________________ > If your question is of interest to others as well, please add an > entry to the Wiki! > > maillist : ntg-context@ntg.nl <mailto: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 > ___________________________________________________________________________________ > > > > -- > > ----------------------------------------------------------------- > Hans Hagen | PRAGMA ADE > Ridderstraat 27 | 8061 GH Hasselt | The Netherlands > tel: 038 477 53 69 | www.pragma-ade.nl > <http://www.pragma-ade.nl> | www.pragma-pod.nl > <http://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 <mailto: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 > ___________________________________________________________________________________ > > > > > ___________________________________________________________________________________ > 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 > ___________________________________________________________________________________ > -- ----------------------------------------------------------------- Hans Hagen | PRAGMA ADE Ridderstraat 27 | 8061 GH Hasselt | The Netherlands tel: 038 477 53 69 | www.pragma-ade.nl | 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-26 14:15 ` Hans Hagen @ 2016-07-26 18:21 ` Fabrice Couvreur 2016-07-26 19:49 ` Wolfgang Schuster 0 siblings, 1 reply; 13+ messages in thread From: Fabrice Couvreur @ 2016-07-26 18:21 UTC (permalink / raw) To: mailing list for ConTeXt users [-- Attachment #1.1: Type: text/plain, Size: 7853 bytes --] Hi Hans, I think I was not very clear. Title first framed : Hans Title second framed : Hagen Thanks Fabrice \setupbodyfont[pagella,11pt] \setupcolors[state=start] \defineframedtext [MyFrame] [before={\blank}, after={\blank}, frame=off, background=MyFrame, width=\textwidth, height=fit, style=italic] \setvariables [text] [text1=Hans, text2=Hagen,] \startuseMPgraphic{MyFrame} path b; picture p; p := textext.rt("\white\getvariable{text}{text1}"); p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; fill OverlayBox withcolor lightgray; fill b withcolor darkred; draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor darkred; draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor darkred; draw p; setbounds currentpicture to boundingbox currentpicture enlarged 2mm; \stopuseMPgraphic \defineoverlay [MyFrame] [\useMPgraphic{MyFrame}] \starttext \startMyFrame \input knuth \stopMyFrame \startMyFrame \input knuth \stopMyFrame 2016-07-26 16:15 GMT+02:00 Hans Hagen <pragma@wxs.nl>: > On 7/26/2016 3:12 PM, Fabrice Couvreur wrote: > >> Hi Hans, >> How to pass the "SomeText" parameter? >> > > with setvariables and getvariable > > \setupbodyfont[pagella,11pt] >> >> \setupcolors[state=start] >> >> \defineframedtext >> [SomeText] >> [before={\blank}, >> after={\blank}, >> frame=off, >> background=MyFrame, >> width=\textwidth, >> height=fit, >> style=italic] >> >> \startuseMPgraphic{MyFrame} >> path b; >> picture p; >> p := textext.rt("\white SomeText"); >> p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); >> b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; >> fill OverlayBox withcolor lightgray; >> fill b withcolor darkred; >> draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor >> darkred; >> draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor >> darkred; >> draw p; >> setbounds currentpicture to boundingbox currentpicture enlarged 2mm; >> \stopuseMPgraphic >> >> \defineoverlay >> [MyFrame] >> [\useMPgraphic{MyFrame}] >> >> \starttext >> >> >> \startSomeText{SomeText1} >> \input knuth >> \stopSomeText >> >> \startSomeText{SomeText2} >> \input knuth >> \stopSomeText >> >> \stoptext >> >> Thanks >> Fabrice >> >> 2016-07-26 12:34 GMT+02:00 Hans Hagen <pragma@wxs.nl >> <mailto:pragma@wxs.nl>>: >> >> >> On 7/26/2016 10:18 AM, Fabrice Couvreur wrote: >> >> Hello, >> Hans and Wolfgang really helped me to create new environments >> with Metafun. >> I think Hans continuous development Metafun. So my question is >> simple: >> can we optimize this code? >> >> >> in what sense ... >> >> speed? not much to gain >> >> correctness? mayhe use "lightgray" and "darkred" for consistency >> >> typography? sure, but more a discussion topic at the ctx meeting >> >> Thanks, >> Fabrice >> >> \setupbodyfont[pagella,11pt] >> >> \setupcolors[state=start] >> >> \defineframedtext >> [MyDefinition] >> [before={\blank}, >> after={\blank}, >> frame=off, >> background=MyFrame, >> width=\textwidth, >> height=fit, >> style=italic] >> >> \definelabel >> [Définition] >> [headstyle=\bf\smallcaps] >> >> \startuseMPgraphic{MyFrame} >> path b; >> picture p; >> p := textext.rt("\white\Définition"); >> p := p shifted (2BodyFontSize,OverlayHeight-ypart center >> p+.25ExHeight); >> b := boundingbox p leftenlarged .5EmWidth rightenlarged >> .5EmWidth; >> fill OverlayBox withcolor \MPcolor{lightgray}; >> fill b withcolor darkred; >> draw bottomboundary OverlayBox withpen pencircle scaled 1pt >> withcolor >> darkred; >> draw topboundary OverlayBox withpen pencircle scaled 1pt >> withcolor >> darkred; >> draw p; >> setbounds currentpicture to boundingbox currentpicture enlarged >> 2mm; >> \stopuseMPgraphic >> >> \defineoverlay >> [MyFrame] >> [\useMPgraphic{MyFrame}] >> >> \starttext >> >> \showframe >> >> \startMyDefinition >> \input knuth >> \stopMyDefinition >> >> \stoptext >> >> >> >> >> ___________________________________________________________________________________ >> If your question is of interest to others as well, please add an >> entry to the Wiki! >> >> maillist : ntg-context@ntg.nl <mailto: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 >> >> ___________________________________________________________________________________ >> >> >> >> -- >> >> ----------------------------------------------------------------- >> Hans Hagen | PRAGMA ADE >> Ridderstraat 27 | 8061 GH Hasselt | The Netherlands >> tel: 038 477 53 69 | www.pragma-ade.nl >> <http://www.pragma-ade.nl> | www.pragma-pod.nl >> <http://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 <mailto: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 >> >> ___________________________________________________________________________________ >> >> >> >> >> >> ___________________________________________________________________________________ >> 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 >> >> ___________________________________________________________________________________ >> >> > > -- > > ----------------------------------------------------------------- > Hans Hagen | PRAGMA ADE > Ridderstraat 27 | 8061 GH Hasselt | The Netherlands > tel: 038 477 53 69 | www.pragma-ade.nl | 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 > > ___________________________________________________________________________________ > [-- Attachment #1.2: Type: text/html, Size: 12527 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-26 18:21 ` Fabrice Couvreur @ 2016-07-26 19:49 ` Wolfgang Schuster 2016-07-26 20:58 ` Fabrice Couvreur 0 siblings, 1 reply; 13+ messages in thread From: Wolfgang Schuster @ 2016-07-26 19:49 UTC (permalink / raw) To: mailing list for ConTeXt users [-- Attachment #1.1: Type: text/plain, Size: 1642 bytes --] > Fabrice Couvreur <mailto:fabrice1.couvreur@gmail.com> > 26. Juli 2016 um 20:21 > Hi Hans, > I think I was not very clear. > > > > Title first framed : Hans > > Title second framed : Hagen You can pass a title to the optional framedtext argument (use camel case to avoid using existing key names) and access the value later in the metapost graphic. > Thanks > Fabrice > > \setupbodyfont[pagella,11pt] > > \setupcolors[state=start] > > \defineframedtext > [MyFrame] > [before={\blank}, > after={\blank}, > frame=off, > background=MyFrame, > width=\textwidth, width=max, > height=fit, > style=italic] > > \setvariables > [text] > [text1=Hans, > text2=Hagen,] > > > \startuseMPgraphic{MyFrame} > path b; > picture p; > p := textext.rt("\white\getvariable{text}{text1}"); p := textext.rt("\white\framedtextparameter{Title}"); > p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); > b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; > fill OverlayBox withcolor lightgray; > fill b withcolor darkred; > draw bottomboundary OverlayBox withpen pencircle scaled 1pt > withcolor darkred; > draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor > darkred; > draw p; > setbounds currentpicture to boundingbox currentpicture enlarged 2mm; > \stopuseMPgraphic > > \defineoverlay > [MyFrame] > [\useMPgraphic{MyFrame}] > > \starttext > > > \startMyFrame > \input knuth > \stopMyFrame > > \startMyFrame > \input knuth > \stopMyFrame \startMyFrame[Title=Hans] \input knuth \stopMyFrame \startMyFrame[Title=Hagen] \input knuth \stopMyFrame Wolfgang [-- Attachment #1.2: Type: text/html, Size: 4750 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
* Re: Optimize code to create a environnementt with Metafun ? 2016-07-26 19:49 ` Wolfgang Schuster @ 2016-07-26 20:58 ` Fabrice Couvreur 0 siblings, 0 replies; 13+ messages in thread From: Fabrice Couvreur @ 2016-07-26 20:58 UTC (permalink / raw) To: mailing list for ConTeXt users [-- Attachment #1.1: Type: text/plain, Size: 2422 bytes --] Hi Wolfgang Thanks once again ! \startMyFrame[Title=Thanks ] \input knuth \stopMyFrame \startMyFrame[Title=once again !] \input knuth \stopMyFrame Fabrice 2016-07-26 21:49 GMT+02:00 Wolfgang Schuster <schuster.wolfgang@gmail.com>: > Fabrice Couvreur <fabrice1.couvreur@gmail.com> > 26. Juli 2016 um 20:21 > Hi Hans, > I think I was not very clear. > > > > Title first framed : Hans > > Title second framed : Hagen > > > You can pass a title to the optional framedtext argument (use camel case > to avoid > using existing key names) and access the value later in the metapost > graphic. > > Thanks > Fabrice > > \setupbodyfont[pagella,11pt] > > \setupcolors[state=start] > > \defineframedtext > [MyFrame] > [before={\blank}, > after={\blank}, > frame=off, > background=MyFrame, > width=\textwidth, > > width=max, > > height=fit, > style=italic] > > \setvariables > [text] > [text1=Hans, > text2=Hagen,] > > > \startuseMPgraphic{MyFrame} > path b; > picture p; > p := textext.rt("\white\getvariable{text}{text1}"); > > > p := textext.rt("\white\framedtextparameter{Title}"); > > p := p shifted (2BodyFontSize,OverlayHeight-ypart center p+.25ExHeight); > b := boundingbox p leftenlarged .5EmWidth rightenlarged .5EmWidth; > fill OverlayBox withcolor lightgray; > fill b withcolor darkred; > draw bottomboundary OverlayBox withpen pencircle scaled 1pt withcolor > darkred; > draw topboundary OverlayBox withpen pencircle scaled 1pt withcolor > darkred; > draw p; > setbounds currentpicture to boundingbox currentpicture enlarged 2mm; > \stopuseMPgraphic > > \defineoverlay > [MyFrame] > [\useMPgraphic{MyFrame}] > > \starttext > > > \startMyFrame > \input knuth > \stopMyFrame > > \startMyFrame > \input knuth > \stopMyFrame > > > \startMyFrame[Title=Hans] > \input knuth > \stopMyFrame > > \startMyFrame[Title=Hagen] > \input knuth > \stopMyFrame > > Wolfgang > > > ___________________________________________________________________________________ > 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 > > ___________________________________________________________________________________ > [-- Attachment #1.2: Type: text/html, Size: 5832 bytes --] [-- Attachment #2: Type: text/plain, Size: 485 bytes --] ___________________________________________________________________________________ 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] 13+ messages in thread
end of thread, other threads:[~2016-07-28 16:08 UTC | newest] Thread overview: 13+ messages (download: mbox.gz / follow: Atom feed) -- links below jump to the message on this page -- [not found] <mailman.1.1469613601.14470.ntg-context@ntg.nl> 2016-07-28 13:17 ` Optimize code to create a environnementt with Metafun ? Jeong Dal 2016-07-28 13:36 ` Wolfgang Schuster 2016-07-28 16:08 ` Jean-Pierre Delange [not found] <mailman.803.1469714420.6154.ntg-context@ntg.nl> 2016-07-28 14:16 ` Jeong Dal 2016-07-26 8:18 Fabrice Couvreur 2016-07-26 10:34 ` Hans Hagen 2016-07-26 12:20 ` Fabrice Couvreur 2016-07-26 14:14 ` Hans Hagen 2016-07-26 13:12 ` Fabrice Couvreur 2016-07-26 14:15 ` Hans Hagen 2016-07-26 18:21 ` Fabrice Couvreur 2016-07-26 19:49 ` Wolfgang Schuster 2016-07-26 20:58 ` Fabrice Couvreur
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).