aboutsummaryrefslogtreecommitdiff
path: root/src/music-paper.ps
diff options
context:
space:
mode:
authorElena ``of Valhalla'' Grandi <valhalla@trueelena.org>2017-06-27 21:31:09 +0200
committerElena ``of Valhalla'' Grandi <valhalla@trueelena.org>2017-06-27 21:31:09 +0200
commite0eac145bd419f781c3f907344171be67c51824f (patch)
tree8725361933145b188df8c7d070ba5a9a1d51d6d5 /src/music-paper.ps
parent24021f0b670f4d49391fc0174f140fd71147afaf (diff)
Music paper
Diffstat (limited to 'src/music-paper.ps')
-rw-r--r--src/music-paper.ps164
1 files changed, 0 insertions, 164 deletions
diff --git a/src/music-paper.ps b/src/music-paper.ps
deleted file mode 100644
index 8860c13..0000000
--- a/src/music-paper.ps
+++ /dev/null
@@ -1,164 +0,0 @@
-%!PS-Adobe-1.0
-%%Title: music-paper by Elena of Valhalla
-%%Pages:1
-%%BoundingBox: 0 0 596 842
-%%DocumentPaperSizes: a4
-%%CreationDate: 2005-05-23
-%%DocumentData: Clean7Bit
-%%LanguageLevel: 1
-%%EndComments
-%%BeginProlog
-% Copyright (C) 2005 Elena Grandi
-% All rights reserved.
-%
-% Redistribution and use in source and binary forms, with or without
-% modification, are permitted provided that the following conditions are met:
-%
-% * Redistributions of source code must retain the above copyright
-% notice, this list of conditions and the following disclaimer.
-% * Redistributions in binary form must reproduce the above copyright
-% notice, this list of conditions and the following disclaimer in the
-% documentation and/or other materials provided with the distribution.
-% * Neither the name of the <organization> nor the
-% names of its contributors may be used to endorse or promote products
-% derived from this software without specific prior written permission.
-%
-% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-% IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-% ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE FOR ANY
-% DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
-% (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
-% LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
-% ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-% (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-% SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
-% ------ Usage ----------------------------------------------------------------
-
-% To use this file either send it to a postscript printer, or use your
-% favourite postscript interpreter to visualize and print it.
-
-% You can customize the result by changing the values in the Settings
-% section below (see the comments for details)
-
-% ------ sizes ----------------------------------------------------------------
-% This will allow you to give measurements in inches or millimiters
-% do not change
-/inch {72 mul} def
-/mm {0.03937 inch mul} def
-
-% ------ Settings -------------------------------------------------------------
-
-% ------ Basic settings
-
-/LineSpac 3 mm def % ver spacing between lines
-/LineNumb 5 def % number of lines in a stave
-
-/StavSpac 6 mm def % ver spacing between staves
-/StavNumb 1 def % number of staves in a grouping
-
-/GrouSpac 15 mm def % ver spacing between groupings of staves
-
-
-% line width and color for thin lines
-/LineSizeThin 0.5 def
-/LineColoThin { 0.8 0.8 0.8 } def
-
-/BackColo { 1.0 1.0 1.0 } def % background color
-
-% page size: if you change this, you should change the BoundingBox
-% in line 4 accordingly (you CAN'T use mm or inch over there)
-% Default is A4 paper ( BoundingBox: 0 0 596 842 )
-/PageWidth 210 mm def
-/PageHeight 297 mm def
-% alternate page sizes (with BoundingBox values) may be
-% A3 paper ( BoundingBox: 0 0 842 1192)
-%/PageWidth 297 mm def
-%/PageHeight 420 mm def
-% Letter paper ( BoundingBox: 0 0 612 792)
-%/PageWidth 8.5 inch def
-%/PageHeight 11 inch def
-
-% white margins
-/BorderTop 10 mm def
-/BorderBottom 10 mm def
-/BorderLeft 10 mm def
-/BorderRight 10 mm def
-
-% ------ Advanced settings
-
-% ------ Behaviour
-
-% Whether to print a line around the margins (1) or not (0)
-/WillPrintBorder 0 def
-
-% From here on you shouldn't worry about changing or configuring anything
-% ------ Variables ------------------------------------------------------------
-
-/StavHeig LineSpac LineNumb 1 sub mul def
-
-/GrouHeig StavHeig StavNumb mul StavSpac StavNumb 1 sub mul add def
-
-/GrouNumb PageHeight BorderBottom sub BorderTop sub GrouHeig GrouSpac add div def
-
-% ------ Procedures -----------------------------------------------------------
-
-% Describes the printable area (does NOT print anything)
-/UsedArea {
- newpath
- BorderLeft BorderBottom moveto
- BorderLeft PageHeight BorderTop sub lineto
- PageWidth BorderRight sub PageHeight BorderTop sub lineto
- PageWidth BorderRight sub BorderBottom lineto
- closepath
-} def
-
-/PrintStave { % stk: y
- gsave
- 0 exch translate
- newpath
- 0 1 LineNumb 1 sub { % for
- LineSpac mul dup BorderLeft exch moveto
- PageWidth BorderRight sub exch lineto
- } for
- LineSizeThin setlinewidth
- LineColoThin setrgbcolor
- stroke
- grestore
-} def
-
-/PrintGroup { % stk: y
- gsave
- 0 exch translate
- 0 1 StavNumb 1 sub { % for
- StavHeig StavSpac add mul PrintStave
- } for
- grestore
-} def
-
-%%EndProlog
-%%Page: 1
-
-% set printing area
-UsedArea clip
-
-% print background
-BackColo setrgbcolor
-UsedArea fill
-
-%BorderBottom PrintGroup
-
-0 1 GrouNumb 1 sub { % for
- GrouHeig GrouSpac add mul BorderBottom add PrintGroup
-} for
-
-% print border (if WillPrintBorder is not 0 )
-WillPrintBorder 0 ne {
- LineSizeBord setlinewidth
- LineColoBord setrgbcolor
- UsedArea stroke
-} if
-
-showpage
-%%Trailer