January 2024 - ntg-context - NTG Mailing Lists

Metapost: draw only subpath; changing thickness of line
by Emanuel Han 06 Jan '24

06 Jan '24

Hi all, I have this MWE. Now I want to draw only the subpath of S between gong6 and gong7 with a red line which is narrower at the two ends and thicker in the middle part. How to achieve this? Thanks! Emanuel \setuppapersize[A4,landscape] \starttext \startMPcode numeric u; u=1cm; %equiangular spiral numeric a, k ; a = 2.3; %scaling factor k = 8.61722335; path S; S = right for t=1 upto 360: .. a ** (t/50.2) * dir (-k*t) endfor; draw S; z1 = 8 dir -14; path A; A = origin -- z1 scaled 0.7u ; draw A; pair AEndPoint; AEndPoint = point 1 of A; pair gong[], times; numeric n; n = 0; for i = 1 upto length(A): for j = 1 upto length(S): times := subpath (i-1,i) of A intersectiontimes subpath (j-1,j) of S; if xpart times > -1: gong[incr n] = 1/2[point xpart times of subpath (i-1,i) of A, point ypart times of subpath (j-1,j) of S]; fi endfor endfor dotlabel.rt ("$gong6$", gong6); dotlabel.rt ("$gong7$", gong7); %Now I want to draw only the subpath of S between gong6 and gong7 with a red line which is narrower at the two ends and thicker in the middle part \stopMPcode \stoptext

2 2

multipage metapost output from ConTeXt
by Emanuel Han 06 Jan '24

06 Jan '24

How can I achieve multipage metapost output from ConTeXt? The result should be a multipage pdf. It contains just a metapost graphic per page. The graphic has always the same bounding box and evolves from page to page: Some elements to be drawn are added, and some others would ideally also be removed, while keeping elements which has already been drawn on previous pages. I can manage when it is not possible to remove elements (in that case I'll just cover them with a covering element). I saw that it is possible to achieve my goal with standalone metapost, as described here: https://tex.stackexchange.com/questions/471662/mptopdf-is-multipage-output-… But I'll need to achieve this with Metapost inside ConTeXt because I use labels in Metapost which print text in Japanese, Korean , Arabic and Roman script: Thanks to ConTeXt, I can define appropriate fonts for each script. All this works already in my working example. The only unsolved problem is to ship out multiple pages. For the minimal working example, I didn't remove the font defining part, because having 4 different fonts is a condition of my use case. The graphic on the other hand is some simple dummy nonsense graphic not from my project. The graphic is in the provided example drawn as a summing up of layered drawing steps (6 steps, to be precise), so no removing is implemented here (because I don't know how that would be done). If each of the figures 1 to 6 of my mwe can be put alone on a page, I'd be already very happy. Now, they're put on top of each other all on the same single page, also on top of figure 0. The desired multipage pdf will be used in presentation mode of a pdf viewer and skipped forward and backward from page to page (that is from drawing step to drawing step). mwe: \enableregime[utf] % enable unicoded input \definefontfamily [RomanFont] [rm] [calluna] \definefontfamily [KoreanFont] [rm] [applemyungjo] \definefontfamily [JapaneseFont] [rm] [hannotatesc] \definefontfeature [fea] [mode=node,language=dflt,script=arab, init=yes, medi=yes, fina=yes, isol=yes, calt=yes, rlig=yes, tlig=yes, trep=yes, curs=yes, kern=yes, mark=yes ] \starttypescript [serif] [notonaskharabic] \definefontsynonym [notonaskharabic-Light] [name:notonaskharabic] [features=fea] \definefontsynonym [notonaskharabic-Bold] [name:notonaskharabic] [features=fea] \definefontsynonym [notonaskharabic-Italic] [name:notonaskharabic] [features=fea] \definefontsynonym [notonaskharabic-Bold-Italic] [name:notonaskharabic] [features=fea] \stoptypescript \starttypescript [serif] [notonaskharabic] \usetypescript[serif][fallback] \definefontsynonym [Serif] [notonaskharabic-Light] [features=fea] \definefontsynonym [SerifItalic] [notonaskharabic-Italic] [features=fea] \definefontsynonym [SerifBold] [notonaskharabic-Bold] [features=fea] \definefontsynonym [SerifBoldItalic] [notonaskharabic-Bold-Italic] [features=fea] \stoptypescript \starttypescript [notonaskharabic] \definetypeface [notonaskharabic] [rm] [serif] [notonaskharabic] [default] \stoptypescript \usetypescript[notonaskharabic] \setupbodyfont [RomanFont] \starttext \startMPcode picture p[]; path bb; %bounding box z0 = (0,0); z1 = (60,40); z2 = (40,90); z3 = (10,70); z4 = (30,50); z5 = (90,70); z6 = (-10,70); path A; A = z0..z1..z2..z3..z4 ; pair AStartPoint; AStartPoint = point 0 of A; pair AEndPoint; AEndPoint = point 4 of A; path B; B = z5..z6; pair BStartPoint; BStartPoint = point 0 of B; pair BEndPoint; BEndPoint = point 1 of B; path C; C = AStartPoint..AEndPoint; % drawing steps: p1:=image( draw A withcolor red; ); p2:=image( label(textext("\JapaneseFont 日本語"), AEndPoint); ); p3:=image( label(textext("\notonaskharabic \textdir TRT دانگ") scaled 1.2, AStartPoint); ); p4:=image( label(textext("\KoreanFont 한국어"), BStartPoint); ); p5:=image( label(textext("\RomanFont bāng"), BEndPoint); draw C withcolor green; ); p6:=image( draw B withcolor blue; ); beginfig(0); %% the whole picture for the common bbox for k=1 upto 6: draw p[k]; endfor bb:=bbox(currentpicture); endfig; for $=1 upto 6: beginfig($); for k=1 upto $: draw p[k]; endfor setbounds currentpicture to bb; endfig; endfor \stopMPcode \stoptext

