2016-07-08 17:24:00

1 files changed, 184 insertions, 0 deletions

diff --git a/tex/context/interface/mkiv/i-pagenumber.xml b/tex/context/interface/mkiv/i-pagenumber.xml
new file mode 100644
index 000000000..d17df9425
--- /dev/null
+++ b/tex/context/interface/mkiv/i-pagenumber.xml
@@ -0,0 +1,184 @@
+<?xml version="1.0" encoding="UTF-8"?>
+
+<?context-directive job ctxfile x-setups.ctx ?>
+
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands">
+
+    <cd:command name="setuprealpagenumber" file="strc-pag.mkiv">
+        <cd:arguments>
+            <cd:assignments list="yes">
+                <cd:inherit name="setupcounter"/>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="setupuserpagenumber" file="strc-pag.mkiv">
+        <cd:arguments>
+            <cd:assignments list="yes">
+                <cd:parameter name="viewerprefix">
+                    <cd:constant type="cd:text"/>
+                </cd:parameter>
+                <cd:parameter name="state">
+                    <cd:constant type="start"/>
+                    <cd:constant type="stop"/>
+                    <cd:constant type="none"/>
+                    <cd:constant type="keep"/>
+                    <cd:constant type="empty"/>
+                </cd:parameter>
+                <cd:inherit name="setupcounter"/>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="setupsubpagenumber" file="strc-pag.mkiv">
+        <cd:arguments>
+            <cd:assignments list="yes">
+                <cd:inherit name="setupcounter"/>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="setuppagenumber" file="strc-pag.mkiv">
+        <cd:arguments>
+            <cd:assignments list="yes">
+                <cd:inherit name="setupuserpagenumber"/>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+    <!--
+
+        <cd:command name="resetrealpagenumber" file="strc-pag.mkiv"/>
+
+    -->
+
+    <cd:command name="resetuserpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="resetsubpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="resetpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="setuppagenumbering" file="strc-pag.mkiv">
+        <cd:arguments>
+            <cd:assignments list="yes">
+                <cd:parameter name="alternative">
+                    <cd:constant type="singlesided" default="yes"/>
+                    <cd:constant type="doublesided"/>
+                </cd:parameter>
+                <cd:parameter name="page">
+                    <cd:inherit name="page"/>
+                </cd:parameter>
+                <cd:parameter name="strut">
+                    <cd:constant type="yes" default="yes"/>
+                    <cd:constant type="no"/>
+                </cd:parameter>
+                <cd:parameter name="command">
+                    <cd:constant type="cd:oneargument"/>
+                </cd:parameter>
+                <cd:parameter name="left">
+                    <cd:constant type="cd:command"/>
+                </cd:parameter>
+                <cd:parameter name="right">
+                    <cd:constant type="cd:command"/>
+                </cd:parameter>
+                <cd:parameter name="state">
+                    <cd:constant type="start" default="yes"/>
+                    <cd:constant type="stop"/>
+                </cd:parameter>
+                <cd:parameter name="width">
+                    <cd:constant type="cd:dimension"/>
+                </cd:parameter>
+                <cd:parameter name="location">
+                    <cd:constant type="header" default="yes"/>
+                    <cd:constant type="footer"/>
+                    <cd:constant type="left"/>
+                    <cd:constant type="middle" default="yes"/>
+                    <cd:constant type="right"/>
+                    <cd:constant type="inleft"/>
+                    <cd:constant type="inright"/>
+                    <cd:constant type="margin"/>
+                    <cd:constant type="inmargin"/>
+                    <cd:constant type="atmargin"/>
+                    <cd:constant type="marginedge"/>
+                </cd:parameter>
+                <cd:parameter name="style">
+                    <cd:resolve name="value-style"/>
+                </cd:parameter>
+                <cd:parameter name="color">
+                    <cd:constant type="cd:color"/>
+                </cd:parameter>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="firstrealpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="firstuserpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="firstsubpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="lastrealpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="lastuserpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="lastsubpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="prevrealpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="prevuserpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="prevsubpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="nextrealpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="nextuserpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="nextsubpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="firstrealpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="firstuserpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="firstsubpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="prevrealpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="prevuserpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="prevsubpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="nextrealpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="nextuserpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="nextsubpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="lastrealpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="lastuserpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="lastsubpage" file="strc-pag.mkiv"/>
+
+    <cd:command name="realpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="userpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="subpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="pagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="prefixedpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="incrementpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="incrementsubpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="decrementpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="decrementsubpagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="completepagenumber" file="strc-pag.mkiv"/>
+
+    <cd:command name="placepagenumber" file="strc-pag.mkiv"/>
+
+</cd:interface>