From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 2 Jul 2022 11:14:49 +0000 (+0100)
Subject: landscape
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=c34a31d23bef834e2c7592ee2ae7f3344ba1cc9e;p=quacks.git

landscape

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/overflow-tube.ps.pl b/overflow-tube.ps.pl
index 23b30eb..96b701e 100755
--- a/overflow-tube.ps.pl
+++ b/overflow-tube.ps.pl
@@ -8,13 +8,16 @@ use strict;
 BEGIN { unshift @INC, '.'; }
 use Quacks;
 
-ps_start();
-
 sub o {
   local $_;
   for (@_) { $ps_framing .= $_ }
 }
 
+ps_start(<<END);
+90 rotate
+0 -210 translate
+END
+
 o <<END;
 0 0 moveto 20 20 lineto stroke
 END