5 11

Solaris 11 SPARC Support [SEC=OFFICIAL]
by Michael Wigston 05 Jan '24

05 Jan '24

Hi, Would you consider supporting Solaris 11 on SPARC? Alternatively if you could provide documentation how to build Context on "SunOS sun4v" hardware would also be beneficial. I have compiled luametatex, but getting below error when trying to create cache and not sure if this is a compatibility issue. bin/custom# ./mtxrun --generate startup error : no format file given, quitting Regards, Michael Wigston Senior Analyst/Programmer, Digital Applications People, Transformation & Technology Group Level 5, 100 Market Street, Sydney, 2000 Tel: +61 2 9911 2426 Michael.Wigston(a)asic.gov.au<mailto:Michael.Wigston@asic.gov.au> [cid:image001.png@01DA3FC5.8B11FCD0] Please consider the environment before printing this document. Information collected by ASIC may contain personal information. Please refer to our Privacy Policy<https://asic.gov.au/privacy/> for information about how we handle your personal information, your rights to seek access to and correct your personal information, and how to complain about breaches of your privacy by ASIC. This e-mail and any attachments are intended for the addressee(s) only and may be confidential. They may contain legally privileged, copyright material or personal and /or confidential information. You should not read, copy, use or disclose the content without authorisation. If you have received this email in error, please notify the sender as soon as possible, delete the email and destroy any copies. This notice should not be removed.

2 1

Local alternative to \input
by Jeroen 04 Jan '24

04 Jan '24

I have a document that is getting a lot of mark-up instructions for creating tables and placing figures. I would like to move this out of the main text flow. The easiest way would be using \input, but i rather place all this at the bottom of the file and just refer to it with something like \localinput or so to a textblock at the bottom of the same file. What would be the easiest way to implement this?

3 2

Cron <context@cgl> /var/www/aanhet.net/context/bin/cron/context-mirror
by root＠ntg.nl 02 Jan '24

02 Jan '24

receiving incremental file list ./ ctx-group-2023-24.pdf sent 100 bytes received 1,118,688 bytes 745,858.67 bytes/sec total size is 567,771,604 speedup is 507.49

1 0

2024
by Hans Hagen 02 Jan '24

02 Jan '24

Hi, As a side effect (spin off) of this years xmas card we have a new years gimmick: https://www.pragma-ade.nl/2023 Of course it screams metapost but tex and lua are also involved. See it as compensation for the lack of an end-of-year update. The last page of the result has a bit of explanation. 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 -----------------------------------------------------------------

5 5

Cron <context@cgl> /var/www/aanhet.net/context/bin/cron/context-mirror
by root＠ntg.nl 02 Jan '24

02 Jan '24

receiving incremental file list ./ ctx-group-2023.pdf sent 100 bytes received 76,047 bytes 152,294.00 bytes/sec total size is 566,671,594 speedup is 7,441.81

1 0