1 files changed, 29 insertions, 0 deletions
diff --git a/util/cairo-script/examples/infinichess.cs b/util/cairo-script/examples/infinichess.cs
new file mode 100755
index 000000000..f82b10278
--- /dev/null
+++ b/util/cairo-script/examples/infinichess.cs
@@ -0,0 +1,29 @@
+/xdef { exch def } def
+/-rot { 3 1 roll } def
+/rot { 3 -1 roll } def
+/2dup { 2 copy } def
+
+/SIZE 600. def
+<< /width SIZE /height SIZE >> surface context
+1 1 1 set-source-rgb paint
+0 0 0 set-source-rgb
+EVEN_ODD set-fill-rule
+SIZE SIZE scale
+
+0.5 0 translate
+
+save
+1 1 scale
+/n 90 def
+n neg 1 n {
+	/x xdef
+	0 0 m
+	x 1 l
+	x 0.5 add 1 l
+	0 0 l
+} for
+restore
+fill
+
+/target get (out.png) write-to-png pop
+pop