diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/third/simpleslides/simpleslides-s-Shaded.tex')
-rw-r--r-- | Master/texmf-dist/tex/context/third/simpleslides/simpleslides-s-Shaded.tex | 29 |
1 files changed, 25 insertions, 4 deletions
diff --git a/Master/texmf-dist/tex/context/third/simpleslides/simpleslides-s-Shaded.tex b/Master/texmf-dist/tex/context/third/simpleslides/simpleslides-s-Shaded.tex index 25869b1e0d4..a8da39b1c2c 100644 --- a/Master/texmf-dist/tex/context/third/simpleslides/simpleslides-s-Shaded.tex +++ b/Master/texmf-dist/tex/context/third/simpleslides/simpleslides-s-Shaded.tex @@ -85,12 +85,33 @@ \startuseMPgraphic{simpleslides:MP:ornament} StartPage ; +save p ; path p[] ; +save a ; +if NOfPages <= 15: + a = 0.7cm ; +elseif NOfPages <= 30: + a = 0.45cm ; +else : + a = 0.25cm ; +fi ; +save factor ; numeric factor ; +factor = (TextWidth - a)/(NOfPages - 1) ; linear_shade(Page, 6, - \MPcolor{simpleslides:backgroundcolor}, - \MPcolor{simpleslides:variantcolor}) ; + \MPcolor{simpleslides:backgroundcolor}, + \MPcolor{simpleslides:variantcolor}) ; if PageNumber >1: - \includeMPgraphic{\simpleslidescounter} ; -fi + for i = 1 upto NOfPages : + p[i] = unitcircle scaled a shifted (BackSpace + (i-1)*factor, (2cm - a)/2) ; + if i = PageNumber : +% p[i] := p[i] zscaled (1.2,1.5) ; + pickup pencircle scaled 5pt ; + drawfill p[i] withcolor \MPcolor{simpleslides:variantcolor} ; + else : + circular_shade(p[i],2,\MPcolor{simpleslides:backgroundcolor}, + \MPcolor{simpleslides:variantcolor}) ; + fi + endfor ; +fi ; StopPage ; \stopuseMPgraphic |