- ntg-context - Mailing Lists

Re: [NTG-context] table: vertical distance
by Wolfgang Werners-Lucchini 17 Apr '10

17 Apr '10

> \define[1]\divisionrule > {\dontleavehmode\blap > {\vskip-\strutht > \blackrule[width=\the\dimexpr.5em*#1\relax,height=2\linewidth]}% > \vskip-\lineheight} Ahh! Yes, this helps a lot. Thank you very much! Wolfgang

1 0

table: vertical distance
by Wolfgang Werners-Lucchini 17 Apr '10

17 Apr '10

Hallo, I have to typeset a division and have two diverent solutions but they both have problems. %--------------------------------------------------------------------- \starttext {\setuptables[rulethickness=0.05em,distance=small] \starttable[s0|r|r|r|r|r|r|r|r|r|r|r|r|r|r|r|r|] \NC\NC 1\NC 1\NC 0\NC 0\NC 1\NC 1\NC :\NC 1\NC 1\NC = \NC 1\NC 0\NC 0 \NC 0 \NC 1\NC\AR \NC\NC 1\NC 1\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \DC \DL[2] \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DR \NC\NC \NC 0\NC 0\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \NC\NC \NC 0\NC 0\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \DC\DC \DL[2] \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DR \NC\NC \NC \NC 0\NC 0\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \NC\NC \NC \NC 0\NC 0\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \DC\DC\DC \DL[2] \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DR \NC\NC \NC \NC \NC 0\NC 1\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \NC\NC \NC \NC \NC 0\NC 0\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \DC\DC\DC\DC \DL[2] \DC \DC \DC \DC \DC \DC \DC \DC \DC \DC \DR \NC\NC \NC \NC \NC \NC 1\NC 1\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \NC\NC \NC \NC \NC \NC 1\NC 1\NC \NC \NC \NC \NC \NC \NC \NC \NC \NC\AR \DC\DC\DC\DC \DC \DL[2]\DC \DC \DC \DC \DC \DC \DC \DC \DC \DR \NC\NC\NC\NC\NC\NC\NC 0\NC\NC\NC\NC\NC\NC\NC\NC\NC\NC\AR \stoptable} \setuplines[style=type] \startlines 110011:11=10001 11 -- ~00 ~00 ~-- ~~00 ~~00 ~~-- ~~~01 ~~~00 ~~~-- ~~~~11 ~~~~11 ~~~~-- ~~~~~0 \stoplines \stoptext %--------------------------------------------------------------------- In both examples there is a far to big distance between the lines and the upper digits. But the interline distance as a whole could be smaller. The simulation of a line with '--' in the second example is unsatisfying. Are there some improvments? Or, is there an idea for a better approach? Wolfgang

2 3

code
by R. Bastian 17 Apr '10

17 Apr '10

Hello, how to translate in context the following plain tex: \font\fgras = cmbtt10 {\tt {\obeylines {\fgras def} ra(): \ \ \ \ a = 3 \ \ \ \ b = 4 } } -- René Bastian www.pythoneon.org www.musiques-rb.org http://www.soundsurvey.org.uk/

4 22

lua, footnotes, interaction
by Philipp Gesang 17 Apr '10

17 Apr '10

Good evening all, interaction remains a mystery to me. When tracking things I encountered the following deviation in footnotes: ---8<-------------------------------------------------------------------------- \startluacode track = {} track.preceding = "" function track.simple(arg) context("Last one:\\ {\\bf " .. track.preceding .. "}.\\ " .. "This one:\\ {\\bf " .. arg .. "}") if arg == track.preceding then context("\\ -- matching!") else context("\\ -- not matching!") track.preceding = arg end end \stopluacode \def\track#1{\ctxlua{track.simple("#1")}} \def\foottrack#1{\footnote{\ctxlua{track.simple("#1")}}} \starttext \section{Normal} \track{one}\par \track{two}\par \track{two}\par \track{one}\par \track{one}\par \track{two}\par \track{one}\par \section{In Footnotes} \foottrack{one} \foottrack{two} \foottrack{two} \foottrack{one} \foottrack{one} \foottrack{two} \foottrack{one} \setupinteraction[state=start] \section{In Footnotes, interaction enabled} \footnote{\hrule} \foottrack{one} \foottrack{two} \foottrack{two} \foottrack{one} \foottrack{one} \foottrack{two} \foottrack{one} \stoptext % vim:ft=context ---8<-------------------------------------------------------------------------- I'd naively expect \track#1 to behave identically regardless of interaction. How do I make it interaction-proof, and, if possible, how do I interaction-proof macros in general? Thanks for your efforts, Philipp -- () ascii ribbon campaign - against html e-mail /\ www.asciiribbon.org - against proprietary attachments

3 5

Treating orphans and widows
by Jan Pohanka 17 Apr '10

17 Apr '10

Hello, could anyone describe me, how to deal with orphans and widows in Context? Now I use \clubpenalty=8000 \widowpenalty=8000 is there any "context way" how to do that? greetings Jan -- Tato zpráva byla vytvořena převratným poštovním klientem Opery: http://www.opera.com/mail/

1 0

Re: [NTG-context] 3D annotations
by Michail Vidiassov 17 Apr '10

17 Apr '10

Dear Hans, I wrote to you > thank you for your latest effort to put u3d support in a working state, but more thanks for more effort, but > May be a more robust way is to read first 3 bytes of the model file, since > "U3D" or "PRC" signature is always there - that can be done instead of > relying on file name extension or only in case it it not "u3d" or "prc". you have implemented reading the file signature, but it is now almost useless, since if a file has extension other but U3D or PRC 3D annotation code will not be called by file inclusion mechanism and "io.readdata" routine is called local subtype, subdata = "U3D", io.readdata(foundname) or "" - what's that? One more point - preview bitmap images in 3D annotations are now disabled since necessary functionality of measuring XForms is missing - please, consider the following workaround. --- lpdf-u3d.lua.org 2010-03-26 18:24:44.000000000 +0300 +++ lpdf-u3d.lua 2010-04-14 14:24:28.000000000 +0400 @@ -17,6 +17,7 @@ local cos, sin, sqrt, pi, atan2, abs = math.cos, math.sin, math.sqrt, math.pi, math.atan2, math.abs local pdfconstant = lpdf.constant +local pdfnumber = lpdf.number local pdfboolean = lpdf.boolean local pdfunicode = lpdf.unicode local pdfdictionary = lpdf.dictionary @@ -62,8 +63,7 @@ local function make3dview(view) - local name = viewname - local name = pdfunicode((view.name ~= "" and name) or "unknown view") + local name = pdfunicode((view.name ~= "" and view.name) or "unknown view") local viewdict = pdfdictionary { Type = pdfconstant("3DView"), @@ -311,9 +311,6 @@ for i=1,#nodes do local node = checkedkey(nodes,i,"table") if node then - local position = checkedkey(node,"position","table") - position = position and #position == 12 and pdfarray(position) - if position then nodelist[#nodelist+1] = pdfdictionary { Type = pdfconstant("3DNode"), N = node.name or ("node_" .. i), -- pdfunicode ? @@ -325,13 +322,18 @@ }, M = position, } + local position = checkedkey(node,"position","table") + position = position and #position == 12 and pdfarray(position) + if position then + nodelist[#nodelist].M = position end end end - viewdict.NR = true viewdict.NA = nodelist end + viewdict.NR = true + return viewdict end @@ -349,19 +351,19 @@ local activationdict = pdfdictionary { TB = pdfboolean(param.toolbar,true), - NP = pdfboolean(param.tree,true), + NP = pdfboolean(param.tree,false), } local stream = streams[label] if not stream then - local subtype, subdata = "U3D", io.readdata(foundname) or "" + local subtype, subdata = "U3D", file.readdata(foundname) or "" if find(subdata,"^PRC") then - subtype == "PRC" + subtype = "PRC" elseif find(subdata,"^U3D") then - subtype == "U3D" + subtype = "U3D" elseif file.extname(foundname) == "prc" then - subtype == "PRC" + subtype = "PRC" end local attr = pdfdictionary { @@ -423,12 +425,35 @@ local ref = stored_pr[tag] if not ref then -- weird, has to be a /Form and not an /Image so we need a wrap = true key - -- local figure = img.immediatewrite { filename = preview, width = width, height = height } - local figure = img.immediatewrite { stream = ".5 .75 .75 rg 0 0 20 10 re f", bbox = {0,0,20,10 } } + local figure = img.immediatewrite { filename = preview, width = width, height = height } + -- local figure = img.immediatewrite { stream = ".5 .75 .75 rg 0 0 20 10 re f", bbox = {0,0,20,10 } } ref = figure.objnum stored_pr[tag] = ref end - annot.AP = ref and pdfdictionary { N = pdfreference(ref) } + if ref then + local pw = pdfdictionary { + Type = pdfconstant("XObject"), + Subtype = pdfconstant("Form"), + FormType = pdfnumber(1), + BBox = pdfarray { pdfnumber(0), pdfnumber(0), pdfnumber(factor*width), pdfnumber(factor*height) }, + Matrix = pdfarray { pdfnumber(1), pdfnumber(0), pdfnumber(0), pdfnumber(1), pdfnumber(0), pdfnumber(0) }, + Resources = pdfdictionary { + XObject = pdfdictionary { + IM = pdfreference(ref) + } + }, + ExtGState = pdfdictionary { + GS = pdfdictionary { + Type = pdfconstant("ExtGState"), + CA = pdfnumber(1), + ca = pdfnumber(1) + } + }, + ProcSet = pdfarray { pdfconstant("PDF"), pdfconstant("ImageC") }, + } + local pwd = pdf.immediateobj("stream",format("q /GS gs %s 0 0 %s 0 0 cm /IM Do Q",factor*width,factor*height),pw()) + annot.AP = pdfdictionary { N = pdfreference(pwd) } + end return annot, figure, ref else activationdict.A = pdfconstant("PV") Also I try to remind you AGAIN and AGAIN about pdfboolean problem in lpdf-ini.lua (old code is not OK if b is "false" and default is "true") local function pdfboolean(b,default) - if ((type(b) == "boolean") and b) or default then - return p_true + if type(b) ~= "boolean" then + if default then + return p_true + else + return p_false + end else - return p_false + if b then + return p_true + else + return p_false + end end end Sincerely, Michail PS. And a great palliative way to deal with 3D annotations is via attaching a 3D PDF file made with LaTeX (by Asymptote, for example). But while your method of answering my messages in lua works OK for new code (updating minimals and making a diff with old code is not harder than checking e-mail inbox - "Your morning patch, sir!" ;), I can not deduce from existing sea of ConTeXt code the status of file attachments support.

1 0

thinrules
by Hans van der Meer 16 Apr '10

16 Apr '10

\thinrules disappear when then are the lone item and I can make them appear only by typeing somthing behind/before. However, I would to force a thin rule anyway, even if there is no surrounding text. How? Hans van der Meer

2 1

MetaPost Animation
by Troy Henderson 16 Apr '10

16 Apr '10

I am trying to create an animation in ConTeXt + MetaPost. In particular, I would like to have ConTeXt + MetaPost generate each individual frame of the animation, and then I would like to place each of these graphics on the page in succession. I am looking for a "ConTeXt way" without placing the MetaPost code in a separate source file, running MetaPost, and using \externalfigure. The following MetaPost sample code generate 21 graphics images (numbered .0 to .20), but I have no idea how to have ConTeXt generate these graphics without a manual external MetaPost run and have them included in a way that is consistent with \startuseMPgraphic or similar. Thanks in advance, Troy Henderson path p,q; p:=fullcircle scaled 72; L:=length p; N:=20; for n=0 upto N: beginfig(n); q:=subpath (0,n/N*L) of p; draw q withcolor red; fill fullcircle scaled 3 shifted point length q of q withcolor blue; setbounds currentpicture to unitsquare shifted (-0.5,-0.5) scaled 75; endfig; endfor; end -- Troy Henderson Assistant Professor Department of Mathematics University of Mobile http://www.tlhiv.org

4 5

\hyphenation ignored
by Marco 16 Apr '10

16 Apr '10

Hi, I've a problem with the command \hyphenation. It does not seem to work for me. See following MWE: \mainlanguage [de] \starttext \hyphenation{Index-eintrag} \hyphenatedword{Indexeintrag} % Gives Inde-xein-trag \stoptext In this example the word »Indexeintrag« is mishyphenated. I expect to see »Index-eintrag« as output of \hyphenatedword. The \hyphenation command seems to be ignored. Thanks in advance. Marco

1 0

entities in xml
by Hans van der Meer 16 Apr '10

16 Apr '10

I find some strange things happening with a few entities in the processing of xml. Or am I mistaken, of course. But enlightment would be appreciated. < produces < but > produces < too, mirabile dictu (> correctly produces >) & makes the rest of the contents of the xml-node disappear, & does this too Thus there seems to be an issue with > and with & and & Hans van der Meer ConTeXt ver: 2010.04.12 23:47 MKIV fmt: 2010.4.13 int: english/ english

2 1