On 7/13/2022 8:14 PM, Henning Hraban Ramm via ntg-context wrote:
Hi y’all, this is a scratch counter from the simpleslides module. It doesn’t work any more (always shows max-1), and I guess it used to. What’s wrong?
Hraban
""" \startuseMPgraphic{MP:ornament} StartPage ;
save a,b ; numeric a,b ; a = 7mm ; b = PaperWidth/2 - NOfPages * 2.5pt ;
save p,q; path p,q ; p =((0,5mm) -- (1mm,11mm)) shifted (b,0) ; q =((-8mm,5mm) -- (0,11mm) ) shifted (b,0) ;
pickup pencircle scaled 3pt ; for i := NOfPages-1 downto 1: draw (if i mod 5 = 0 : q else : p fi) shifted (i*5pt, 0pt) withcolor if i < PageNumber : red else : black fi ; endfor ; StopPage ; \stopuseMPgraphic
\defineoverlay[background:ornament][\useMPgraphic{MP:ornament}] \setupbackgrounds[page][background={background:ornament}]
\setupbodyfont[ss,18pt]
\starttext
\dorecurse{10}{ \strut\par \page }
\stoptext in mlib-int.lmt change this:
registerdirect("PageNumber", function() return getcount("userpageno") end) (beware it's there twice - i'll fix that) btw, normally you would use RealPageNumber for such a counter 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 -----------------------------------------------------------------