chiark / gitweb /
pumpkin-books.ps: wip new approach
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 2 Dec 2020 22:37:19 +0000 (22:37 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 2 Dec 2020 23:38:22 +0000 (23:38 +0000)
pumpkin-books.ps [new file with mode: 0644]

diff --git a/pumpkin-books.ps b/pumpkin-books.ps
new file mode 100644 (file)
index 0000000..a0bb403
--- /dev/null
@@ -0,0 +1,20 @@
+%!
+
+72 25.4 div dup scale
+
+0 0 0 setrgbcolor
+1 setlinewidth
+
+/tw 115 def
+/th 73 def
+/bdiag 5 def
+
+/prop 
+
+0 0 moveto
+tw 0 lineto
+tw bdiag sub th lineto
+bdiag th lineto
+closepath stroke
+
+%tw 2 div move