moving old projects from cold storage to git for possible revival

master
Rob Canning 2023-12-06 12:12:16 +01:00
commit ba9892d6b8
115 changed files with 13345 additions and 0 deletions

685
LICENCE.md 100755
View File

@ -0,0 +1,685 @@
////////////////////////////////////////////////////////////////////
Unless otherwise indicated all the code in these subdirectories is
released under the GNU General Public License. A copy of this license
is included below as well as in the main .pdf document.
Rob Canning 2017
////////////////////////////////////////////////////////////////////
GNU GENERAL PUBLIC LICENSE
Version 3, 29 June 2007
Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
Everyone is permitted to copy and distribute verbatim copies
of this license document, but changing it is not allowed.
Preamble
The GNU General Public License is a free, copyleft license for
software and other kinds of works.
The licenses for most software and other practical works are designed
to take away your freedom to share and change the works. By contrast,
the GNU General Public License is intended to guarantee your freedom to
share and change all versions of a program--to make sure it remains free
software for all its users. We, the Free Software Foundation, use the
GNU General Public License for most of our software; it applies also to
any other work released this way by its authors. You can apply it to
your programs, too.
When we speak of free software, we are referring to freedom, not
price. Our General Public Licenses are designed to make sure that you
have the freedom to distribute copies of free software (and charge for
them if you wish), that you receive source code or can get it if you
want it, that you can change the software or use pieces of it in new
free programs, and that you know you can do these things.
To protect your rights, we need to prevent others from denying you
these rights or asking you to surrender the rights. Therefore, you have
certain responsibilities if you distribute copies of the software, or if
you modify it: responsibilities to respect the freedom of others.
For example, if you distribute copies of such a program, whether
gratis or for a fee, you must pass on to the recipients the same
freedoms that you received. You must make sure that they, too, receive
or can get the source code. And you must show them these terms so they
know their rights.
Developers that use the GNU GPL protect your rights with two steps:
(1) assert copyright on the software, and (2) offer you this License
giving you legal permission to copy, distribute and/or modify it.
For the developers' and authors' protection, the GPL clearly explains
that there is no warranty for this free software. For both users' and
authors' sake, the GPL requires that modified versions be marked as
changed, so that their problems will not be attributed erroneously to
authors of previous versions.
Some devices are designed to deny users access to install or run
modified versions of the software inside them, although the manufacturer
can do so. This is fundamentally incompatible with the aim of
protecting users' freedom to change the software. The systematic
pattern of such abuse occurs in the area of products for individuals to
use, which is precisely where it is most unacceptable. Therefore, we
have designed this version of the GPL to prohibit the practice for those
products. If such problems arise substantially in other domains, we
stand ready to extend this provision to those domains in future versions
of the GPL, as needed to protect the freedom of users.
Finally, every program is threatened constantly by software patents.
States should not allow patents to restrict development and use of
software on general-purpose computers, but in those that do, we wish to
avoid the special danger that patents applied to a free program could
make it effectively proprietary. To prevent this, the GPL assures that
patents cannot be used to render the program non-free.
The precise terms and conditions for copying, distribution and
modification follow.
TERMS AND CONDITIONS
0. Definitions.
"This License" refers to version 3 of the GNU General Public License.
"Copyright" also means copyright-like laws that apply to other kinds of
works, such as semiconductor masks.
"The Program" refers to any copyrightable work licensed under this
License. Each licensee is addressed as "you". "Licensees" and
"recipients" may be individuals or organizations.
To "modify" a work means to copy from or adapt all or part of the work
in a fashion requiring copyright permission, other than the making of an
exact copy. The resulting work is called a "modified version" of the
earlier work or a work "based on" the earlier work.
A "covered work" means either the unmodified Program or a work based
on the Program.
To "propagate" a work means to do anything with it that, without
permission, would make you directly or secondarily liable for
infringement under applicable copyright law, except executing it on a
computer or modifying a private copy. Propagation includes copying,
distribution (with or without modification), making available to the
public, and in some countries other activities as well.
To "convey" a work means any kind of propagation that enables other
parties to make or receive copies. Mere interaction with a user through
a computer network, with no transfer of a copy, is not conveying.
An interactive user interface displays "Appropriate Legal Notices"
to the extent that it includes a convenient and prominently visible
feature that (1) displays an appropriate copyright notice, and (2)
tells the user that there is no warranty for the work (except to the
extent that warranties are provided), that licensees may convey the
work under this License, and how to view a copy of this License. If
the interface presents a list of user commands or options, such as a
menu, a prominent item in the list meets this criterion.
1. Source Code.
The "source code" for a work means the preferred form of the work
for making modifications to it. "Object code" means any non-source
form of a work.
A "Standard Interface" means an interface that either is an official
standard defined by a recognized standards body, or, in the case of
interfaces specified for a particular programming language, one that
is widely used among developers working in that language.
The "System Libraries" of an executable work include anything, other
than the work as a whole, that (a) is included in the normal form of
packaging a Major Component, but which is not part of that Major
Component, and (b) serves only to enable use of the work with that
Major Component, or to implement a Standard Interface for which an
implementation is available to the public in source code form. A
"Major Component", in this context, means a major essential component
(kernel, window system, and so on) of the specific operating system
(if any) on which the executable work runs, or a compiler used to
produce the work, or an object code interpreter used to run it.
The "Corresponding Source" for a work in object code form means all
the source code needed to generate, install, and (for an executable
work) run the object code and to modify the work, including scripts to
control those activities. However, it does not include the work's
System Libraries, or general-purpose tools or generally available free
programs which are used unmodified in performing those activities but
which are not part of the work. For example, Corresponding Source
includes interface definition files associated with source files for
the work, and the source code for shared libraries and dynamically
linked subprograms that the work is specifically designed to require,
such as by intimate data communication or control flow between those
subprograms and other parts of the work.
The Corresponding Source need not include anything that users
can regenerate automatically from other parts of the Corresponding
Source.
The Corresponding Source for a work in source code form is that
same work.
2. Basic Permissions.
All rights granted under this License are granted for the term of
copyright on the Program, and are irrevocable provided the stated
conditions are met. This License explicitly affirms your unlimited
permission to run the unmodified Program. The output from running a
covered work is covered by this License only if the output, given its
content, constitutes a covered work. This License acknowledges your
rights of fair use or other equivalent, as provided by copyright law.
You may make, run and propagate covered works that you do not
convey, without conditions so long as your license otherwise remains
in force. You may convey covered works to others for the sole purpose
of having them make modifications exclusively for you, or provide you
with facilities for running those works, provided that you comply with
the terms of this License in conveying all material for which you do
not control copyright. Those thus making or running the covered works
for you must do so exclusively on your behalf, under your direction
and control, on terms that prohibit them from making any copies of
your copyrighted material outside their relationship with you.
Conveying under any other circumstances is permitted solely under
the conditions stated below. Sublicensing is not allowed; section 10
makes it unnecessary.
3. Protecting Users' Legal Rights From Anti-Circumvention Law.
No covered work shall be deemed part of an effective technological
measure under any applicable law fulfilling obligations under article
11 of the WIPO copyright treaty adopted on 20 December 1996, or
similar laws prohibiting or restricting circumvention of such
measures.
When you convey a covered work, you waive any legal power to forbid
circumvention of technological measures to the extent such circumvention
is effected by exercising rights under this License with respect to
the covered work, and you disclaim any intention to limit operation or
modification of the work as a means of enforcing, against the work's
users, your or third parties' legal rights to forbid circumvention of
technological measures.
4. Conveying Verbatim Copies.
You may convey verbatim copies of the Program's source code as you
receive it, in any medium, provided that you conspicuously and
appropriately publish on each copy an appropriate copyright notice;
keep intact all notices stating that this License and any
non-permissive terms added in accord with section 7 apply to the code;
keep intact all notices of the absence of any warranty; and give all
recipients a copy of this License along with the Program.
You may charge any price or no price for each copy that you convey,
and you may offer support or warranty protection for a fee.
5. Conveying Modified Source Versions.
You may convey a work based on the Program, or the modifications to
produce it from the Program, in the form of source code under the
terms of section 4, provided that you also meet all of these conditions:
a) The work must carry prominent notices stating that you modified
it, and giving a relevant date.
b) The work must carry prominent notices stating that it is
released under this License and any conditions added under section
7. This requirement modifies the requirement in section 4 to
"keep intact all notices".
c) You must license the entire work, as a whole, under this
License to anyone who comes into possession of a copy. This
License will therefore apply, along with any applicable section 7
additional terms, to the whole of the work, and all its parts,
regardless of how they are packaged. This License gives no
permission to license the work in any other way, but it does not
invalidate such permission if you have separately received it.
d) If the work has interactive user interfaces, each must display
Appropriate Legal Notices; however, if the Program has interactive
interfaces that do not display Appropriate Legal Notices, your
work need not make them do so.
A compilation of a covered work with other separate and independent
works, which are not by their nature extensions of the covered work,
and which are not combined with it such as to form a larger program,
in or on a volume of a storage or distribution medium, is called an
"aggregate" if the compilation and its resulting copyright are not
used to limit the access or legal rights of the compilation's users
beyond what the individual works permit. Inclusion of a covered work
in an aggregate does not cause this License to apply to the other
parts of the aggregate.
6. Conveying Non-Source Forms.
You may convey a covered work in object code form under the terms
of sections 4 and 5, provided that you also convey the
machine-readable Corresponding Source under the terms of this License,
in one of these ways:
a) Convey the object code in, or embodied in, a physical product
(including a physical distribution medium), accompanied by the
Corresponding Source fixed on a durable physical medium
customarily used for software interchange.
b) Convey the object code in, or embodied in, a physical product
(including a physical distribution medium), accompanied by a
written offer, valid for at least three years and valid for as
long as you offer spare parts or customer support for that product
model, to give anyone who possesses the object code either (1) a
copy of the Corresponding Source for all the software in the
product that is covered by this License, on a durable physical
medium customarily used for software interchange, for a price no
more than your reasonable cost of physically performing this
conveying of source, or (2) access to copy the
Corresponding Source from a network server at no charge.
c) Convey individual copies of the object code with a copy of the
written offer to provide the Corresponding Source. This
alternative is allowed only occasionally and noncommercially, and
only if you received the object code with such an offer, in accord
with subsection 6b.
d) Convey the object code by offering access from a designated
place (gratis or for a charge), and offer equivalent access to the
Corresponding Source in the same way through the same place at no
further charge. You need not require recipients to copy the
Corresponding Source along with the object code. If the place to
copy the object code is a network server, the Corresponding Source
may be on a different server (operated by you or a third party)
that supports equivalent copying facilities, provided you maintain
clear directions next to the object code saying where to find the
Corresponding Source. Regardless of what server hosts the
Corresponding Source, you remain obligated to ensure that it is
available for as long as needed to satisfy these requirements.
e) Convey the object code using peer-to-peer transmission, provided
you inform other peers where the object code and Corresponding
Source of the work are being offered to the general public at no
charge under subsection 6d.
A separable portion of the object code, whose source code is excluded
from the Corresponding Source as a System Library, need not be
included in conveying the object code work.
A "User Product" is either (1) a "consumer product", which means any
tangible personal property which is normally used for personal, family,
or household purposes, or (2) anything designed or sold for incorporation
into a dwelling. In determining whether a product is a consumer product,
doubtful cases shall be resolved in favor of coverage. For a particular
product received by a particular user, "normally used" refers to a
typical or common use of that class of product, regardless of the status
of the particular user or of the way in which the particular user
actually uses, or expects or is expected to use, the product. A product
is a consumer product regardless of whether the product has substantial
commercial, industrial or non-consumer uses, unless such uses represent
the only significant mode of use of the product.
"Installation Information" for a User Product means any methods,
procedures, authorization keys, or other information required to install
and execute modified versions of a covered work in that User Product from
a modified version of its Corresponding Source. The information must
suffice to ensure that the continued functioning of the modified object
code is in no case prevented or interfered with solely because
modification has been made.
If you convey an object code work under this section in, or with, or
specifically for use in, a User Product, and the conveying occurs as
part of a transaction in which the right of possession and use of the
User Product is transferred to the recipient in perpetuity or for a
fixed term (regardless of how the transaction is characterized), the
Corresponding Source conveyed under this section must be accompanied
by the Installation Information. But this requirement does not apply
if neither you nor any third party retains the ability to install
modified object code on the User Product (for example, the work has
been installed in ROM).
The requirement to provide Installation Information does not include a
requirement to continue to provide support service, warranty, or updates
for a work that has been modified or installed by the recipient, or for
the User Product in which it has been modified or installed. Access to a
network may be denied when the modification itself materially and
adversely affects the operation of the network or violates the rules and
protocols for communication across the network.
Corresponding Source conveyed, and Installation Information provided,
in accord with this section must be in a format that is publicly
documented (and with an implementation available to the public in
source code form), and must require no special password or key for
unpacking, reading or copying.
7. Additional Terms.
"Additional permissions" are terms that supplement the terms of this
License by making exceptions from one or more of its conditions.
Additional permissions that are applicable to the entire Program shall
be treated as though they were included in this License, to the extent
that they are valid under applicable law. If additional permissions
apply only to part of the Program, that part may be used separately
under those permissions, but the entire Program remains governed by
this License without regard to the additional permissions.
When you convey a copy of a covered work, you may at your option
remove any additional permissions from that copy, or from any part of
it. (Additional permissions may be written to require their own
removal in certain cases when you modify the work.) You may place
additional permissions on material, added by you to a covered work,
for which you have or can give appropriate copyright permission.
Notwithstanding any other provision of this License, for material you
add to a covered work, you may (if authorized by the copyright holders of
that material) supplement the terms of this License with terms:
a) Disclaiming warranty or limiting liability differently from the
terms of sections 15 and 16 of this License; or
b) Requiring preservation of specified reasonable legal notices or
author attributions in that material or in the Appropriate Legal
Notices displayed by works containing it; or
c) Prohibiting misrepresentation of the origin of that material, or
requiring that modified versions of such material be marked in
reasonable ways as different from the original version; or
d) Limiting the use for publicity purposes of names of licensors or
authors of the material; or
e) Declining to grant rights under trademark law for use of some
trade names, trademarks, or service marks; or
f) Requiring indemnification of licensors and authors of that
material by anyone who conveys the material (or modified versions of
it) with contractual assumptions of liability to the recipient, for
any liability that these contractual assumptions directly impose on
those licensors and authors.
All other non-permissive additional terms are considered "further
restrictions" within the meaning of section 10. If the Program as you
received it, or any part of it, contains a notice stating that it is
governed by this License along with a term that is a further
restriction, you may remove that term. If a license document contains
a further restriction but permits relicensing or conveying under this
License, you may add to a covered work material governed by the terms
of that license document, provided that the further restriction does
not survive such relicensing or conveying.
If you add terms to a covered work in accord with this section, you
must place, in the relevant source files, a statement of the
additional terms that apply to those files, or a notice indicating
where to find the applicable terms.
Additional terms, permissive or non-permissive, may be stated in the
form of a separately written license, or stated as exceptions;
the above requirements apply either way.
8. Termination.
You may not propagate or modify a covered work except as expressly
provided under this License. Any attempt otherwise to propagate or
modify it is void, and will automatically terminate your rights under
this License (including any patent licenses granted under the third
paragraph of section 11).
However, if you cease all violation of this License, then your
license from a particular copyright holder is reinstated (a)
provisionally, unless and until the copyright holder explicitly and
finally terminates your license, and (b) permanently, if the copyright
holder fails to notify you of the violation by some reasonable means
prior to 60 days after the cessation.
Moreover, your license from a particular copyright holder is
reinstated permanently if the copyright holder notifies you of the
violation by some reasonable means, this is the first time you have
received notice of violation of this License (for any work) from that
copyright holder, and you cure the violation prior to 30 days after
your receipt of the notice.
Termination of your rights under this section does not terminate the
licenses of parties who have received copies or rights from you under
this License. If your rights have been terminated and not permanently
reinstated, you do not qualify to receive new licenses for the same
material under section 10.
9. Acceptance Not Required for Having Copies.
You are not required to accept this License in order to receive or
run a copy of the Program. Ancillary propagation of a covered work
occurring solely as a consequence of using peer-to-peer transmission
to receive a copy likewise does not require acceptance. However,
nothing other than this License grants you permission to propagate or
modify any covered work. These actions infringe copyright if you do
not accept this License. Therefore, by modifying or propagating a
covered work, you indicate your acceptance of this License to do so.
10. Automatic Licensing of Downstream Recipients.
Each time you convey a covered work, the recipient automatically
receives a license from the original licensors, to run, modify and
propagate that work, subject to this License. You are not responsible
for enforcing compliance by third parties with this License.
An "entity transaction" is a transaction transferring control of an
organization, or substantially all assets of one, or subdividing an
organization, or merging organizations. If propagation of a covered
work results from an entity transaction, each party to that
transaction who receives a copy of the work also receives whatever
licenses to the work the party's predecessor in interest had or could
give under the previous paragraph, plus a right to possession of the
Corresponding Source of the work from the predecessor in interest, if
the predecessor has it or can get it with reasonable efforts.
You may not impose any further restrictions on the exercise of the
rights granted or affirmed under this License. For example, you may
not impose a license fee, royalty, or other charge for exercise of
rights granted under this License, and you may not initiate litigation
(including a cross-claim or counterclaim in a lawsuit) alleging that
any patent claim is infringed by making, using, selling, offering for
sale, or importing the Program or any portion of it.
11. Patents.
A "contributor" is a copyright holder who authorizes use under this
License of the Program or a work on which the Program is based. The
work thus licensed is called the contributor's "contributor version".
A contributor's "essential patent claims" are all patent claims
owned or controlled by the contributor, whether already acquired or
hereafter acquired, that would be infringed by some manner, permitted
by this License, of making, using, or selling its contributor version,
but do not include claims that would be infringed only as a
consequence of further modification of the contributor version. For
purposes of this definition, "control" includes the right to grant
patent sublicenses in a manner consistent with the requirements of
this License.
Each contributor grants you a non-exclusive, worldwide, royalty-free
patent license under the contributor's essential patent claims, to
make, use, sell, offer for sale, import and otherwise run, modify and
propagate the contents of its contributor version.
In the following three paragraphs, a "patent license" is any express
agreement or commitment, however denominated, not to enforce a patent
(such as an express permission to practice a patent or covenant not to
sue for patent infringement). To "grant" such a patent license to a
party means to make such an agreement or commitment not to enforce a
patent against the party.
If you convey a covered work, knowingly relying on a patent license,
and the Corresponding Source of the work is not available for anyone
to copy, free of charge and under the terms of this License, through a
publicly available network server or other readily accessible means,
then you must either (1) cause the Corresponding Source to be so
available, or (2) arrange to deprive yourself of the benefit of the
patent license for this particular work, or (3) arrange, in a manner
consistent with the requirements of this License, to extend the patent
license to downstream recipients. "Knowingly relying" means you have
actual knowledge that, but for the patent license, your conveying the
covered work in a country, or your recipient's use of the covered work
in a country, would infringe one or more identifiable patents in that
country that you have reason to believe are valid.
If, pursuant to or in connection with a single transaction or
arrangement, you convey, or propagate by procuring conveyance of, a
covered work, and grant a patent license to some of the parties
receiving the covered work authorizing them to use, propagate, modify
or convey a specific copy of the covered work, then the patent license
you grant is automatically extended to all recipients of the covered
work and works based on it.
A patent license is "discriminatory" if it does not include within
the scope of its coverage, prohibits the exercise of, or is
conditioned on the non-exercise of one or more of the rights that are
specifically granted under this License. You may not convey a covered
work if you are a party to an arrangement with a third party that is
in the business of distributing software, under which you make payment
to the third party based on the extent of your activity of conveying
the work, and under which the third party grants, to any of the
parties who would receive the covered work from you, a discriminatory
patent license (a) in connection with copies of the covered work
conveyed by you (or copies made from those copies), or (b) primarily
for and in connection with specific products or compilations that
contain the covered work, unless you entered into that arrangement,
or that patent license was granted, prior to 28 March 2007.
Nothing in this License shall be construed as excluding or limiting
any implied license or other defenses to infringement that may
otherwise be available to you under applicable patent law.
12. No Surrender of Others' Freedom.
If conditions are imposed on you (whether by court order, agreement or
otherwise) that contradict the conditions of this License, they do not
excuse you from the conditions of this License. If you cannot convey a
covered work so as to satisfy simultaneously your obligations under this
License and any other pertinent obligations, then as a consequence you may
not convey it at all. For example, if you agree to terms that obligate you
to collect a royalty for further conveying from those to whom you convey
the Program, the only way you could satisfy both those terms and this
License would be to refrain entirely from conveying the Program.
13. Use with the GNU Affero General Public License.
Notwithstanding any other provision of this License, you have
permission to link or combine any covered work with a work licensed
under version 3 of the GNU Affero General Public License into a single
combined work, and to convey the resulting work. The terms of this
License will continue to apply to the part which is the covered work,
but the special requirements of the GNU Affero General Public License,
section 13, concerning interaction through a network will apply to the
combination as such.
14. Revised Versions of this License.
The Free Software Foundation may publish revised and/or new versions of
the GNU General Public License from time to time. Such new versions will
be similar in spirit to the present version, but may differ in detail to
address new problems or concerns.
Each version is given a distinguishing version number. If the
Program specifies that a certain numbered version of the GNU General
Public License "or any later version" applies to it, you have the
option of following the terms and conditions either of that numbered
version or of any later version published by the Free Software
Foundation. If the Program does not specify a version number of the
GNU General Public License, you may choose any version ever published
by the Free Software Foundation.
If the Program specifies that a proxy can decide which future
versions of the GNU General Public License can be used, that proxy's
public statement of acceptance of a version permanently authorizes you
to choose that version for the Program.
Later license versions may give you additional or different
permissions. However, no additional obligations are imposed on any
author or copyright holder as a result of your choosing to follow a
later version.
15. Disclaimer of Warranty.
THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
16. Limitation of Liability.
IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
SUCH DAMAGES.
17. Interpretation of Sections 15 and 16.
If the disclaimer of warranty and limitation of liability provided
above cannot be given local legal effect according to their terms,
reviewing courts shall apply local law that most closely approximates
an absolute waiver of all civil liability in connection with the
Program, unless a warranty or assumption of liability accompanies a
copy of the Program in return for a fee.
END OF TERMS AND CONDITIONS
How to Apply These Terms to Your New Programs
If you develop a new program, and you want it to be of the greatest
possible use to the public, the best way to achieve this is to make it
free software which everyone can redistribute and change under these terms.
To do so, attach the following notices to the program. It is safest
to attach them to the start of each source file to most effectively
state the exclusion of warranty; and each file should have at least
the "copyright" line and a pointer to where the full notice is found.
<one line to give the program's name and a brief idea of what it does.>
Copyright (C) <year> <name of author>
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
Also add information on how to contact you by electronic and paper mail.
If the program does terminal interaction, make it output a short
notice like this when it starts in an interactive mode:
<program> Copyright (C) <year> <name of author>
This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
This is free software, and you are welcome to redistribute it
under certain conditions; type `show c' for details.
The hypothetical commands `show w' and `show c' should show the appropriate
parts of the General Public License. Of course, your program's commands
might be different; for a GUI interface, you would use an "about box".
You should also get your employer (if you work as a programmer) or school,
if any, to sign a "copyright disclaimer" for the program, if necessary.
For more information on this, and how to apply and follow the GNU GPL, see
<http://www.gnu.org/licenses/>.
The GNU General Public License does not permit incorporating your program
into proprietary programs. If your program is a subroutine library, you
may consider it more useful to permit linking proprietary applications with
the library. If this is what you want to do, use the GNU Lesser General
Public License instead of this License. But first, please read
<http://www.gnu.org/philosophy/why-not-lgpl.html>.

38
README.md 100755
View File

@ -0,0 +1,38 @@
/////////////////////////////////////////
# Space Specific Score Generator
/////////////////////////////////////////
//// Rob Canning 2014 - rc@kiben.net
/////////////////////////////////////////
## The Score Generation
- the cookit.py is the file to run to generate the score
- the config.py file is where to define the pitches from the acoustic analyis of the space.
ly/current.ly is the where the main score boilerplate needs to be.
all the other .ly files are the individual "parts/voices" to be injected.
After this has happened cookit calls lilypond to output the final score.
These final scores are datetagged and moved to output/archive
---
## The Acoustic Analysis
The freq_resp directory contains a snapshot of the acoustic analysis and a text file where I note the frequencies available.
This analysis was made with the nice and opensource:
Jaaa-0.8.4 (C) 2004-2010 Fons Adriaensen <fons@kokkinizita.net>
---
## Live Electronics
The live electronics are currently handled by PureData (pd-extended) and the patches and abstractions live in the liveelec directory.
---

Binary file not shown.

After

Width:  |  Height:  |  Size: 45 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 32 KiB

View File

@ -0,0 +1,65 @@
# three high---------------
version = "canterbury"
A=435
#pedal
#114.3hz # Bflat2 (-34)
#419.5hz # Aflat4 (+17)
#1154.7 # D6 (-30)
#1524.7 # G6 (-48)
#2585.6 # E7 (-34)
#3131.5 # G7 (-2)
#3620.9 # A7 (+49)
#3959.2 # B7 (+4)
#5020.4 # EFlat8 (+15)
#5507.5 # F8 (-25)
#5770.5 # GFlat (-44)
#7538.4
#8007.5
#9756.5
#11247.4
#11712.4
H1="ees" # C6+41
H2="b" # BFlat5+29c
H3="a" # AFLat5+22
# three mid ---------------
M1="g" # Fsharp5+5
M2="e" # Eflat5 - bingo
M3="g" # Eflat5 - bingo
#two low tomes ---------------
L1="d" # C5+22c
L2="aes" # 169.3hz - E3+46c
#---------------
# pedal tone G1-20c 48.4hz ---------------
P="bes"
#---------------
o_2 =",,"
o_1 =","
o0 = ""
o1 = "'"
o2 = "''"
o3 = "'''"
# RH
pitchSet=[L1+o1, L2+o1, M1+o2, M2+o3, H1 + o2, H2 + o2, H3 + o3]
# LH
pitchSetB=[ M1, L1, M3+o_1, L2, H1+o1, H2+o1, H3+o1]
# CHORD
pitchSetD=[ P+o_2, H1+o_1, H2+o_1, M1+o1, M2]
# VOICE
pitchSetV=[ L1+o1, L2+o0, M2+o1, P+o0 ]
#textSet=( "aaaaaaaaaaa'" "ddddddddddddddd" "bbbbbbbbbb" "cccccccccccccc" )

View File

@ -0,0 +1,61 @@
# three high---------------
version = "canterbury"
A=435
#pedal
#114.3hz # Bflat2 (-34)
#419.5hz # Aflat4 (+17)
#1154.7 # D6 (-30)
#1524.7 # G6 (-48)
#2585.6 # E7 (-34)
#3131.5 # G7 (-2)
#3620.9 # A7 (+49)
#3959.2 # B7 (+4)
#5020.4 # EFlat8 (+15)
#5507.5 # F8 (-25)
#5770.5 # GFlat (-44)
#7538.4
#8007.5
#9756.5
#11247.4
#11712.4
H1="c" # C6+41
H2="bes" # BFlat5+29c
H3="aes" # AFLat5+22
# three mid ---------------
M1="fis" # Fsharp5+5
M2="ees" # Eflat5 - bingo
#two low tomes ---------------
L1="cis" # C5+22c
L2="e" # 169.3hz - E3+46c
#---------------
# pedal tone G1-20c 48.4hz ---------------
P="g"
#---------------
o_1 =","
o0 = ""
o1 = "'"
o2 = "''"
o3 = "'''"
# RH
pitchSet=[L1 + "'", L2 + "'", M1 + o2, M2 + "'''", H1 + "''", H2 + "''", H3 + "''"]
# LH
pitchSetB=[ M1, M2, L1, L2, H1+"'", H2+"'", H3+"'"]
# CHORD
pitchSetD=[ P+o_1, H1, H2, M1+"'", M2+"''"]
# VOICE
pitchSetV=[ L1+"'", L2+"'", M1+"''", H3 ]
#textSet=( "aaaaaaaaaaa'" "ddddddddddddddd" "bbbbbbbbbb" "cccccccccccccc" )

Binary file not shown.

After

Width:  |  Height:  |  Size: 42 KiB

Binary file not shown.

Binary file not shown.

25
config.ini 100755
View File

@ -0,0 +1,25 @@
# three high---------------
H1="c" # C6+41
H2="bes" # BFlat5+29c
H3="aes" # AFLat5+22
# three mid ---------------
M1="fis" # Fsharp5+5
M2="ees" # Eflat5 - bingo
#two low tomes ---------------
L1="cis" # C5+22c
L2="e" # 169.3hz - E3+46c
#---------------
# pedal tone G1-20c 48.4hz ---------------
P="g"
#---------------
# RH
pitchSet=("$L1'" "$L2'" "$M1''" "$M2'''" "$H1''" "$H2''" "$H3''")
# LH
pitchSetB=( "$M1" "$M2" "$L1" "$L2" "$H1'" "$H2'" "$H3'")
# CHORD
pitchSetD=( $P, "$H1" "$H2" "$M1'" "$M2''")
pitchSetV=( "$L1'" "$L2'" "$M1''" "$H3" )
#textSet=( "aaaaaaaaaaa'" "ddddddddddddddd" "bbbbbbbbbb" "cccccccccccccc" )

85
config.py 100755
View File

@ -0,0 +1,85 @@
version = "catford"
# organ tuning
A=442
#pedal
# 71.9hz D -36
# 155hz Ef -2 !
# 270hz C# +45 x
# 475hz Bf +35
# 622hz Ef +1 !
# 852 Af +45 !
# 1199 D +36 !
# 1828 Bf -34
# 2340 D -7 !
# 2576 E -40 !
# 2938 Gf -13
# 3870 B -36
# 4219 C +14
# 4580 D -44
# 5387 E +37
# 5918 F# 0 !
# 6679 G +9
# 6990 A -12
#419.5hz # Aflat4 (+17)
#1154.7 # D6 (-30)
#1524.7 # G6 (-48)
#2585.6 # E7 (-34)
#3131.5 # G7 (-2)
#3620.9 # A7 (+49)
#3959.2 # B7 (+4)
#5020.4 # EFlat8 (+15)
#5507.5 # F8 (-25)
#5770.5 # GFlat (-44)
#7538.4
#8007.5
#9756.5
#11247.4
#11712.4
# three high---------------
H1="a" # C6+41
H2="g" # BFlat5+29c
H3="fis" # AFLat5+22
# three mid ---------------
M1="bes" # Fsharp5+5
M2="c" # Eflat5 - bingo
M3="fis" # Eflat5 - bingo
#two low tomes ---------------
L1="des" # C5+22c
L2="bes" # 169.3hz - E3+46c
#---------------
# pedal tone G1-20c 48.4hz ---------------
P="ees"
#---------------
o_2 =",,"
o_1 =","
o0 = ""
o1 = "'"
o2 = "''"
o3 = "'''"
# RH
pitchSet=[L1+o1, L2+o1, M1+o2, M2+o3, H1 + o2, H2 + o2, H3 + o3]
# LH
pitchSetB=[ M1, L1, M3+o_1, L2, H1+o1, H2+o1, H3+o1]
# CHORD
pitchSetD=[ P+o_1, H1+o_1, H2+o_1, M1+o1, M2]
# VOICE
pitchSetV=[ L1+o1, L2+o0, M2+o1, P+o0 ]
#textSet=( "aaaaaaaaaaa'" "ddddddddddddddd" "bbbbbbbbbb" "cccccccccccccc" )

150
construct.sh 100755
View File

@ -0,0 +1,150 @@
#!/bin/bash
# import the configuration file containing
# the data from the acoustic analysis
source config.ini
##########################################
cd ly/
# i know i need to do some nesty looping action here
# but the concert starts in 2 hours.... quick and dirty it has to be!
cp A.ly A.tmp
C=0;
for i in xA xB xC xD xE xF xG xC xD xE xF xG
do
sed -i s"/$i/${pitchSet[$C]}/"g A.tmp;
C=$[(C + 1)%${#pitchSet[@]}]
done
C=0;
cp A.ly B.tmp
for i in xB xC xD xE xF xG xA xD xE xF xG xA
do
sed -i s"/$i/${pitchSet[$C]}/"g B.tmp;
C=$[(C + 1)%${#pitchSet[@]}]
done
C=0;
cp A.ly C.tmp
for i in xC xD xE xF xG xA xB xE xF xG xA xB
do
sed -i s"/$i/${pitchSet[$C]}/"g C.tmp;
C=$[(C + 1)%${#pitchSet[@]}]
done
C=0;
cp A.ly D.tmp
for i in xD xE xF xG xA xB xC xF xG xA xB xC
do
sed -i s"/$i/${pitchSet[$C]}/"g D.tmp;
C=$[(C + 1)%${#pitchSet[@]}]
done
C=0;
cp A.ly E.tmp
for i in xE xF xG xA xB xC xD xG xA xB xC xD
do
sed -i s"/$i/${pitchSet[$C]}/"g E.tmp;
C=$[(C + 1)%${#pitchSet[@]}]
done
C=0;
cp A.ly F.tmp
for i in xF xG xA xB xC xD xE
do
sed -i s"/$i/${pitchSet[$C]}/"g F.tmp;
C=$[(C + 1)%${#pitchSet[@]}]
done
C=0;
cp A.ly G.tmp
for i in xG xA xB xC xD xE xF
do
sed -i s"/$i/${pitchSet[$C]}/"g G.tmp;
C=$[(C + 1)%${#pitchSet[@]}]
done
cat A.tmp B.tmp C.tmp D.tmp E.tmp F.tmp > tmp/RH.ly
###########################################################
cp B.ly BA.tmp
C=0;
for i in xA xB xC xD xE xF xG
do
sed -i s"/$i/${pitchSetB[$C]}/"g BA.tmp;
C=$[(C + 1)%${#pitchSetB[@]}]
done
C=0;
cp B.ly BB.tmp
for i in xB xC xD xE xF xG xA
do
sed -i s"/$i/${pitchSetB[$C]}/"g BB.tmp;
C=$[(C + 1)%${#pitchSetB[@]}]
done
C=0;
cp B.ly BC.tmp
for i in xC xD xE xF xG xA xB
do
sed -i s"/$i/${pitchSetB[$C]}/"g BC.tmp;
C=$[(C + 1)%${#pitchSetB[@]}]
done
C=0;
cp B.ly BD.tmp
for i in xD xE xF xG xA xB xC
do
sed -i s"/$i/${pitchSetB[$C]}/"g BD.tmp;
C=$[(C + 1)%${#pitchSetB[@]}]
done
C=0;
cp B.ly BE.tmp
for i in xE xF xG xA xB xC xD
do
sed -i s"/$i/${pitchSetB[$C]}/"g BE.tmp;
C=$[(C + 1)%${#pitchSetB[@]}]
done
C=0;
cp B.ly BF.tmp
for i in xF xG xA xB xC xD xE
do
sed -i s"/$i/${pitchSetB[$C]}/"g BF.tmp;
C=$[(C + 1)%${#pitchSetB[@]}]
done
C=0;
cp B.ly BG.tmp
for i in xG xA xB xC xD xE xF
do
sed -i s"/$i/${pitchSetB[$C]}/"g BG.tmp;
C=$[(C + 1)%${#pitchSetB[@]}]
done
cat BA.tmp BB.tmp BC.tmp BD.tmp BE.tmp BF.tmp BG.tmp BA.tmp > tmp/LH.ly
#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
C=0;
cp D.ly tmp/DRONE.ly
for i in "xA" "xB" "xC" "xD" "xE"
do
sed -i s"/$i/${pitchSetD[$C]}/"g tmp/DRONE.ly;
C=$[(C + 1)%${#pitchSetD[@]}]
done
C=0;
cp R.ly tmp/RECORDER.ly
for i in "xA" "xB" "xC" "xD" "xE"
do
sed -i s"/$i/${pitchSet[$C]}/"g tmp/RECORDER.ly;
C=$[(C + 1)%${#pitchSet[@]}]
done
C=0;
cp V.ly tmp/VOICE.ly
for i in "xA" "xB" "xC" "xD" "xE"
do
sed -i s"/$i/${pitchSetV[$C]}/"g tmp/VOICE.ly;
C=$[(C + 1)%${#pitchSetV[@]}]
done
rm *.tmp

141
cookit.py 100755
View File

@ -0,0 +1,141 @@
#!/usr/bin/python
import shutil, re, glob, os, random, time
#import the config file containing acoustic analysis data
cfg=__import__("config")
# set lilypond file path
l="ly"
# define the part names
parts=["LH","RH","DRONE","VOICE", "RECORDER"]
# define the number of slices (template variants/rotations) that make a part
variants=["A","B","C","D","E","F","G","A","B","C","D","E","F","G"]
# define the search keys (these strings are in lilypond templates and to be replaced):
col = ["xA", "xB", "xC", "xD", "xE", "xF", "xG", "xC", "xD", "xE", "xF", "xG"]
# ---------------------------------------
# clear the old tmp files before starting
deleteme = ["ly/tmp/*.tmp", "*.pdf", "ly/located*.ly", "ly/tmp/ly/*.ly"]
for d in deleteme:
for clean in glob.glob(d):
os.remove(clean)
# ---------------------------------------
C=0; # a counter to use for rota
for idz, p in enumerate(parts):
files2cat = []
# decide which pitchset to use based on part
if p == "LH":
pitches = cfg.pitchSet
varinums = 7;
elif p is "RH":
pitches = cfg.pitchSetB
varinums = 9;
elif p is "DRONE":
pitches = cfg.pitchSetD
varinums = 7;
elif p is "VOICE":
pitches = cfg.pitchSetV
varinums = 1;
elif p is "RECORDER":
pitches = cfg.pitchSetV
varinums = 1;
else:
pitches = cfg.pitchSetD
varinums = 2;
# variants[0:varinums] select the number of variants to use as tweaked in the elif above
for idy, a in enumerate(variants[0:varinums]):
# open lilypond input template file for search and replace
f = open(l+"/"+p+".ly",'r')
# and read its contents to a variable called filedata
filedata = f.read()
f.close()
# takes last list element and moves it to the head of the list
col.insert(0, col.pop(0))
# random.shuffle(col)
print "populating template.......: " + p,a
for idx, c in enumerate(col):
f = open(l+"/tmp/" + p + a + ".tmp",'w')
x = pitches[C%len(pitches)]
# do the search and replace
filedata = filedata.replace(c,x)
# step through the pitches in the set to populate template
# if the pitch set is shorter than the template use the modulus
C=(C+1)%len(pitches);
# open a new file for output
f.write(filedata)
f.close()
# add the p
fstrg = 'ly/tmp/ly/' + p+'.ly'
# append filenames to an array to be looped through below
files2cat.append("ly/tmp/"+p+a+".tmp")
print "concatenating template rotations to output file......:" + fstrg
# open an output file
with open(fstrg, 'a') as outfile:
# loop through array of filenames and concatenate contents out fstrg output file
for fc in files2cat:
print fc
with open(fc) as infile:
for line in infile:
outfile.write(line)
#with open(, 'w') as outfile:
# take the master template and inject in the populated template parts
# prepend opening bars here:
print "============================================="
"""
with file('ly/tmp/ly/LH.ly', 'r') as original: data = original.read()
with file('ly/tmp/ly/LH.ly', 'w') as modified: modified.write('r1 \\bar ":" %%XXXXXXX' + data)
with file('ly/tmp/ly/RH.ly', 'r') as original: data = original.read()
with file('ly/tmp/ly/RH.ly', 'w') as modified: modified.write('r1 \\bar ":" %%XXXXXXX' + data)
with file('ly/tmp/ly/DRONE.ly', 'r') as original: data = original.read()
with file('ly/tmp/ly/DRONE.ly', 'w') as modified: modified.write('r1 \\bar ":" %%XXXXXXX' + data)
with file('ly/tmp/ly/RECORDER.ly', 'r') as original: data = original.read()
with file('ly/tmp/ly/RECORDER.ly', 'w') as modified: modified.write('r1 \\bar ":" %%XXXXXXX' + data)
#with file('ly/tmp/ly/VOICE.ly', 'r') as original: data = original.read()
#with file('ly/tmp/ly/VOICE.ly', 'w') as modified: modified.write('r1 \\bar ":" %%XXXXXXX' + data)
"""
lh = open('ly/tmp/ly/LH.ly').read()
rh = open('ly/tmp/ly/RH.ly').read()
drone = open('ly/tmp/ly/DRONE.ly').read()
voice = open('ly/tmp/ly/VOICE.ly').read()
recorder = open('ly/tmp/ly/RECORDER.ly').read()
file = open('ly/current.ly')
contents = file.read()
replaced_contents = contents.replace('AAAAA', lh)
replaced_contents = replaced_contents.replace('BBBBB', rh)
replaced_contents = replaced_contents.replace('ADDIN', voice)
replaced_contents = replaced_contents.replace('DRONE', drone)
replaced_contents = replaced_contents.replace('RECORDER', recorder)
timestr = time.strftime("%Y%m%d-%H%M")
fname = 'locatedspace_'+cfg.version+timestr
masterfile = open('ly/'+fname+'.ly', 'w')
masterfile.write(replaced_contents)
masterfile.close()
os.system('lilypond ' + 'ly/'+fname+'.ly')
os.system('evince ' + fname + '.pdf')

21
cookit.sh 100755
View File

@ -0,0 +1,21 @@
#!/bin/bash
RENDERDATE=`date +"%Y%m%d-%H%M"`
# this does search and replace in all the extra files A.ly B.ly etc.
# and replaces xA xB etc with pitches from audio analysis
./construct.sh
# this takes the component files that now have pitches injected
# into the placeholders and inserts them into the main current.ly placeholder
./magic.pl ly/current.ly > ly/tmp/out.ly
# renders the result into a pdf
lilypond -o ly/tmp/ ly/tmp/out.ly
# backup version to archive
mv ly/tmp/out.pdf output/archive/dislocatedspaces-$RENDERDATE.pdf
mv ly/tmp/out.ly output/archive/dislocatedspaces-$RENDERDATE.ly
evince output/archive/dislocatedspaces-$RENDERDATE.pdf

1
freq_resp/HEAD 100755
View File

@ -0,0 +1 @@
ref: refs/remotes/origin/master

Binary file not shown.

After

Width:  |  Height:  |  Size: 42 KiB

View File

@ -0,0 +1,26 @@
48.4hz
169.3hz
530hz
622.2
742
841.5
948.1
(955.6)
1071.7
1186
1314.6
1460
1576.5
1819
2125.9
2259
2524
3564.2
4080.3
4277.4
4399.4
6042
7610
5264.2 - top of range

View File

@ -0,0 +1 @@
fallback files go here

View File

@ -0,0 +1,23 @@
#N canvas 849 260 450 300 10;
#X obj 85 233 hp2_butt~;
#X floatatom 291 100 3 15 133 0 - - -;
#X obj 234 157 mtof;
#X obj 132 126 knob 32 32 0 127 0 0 empty empty empty 0 -8 0 8 -258113
-1 -1 0 1;
#X obj 49 48 inlet~;
#X obj 49 264 outlet~;
#X obj 113 173 nbx 5 15 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 15
-204786 -1 -1 8.1758 256;
#X obj 175 104 tgl 20 0 empty empty bypass -5 7 0 8 -204786 -1 -1 0
1;
#X obj 49 128 spigot~;
#X connect 0 0 5 0;
#X connect 2 0 6 0;
#X connect 3 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 8 0;
#X connect 6 0 0 1;
#X connect 7 0 8 1;
#X connect 8 0 5 0;
#X connect 8 1 0 0;
#X coords 0 -1 1 1 100 90 1 100 100;

View File

@ -0,0 +1,163 @@
#!/usr/bin/perl
#use strict;
use warnings;
#load module
use Math::Combinatorics;
my $filename = "5forflute";
$pwd = `pwd`;
chomp ($pwd);
$dte = `date --iso`;
chomp ($dte);
#definition of 5 elements for permutation
my @frag1 = qw(a'' bes'' e'');
my @frag2 = qw( b'');
my @frag3 = qw(des'' c'');
my @n = ([@frag1], [@frag2], ["fis''"], ["g''"], [@frag3]);
#my @n = (["a''"], ["b''"], ["fis''"], ["g''"], ["d''"]);
#do permutations of 5! ######################################
my @perm = map {@$_} permute(@n);
#flatten permutation array####################################
my @flatperm = map { @$_ } @perm;
print @flatperm;
# get date for score datestamp
my $date;
$date = localtime(time);
#looping subroutines that puts array data into sprintf
sub InsertPitches {
my ($num, $form, @notes) = @_;
my ($output, @temp);
while (@notes) {
(@temp[0..$num-1], @notes) = @notes;
$output .= sprintf $form, (@temp);
}
return $output;
}
sub InsertDurations {
my ($num, $form, @notes) = @_;
my ($output, @temp);
while (@notes) {
(@temp[0..$num-1], @notes) = @notes;
$output .= sprintf $form, (@temp);
}
# return $output;
# my @test = &InsertDurations;
}
#definition of phrase format - with pitch / drum information as %1\$ variable
#################################################################
#\\time 4/4 %32\$s16 %33\$s16 %34\$s16. %35\$s32 \\times 2/3 { %36\$s16-> %37\$s8 %38\$s16 %39\$s2 \\mordent } r4\\shortfermata |
#\\time 4/2%31\$s\\breve \\espressivo \\breathe |
#\\time 4/4 %55\$s16-> %56\$s16 %57\$s16 %58\$s16-> %59\$s16 %60\$s16 %60\$s16 %59\$s16 r2 \\verylongfermata |
#\\time 7/4 \\times 4/5 { %40\$s16-> %41\$s16 %42\$s16 %43\$s16 %44\$s16 %45\$s8-> %46\$s16 %47\$s4
#\\times 2/3 { %48\$s8 %49\$s8-> %50\$s16 %51\$s16 } r4\\fermata } %52\$s8 %53\$s16-. %54\$s16-> r2 \\longfermata \\stopGroup |
my $formatA = "
\\override HorizontalBracket #'direction = #UP
\\time 4/2 %1\$s\\breve\\startGroup \\espressivo \\breathe |
\\time 4/4 %2\$s16 %3\$s16 %4\$s16. %5\$s32 \\times 2/3 { %6\$s16-> %7\$s8 %8\$s16 %9\$s2 \\mordent } r4\\shortfermata |
\\time 7/4 \\times 4/5 { %10\$s16-> %11\$s16 %12\$s16 %13\$s16 %14\$s16 %15\$s8-> %16\$s16 %17\$s4
\\times 2/3 { %18\$s8 %19\$s8-> %20\$s16 %21\$s16 } r4\\fermata } %22\$s8 %23\$s16-. %24\$s16-> r2 \\longfermata |
\\time 4/2 %1\$s\\breve \\espressivo\\trill \\breathe |
\\time 4/4 %25\$s16-> %26\$s16 %27\$s16 %28\$s16-> %29\$s16 %30\$s16 %29\$s16 %30\$s16 r2 \\verylongfermata |
\\time 4/2 %31\$s\\breve \\breathe |
\\time 7/4 \\times 4/5 { %36\$s16-> %36\$s16 %34\$s16 %35\$s16 %36\$s16 %34\$s8-> %35\$s16 %36\$s4
\\times 2/3 { %37\$s8 %38\$s8-> %39\$s16 %21\$s16 } r4\\fermata } %40\$s8 %40\$s16-. %40\$s16-> r2 \\longfermata |
\\time 4/4 %31\$s16 %31\$s16 %31\$s16. %32\$s32 \\times 2/3 { %32\$s16-> %33\$s8 %34\$s16 %35\$s2 \\trill } r4\\shortfermata |
\\time 4/4 %40\$s16-> %40\$s16 %41\$s16 %42\$s16-> %43\$s16 %44\$s16 %45\$s16 %45\$s16~ %45\$s2 \\verylongfermata \\stopGroup|
\n ";
#header information for score
my @score = ("
\\version \"2.12.2\" \n
%\\include \"$pwd/aux/titlepage.ly\" \n
%\\score {
\#(set-default-paper-size \"a4\")
\#(set-global-staff-size 19)
\\paper {
page-count = #3
ragged-bottom = ##f
ragged-last-bottom = ##f
top-margin = 35\cm
bottom-margin = 35\cm
% left-margin = 15\cm
% line-width = 385\cm
%system-count = 6
}
\\header {
title = \\markup \\bold \\italic \\fontsize #9 \"5!\"
subtitle = \"for flutes\"
subsubtitle = \"\"
poet = \"2009\"
composer = \"Rob Canning\"
copyright = \\markup \\fontsize #-4 \"\"
tagline = \\markup \\fontsize #-4 \"\"
}
\\score {
\\new Staff \\with {
%\\consists Horizontal_bracket_engraver
} {
\\override Staff.BarLine #'extra-offset = #'(0 . 2)
\\tempo 4 = 92
\n ", "{\n",
#insert flat data into score
InsertPitches(120, $formatA, @flatperm ), "\n}}",
#generate midi file
" \\layout {}
\\midi{\\context {
\\Staff}}}"
, "\n\n\n\n"
);
#open and print to file
my $filename = "5forFlute";
system("mkdir /tmp/$filename");
open SCOREOUT, ">/tmp/flute/$filename.ly";
print SCOREOUT @score;
# parse score and print view pdf
my $runlily = system("mkdir /tmp/flute;
cp $pwd/aux/titlepage.ly /tmp/flute;
cd /tmp/flute;
lilypond --pdf -o $filename /tmp/flute/$filename");
my $pdftk = system("pdftk titlepages.pdf /tmp/flute/$filename.pdf cat output /tmp/flute/$filename-score.pdf");
my $runxpdf = system("evince /tmp/flute/$filename-score.pdf &");
my $timidity = system("timidity /tmp/flute/$filename.midi -Ow -o /tmp/flute/$filename.wav &");
my $timidity = system("timidity /tmp/flute/$filename.midi&");
unlink ("/tmp/flute/$filename.ps");

View File

@ -0,0 +1,51 @@
#N canvas 549 17 647 652 12;
#X obj 42 505 expr acos($f1/$f3) * 180 / 3.1415 * $f2;
#X obj 323 366 expr sqrt($f1);
#X obj 323 338 + 0;
#X obj 78 313 * 0;
#X obj 343 276 * 0;
#X msg 460 505 0;
#X msg 233 265 -1;
#X msg 268 265 1;
#X obj 42 249 expr ($f1-0.5)/0.5;
#X obj 233 145 expr ($f1-0.5)/0.5;
#X obj 42 16 inlet;
#X obj 42 570 outlet;
#X obj 488 569 outlet;
#X obj 407 431 expr 90 - ($f1*90.0);
#X obj 460 479 moses 0;
#X obj 233 238 moses 0;
#X obj 42 279 t f f f;
#X obj 233 179 t f f f;
#X obj 42 99 unpack f f;
#X msg 42 67 \$2 \$1;
#X text 101 66 reverse order;
#X text 101 16 float x \, float y;
#X obj 323 393 t f f;
#X connect 0 0 11 0;
#X connect 1 0 22 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 2 1;
#X connect 5 0 12 0;
#X connect 6 0 0 1;
#X connect 7 0 0 1;
#X connect 8 0 16 0;
#X connect 9 0 17 0;
#X connect 10 0 19 0;
#X connect 13 0 14 0;
#X connect 14 0 5 0;
#X connect 14 1 12 0;
#X connect 15 0 6 0;
#X connect 15 1 7 0;
#X connect 16 0 0 0;
#X connect 16 1 3 0;
#X connect 16 2 3 1;
#X connect 17 0 15 0;
#X connect 17 1 4 0;
#X connect 17 2 4 1;
#X connect 18 0 8 0;
#X connect 18 1 9 0;
#X connect 19 0 18 0;
#X connect 22 0 0 2;
#X connect 22 1 13 0;

View File

@ -0,0 +1,50 @@
#N canvas 819 333 450 486 10;
#X obj 85 233 hp2_butt~;
#X obj 234 157 mtof;
#X obj 134 116 knob 24 24 0 127 0 0 empty empty empty 0 -8 0 8 -258113
-1 -1 2300 1;
#X obj 49 -102 inlet~;
#X obj 49 264 outlet~;
#X obj 113 147 nbx 5 12 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 12
-204786 -1 -1 12543.9 256;
#X obj 137 170 tgl 20 0 empty empty bypass -5 7 0 8 -204786 -1 -1 1
1;
#X obj 47 -50 spigot~;
#X obj 176 23 loadbang;
#X obj 289 37 \$1;
#X obj 289 62 ftom;
#X obj 103 116 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 101 52 env~;
#X obj 101 73 - 92;
#X obj 180 116 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 181 53 env~;
#X obj 181 74 - 92;
#X obj 169 232 hp2_butt~;
#X obj 133 263 outlet~;
#X obj 99 -99 inlet~;
#X obj 107 -52 spigot~;
#X connect 0 0 4 0;
#X connect 0 0 15 0;
#X connect 1 0 5 0;
#X connect 2 0 1 0;
#X connect 3 0 7 0;
#X connect 3 0 12 0;
#X connect 5 0 0 1;
#X connect 5 0 17 1;
#X connect 6 0 7 1;
#X connect 7 0 4 0;
#X connect 7 0 15 0;
#X connect 7 1 0 0;
#X connect 8 0 6 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 2 0;
#X connect 12 0 13 0;
#X connect 13 0 11 0;
#X connect 15 0 16 0;
#X connect 16 0 14 0;
#X connect 17 0 18 0;
#X connect 19 0 20 0;
#X connect 20 0 18 0;
#X connect 20 1 17 0;
#X coords 0 -1 1 1 100 100 1 100 100;

View File

@ -0,0 +1,23 @@
#N canvas 839 340 450 300 10;
#X floatatom 291 100 3 15 133 0 - - -;
#X obj 234 157 mtof;
#X obj 132 114 knob 32 32 0 127 0 0 empty empty empty 0 -8 0 8 -258113
-1 -1 0 1;
#X obj 49 48 inlet~;
#X obj 49 264 outlet~;
#X obj 113 153 nbx 5 15 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 15
-204786 -1 -1 0 256;
#X obj 175 104 tgl 20 0 empty empty bypass -5 7 0 8 -204786 -1 -1 0
1;
#X obj 48 122 spigot~;
#X obj 84 232 lp2_butt~;
#X connect 1 0 5 0;
#X connect 2 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 7 0;
#X connect 5 0 8 1;
#X connect 6 0 7 1;
#X connect 7 0 4 0;
#X connect 7 1 8 0;
#X connect 8 0 4 0;
#X coords 0 -1 1 1 100 70 1 100 100;

View File

@ -0,0 +1,50 @@
#N canvas 815 532 450 300 10;
#X obj 234 157 mtof;
#X obj 134 116 knob 24 24 0 127 0 0 empty empty empty 0 -8 0 8 -258113
-1 -1 625 1;
#X obj 49 -1 inlet~;
#X obj 49 264 outlet~;
#X obj 117 150 nbx 5 12 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 12
-204786 -1 -1 60.0156 256;
#X obj 137 170 tgl 20 0 empty empty bypass -5 7 0 8 -204786 -1 -1 1
1;
#X obj 48 122 spigot~;
#X obj 262 205 env~;
#X floatatom 259 229 5 0 0 0 - - -;
#X obj 67 292 hpassfilter;
#X obj 198 211 env~;
#X floatatom 195 235 5 0 0 0 - - -;
#X obj 176 23 loadbang;
#X obj 289 37 \$1;
#X obj 289 62 ftom;
#X obj 103 116 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 101 52 env~;
#X obj 101 73 - 92;
#X obj 180 116 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 181 53 env~;
#X obj 181 74 - 92;
#X obj 85 233 lp2_butt~;
#X connect 0 0 4 0;
#X connect 1 0 0 0;
#X connect 2 0 6 0;
#X connect 2 0 16 0;
#X connect 4 0 21 1;
#X connect 5 0 6 1;
#X connect 6 0 3 0;
#X connect 6 0 10 0;
#X connect 6 0 19 0;
#X connect 6 1 7 0;
#X connect 6 1 21 0;
#X connect 7 0 8 0;
#X connect 10 0 11 0;
#X connect 12 0 5 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 1 0;
#X connect 16 0 17 0;
#X connect 17 0 15 0;
#X connect 19 0 20 0;
#X connect 20 0 18 0;
#X connect 21 0 3 0;
#X connect 21 0 19 0;
#X coords 0 -1 1 1 100 100 1 100 100;

View File

@ -0,0 +1,39 @@
#N canvas 839 340 450 300 10;
#X obj 85 233 hp2_butt~;
#X floatatom 291 100 3 15 133 0 - - -;
#X obj 234 157 mtof;
#X obj 132 114 knob 32 32 0 127 0 0 empty empty empty 0 -8 0 8 -258113
-1 -1 0 1;
#X obj 49 48 inlet~;
#X obj 49 264 outlet~;
#X obj 113 153 nbx 5 15 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 15
-204786 -1 -1 8.1758 256;
#X obj 175 104 tgl 20 0 empty empty bypass -5 7 0 8 -204786 -1 -1 1
1;
#X obj 48 122 spigot~;
#X obj 262 205 env~;
#X floatatom 259 229 5 0 0 0 - - -;
#X obj 67 292 hpassfilter;
#X obj 198 211 env~;
#X floatatom 195 235 5 0 0 0 - - -;
#X obj 176 23 loadbang;
#X obj 289 37 \$1;
#X obj 289 62 ftom;
#X connect 0 0 5 0;
#X connect 2 0 6 0;
#X connect 3 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 8 0;
#X connect 6 0 0 1;
#X connect 7 0 8 1;
#X connect 8 0 5 0;
#X connect 8 0 12 0;
#X connect 8 1 0 0;
#X connect 8 1 9 0;
#X connect 9 0 10 0;
#X connect 12 0 13 0;
#X connect 14 0 7 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 3 0;
#X coords 0 -1 1 1 100 70 1 100 100;

View File

@ -0,0 +1,83 @@
#N canvas 298 295 468 408 10;
#X obj 13 114 cnv 15 235 20 empty empty DAC~_Stereo 20 12 0 14 -203904
-66577 0;
#X obj 132 94 hsl 80 15 0.01 1 1 0 \$0-v \$0-v volume 7 8 1 9 -245500
-13381 -1 7900 0;
#X obj 224 93 tgl 18 0 THIS_IS_HERE_TO_GET_RID_OF_THE_OUTLET \$0-dsp-toggle
dsp 2 9 1 9 -225271 -195568 -33289 1 1;
#N canvas 360 543 482 356 dsp 0;
#X obj 11 7 inlet;
#X obj 92 226 select 0 1;
#X obj 92 57 route dsp;
#X obj 92 36 receive pd;
#X obj 206 138 loadbang;
#X msg 11 220 dsp \$1;
#X obj 11 245 send pd;
#X msg 206 278 set \$1;
#X obj 206 174 value GLOBAL_PDDP_DSP;
#X msg 109 278 color \$1 20 12;
#X obj 180 309 send \$0-dsp-toggle;
#X obj 92 115 change;
#X msg 92 247 0;
#X msg 125 248 6;
#X connect 0 0 5 0;
#X connect 0 0 11 0;
#X connect 1 0 12 0;
#X connect 1 1 13 0;
#X connect 2 0 11 0;
#X connect 3 0 2 0;
#X connect 4 0 8 0;
#X connect 5 0 6 0;
#X connect 7 0 10 0;
#X connect 8 0 7 0;
#X connect 8 0 1 0;
#X connect 9 0 10 0;
#X connect 11 0 7 0;
#X connect 11 0 1 0;
#X connect 11 0 8 0;
#X connect 12 0 9 0;
#X connect 13 0 9 0;
#X restore 246 153 pd dsp logic;
#X obj 201 12 inlet~;
#X obj 86 283 line~;
#X obj 186 343 *~;
#X text 213 32 audio in;
#X obj 263 12 inlet~;
#X obj 248 342 *~;
#X obj 201 55 hip~ 3;
#X obj 263 55 hip~ 3;
#X obj 12 298 send pd;
#X msg 12 277 dsp 1;
#X obj 86 262 pack 0 50;
#X text 153 261 <-- make a ramp to avoid clicks or zipper noise;
#X msg 86 227 0;
#X obj 86 204 moses 0.011;
#X text 307 56 filter out DC;
#X obj 124 373 outlet~;
#X obj 292 369 outlet~;
#X obj 206 373 dac~ \$1 \$2;
#X msg 119 18 0.8;
#X obj 121 -23 loadbang;
#X obj 121 -4 del 100;
#X connect 1 0 13 0;
#X connect 1 0 17 0;
#X connect 2 0 3 0;
#X connect 4 0 10 0;
#X connect 5 0 9 0;
#X connect 5 0 6 0;
#X connect 6 0 19 0;
#X connect 6 0 21 0;
#X connect 8 0 11 0;
#X connect 9 0 20 0;
#X connect 9 0 21 1;
#X connect 10 0 6 1;
#X connect 11 0 9 1;
#X connect 13 0 12 0;
#X connect 14 0 5 0;
#X connect 16 0 14 0;
#X connect 17 0 16 0;
#X connect 17 1 14 0;
#X connect 22 0 1 0;
#X connect 23 0 24 0;
#X connect 24 0 22 0;
#X coords 0 0 1 1 240 45 1 10 90;

View File

@ -0,0 +1,119 @@
#N canvas 83 96 1287 770 10;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X declare -lib iemgui;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X declare -lib iemgui;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X declare -lib iemgui;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X declare -lib iemgui;
#X obj 3 -224 cnv 15 1500 800 empty empty empty 20 12 0 14 -204800
-66577 0;
#X obj 1122 -55 dsp;
#X obj 1120 -103 tgl 35 0 empty empty empty 17 7 0 10 -4034 -1 -1 1
1;
#X obj 1121 -123 loadbang;
#X floatatom 1123 -29 5 0 0 0 - - -;
#X floatatom 1137 -1 5 0 0 0 - - -;
#N canvas 779 255 530 512 system 0;
#X obj -84 82 system;
#X msg -45 26 killall vlc;
#X msg -78 -19 sh /home/rob/Documents/projects/streamscapes/autoconnect.sh
;
#X msg 35 -102 xterm;
#X msg -87 -56 sh /home/rob/Documents/projects/streamscapes/getstreams.sh
;
#X obj 105 113 bng 15 250 50 0 empty empty start_all_streams_(cvlc)
17 7 0 10 -4032 -1 -1;
#X obj 105 130 bng 15 250 50 0 empty empty connect_cvlc_to_pd 17 7
0 10 -4032 -1 -1;
#X obj 106 147 bng 15 250 50 0 empty empty killall_vlc 17 7 0 10 -4032
-1 -1;
#X obj 156 166 bng 15 250 50 0 empty empty presonus_reset 17 7 0 10
-4032 -1 -1;
#X msg 36 11 sh /home/rob/Documents/bitnbobs/presonus_reset.sh;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 5 0 4 0;
#X connect 6 0 2 0;
#X connect 7 0 1 0;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X coords 0 -1 1 1 170 90 1 100 100;
#X restore 1087 40 pd system;
#X obj 1093 200 pocketdialgui A;
#X obj 1094 181 pocketdial;
#X obj 75 -221 responses-channel 1 1 0 1 A 1;
#N canvas 229 254 1019 583 recorder 0;
#X obj 272 126 date ffffffff;
#X obj 362 122 time ffff;
#X msg 238 54 bang;
#X msg 194 253 start;
#X obj 286 306 del 1000;
#X msg 238 255 stop;
#X text 353 304 duration of recording;
#X obj 367 195 list prepend open;
#X obj 253 85 t b b b b b b;
#X msg 369 218 set \$1 \$2;
#X obj 196 215 select 0 1;
#X obj 144 122 tgl 33 0 empty empty empty 17 7 0 10 -260097 -1 -1 0
1;
#X obj 107 121 bng 33 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 358 245 open rec-2014927154019-input4chan.wav;
#X obj 262 162 sprintf rec-%d%d%d%d%d%d-input4chan.wav;
#X obj 295 247 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj -9 262 inlet~;
#X obj 36 263 inlet~;
#X obj 81 263 inlet~;
#X obj 126 264 inlet~;
#X obj 270 385 adc~ 1 2 3 4;
#X obj 195 444 writesf~ 8;
#X connect 0 0 14 0;
#X connect 0 1 14 1;
#X connect 0 2 14 2;
#X connect 1 0 14 3;
#X connect 1 1 14 4;
#X connect 1 2 14 5;
#X connect 2 0 8 0;
#X connect 3 0 21 0;
#X connect 5 0 21 0;
#X connect 7 0 9 0;
#X connect 8 0 15 0;
#X connect 8 1 4 0;
#X connect 8 2 3 0;
#X connect 8 3 13 0;
#X connect 8 4 0 0;
#X connect 8 5 1 0;
#X connect 9 0 13 0;
#X connect 10 0 5 0;
#X connect 10 1 3 0;
#X connect 11 0 10 0;
#X connect 12 0 2 0;
#X connect 13 0 21 0;
#X connect 14 0 7 0;
#X connect 15 0 13 0;
#X connect 16 0 21 0;
#X connect 17 0 21 1;
#X connect 18 0 21 2;
#X connect 19 0 21 3;
#X connect 20 0 21 4;
#X connect 20 1 21 5;
#X connect 20 2 21 6;
#X connect 20 3 21 7;
#X coords 0 -1 1 1 85 60 1 100 100;
#X restore 1150 426 pd recorder;
#X obj 323 -221 responses-channel 2 2 1 1 B 2;
#X obj 570 -221 responses-channel 3 3 0 0 C 3;
#X obj 817 -221 responses-channel 4 4 1 0 D 4;
#X connect 1 0 4 0;
#X connect 1 1 5 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 9 0 10 0;
#X connect 11 0 10 1;
#X connect 12 0 10 2;
#X connect 13 0 10 3;

View File

@ -0,0 +1,134 @@
#N canvas 423 297 813 602 10;
#X declare -lib iemgui;
#X obj 101 103 cnv 15 235 95 empty \$0streamcanvas empty 20 12 0 14
-166441 -262144 0;
#X obj 59 402 readsf~ 2;
#X obj 176 357 t b b;
#X msg 178 379 1;
#X obj 306 244 route 1 2 3 4;
#X obj 277 207 t b f;
#X obj 98 544 outlet~;
#X obj 171 546 outlet~;
#X obj 291 14 import iemgui;
#X obj 267 381 r \$0amp;
#X obj 287 44 loadbang;
#X obj 439 438 l2s;
#X symbolatom 187 158 25 0 0 0 - - -;
#X obj 400 389 list split 1;
#X obj 99 512 gainvu~;
#X obj 172 514 gainvu~;
#X floatatom 187 142 5 0 0 0 - - -;
#X obj 16 85 init 100;
#X floatatom 223 142 5 0 0 0 - - -;
#X obj 109 176 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 10000 1;
#X floatatom 257 175 5 0 0 0 dB - -;
#X obj 300 108 bng 25 250 50 0 empty empty empty 17 7 0 10 -33289 -258113
-1;
#X msg 363 184 1;
#X obj -70 408 adc~ \$1 \$2;
#X obj 210 123 bng 15 250 50 0 empty empty stop 17 7 0 10 -260097 -1
-1;
#X msg 395 182 0;
#X obj 209 102 bng 15 250 50 0 empty empty start 17 7 0 10 -4034 -1
-1;
#X floatatom 568 147 5 0 0 0 - - -;
#X obj -72 443 spigot~;
#X obj -8 442 spigot~;
#X obj -14 254 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 106 126 vradio 15 1 0 2 empty empty stream 0 -8 0 10 -204800
-1 -1 0;
#X text 126 124 stream adc~;
#X text 126 140 fallback;
#X obj 64 443 spigot~;
#X obj 128 442 spigot~;
#X obj -33 208 select 0 1;
#X obj 30 32 s \$0streamcanvas;
#X msg 24 0 color 121;
#X obj 152 108 tgl 15 0 empty empty bypass 17 7 0 10 -257985 -1 -1
0 1;
#X obj 461 50 select 0 1;
#X msg 489 78 color 0;
#X msg 101 9 color 134;
#X obj 450 99 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj -53 74 init 0;
#X obj 542 188 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 603 194 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 373 527 5 0 0 0 - - -;
#X obj 523 125 moses -95;
#X msg 306 271 open audio/01.wav;
#X msg 327 291 open audio/02.wav;
#X msg 351 313 open audio/03.wav;
#X msg 369 334 open audio/04.wav;
#X msg 386 356 open audio/04.wav;
#X obj 286 66 \$3;
#X connect 1 0 34 0;
#X connect 1 1 35 0;
#X connect 1 2 2 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 49 0;
#X connect 4 1 50 0;
#X connect 4 2 51 0;
#X connect 4 3 52 0;
#X connect 4 4 53 0;
#X connect 5 0 2 0;
#X connect 5 1 4 0;
#X connect 10 0 54 0;
#X connect 11 0 12 0;
#X connect 13 1 11 0;
#X connect 14 0 6 0;
#X connect 14 1 20 0;
#X connect 14 2 16 0;
#X connect 15 0 7 0;
#X connect 15 2 18 0;
#X connect 15 2 47 0;
#X connect 17 0 19 0;
#X connect 19 0 14 1;
#X connect 19 0 15 1;
#X connect 22 0 5 0;
#X connect 23 0 28 0;
#X connect 23 1 29 0;
#X connect 24 0 25 0;
#X connect 25 0 1 0;
#X connect 26 0 22 0;
#X connect 28 0 14 0;
#X connect 29 0 15 0;
#X connect 30 0 29 1;
#X connect 30 0 28 1;
#X connect 30 0 34 1;
#X connect 30 0 35 1;
#X connect 30 0 36 0;
#X connect 31 0 30 0;
#X connect 34 1 14 0;
#X connect 35 1 15 0;
#X connect 36 0 38 0;
#X connect 36 1 42 0;
#X connect 38 0 37 0;
#X connect 39 0 40 0;
#X connect 40 0 43 0;
#X connect 40 1 41 0;
#X connect 41 0 37 0;
#X connect 42 0 37 0;
#X connect 43 0 31 0;
#X connect 44 0 39 0;
#X connect 48 0 21 0;
#X connect 48 0 45 0;
#X connect 48 1 27 0;
#X connect 48 1 46 0;
#X connect 49 0 1 0;
#X connect 49 0 13 0;
#X connect 50 0 1 0;
#X connect 50 0 13 0;
#X connect 51 0 1 0;
#X connect 51 0 13 0;
#X connect 52 0 1 0;
#X connect 52 0 13 0;
#X connect 53 0 1 0;
#X connect 53 0 13 0;
#X connect 54 0 5 0;
#X coords 0 -1 1 1 240 100 1 100 100;

View File

@ -0,0 +1,228 @@
#N canvas 0 96 1440 804 10;
#X obj 368 108 ctlin;
#X obj 456 87 ctlout 0 1;
#X msg 369 300 10 12;
#X msg 339 243 set \$2 \$1;
#X obj 343 218 pack \$1 \$2;
#X obj 399 190 f;
#X obj 365 159 t f b;
#X obj 358 273 t b a;
#X floatatom 480 53 5 0 0 0 - - -;
#X floatatom 555 19 5 0 0 0 - - -;
#X floatatom 591 20 5 0 0 0 - - -;
#X floatatom 641 20 5 0 0 0 - - -;
#X msg 418 510 15 12;
#X msg 388 453 set \$2 \$1;
#X obj 392 428 pack \$1 \$2;
#X obj 407 483 t b a;
#X obj 449 400 f;
#X obj 391 375 t f b;
#X msg 299 518 15 53;
#X msg 269 461 set \$2 \$1;
#X obj 273 436 pack \$1 \$2;
#X obj 288 491 t b a;
#X obj 330 408 f;
#X obj 272 383 t f b;
#X msg 644 515 2 0;
#X msg 614 458 set \$2 \$1;
#X obj 618 433 pack \$1 \$2;
#X obj 633 488 t b a;
#X obj 675 405 f;
#X obj 617 380 t f b;
#X msg 525 523 15 122;
#X msg 495 466 set \$2 \$1;
#X obj 499 441 pack \$1 \$2;
#X obj 514 496 t b a;
#X obj 556 413 f;
#X obj 498 388 t f b;
#X obj 108 551 route 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16;
#X obj 411 689 route 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16;
#X obj 545 559 route 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16;
#X obj 907 474 route 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16;
#X obj 871 505 s dialknobA1;
#X obj 887 526 s dialknobA2;
#X obj 907 553 s dialknobA3;
#X obj 924 573 s dialknobA4;
#X obj 950 504 s dialknobA5;
#X obj 966 525 s dialknobA6;
#X obj 1036 506 s dialknobA9;
#X obj 1052 527 s dialknobA10;
#X obj 1073 553 s dialknobA11;
#X obj 1088 575 s dialknobA12;
#X obj 1122 506 s dialknobA13;
#X obj 1137 527 s dialknobA14;
#X obj 411 768 s dialknobB3;
#X obj 428 788 s dialknobB4;
#X obj 470 740 s dialknobB6;
#X obj 592 790 s dialknobB12;
#X obj 577 768 s dialknobB11;
#X obj 556 742 s dialknobB10;
#X obj 540 721 s dialknobB9;
#X obj 626 721 s dialknobB13;
#X obj 643 743 s dialknobB14;
#X obj 362 327 route 7 10 74 71;
#X obj 509 590 s dialknobC1;
#X obj 525 611 s dialknobC2;
#X obj 542 637 s dialknobC3;
#X obj 562 658 s dialknobC4;
#X obj 602 609 s dialknobC6;
#X obj 588 589 s dialknobC5;
#X obj 674 591 s dialknobC9;
#X obj 690 612 s dialknobC10;
#X obj 711 638 s dialknobC11;
#X obj 726 660 s dialknobC12;
#X obj 760 591 s dialknobC13;
#X obj 775 612 s dialknobC14;
#X floatatom 827 271 5 0 0 0 - - -;
#X obj 834 223 r Adialknob1;
#X obj 72 582 s Adialknob1;
#X obj 323 583 s Adialknob13;
#X obj 337 603 s Adialknob14;
#X obj 359 632 s Adialknob15;
#X obj 374 652 s Adialknob16;
#X obj 274 630 s Adialknob11;
#X obj 289 652 s Adialknob12;
#X obj 253 604 s Adialknob10;
#X obj 237 583 s Adialknob9;
#X obj 151 581 s Adialknob5;
#X obj 167 602 s Adialknob6;
#X obj 187 629 s Adialknob7;
#X obj 202 649 s Adialknob8;
#X obj 125 650 s Adialknob4;
#X obj 108 630 s Adialknob3;
#X obj 88 603 s Adialknob2;
#X obj 375 720 s Bdialknob1;
#X obj 454 719 s Bdialknob5;
#X obj 391 741 s Bdialknob2;
#X obj 676 789 s Bdialknob16;
#X obj 661 769 s Bdialknob15;
#X obj 506 788 s Bdialknob8;
#X obj 490 767 s Bdialknob7;
#X obj 640 658 s Cdialknob8;
#X obj 624 637 s Cdialknob7;
#X obj 811 660 s Cdialknob16;
#X obj 795 639 s Cdialknob15;
#X obj 986 552 s Ddialknob7;
#X obj 1002 573 s Ddialknob8;
#X obj 1157 554 s Ddialknob15;
#X obj 1173 575 s Ddialknob16;
#X connect 0 0 6 0;
#X connect 0 0 9 0;
#X connect 0 1 5 1;
#X connect 0 1 10 0;
#X connect 0 2 11 0;
#X connect 0 2 16 1;
#X connect 0 2 22 1;
#X connect 0 2 34 1;
#X connect 0 2 28 1;
#X connect 2 0 61 0;
#X connect 3 0 7 0;
#X connect 4 0 3 0;
#X connect 5 0 4 1;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 7 0 2 0;
#X connect 7 1 2 0;
#X connect 8 0 1 1;
#X connect 11 0 1 2;
#X connect 12 0 37 0;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 15 0 12 0;
#X connect 15 1 12 0;
#X connect 16 0 14 1;
#X connect 17 0 14 0;
#X connect 17 1 16 0;
#X connect 18 0 36 0;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 18 0;
#X connect 21 1 18 0;
#X connect 22 0 20 1;
#X connect 23 0 20 0;
#X connect 23 1 22 0;
#X connect 24 0 39 0;
#X connect 25 0 27 0;
#X connect 26 0 25 0;
#X connect 27 0 24 0;
#X connect 27 1 24 0;
#X connect 28 0 26 1;
#X connect 29 0 26 0;
#X connect 29 1 28 0;
#X connect 30 0 38 0;
#X connect 31 0 33 0;
#X connect 32 0 31 0;
#X connect 33 0 30 0;
#X connect 33 1 30 0;
#X connect 34 0 32 1;
#X connect 35 0 32 0;
#X connect 35 1 34 0;
#X connect 36 0 76 0;
#X connect 36 1 91 0;
#X connect 36 2 90 0;
#X connect 36 3 89 0;
#X connect 36 4 85 0;
#X connect 36 5 86 0;
#X connect 36 6 87 0;
#X connect 36 7 88 0;
#X connect 36 8 84 0;
#X connect 36 9 83 0;
#X connect 36 10 81 0;
#X connect 36 11 82 0;
#X connect 36 12 77 0;
#X connect 36 13 78 0;
#X connect 36 14 79 0;
#X connect 36 15 80 0;
#X connect 37 0 92 0;
#X connect 37 1 94 0;
#X connect 37 2 52 0;
#X connect 37 3 53 0;
#X connect 37 4 93 0;
#X connect 37 5 54 0;
#X connect 37 6 98 0;
#X connect 37 7 97 0;
#X connect 37 8 58 0;
#X connect 37 9 57 0;
#X connect 37 10 56 0;
#X connect 37 11 55 0;
#X connect 37 12 59 0;
#X connect 37 13 60 0;
#X connect 37 14 96 0;
#X connect 37 15 95 0;
#X connect 38 0 62 0;
#X connect 38 1 63 0;
#X connect 38 2 64 0;
#X connect 38 3 65 0;
#X connect 38 4 67 0;
#X connect 38 5 66 0;
#X connect 38 6 100 0;
#X connect 38 7 99 0;
#X connect 38 8 68 0;
#X connect 38 9 69 0;
#X connect 38 10 70 0;
#X connect 38 11 71 0;
#X connect 38 12 72 0;
#X connect 38 13 73 0;
#X connect 38 14 102 0;
#X connect 38 15 101 0;
#X connect 39 0 40 0;
#X connect 39 1 41 0;
#X connect 39 2 42 0;
#X connect 39 3 43 0;
#X connect 39 4 44 0;
#X connect 39 5 45 0;
#X connect 39 6 103 0;
#X connect 39 7 104 0;
#X connect 39 8 46 0;
#X connect 39 9 47 0;
#X connect 39 10 48 0;
#X connect 39 11 49 0;
#X connect 39 12 50 0;
#X connect 39 13 51 0;
#X connect 39 14 105 0;
#X connect 39 15 106 0;
#X connect 61 0 23 0;
#X connect 61 1 17 0;
#X connect 61 2 35 0;
#X connect 61 3 29 0;
#X connect 75 0 74 0;

View File

@ -0,0 +1,66 @@
#N canvas 1 192 1195 618 10;
#X obj 106 121 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 125 121 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 144 121 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 163 121 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 181 121 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 200 121 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 219 121 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 238 121 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 107 139 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 126 139 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 145 139 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 164 139 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 182 139 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 201 139 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 220 139 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 239 139 knob 14 14 0 127 0 0 empty dialknob\$1\$2 empty 0 -8
0 8 -262144 -1 -1 10 1;
#X obj 243 10 r \$1dialknob1;
#X obj 267 34 r \$1dialknob2;
#X obj 290 59 r \$1dialknob3;
#X obj 308 82 r \$1dialknob4;
#X obj 324 104 r \$1dialknob5;
#X obj 343 130 r \$1dialknob6;
#X obj 362 156 r \$1dialknob7;
#X obj 382 179 r \$1dialknob8;
#X obj 401 201 r \$1dialknob9;
#X obj 424 226 r \$1dialknob10;
#X obj 447 251 r \$1dialknob11;
#X obj 465 274 r \$1dialknob12;
#X obj 481 296 r \$1dialknob13;
#X obj 500 322 r \$1dialknob14;
#X obj 518 347 r \$1dialknob15;
#X obj 539 371 r \$1dialknob16;
#X connect 16 0 0 0;
#X connect 17 0 1 0;
#X connect 18 0 2 0;
#X connect 19 0 3 0;
#X connect 20 0 4 0;
#X connect 21 0 5 0;
#X connect 22 0 6 0;
#X connect 23 0 7 0;
#X connect 24 0 8 0;
#X connect 25 0 9 0;
#X connect 26 0 10 0;
#X connect 27 0 11 0;
#X connect 28 0 12 0;
#X connect 29 0 13 0;
#X connect 30 0 14 0;
#X connect 31 0 15 0;
#X coords 0 -1 1 1 160 60 1 100 100;

View File

@ -0,0 +1,122 @@
#N canvas 452 401 668 498 10;
#X obj 101 102 cnv 15 235 95 empty \$0bp bpq2~ 20 12 0 14 -262144 -262144
0;
#X text 8 265 ~signal_in~;
#X floatatom 63 161 3 15 133 0 - - -;
#X obj 81 199 mtof;
#X floatatom 218 171 9 0 22000 0 - - -;
#X floatatom 302 246 7 0 0 0 - - -;
#X text 322 237 dB;
#X text 183 261 ms;
#X obj 51 280 bpq2~ 440 10 200;
#X floatatom 168 153 4 0.01 1000 0 - - -;
#X text 144 241 Q;
#X text 24 390 2.arg:<float> Q [-];
#X text 24 380 1.arg:<float> center_freq. [Hz];
#X text 24 400 3.arg:<float> interpolation_time [ms];
#X obj 51 314 gainvu~ 300;
#X obj 305 110 vu 8 80 empty empty 8 -8 0 6 -66577 -1 1 0;
#X obj 285 104 vsl 15 90 0 127 0 1 empty empty empty 8 -8 0 10 -262144
-1 -1 7008 1;
#X floatatom -5 362 7 0 0 0 - - -;
#X text 46 363 dB;
#X text 106 7 bandpass 2.order with Q-inlet;
#X obj 14 13 cnv 8 1 1 empty empty bpq2~ 1 2 1 18 -262144 -1109 0;
#X text 164 453 IEM KUG;
#X text 148 441 musil;
#X text 178 441 @;
#X text 184 441 iem.at;
#X text 99 430 (c) Thomas Musil 2000 - 2005;
#X text 147 463 Graz \, Austria;
#N canvas 343 203 494 344 META 0;
#X text 12 185 HELP_PATCH_AUTHORS "pd meta" information added by Jonathan
Wilkes for Pd version 0.42.;
#X text 12 165 AUTHOR Thomas Musil;
#X text 12 5 KEYWORDS signal abstraction filter;
#X text 12 25 LICENSE LGPL v2.1;
#X text 12 45 DESCRIPTION bandpass 2.order with Q inlet;
#X text 12 65 INLET_0 signal;
#X text 12 85 INLET_1 float;
#X text 12 105 INLET_2 float;
#X text 12 125 INLET_3 float;
#X text 12 145 OUTLET_0 signal;
#X restore 333 473 pd META;
#X obj 40 340 outlet~;
#X obj 216 132 knob 32 32 0 127 0 0 empty empty center_freq. 0 -8 0
8 -4160 -4160 -258113 1318 1;
#X obj 163 114 knob 32 32 0 5 0 0 empty empty Q. 0 -8 0 8 -4032 -4160
-1 1581 1;
#X obj 39 51 spigot~;
#X obj 110 163 tgl 25 0 empty empty BYPASS 17 7 0 10 -257985 -1 -1
1 1;
#X obj 39 27 inlet~;
#X obj 97 53 spigot~;
#X obj 97 29 inlet~;
#X text 265 322 ~signal_out~;
#X obj 186 288 bpq2~ 440 10 200;
#X obj 170 356 outlet~;
#X obj 188 323 gainvu~ 300;
#X text 63 294 comment;
#X msg 312 284 200;
#X obj 247 26 loadbang;
#X msg 267 54 100;
#X obj 170 50 init 60;
#X obj 186 78 init 2;
#X msg 493 209 color 121;
#X msg 462 187 color 0;
#X obj 464 250 s \$0bp;
#X obj 462 163 select 1 0;
#X obj 450 44 r \$1dialknob15;
#X floatatom 453 98 5 0 0 0 - - -;
#X obj 452 65 / 20;
#X obj 567 137 * 400;
#X obj 517 127 + 0;
#X obj 520 98 r \$1dialknob16;
#X obj 414 318 line;
#X msg 413 285 \$1 503;
#X connect 2 0 3 0;
#X connect 3 0 57 0;
#X connect 4 0 8 1;
#X connect 4 0 37 1;
#X connect 8 0 14 0;
#X connect 9 0 8 2;
#X connect 9 0 37 2;
#X connect 14 0 28 0;
#X connect 14 1 17 0;
#X connect 14 2 15 0;
#X connect 15 1 5 0;
#X connect 16 0 14 1;
#X connect 16 0 39 1;
#X connect 29 0 2 0;
#X connect 30 0 9 0;
#X connect 31 0 8 0;
#X connect 31 1 28 0;
#X connect 32 0 31 1;
#X connect 32 0 34 1;
#X connect 32 0 49 0;
#X connect 33 0 31 0;
#X connect 34 0 37 0;
#X connect 34 1 38 0;
#X connect 35 0 34 0;
#X connect 37 0 39 0;
#X connect 39 0 38 0;
#X connect 41 0 8 3;
#X connect 41 0 37 3;
#X connect 42 0 43 0;
#X connect 42 0 32 0;
#X connect 43 0 16 0;
#X connect 44 0 29 0;
#X connect 45 0 30 0;
#X connect 46 0 48 0;
#X connect 47 0 48 0;
#X connect 49 0 47 0;
#X connect 49 1 46 0;
#X connect 50 0 52 0;
#X connect 52 0 51 0;
#X connect 52 0 30 0;
#X connect 54 0 29 0;
#X connect 55 0 53 0;
#X connect 55 0 54 0;
#X connect 56 0 4 0;
#X connect 57 0 56 0;
#X coords 0 -1 1 1 240 100 1 100 100;

View File

@ -0,0 +1,84 @@
#N canvas 33 209 872 690 10;
#X obj 101 101 cnv 15 235 85 empty \$0comp empty 20 12 0 14 -166441
-262144 0;
#X obj 349 -248 loadbang;
#X msg 432 -217 set 110 40 150;
#X msg 280 -118 compress 96 88 0.5;
#X obj 154 -214 inlet~;
#X obj 110 106 vu 8 80 empty empty -1 -8 0 6 -66577 -1 1 0;
#X obj 146 74 gainvu~;
#X obj 303 105 vu 8 80 empty empty -1 -8 0 6 -66577 -1 1 0;
#X obj 270 62 gainvu~;
#X obj 411 57 *~;
#X obj 442 57 *~;
#X obj 459 36 z~ 64;
#X obj 411 37 z~ 64;
#X obj 421 -148 inlet~;
#X obj 444 99 outlet~;
#X obj 384 98 outlet~;
#X obj 209 174 nbx 5 14 0 1 0 0 empty empty ratio 0 -8 0 10 -204786
-1 -1 0.5 256;
#X msg 553 167 0.5;
#X msg 262 -195 ratio \$1;
#X obj 210 146 nbx 5 14 0 100 0 0 empty empty limit 0 -8 0 10 -204786
-1 -1 99 256;
#X msg 218 -235 limit \$1;
#X obj 212 116 nbx 5 14 0 100 0 0 empty empty threshold 0 -8 0 10 -204786
-1 -1 88 256;
#X msg 261 -213 treshold \$1;
#X text 546 -58 make presets;
#X obj 159 132 vradio 15 1 0 3 empty empty modes 0 -8 0 10 -262144
-1 -1 0;
#X msg 171 1 106;
#X msg 552 195 99;
#X obj 209 -22 limiter~ 50 1;
#X msg 544 251 88;
#X msg 709 79 color 121;
#X msg 678 57 color 0;
#X obj 679 121 s \$0comp;
#X obj 145 104 tgl 15 0 empty empty bypass 17 7 0 10 -257985 -1 -262144
0 1;
#X obj 573 -148 init 0;
#X obj 678 33 select 1 0;
#X connect 1 0 20 0;
#X connect 1 0 22 0;
#X connect 1 0 18 0;
#X connect 1 0 2 0;
#X connect 1 0 3 0;
#X connect 1 0 17 0;
#X connect 1 0 26 0;
#X connect 1 0 28 0;
#X connect 1 0 25 0;
#X connect 3 0 27 0;
#X connect 4 0 6 0;
#X connect 4 0 12 0;
#X connect 4 0 27 0;
#X connect 6 2 5 0;
#X connect 8 2 7 0;
#X connect 9 0 8 0;
#X connect 9 0 15 0;
#X connect 10 0 14 0;
#X connect 11 0 10 1;
#X connect 12 0 9 0;
#X connect 13 0 11 0;
#X connect 13 0 27 1;
#X connect 16 0 18 0;
#X connect 17 0 16 0;
#X connect 18 0 27 0;
#X connect 19 0 20 0;
#X connect 20 0 27 0;
#X connect 21 0 22 0;
#X connect 22 0 27 0;
#X connect 25 0 6 1;
#X connect 25 0 8 1;
#X connect 26 0 19 0;
#X connect 27 0 9 1;
#X connect 27 0 10 0;
#X connect 28 0 21 0;
#X connect 29 0 31 0;
#X connect 30 0 31 0;
#X connect 32 0 34 0;
#X connect 33 0 32 0;
#X connect 34 0 30 0;
#X connect 34 1 29 0;
#X coords 0 -1 1 1 240 90 1 100 100;

View File

@ -0,0 +1,74 @@
#N canvas 79 209 872 690 10;
#X msg 257 -108 print;
#X obj 349 -248 loadbang;
#X msg 270 -48 COMPRESS;
#X msg 267 -168 set 110 40 150;
#X msg 267 -139 compress 96 88 0.5;
#X obj 154 -214 inlet~;
#X obj 110 131 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 146 74 gainvu~;
#X obj 292 132 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 281 63 gainvu~;
#X msg 171 1 104;
#X obj 411 57 *~;
#X obj 442 57 *~;
#X obj 459 36 z~ 64;
#X obj 411 37 z~ 64;
#X obj 209 -22 limiter~ 50 1;
#X obj 421 -148 inlet~;
#X obj 444 99 outlet~;
#X obj 384 98 outlet~;
#X obj 194 236 nbx 5 14 0 1 0 0 empty empty ratio 0 -8 0 10 -204786
-1 -1 0.72 256;
#X msg 553 167 0.5;
#X msg 262 -195 ratio \$1;
#X obj 195 207 nbx 5 14 0 100 0 0 empty empty limit 0 -8 0 10 -204786
-1 -1 98 256;
#X msg 552 195 98;
#X msg 218 -235 limit \$1;
#X obj 195 176 nbx 5 14 0 10 0 0 empty empty threshold 0 -8 0 10 -204786
-1 -1 0 256;
#X msg 261 -213 treshold \$1;
#X msg 544 251 10;
#X text 546 -58 make presets;
#X obj 164 135 vradio 15 1 0 3 empty empty modes 0 -8 0 10 -262144
-1 -1 0;
#X connect 0 0 15 0;
#X connect 1 0 2 0;
#X connect 1 0 24 0;
#X connect 1 0 26 0;
#X connect 1 0 21 0;
#X connect 1 0 3 0;
#X connect 1 0 4 0;
#X connect 1 0 20 0;
#X connect 1 0 23 0;
#X connect 1 0 27 0;
#X connect 2 0 15 0;
#X connect 3 0 15 0;
#X connect 4 0 15 0;
#X connect 5 0 7 0;
#X connect 5 0 15 0;
#X connect 5 0 14 0;
#X connect 7 2 6 0;
#X connect 9 2 8 0;
#X connect 10 0 7 1;
#X connect 10 0 9 1;
#X connect 11 0 9 0;
#X connect 11 0 18 0;
#X connect 12 0 17 0;
#X connect 13 0 12 1;
#X connect 14 0 11 0;
#X connect 15 0 11 1;
#X connect 15 0 12 0;
#X connect 16 0 15 1;
#X connect 16 0 13 0;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 21 0 15 0;
#X connect 22 0 24 0;
#X connect 23 0 22 0;
#X connect 24 0 15 0;
#X connect 25 0 26 0;
#X connect 26 0 15 0;
#X connect 27 0 26 0;
#X coords 0 -1 1 1 240 170 1 100 100;

View File

@ -0,0 +1,71 @@
#N canvas 348 349 900 514 10;
#X obj -41 212 freeverb~;
#X obj 36 -60 loadbang;
#X msg -41 130 freeze \$1;
#X obj 283 108 tgl 11 0 empty empty freeze 17 0 0 10 -257985 -1 -1
0 1;
#X obj -21 296 outlet~;
#X obj 35 295 outlet~;
#X obj 39 123 inlet~;
#X msg -97 53 wet \$1;
#X msg -73 76 damping \$1;
#X obj 45 73 inlet~;
#X obj 340 280 metro 3000;
#X obj 287 139 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 306 365 t b b;
#X obj 267 419 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 333 401 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 269 394 del 500;
#X obj 404 194 loadbang;
#X msg -126 34 roomsize \$1;
#X obj 108 115 hsl 128 10 0 1 0 0 empty empty roomsize -2 5 0 10 -262144
-1 -1 2660 1;
#X obj 109 129 hsl 128 10 0 1 0 0 empty empty damping -2 5 0 10 -262144
-1 -1 5900 1;
#X obj 111 156 hsl 128 10 0 1 0 0 empty empty wet -2 5 0 10 -262144
-1 -1 1400 1;
#X msg 23 -2 0.8;
#X msg 53 6 0.1;
#X msg 87 7 0;
#X floatatom 104 174 5 0 0 0 - - -;
#X obj 154 7 inlet;
#X obj 158 40 unpack f f f;
#X obj 110 142 hsl 128 10 0 1 0 0 empty empty dry -2 5 0 10 -262144
-1 -1 6100 1;
#X msg -56 100 dry \$1;
#X connect 0 0 4 0;
#X connect 0 1 5 0;
#X connect 1 0 21 0;
#X connect 1 0 22 0;
#X connect 1 0 23 0;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X connect 8 0 0 0;
#X connect 9 0 0 1;
#X connect 11 0 10 0;
#X connect 12 0 15 0;
#X connect 12 1 14 0;
#X connect 13 0 3 0;
#X connect 14 0 3 0;
#X connect 15 0 13 0;
#X connect 16 0 11 0;
#X connect 17 0 0 0;
#X connect 18 0 17 0;
#X connect 19 0 8 0;
#X connect 20 0 7 0;
#X connect 20 0 24 0;
#X connect 21 0 18 0;
#X connect 22 0 19 0;
#X connect 23 0 19 0;
#X connect 25 0 26 0;
#X connect 26 0 18 0;
#X connect 26 1 20 0;
#X connect 26 2 19 0;
#X connect 27 0 28 0;
#X connect 28 0 0 0;
#X coords 0 -1 1 1 240 70 2 100 100;

View File

@ -0,0 +1,161 @@
#N canvas 309 234 828 601 10;
#X obj 101 102 cnv 15 235 165 empty \$0shelf empty 20 12 0 14 -262144
-262144 0;
#X floatatom 394 117 7 0 0 0 - - -;
#X text 450 118 dB;
#X floatatom 263 288 5 2 9999 0 - - -;
#X text 312 304 ms;
#X obj 48 383 gainvu~ 300;
#X obj 304 134 vu 8 120 empty empty 8 -8 0 6 -66577 -1 1 0;
#X obj 282 140 vsl 15 111 0 127 0 0 empty empty empty 8 -8 0 10 -262144
-1 -1 8661 1;
#X text 377 67 6.arg:<float> interpolation_time [ms];
#X text 377 14 1.arg:<float> low_level [dB];
#X text 377 24 2.arg:<float> low_freq. [Hz];
#X text 377 35 3.arg:<float> medium_level [dB];
#X text 377 45 4.arg:<float> high_freq. [Hz];
#X text 377 56 5.arg:<float> high_level [dB];
#X obj 211 206 vsl 10 49 27.5 440 1 1 empty empty low_freq. -8 -8 0
8 -204786 -1 -1 1200 1;
#X text 229 199 -440Hz;
#X text 229 244 -27.5Hz;
#X text 228 221 -110Hz;
#X obj 210 131 vsl 10 49 880 14080 1 1 empty empty high_freq. -8 -8
0 8 -204786 -1 -1 1600 1;
#X text 224 123 -14080Hz;
#X text 226 166 -880Hz;
#X text 227 144 -3520Hz;
#X floatatom 530 385 7 0 0 0 - - -;
#X text 588 387 dB;
#X floatatom 324 276 8 0 0 0 - - -;
#X floatatom 392 421 8 0 0 0 - - -;
#X text 159 -13 high-middle-low-shelving-filter;
#X text 1 284 signal_in~;
#X text 54 346 signal_out~;
#X obj 34 13 cnv 8 1 1 empty empty hml_shelf~ 1 2 1 18 -262144 -1109
0;
#X text 525 -18 IEM KUG;
#X text 509 -30 musil;
#X text 539 -30 @;
#X text 545 -30 iem.at;
#X text 460 -41 (c) Thomas Musil 2000 - 2005;
#X text 508 -8 Graz \, Austria;
#X obj 47 328 hml_shelf~ -10 98 0 3520 -10 200;
#X msg -19 239 set 0 0;
#X text 246 397 set internal state;
#N canvas 281 175 494 344 META 0;
#X text 12 265 HELP_PATCH_AUTHORS "pd meta" information added by Jonathan
Wilkes for Pd version 0.42.;
#X text 12 245 AUTHOR Thomas Musil;
#X text 12 25 LICENSE LGPL v2.1;
#X text 12 45 DESCRIPTION high middle low shelving filter;
#X text 12 85 INLET_1 float;
#X text 12 105 INLET_2 float;
#X text 12 125 INLET_3 float;
#X text 12 145 INLET_4 float;
#X text 12 165 INLET_5 float;
#X text 12 185 INLET_6 float;
#X text 12 205 OUTLET_0 signal;
#X text 12 225 OUTLET_1;
#X text 12 5 KEYWORDS signal filter needs_work (OUTLET_1?);
#X text 12 65 INLET_0 signal set;
#X restore 569 538 pd META;
#X obj 107 226 knob 30 30 -40 40 0 0 empty empty low 8 40 0 6 -258113
-258113 -4160 1450 1;
#X obj 106 181 knob 30 30 -40 40 0 0 empty empty mid 8 40 0 6 -258113
-258113 -4160 1450 1;
#X obj 105 136 knob 30 30 -40 40 0 0 empty empty high 8 40 0 6 -261682
-258113 -4160 1450 1;
#X obj -21 37 inlet~;
#X obj 18 467 outlet~;
#X obj 38 40 inlet~;
#X obj 244 458 hml_shelf~ -10 98 0 3520 -10 200;
#X obj 178 521 outlet~;
#X msg 153 53 100;
#X msg 206 58 0;
#X obj 209 37 loadbang;
#X obj -22 67 spigot~;
#X obj 38 69 spigot~;
#X obj 111 106 tgl 25 0 empty empty BYPASS 17 7 0 10 -257985 -1 -262144
1 1;
#X floatatom 141 239 4 0 0 0 - - -;
#X floatatom 141 194 4 0 0 0 - - -;
#X floatatom 142 146 4 0 0 0 - - -;
#X obj 285 110 bng 15 250 50 0 empty empty reset 17 7 0 10 -260097
-1 -1;
#X obj 283 78 init 100;
#X obj 202 489 gainvu~ 300;
#X obj 424 208;
#X obj 453 241 s \$0shelf;
#X msg 483 199 color 121;
#X msg 452 177 color 0;
#X floatatom 507 108 5 0 0 0 - - -;
#X obj 112 23 init 1;
#X obj 452 153 select 1 0;
#X obj 630 235 midiin;
#X obj 619 273 ctlin;
#X floatatom 712 322 5 0 0 0 - - -;
#X floatatom 667 321 5 0 0 0 - - -;
#X floatatom 577 330 5 0 0 0 - - -;
#X obj 657 491 ctlout 0 1;
#X obj 654 393 knob 32 32 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 1611 1;
#X msg 664 443 set \$1;
#X connect 3 0 36 6;
#X connect 3 0 46 6;
#X connect 5 0 44 0;
#X connect 5 1 22 0;
#X connect 5 2 6 0;
#X connect 6 1 1 0;
#X connect 7 0 5 1;
#X connect 7 0 59 1;
#X connect 14 0 24 0;
#X connect 18 0 25 0;
#X connect 24 0 36 2;
#X connect 24 0 46 2;
#X connect 25 0 36 4;
#X connect 25 0 46 4;
#X connect 36 0 5 0;
#X connect 37 0 36 0;
#X connect 40 0 54 0;
#X connect 41 0 55 0;
#X connect 42 0 56 0;
#X connect 43 0 51 0;
#X connect 45 0 52 0;
#X connect 46 0 59 0;
#X connect 48 0 5 1;
#X connect 48 0 7 0;
#X connect 49 0 42 0;
#X connect 49 0 41 0;
#X connect 49 0 40 0;
#X connect 50 0 49 0;
#X connect 50 0 48 0;
#X connect 51 0 36 0;
#X connect 51 1 44 0;
#X connect 52 0 46 0;
#X connect 52 1 47 0;
#X connect 53 0 51 1;
#X connect 53 0 52 1;
#X connect 53 0 66 0;
#X connect 54 0 36 1;
#X connect 54 0 46 1;
#X connect 55 0 36 3;
#X connect 55 0 46 3;
#X connect 56 0 36 5;
#X connect 56 0 46 5;
#X connect 57 0 49 0;
#X connect 58 0 7 0;
#X connect 59 0 47 0;
#X connect 59 2 6 0;
#X connect 62 0 61 0;
#X connect 63 0 61 0;
#X connect 65 0 53 0;
#X connect 66 0 63 0;
#X connect 66 1 62 0;
#X connect 68 0 71 0;
#X connect 68 0 73 0;
#X connect 68 1 70 0;
#X connect 68 2 69 0;
#X connect 73 0 74 0;
#X connect 74 0 72 0;
#X coords 0 -1 1 1 240 170 1 100 100;

View File

@ -0,0 +1,94 @@
#N canvas 491 515 733 384 10;
#X obj 50 202 cnv 15 235 45 empty \$0del del 20 12 0 14 -262144 -262144
0;
#X obj 81 -47 inlet~;
#X obj 81 -27 spigot~;
#X obj 385 163 delread~ a\$0 1000;
#X obj 401 137 *~;
#X obj 174 111 knob 32 32 0 1 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 620 1;
#X obj 366 308 outlet~;
#X obj 250 105 knob 32 32 0 2000 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 3100 1;
#X floatatom 213 131 5 0 0 0 - - -;
#X floatatom 290 112 5 0 0 0 - - -;
#X obj 80 -8 delwrite~ a\$0 10000;
#X obj 241 78 init 2000;
#X obj 172 18 init 0.2;
#X obj 273 -47 inlet~;
#X obj 273 -27 spigot~;
#X obj 435 137 *~;
#X obj 430 300 outlet~;
#X obj 272 -8 delwrite~ b\$0 10000;
#X obj 475 191 delread~ b\$0 1000;
#X obj 105 122 tgl 25 0 empty empty BYPASS 17 7 0 10 -257985 -1 -1
1 1;
#X msg 529 56 color 0;
#X obj 531 119 s \$0del;
#X obj 513 -14 init 1;
#X obj 529 32 select 1 0;
#X obj 443 260 *~;
#X obj 395 277 *~;
#X obj 395 229 line~;
#X obj 395 208 pack 0 50;
#X obj 418 99 line~;
#X obj 418 78 pack 0 50;
#X obj 103 198 select 0 1;
#X msg 107 255 1;
#X msg 131 224 0;
#X msg 559 78 color 137;
#X obj 12 10 r \$1dialknob7;
#X obj 11 122 r \$1dialknob8;
#X obj 14 31 / 127;
#X obj 32 145 * 20;
#X floatatom 610 228 5 0 0 0 - - -;
#X floatatom 559 167 5 0 0 0 - - -;
#X obj 175 183 line 250 222;
#X msg 171 160 \$1 200;
#X connect 1 0 2 0;
#X connect 2 0 10 0;
#X connect 2 1 6 0;
#X connect 3 0 25 1;
#X connect 3 0 4 1;
#X connect 4 0 10 0;
#X connect 5 0 41 0;
#X connect 7 0 9 0;
#X connect 9 0 3 0;
#X connect 9 0 18 0;
#X connect 11 0 7 0;
#X connect 12 0 5 0;
#X connect 13 0 14 0;
#X connect 14 0 17 0;
#X connect 14 1 16 0;
#X connect 15 0 17 0;
#X connect 18 0 24 1;
#X connect 18 0 15 1;
#X connect 19 0 2 1;
#X connect 19 0 14 1;
#X connect 19 0 23 0;
#X connect 19 0 30 0;
#X connect 20 0 21 0;
#X connect 22 0 19 0;
#X connect 23 0 20 0;
#X connect 23 1 33 0;
#X connect 24 0 16 0;
#X connect 25 0 6 0;
#X connect 26 0 25 0;
#X connect 26 0 24 0;
#X connect 27 0 26 0;
#X connect 28 0 15 0;
#X connect 28 0 4 0;
#X connect 29 0 28 0;
#X connect 30 0 31 0;
#X connect 30 1 32 0;
#X connect 31 0 27 0;
#X connect 32 0 27 0;
#X connect 33 0 21 0;
#X connect 34 0 36 0;
#X connect 35 0 37 0;
#X connect 36 0 5 0;
#X connect 37 0 7 0;
#X connect 40 0 29 0;
#X connect 40 0 8 0;
#X connect 41 0 40 0;
#X coords 0 -1 1 1 240 50 1 100 100;

295
liveelec/pd/rcvbap 100755
View File

@ -0,0 +1,295 @@
#N canvas 91 177 1287 722 10;
#X declare -lib hexloader -lib iemmatrix;
#X floatatom 123 220 5 0 0 2 azi - -;
#X floatatom 536 -19 5 0 0 2 ele - -;
#X floatatom 211 220 5 0 100 2 spread - -;
#X text 902 262 In two dimensions \, only specify the azimuth. (for
example "define_loudspeakers 2 -45 45 0 180";
#X text 63 21 VBAP and define_loudspeakers;
#X text 904 399 The spread-parameter can be used to prevent a situation
where sound is coming from one speaker only \, which would make speaker
positions "visible". The range is 0 to 100;
#X text 620 99 actual location;
#X floatatom 597 3 5 1 20 2 dist - -;
#X text 902 172 1) Use define_loudspeakers to list the speaker positions.
The example here defines loudspeakers in three dimensions (the first
parameter). For each speaker \, define its azimuth and elevation. Here
we have speakers front left and right with no elevation (-45 0 45 0)
and front and back with 45 degrees of elevation (0 45 180 45). Send
the data to vbap.;
#X floatatom 548 70 5 0 0 3 azi - -;
#X floatatom 592 70 5 0 0 3 ele - -;
#X floatatom 636 70 5 0 0 3 spread - -;
#X floatatom 689 71 5 0 0 3 dist - -;
#N canvas 0 22 699 527 sig 0;
#X obj 58 72 line~;
#X msg 58 49 0 \, 10000 5;
#X obj 58 118 cos~;
#X msg 146 70 1;
#X obj 146 47 loadbang;
#X obj 58 95 clip~ 0 0.25;
#X obj 251 134 line~;
#X obj 251 157 cos~;
#X msg 324 54 -0.25 \, 0.25 100;
#X obj 251 8 loadbang;
#X msg 251 31 -0.25;
#X obj 251 203 *~;
#X obj 58 140 hip~ 5;
#X msg 324 77 -0.25 \, 0.25 400;
#X floatatom 324 145 0 0 0 0 - - -;
#X obj 324 191 osc~ 440;
#X obj 324 168 mtof;
#X msg 324 31 -0.25 \, 0.25 20;
#X obj 251 180 *~ 0.1;
#X msg 324 100 -0.25 \, 0.25 1000;
#X msg 324 144 -0.25 \, 0.25 2000;
#X obj 324 226 *~;
#X obj 342 252 *~;
#X msg 324 8 0;
#X obj 308 257 *~;
#X obj 58 26 metro 2000;
#X floatatom 58 4 0 0 0 0 - - -;
#X text 1 51 impulse;
#X text 362 7 tone;
#X obj 59 184 outlet~;
#X obj 170 6 inlet;
#X obj 442 18 metro 500;
#X obj 91 8 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X connect 0 0 5 0;
#X connect 1 0 0 0;
#X connect 2 0 12 0;
#X connect 3 0 0 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 7 0 18 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 10 0 6 0;
#X connect 11 0 12 0;
#X connect 12 0 29 0;
#X connect 13 0 6 0;
#X connect 14 0 16 0;
#X connect 15 0 11 1;
#X connect 15 0 21 0;
#X connect 15 0 21 1;
#X connect 15 0 22 0;
#X connect 16 0 15 0;
#X connect 17 0 6 0;
#X connect 18 0 11 0;
#X connect 19 0 6 0;
#X connect 20 0 6 0;
#X connect 21 0 22 1;
#X connect 21 0 11 1;
#X connect 21 0 24 0;
#X connect 21 0 24 1;
#X connect 22 0 11 1;
#X connect 23 0 6 0;
#X connect 24 0 11 1;
#X connect 25 0 1 0;
#X connect 26 0 25 0;
#X connect 30 0 31 0;
#X connect 31 0 8 0;
#X connect 32 0 25 0;
#X restore 548 234 pd sig;
#X obj 548 206 tgl 24 0 empty empty test-sigs 26 7 1 10 -262144 -1
-1 0 1;
#X obj 504 177 mtx 8 1;
#N canvas 346 244 547 360 set-element 0;
#X obj 70 81 unpack 0 0;
#X obj 70 104 + 1;
#X obj 70 137 pack 0 1 0;
#X obj 70 179 list trim;
#X obj 70 158 list prepend element;
#X obj 70 59 inlet;
#X obj 70 261 outlet;
#X obj 70 221 t b a;
#X text 48 33 transforms rvbap-output to be used with [mtx] from iemmatrix
;
#X connect 0 0 1 0;
#X connect 0 1 2 2;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 7 0;
#X connect 4 0 3 0;
#X connect 5 0 0 0;
#X connect 7 0 6 0;
#X connect 7 1 6 0;
#X restore 504 153 pd set-element;
#N canvas 181 626 802 273 peek 0;
#X floatatom 55 198 10 0 0 0 - - -;
#X floatatom 134 198 10 0 0 0 - - -;
#X floatatom 213 198 10 0 0 0 - - -;
#X floatatom 292 198 10 0 0 0 - - -;
#X obj 55 74 route 0 1 2 3 4 5 6 7;
#X floatatom 366 197 10 0 0 0 - - -;
#X floatatom 445 197 10 0 0 0 - - -;
#X floatatom 524 197 10 0 0 0 - - -;
#X floatatom 603 197 10 0 0 0 - - -;
#X obj 55 49 inlet;
#X connect 4 0 0 0;
#X connect 4 1 1 0;
#X connect 4 2 2 0;
#X connect 4 3 3 0;
#X connect 4 4 5 0;
#X connect 4 5 6 0;
#X connect 4 6 7 0;
#X connect 4 7 8 0;
#X connect 9 0 4 0;
#X restore 518 127 pd peek;
#X floatatom 590 256 5 0 0 1 interp - -;
#N canvas 1 96 450 300 tba 0;
#X obj 143 51 inlet;
#X obj 96 49 inlet;
#X obj 191 51 inlet;
#X obj 238 51 inlet;
#X obj 173 180 outlet;
#X obj 61 178 outlet;
#X obj 221 180 outlet;
#X obj 268 180 outlet;
#X obj 126 180 outlet;
#X obj 96 73 t b a;
#X obj 143 72 t b a;
#X obj 191 72 t b a;
#X obj 238 72 t b a;
#X connect 0 0 10 0;
#X connect 1 0 9 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 9 0 5 0;
#X connect 9 1 8 0;
#X connect 10 0 5 0;
#X connect 10 1 4 0;
#X connect 11 0 5 0;
#X connect 11 1 6 0;
#X connect 12 0 5 0;
#X connect 12 1 7 0;
#X restore 525 5 pd tba;
#X obj 601 -29 hsl 64 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X text 903 76 rvbap is almost compatible to;
#X obj 504 288 mtx_*~ 8 1 20;
#X text 905 96 Additionally it generates additional commands for controlling
a reverberated signal and has control to set the radial distance of
a sound.;
#X text 904 458 3) rvbap also will generate messages to control the
amount of reverberated signal to generate. This is meant to be used
with [matrix~] or [mtx_*~] from the IEMmatrix collection of externals.
;
#X text 905 316 2) For rvbap \, give azimuth and elevation and a distance
(1-inf \, default 1) for the desired location. Bang the first inlet
and vbap will output gain-factors for each speaker and the actual location
produced. This can be different from the desired one depending where
your speakers are.;
#X text 907 650 See rvbap-demo.pd for a more complex setup.;
#X text 903 528 To use it \, create a [mtx_*~] object that has double
the amount of outlets as you have speakers. Send the first half of
the matrix-signals to the speakers and the second half through a reverbarator
and add them to the respective speaker outs. The example shows this
in action for four speakers. Pay attention to the "set-element" subpatch
which translates the [rvbap] output to set matrix elements correctly.
;
#X text 582 128 <= here's the output of [rvbap];
#X obj 1084 76 pddp/helplink vbap;
#X obj 1107 38 import hexloader iemmatrix;
#X obj 411 171 inlet~;
#X obj 504 39 vbap 0 0;
#X msg 459 -144 bang;
#X obj 495 511 dac~ 1 2 3 4 5 6 7 8;
#X obj 497 -177 loadbang;
#X obj 370 374 gainvu~;
#X obj 186 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 198 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 162 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 174 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 234 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 246 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 210 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 222 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 419 374 gainvu~;
#X obj 467 374 gainvu~;
#X obj 516 374 gainvu~;
#X obj 567 373 gainvu~;
#X obj 616 373 gainvu~;
#X obj 664 373 gainvu~;
#X obj 713 373 gainvu~;
#X obj 684 195 noise~;
#X obj 123 118 vsl 33 80 0 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 6220 1;
#X obj 724 333 f;
#X obj 260 366 init 100;
#X msg 191 411 100;
#X obj 18 494 pack f f;
#X floatatom 18 542 5 0 0 0 - - -;
#X obj 18 339 grid grid1 144 0 1 144 0 1 0 0 0 10 10 93 395;
#X floatatom 118 542 5 0 0 0 - - -;
#X obj 18 519 graph-to-aziele;
#X obj 484 -92 define_loudspeakers 2 -45 0 45 90 135 180 -135 -90;
#X connect 0 0 19 0;
#X connect 1 0 19 1;
#X connect 2 0 19 2;
#X connect 7 0 19 3;
#X connect 13 0 22 1;
#X connect 14 0 13 0;
#X connect 15 0 22 0;
#X connect 16 0 15 0;
#X connect 18 0 22 2;
#X connect 19 0 32 0;
#X connect 19 1 32 1;
#X connect 19 2 32 2;
#X connect 19 3 32 3;
#X connect 20 0 7 0;
#X connect 22 0 36 0;
#X connect 22 1 45 0;
#X connect 22 2 46 0;
#X connect 22 3 47 0;
#X connect 22 4 48 0;
#X connect 22 5 49 0;
#X connect 22 6 50 0;
#X connect 22 7 51 0;
#X connect 31 0 22 1;
#X connect 32 0 16 0;
#X connect 32 0 17 0;
#X connect 32 1 9 0;
#X connect 32 2 10 0;
#X connect 32 3 11 0;
#X connect 33 0 62 0;
#X connect 35 0 62 0;
#X connect 36 0 34 0;
#X connect 36 2 39 0;
#X connect 45 0 34 1;
#X connect 45 2 40 0;
#X connect 46 0 34 2;
#X connect 46 2 37 0;
#X connect 47 0 34 3;
#X connect 47 2 38 0;
#X connect 48 0 34 4;
#X connect 48 2 43 0;
#X connect 49 0 34 5;
#X connect 49 2 44 0;
#X connect 50 0 34 6;
#X connect 50 2 41 0;
#X connect 51 0 34 7;
#X connect 51 2 42 0;
#X connect 52 0 22 1;
#X connect 53 0 54 0;
#X connect 54 0 36 1;
#X connect 54 0 45 1;
#X connect 54 0 46 1;
#X connect 54 0 47 1;
#X connect 54 0 48 1;
#X connect 54 0 49 1;
#X connect 54 0 50 1;
#X connect 54 0 51 1;
#X connect 55 0 53 0;
#X connect 56 0 53 0;
#X connect 57 0 61 0;
#X connect 59 0 57 0;
#X connect 59 1 57 1;
#X connect 61 0 58 0;
#X connect 61 0 0 0;
#X connect 61 1 60 0;
#X connect 61 1 2 0;
#X connect 62 0 32 0;
#X coords 0 -1 1 1 240 140 1 100 100;

View File

@ -0,0 +1,294 @@
#N canvas 518 361 1287 722 10;
#X declare -lib hexloader -lib iemmatrix;
#X floatatom 123 220 5 0 0 2 azi - -;
#X floatatom 536 -19 5 0 0 2 ele - -;
#X floatatom 211 220 5 0 100 2 spread - -;
#X text 902 262 In two dimensions \, only specify the azimuth. (for
example "define_loudspeakers 2 -45 45 0 180";
#X text 63 21 VBAP and define_loudspeakers;
#X text 904 399 The spread-parameter can be used to prevent a situation
where sound is coming from one speaker only \, which would make speaker
positions "visible". The range is 0 to 100;
#X text 620 99 actual location;
#X floatatom 597 3 5 1 20 2 dist - -;
#X text 902 172 1) Use define_loudspeakers to list the speaker positions.
The example here defines loudspeakers in three dimensions (the first
parameter). For each speaker \, define its azimuth and elevation. Here
we have speakers front left and right with no elevation (-45 0 45 0)
and front and back with 45 degrees of elevation (0 45 180 45). Send
the data to vbap.;
#X floatatom 548 70 5 0 0 3 azi - -;
#X floatatom 592 70 5 0 0 3 ele - -;
#X floatatom 636 70 5 0 0 3 spread - -;
#X floatatom 689 71 5 0 0 3 dist - -;
#N canvas 0 22 699 527 sig 0;
#X obj 58 72 line~;
#X msg 58 49 0 \, 10000 5;
#X obj 58 118 cos~;
#X msg 146 70 1;
#X obj 146 47 loadbang;
#X obj 58 95 clip~ 0 0.25;
#X obj 251 134 line~;
#X obj 251 157 cos~;
#X msg 324 54 -0.25 \, 0.25 100;
#X obj 251 8 loadbang;
#X msg 251 31 -0.25;
#X obj 251 203 *~;
#X obj 58 140 hip~ 5;
#X msg 324 77 -0.25 \, 0.25 400;
#X floatatom 324 145 0 0 0 0 - - -;
#X obj 324 191 osc~ 440;
#X obj 324 168 mtof;
#X msg 324 31 -0.25 \, 0.25 20;
#X obj 251 180 *~ 0.1;
#X msg 324 100 -0.25 \, 0.25 1000;
#X msg 324 144 -0.25 \, 0.25 2000;
#X obj 324 226 *~;
#X obj 342 252 *~;
#X msg 324 8 0;
#X obj 308 257 *~;
#X obj 58 26 metro 2000;
#X floatatom 58 4 0 0 0 0 - - -;
#X text 1 51 impulse;
#X text 362 7 tone;
#X obj 59 184 outlet~;
#X obj 170 6 inlet;
#X obj 442 18 metro 500;
#X obj 91 8 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X connect 0 0 5 0;
#X connect 1 0 0 0;
#X connect 2 0 12 0;
#X connect 3 0 0 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 7 0 18 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 10 0 6 0;
#X connect 11 0 12 0;
#X connect 12 0 29 0;
#X connect 13 0 6 0;
#X connect 14 0 16 0;
#X connect 15 0 11 1;
#X connect 15 0 21 0;
#X connect 15 0 21 1;
#X connect 15 0 22 0;
#X connect 16 0 15 0;
#X connect 17 0 6 0;
#X connect 18 0 11 0;
#X connect 19 0 6 0;
#X connect 20 0 6 0;
#X connect 21 0 22 1;
#X connect 21 0 11 1;
#X connect 21 0 24 0;
#X connect 21 0 24 1;
#X connect 22 0 11 1;
#X connect 23 0 6 0;
#X connect 24 0 11 1;
#X connect 25 0 1 0;
#X connect 26 0 25 0;
#X connect 30 0 31 0;
#X connect 31 0 8 0;
#X connect 32 0 25 0;
#X restore 548 234 pd sig;
#X obj 548 206 tgl 24 0 empty empty test-sigs 26 7 1 10 -262144 -1
-1 0 1;
#X obj 504 177 mtx 8 1;
#N canvas 346 244 547 360 set-element 0;
#X obj 70 81 unpack 0 0;
#X obj 70 104 + 1;
#X obj 70 137 pack 0 1 0;
#X obj 70 179 list trim;
#X obj 70 158 list prepend element;
#X obj 70 59 inlet;
#X obj 70 261 outlet;
#X obj 70 221 t b a;
#X text 48 33 transforms rvbap-output to be used with [mtx] from iemmatrix
;
#X connect 0 0 1 0;
#X connect 0 1 2 2;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 7 0;
#X connect 4 0 3 0;
#X connect 5 0 0 0;
#X connect 7 0 6 0;
#X connect 7 1 6 0;
#X restore 504 153 pd set-element;
#N canvas 181 626 802 273 peek 0;
#X floatatom 55 198 10 0 0 0 - - -;
#X floatatom 134 198 10 0 0 0 - - -;
#X floatatom 213 198 10 0 0 0 - - -;
#X floatatom 292 198 10 0 0 0 - - -;
#X obj 55 74 route 0 1 2 3 4 5 6 7;
#X floatatom 366 197 10 0 0 0 - - -;
#X floatatom 445 197 10 0 0 0 - - -;
#X floatatom 524 197 10 0 0 0 - - -;
#X floatatom 603 197 10 0 0 0 - - -;
#X obj 55 49 inlet;
#X connect 4 0 0 0;
#X connect 4 1 1 0;
#X connect 4 2 2 0;
#X connect 4 3 3 0;
#X connect 4 4 5 0;
#X connect 4 5 6 0;
#X connect 4 6 7 0;
#X connect 4 7 8 0;
#X connect 9 0 4 0;
#X restore 518 127 pd peek;
#X floatatom 590 256 5 0 0 1 interp - -;
#N canvas 1 96 450 300 tba 0;
#X obj 143 51 inlet;
#X obj 96 49 inlet;
#X obj 191 51 inlet;
#X obj 238 51 inlet;
#X obj 173 180 outlet;
#X obj 61 178 outlet;
#X obj 221 180 outlet;
#X obj 268 180 outlet;
#X obj 126 180 outlet;
#X obj 96 73 t b a;
#X obj 143 72 t b a;
#X obj 191 72 t b a;
#X obj 238 72 t b a;
#X connect 0 0 10 0;
#X connect 1 0 9 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 9 0 5 0;
#X connect 9 1 8 0;
#X connect 10 0 5 0;
#X connect 10 1 4 0;
#X connect 11 0 5 0;
#X connect 11 1 6 0;
#X connect 12 0 5 0;
#X connect 12 1 7 0;
#X restore 525 5 pd tba;
#X obj 601 -29 hsl 64 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X text 903 76 rvbap is almost compatible to;
#X obj 504 288 mtx_*~ 8 1 20;
#X text 905 96 Additionally it generates additional commands for controlling
a reverberated signal and has control to set the radial distance of
a sound.;
#X text 904 458 3) rvbap also will generate messages to control the
amount of reverberated signal to generate. This is meant to be used
with [matrix~] or [mtx_*~] from the IEMmatrix collection of externals.
;
#X text 905 316 2) For rvbap \, give azimuth and elevation and a distance
(1-inf \, default 1) for the desired location. Bang the first inlet
and vbap will output gain-factors for each speaker and the actual location
produced. This can be different from the desired one depending where
your speakers are.;
#X text 907 650 See rvbap-demo.pd for a more complex setup.;
#X text 903 528 To use it \, create a [mtx_*~] object that has double
the amount of outlets as you have speakers. Send the first half of
the matrix-signals to the speakers and the second half through a reverbarator
and add them to the respective speaker outs. The example shows this
in action for four speakers. Pay attention to the "set-element" subpatch
which translates the [rvbap] output to set matrix elements correctly.
;
#X text 582 128 <= here's the output of [rvbap];
#X obj 1084 76 pddp/helplink vbap;
#X obj 1107 38 import hexloader iemmatrix;
#X obj 411 171 inlet~;
#X obj 504 39 vbap 0 0;
#X msg 459 -144 bang;
#X obj 495 511 dac~ 1 2 3 4 5 6 7 8;
#X obj 497 -177 loadbang;
#X obj 370 374 gainvu~;
#X obj 186 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 198 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 162 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 174 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 234 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 246 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 210 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 222 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 419 374 gainvu~;
#X obj 467 374 gainvu~;
#X obj 516 374 gainvu~;
#X obj 567 373 gainvu~;
#X obj 616 373 gainvu~;
#X obj 664 373 gainvu~;
#X obj 713 373 gainvu~;
#X obj 684 195 noise~;
#X obj 123 118 vsl 33 80 0 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 6220 1;
#X obj 724 333 f;
#X obj 260 366 init 100;
#X msg 191 411 100;
#X obj 18 494 pack f f;
#X floatatom 18 558 5 0 0 0 - - -;
#X floatatom 118 558 5 0 0 0 - - -;
#X obj 18 519 graph-to-aziele;
#X obj 484 -92 define_loudspeakers 2 -45 0 45 90 135 180 -135 -90;
#X obj 15 287 grid grid1 80 0 1 80 0 1 1 0 0 10 10 27 308;
#X connect 0 0 19 0;
#X connect 1 0 19 1;
#X connect 2 0 19 2;
#X connect 7 0 19 3;
#X connect 13 0 22 1;
#X connect 14 0 13 0;
#X connect 15 0 22 0;
#X connect 16 0 15 0;
#X connect 18 0 22 2;
#X connect 19 0 32 0;
#X connect 19 1 32 1;
#X connect 19 2 32 2;
#X connect 19 3 32 3;
#X connect 20 0 7 0;
#X connect 22 0 36 0;
#X connect 22 1 45 0;
#X connect 22 2 46 0;
#X connect 22 3 47 0;
#X connect 22 4 48 0;
#X connect 22 5 49 0;
#X connect 22 6 50 0;
#X connect 22 7 51 0;
#X connect 31 0 22 1;
#X connect 32 0 16 0;
#X connect 32 0 17 0;
#X connect 32 1 9 0;
#X connect 32 2 10 0;
#X connect 32 3 11 0;
#X connect 36 0 34 0;
#X connect 36 2 39 0;
#X connect 45 0 34 1;
#X connect 45 2 40 0;
#X connect 46 0 34 2;
#X connect 46 2 37 0;
#X connect 47 0 34 3;
#X connect 47 2 38 0;
#X connect 48 0 34 4;
#X connect 48 2 43 0;
#X connect 49 0 34 5;
#X connect 49 2 44 0;
#X connect 50 0 34 6;
#X connect 50 2 41 0;
#X connect 51 0 34 7;
#X connect 51 2 42 0;
#X connect 52 0 22 1;
#X connect 53 0 54 0;
#X connect 54 0 36 1;
#X connect 54 0 45 1;
#X connect 54 0 46 1;
#X connect 54 0 47 1;
#X connect 54 0 48 1;
#X connect 54 0 49 1;
#X connect 54 0 50 1;
#X connect 54 0 51 1;
#X connect 55 0 53 0;
#X connect 56 0 53 0;
#X connect 57 0 61 0;
#X connect 57 0 60 0;
#X connect 59 0 57 0;
#X connect 60 0 58 0;
#X connect 60 1 59 0;
#X connect 61 0 58 0;
#X connect 61 0 0 0;
#X connect 62 0 57 0;
#X connect 62 1 57 1;
#X coords 0 -1 1 1 240 140 1 100 100;

View File

@ -0,0 +1,327 @@
#N canvas 0 96 1440 804 10;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X obj 100 101 cnv 15 235 175 empty \$0out Out 20 12 0 14 -166441 -262144
0;
#X floatatom 166 119 5 0 0 2 azi - -;
#X floatatom 536 -19 5 0 0 2 ele - -;
#X floatatom 204 120 5 0 100 2 spread - -;
#X text 63 21 VBAP and define_loudspeakers;
#X text 620 99 actual location;
#X floatatom 597 3 5 1 20 2 dist - -;
#X floatatom 548 70 5 0 0 3 azi - -;
#X floatatom 592 70 5 0 0 3 ele - -;
#X floatatom 636 70 5 0 0 3 spread - -;
#X floatatom 689 71 5 0 0 3 dist - -;
#X obj 504 177 mtx 8 1;
#N canvas 346 244 547 360 set-element 0;
#X obj 70 81 unpack 0 0;
#X obj 70 104 + 1;
#X obj 70 137 pack 0 1 0;
#X obj 70 179 list trim;
#X obj 70 158 list prepend element;
#X obj 70 59 inlet;
#X obj 70 261 outlet;
#X obj 70 221 t b a;
#X text 48 33 transforms rvbap-output to be used with [mtx] from iemmatrix
;
#X connect 0 0 1 0;
#X connect 0 1 2 2;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 7 0;
#X connect 4 0 3 0;
#X connect 5 0 0 0;
#X connect 7 0 6 0;
#X connect 7 1 6 0;
#X restore 504 153 pd set-element;
#N canvas 181 626 802 273 peek 0;
#X floatatom 55 198 10 0 0 0 - - -;
#X floatatom 134 198 10 0 0 0 - - -;
#X floatatom 213 198 10 0 0 0 - - -;
#X floatatom 292 198 10 0 0 0 - - -;
#X obj 55 74 route 0 1 2 3 4 5 6 7;
#X floatatom 366 197 10 0 0 0 - - -;
#X floatatom 445 197 10 0 0 0 - - -;
#X floatatom 524 197 10 0 0 0 - - -;
#X floatatom 603 197 10 0 0 0 - - -;
#X obj 55 49 inlet;
#X connect 4 0 0 0;
#X connect 4 1 1 0;
#X connect 4 2 2 0;
#X connect 4 3 3 0;
#X connect 4 4 5 0;
#X connect 4 5 6 0;
#X connect 4 6 7 0;
#X connect 4 7 8 0;
#X connect 9 0 4 0;
#X restore 518 127 pd peek;
#X floatatom 590 256 5 0 0 1 interp - -;
#N canvas 1 96 450 300 tba 0;
#X obj 143 51 inlet;
#X obj 96 49 inlet;
#X obj 191 51 inlet;
#X obj 238 51 inlet;
#X obj 173 180 outlet;
#X obj 61 178 outlet;
#X obj 221 180 outlet;
#X obj 268 180 outlet;
#X obj 126 180 outlet;
#X obj 96 73 t b a;
#X obj 143 72 t b a;
#X obj 191 72 t b a;
#X obj 238 72 t b a;
#X connect 0 0 10 0;
#X connect 1 0 9 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 9 0 5 0;
#X connect 9 1 8 0;
#X connect 10 0 5 0;
#X connect 10 1 4 0;
#X connect 11 0 5 0;
#X connect 11 1 6 0;
#X connect 12 0 5 0;
#X connect 12 1 7 0;
#X restore 525 5 pd tba;
#X obj 601 -29 hsl 64 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 504 288 mtx_*~ 8 1 20;
#X text 582 128 <= here's the output of [rvbap];
#X obj 411 171 inlet~;
#X obj 504 39 vbap 0 0;
#X msg 482 -98 bang;
#X obj 495 511 dac~ 1 2 3 4 5 6 7 8;
#X obj 308 -129 loadbang;
#X obj 370 374 gainvu~;
#X obj 159 191 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 171 191 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 135 191 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 147 191 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 207 191 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 219 191 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 183 191 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 195 191 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 419 374 gainvu~;
#X obj 467 374 gainvu~;
#X obj 516 374 gainvu~;
#X obj 567 373 gainvu~;
#X obj 616 373 gainvu~;
#X obj 664 373 gainvu~;
#X obj 713 373 gainvu~;
#X obj 107 191 vsl 22 80 0 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 6220 1;
#X obj 724 333 f;
#X obj 130 63 init 100;
#X msg 94 69 100;
#X obj 102 327 pack f f;
#X obj 102 352 graph-to-aziele;
#X obj 234 171 grid grid1 100 0 1 100 0 1 0 0.01 0.01 10 10 333 279
;
#X msg 593 -136 bang;
#X text 635 -136 a 2D setup;
#X obj 248 120 vradio 15 1 0 3 empty empty define_speakers 0 -8 0 10
-262144 -1 -1 1;
#X text 266 118 stereo;
#X text 275 133 quad;
#X text 281 149 oct;
#X obj 334 -36 select 0 1 2;
#X msg 595 -185 bang;
#X text 637 -185 a 2D setup;
#X msg 308 -87 1;
#X obj 218 420 \$1;
#X obj 245 421 \$2;
#X obj 212 453 pack f f;
#X obj 221 375 del 100;
#X obj 235 348 loadbang;
#X obj 219 399 t b b;
#X msg 196 503 values \$1 \$2;
#X msg 315 522 values 0.5 0.5;
#X msg 78 417 color 183 255 255;
#X floatatom 964 163 0 0 0 0 - - -;
#X msg 910 83 bang;
#X obj 964 138 + 1;
#X msg 956 83 stop;
#X obj 910 138 float;
#X obj 963 187 % 360;
#X obj 1010 211 - 180;
#X obj 909 12 loadbang;
#X obj 910 112 metro 5;
#X floatatom 193 172 5 0 0 0 speed - -;
#X obj 1011 247 * -1;
#X floatatom 1016 295 5 0 0 0 - - -;
#X msg 1081 240 -1;
#X msg 1118 219 1;
#X obj 1097 142 select 0 1;
#X obj 122 161 tgl 15 0 empty empty direction 17 7 0 10 -262144 -1
-1 0 1;
#X msg 1041 -18 color 121;
#X msg 1010 -40 color 0;
#X obj 106 123 tgl 15 0 empty empty bypass 17 7 0 10 -257985 -1 -1
0 1;
#X obj 1011 24 s \$0out;
#X obj 829 15 init 0;
#X obj 1010 -64 select 1 0;
#X obj 80 -61 import vbap hexloader iemmatrix;
#X obj 486 -71 define_loudspeakers 2 -45 0 45 90 135 180 -135 -90;
#X obj 593 -107 define_loudspeakers 2 -45 45 135 -135;
#X obj 595 -164 define_loudspeakers 2 -45 45;
#X obj 864 352 date ffffffff;
#X obj 954 348 time ffff;
#X msg 830 280 bang;
#X obj 854 388 sprintf rec-%d%d%d%d%d%d-input\$3\$4-4chan.wav;
#X obj 765 557 writesf~ 4;
#X msg 759 486 start;
#X obj 878 532 del 1000;
#X msg 803 488 stop;
#X text 945 530 duration of recording;
#X obj 959 421 list prepend open;
#X obj 845 311 t b b b b b b;
#X msg 949 471 open rec-2014914112526-input12-4chan.wav;
#X msg 961 444 set \$1 \$2;
#X obj 107 141 tgl 15 0 empty recordall rec.4ch 17 7 0 10 -261234 -1
-1 0 1;
#X msg 754 401;
#X obj 783 438 select 0 1;
#X msg 680 224;
#X obj 748 252;
#X obj 174 149 tgl 15 0 empty empty orbit 17 7 0 10 -204786 -1 -1 0
1;
#X obj 905 45 select 0 1;
#X floatatom 310 342 5 0 0 0 - - -;
#X floatatom 309 383 5 0 0 0 - - -;
#X connect 1 0 15 0;
#X connect 2 0 15 1;
#X connect 3 0 15 2;
#X connect 6 0 15 3;
#X connect 11 0 17 0;
#X connect 12 0 11 0;
#X connect 14 0 17 2;
#X connect 15 0 20 0;
#X connect 15 1 20 1;
#X connect 15 2 20 2;
#X connect 15 3 20 3;
#X connect 16 0 6 0;
#X connect 17 0 24 0;
#X connect 17 1 33 0;
#X connect 17 2 34 0;
#X connect 17 3 35 0;
#X connect 17 4 36 0;
#X connect 17 5 37 0;
#X connect 17 6 38 0;
#X connect 17 7 39 0;
#X connect 19 0 17 1;
#X connect 20 0 12 0;
#X connect 20 0 13 0;
#X connect 20 1 7 0;
#X connect 20 2 8 0;
#X connect 20 3 9 0;
#X connect 21 0 89 0;
#X connect 23 0 56 0;
#X connect 24 0 22 0;
#X connect 24 0 96 0;
#X connect 24 2 27 0;
#X connect 33 0 22 1;
#X connect 33 0 96 1;
#X connect 33 2 28 0;
#X connect 34 0 22 2;
#X connect 34 0 96 2;
#X connect 34 2 25 0;
#X connect 35 0 22 3;
#X connect 35 0 96 3;
#X connect 35 2 26 0;
#X connect 36 0 22 4;
#X connect 36 2 31 0;
#X connect 37 0 22 5;
#X connect 37 2 32 0;
#X connect 38 0 22 6;
#X connect 38 2 29 0;
#X connect 39 0 22 7;
#X connect 39 2 30 0;
#X connect 40 0 41 0;
#X connect 41 0 24 1;
#X connect 41 0 33 1;
#X connect 41 0 34 1;
#X connect 41 0 35 1;
#X connect 41 0 36 1;
#X connect 41 0 37 1;
#X connect 41 0 38 1;
#X connect 41 0 39 1;
#X connect 42 0 40 0;
#X connect 43 0 40 0;
#X connect 44 0 45 0;
#X connect 45 0 1 0;
#X connect 45 1 3 0;
#X connect 46 0 44 0;
#X connect 46 0 113 0;
#X connect 46 1 44 1;
#X connect 46 1 112 0;
#X connect 47 0 90 0;
#X connect 49 0 53 0;
#X connect 53 0 54 0;
#X connect 53 1 47 0;
#X connect 53 2 21 0;
#X connect 54 0 91 0;
#X connect 56 0 49 0;
#X connect 57 0 59 0;
#X connect 58 0 59 1;
#X connect 59 0 63 0;
#X connect 60 0 62 0;
#X connect 61 0 60 0;
#X connect 61 0 65 0;
#X connect 62 0 57 0;
#X connect 62 1 58 0;
#X connect 63 0 46 0;
#X connect 65 0 46 0;
#X connect 66 0 71 0;
#X connect 67 0 74 0;
#X connect 68 0 66 0;
#X connect 68 0 70 1;
#X connect 69 0 74 0;
#X connect 69 0 74 0;
#X connect 70 0 68 0;
#X connect 71 0 72 0;
#X connect 72 0 1 0;
#X connect 72 0 76 0;
#X connect 74 0 70 0;
#X connect 75 0 74 1;
#X connect 76 0 77 0;
#X connect 78 0 76 1;
#X connect 79 0 76 1;
#X connect 80 0 78 0;
#X connect 80 1 79 0;
#X connect 81 0 80 0;
#X connect 82 0 85 0;
#X connect 83 0 85 0;
#X connect 84 0 87 0;
#X connect 86 0 84 0;
#X connect 87 0 83 0;
#X connect 87 1 82 0;
#X connect 89 0 20 0;
#X connect 90 0 20 0;
#X connect 91 0 20 0;
#X connect 92 0 95 0;
#X connect 92 1 95 1;
#X connect 92 2 95 2;
#X connect 93 0 95 3;
#X connect 93 1 95 4;
#X connect 93 2 95 5;
#X connect 94 0 102 0;
#X connect 95 0 101 0;
#X connect 97 0 96 0;
#X connect 98 0 99 0;
#X connect 99 0 96 0;
#X connect 101 0 104 0;
#X connect 102 1 98 0;
#X connect 102 2 97 0;
#X connect 102 3 103 0;
#X connect 102 4 92 0;
#X connect 102 5 93 0;
#X connect 103 0 96 0;
#X connect 104 0 103 0;
#X connect 105 0 107 0;
#X connect 107 0 99 0;
#X connect 107 1 97 0;
#X connect 110 0 111 0;
#X connect 111 0 69 0;
#X connect 111 1 67 0;
#X coords 0 -1 1 1 240 180 1 100 100;

View File

@ -0,0 +1,40 @@
#N canvas 138 96 936 803 10;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X obj 103 706 rcvbap2 \$3 \$4 \$1 \$2;
#X obj 112 672 dac~ 1 2 3 4;
#X obj 154 127 adc~ 1 2 3 4;
#X obj 60 432 rcdel 1;
#X obj 146 528 rcdel 2;
#X obj 427 692;
#X obj 367 133 rc-hml_shelf~;
#X obj 366 306 rc-bpq2~ \$5;
#X obj 644 136 rc-hml_shelf~;
#X obj 643 309 rc-bpq2~ \$5;
#X obj 576 539 rcdel 3;
#X obj 636 618 rcdel 4;
#X obj 218 259 env~;
#X obj 585 791 writesf~ 2;
#X msg 553 704 open /home/rob/locatedspace01.wav;
#X msg 625 725 start;
#X msg 678 737 stop;
#X connect 2 0 3 0;
#X connect 2 0 4 0;
#X connect 2 0 13 0;
#X connect 2 1 10 0;
#X connect 2 1 11 0;
#X connect 2 1 13 1;
#X connect 3 0 1 0;
#X connect 4 0 1 1;
#X connect 4 0 10 0;
#X connect 6 0 7 0;
#X connect 6 1 7 1;
#X connect 8 0 9 0;
#X connect 8 1 9 1;
#X connect 10 0 1 2;
#X connect 10 0 3 0;
#X connect 11 0 1 3;
#X connect 11 0 4 0;
#X connect 14 0 13 0;
#X connect 15 0 13 0;
#X connect 16 0 13 0;
#X coords 0 -1 1 1 245 750 1 100 100;

View File

@ -0,0 +1,55 @@
#N canvas 150 151 1287 722 10;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X declare -lib iemgui;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X declare -lib iemgui;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X declare -lib iemgui;
#X declare -lib vbap -lib hexloader -lib iemmatrix;
#X declare -lib iemgui;
#X obj 3 -224 cnv 15 1500 800 empty empty empty 20 12 0 14 -204800
-66577 0;
#X obj 1227 -114 dsp;
#X obj 1225 -162 tgl 35 0 empty empty empty 17 7 0 10 -4034 -1 -1 1
1;
#X obj 1226 -182 loadbang;
#X floatatom 1228 -88 5 0 0 0 - - -;
#X floatatom 1242 -60 5 0 0 0 - - -;
#N canvas 779 255 530 512 system 0;
#X obj -84 82 system;
#X msg -45 26 killall vlc;
#X msg -78 -19 sh /home/rob/Documents/projects/streamscapes/autoconnect.sh
;
#X msg 35 -102 xterm;
#X msg -87 -56 sh /home/rob/Documents/projects/streamscapes/getstreams.sh
;
#X obj 105 113 bng 15 250 50 0 empty empty start_all_streams_(cvlc)
17 7 0 10 -4032 -1 -1;
#X obj 105 130 bng 15 250 50 0 empty empty connect_cvlc_to_pd 17 7
0 10 -4032 -1 -1;
#X obj 106 147 bng 15 250 50 0 empty empty killall_vlc 17 7 0 10 -4032
-1 -1;
#X obj 156 166 bng 15 250 50 0 empty empty presonus_reset 17 7 0 10
-4032 -1 -1;
#X msg 36 11 sh /home/rob/Documents/bitnbobs/presonus_reset.sh;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 5 0 4 0;
#X connect 6 0 2 0;
#X connect 7 0 1 0;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X coords 0 -1 1 1 170 90 1 100 100;
#X restore 1195 -37 pd system;
#X obj 1200 99 pocketdialgui A;
#X obj 1201 80 pocketdial;
#X obj 75 -221 responses-channel 1 2 0 1 A 1;
#X obj 323 -221 responses-channel 3 4 1 1 B 2;
#X obj 570 -221 responses-channel 5 6 0 0 C 3;
#X obj 817 -221 responses-channel 7 8 1 0 D 4;
#X connect 1 0 4 0;
#X connect 1 1 5 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;

View File

@ -0,0 +1,295 @@
#N canvas 91 177 1287 722 10;
#X declare -lib hexloader -lib iemmatrix;
#X floatatom 123 220 5 0 0 2 azi - -;
#X floatatom 536 -19 5 0 0 2 ele - -;
#X floatatom 211 220 5 0 100 2 spread - -;
#X text 902 262 In two dimensions \, only specify the azimuth. (for
example "define_loudspeakers 2 -45 45 0 180";
#X text 63 21 VBAP and define_loudspeakers;
#X text 904 399 The spread-parameter can be used to prevent a situation
where sound is coming from one speaker only \, which would make speaker
positions "visible". The range is 0 to 100;
#X text 620 99 actual location;
#X floatatom 597 3 5 1 20 2 dist - -;
#X text 902 172 1) Use define_loudspeakers to list the speaker positions.
The example here defines loudspeakers in three dimensions (the first
parameter). For each speaker \, define its azimuth and elevation. Here
we have speakers front left and right with no elevation (-45 0 45 0)
and front and back with 45 degrees of elevation (0 45 180 45). Send
the data to vbap.;
#X floatatom 548 70 5 0 0 3 azi - -;
#X floatatom 592 70 5 0 0 3 ele - -;
#X floatatom 636 70 5 0 0 3 spread - -;
#X floatatom 689 71 5 0 0 3 dist - -;
#N canvas 0 22 699 527 sig 0;
#X obj 58 72 line~;
#X msg 58 49 0 \, 10000 5;
#X obj 58 118 cos~;
#X msg 146 70 1;
#X obj 146 47 loadbang;
#X obj 58 95 clip~ 0 0.25;
#X obj 251 134 line~;
#X obj 251 157 cos~;
#X msg 324 54 -0.25 \, 0.25 100;
#X obj 251 8 loadbang;
#X msg 251 31 -0.25;
#X obj 251 203 *~;
#X obj 58 140 hip~ 5;
#X msg 324 77 -0.25 \, 0.25 400;
#X floatatom 324 145 0 0 0 0 - - -;
#X obj 324 191 osc~ 440;
#X obj 324 168 mtof;
#X msg 324 31 -0.25 \, 0.25 20;
#X obj 251 180 *~ 0.1;
#X msg 324 100 -0.25 \, 0.25 1000;
#X msg 324 144 -0.25 \, 0.25 2000;
#X obj 324 226 *~;
#X obj 342 252 *~;
#X msg 324 8 0;
#X obj 308 257 *~;
#X obj 58 26 metro 2000;
#X floatatom 58 4 0 0 0 0 - - -;
#X text 1 51 impulse;
#X text 362 7 tone;
#X obj 59 184 outlet~;
#X obj 170 6 inlet;
#X obj 442 18 metro 500;
#X obj 91 8 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X connect 0 0 5 0;
#X connect 1 0 0 0;
#X connect 2 0 12 0;
#X connect 3 0 0 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 7 0 18 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 10 0 6 0;
#X connect 11 0 12 0;
#X connect 12 0 29 0;
#X connect 13 0 6 0;
#X connect 14 0 16 0;
#X connect 15 0 11 1;
#X connect 15 0 21 0;
#X connect 15 0 21 1;
#X connect 15 0 22 0;
#X connect 16 0 15 0;
#X connect 17 0 6 0;
#X connect 18 0 11 0;
#X connect 19 0 6 0;
#X connect 20 0 6 0;
#X connect 21 0 22 1;
#X connect 21 0 11 1;
#X connect 21 0 24 0;
#X connect 21 0 24 1;
#X connect 22 0 11 1;
#X connect 23 0 6 0;
#X connect 24 0 11 1;
#X connect 25 0 1 0;
#X connect 26 0 25 0;
#X connect 30 0 31 0;
#X connect 31 0 8 0;
#X connect 32 0 25 0;
#X restore 548 234 pd sig;
#X obj 548 206 tgl 24 0 empty empty test-sigs 26 7 1 10 -262144 -1
-1 0 1;
#X obj 504 177 mtx 8 1;
#N canvas 346 244 547 360 set-element 0;
#X obj 70 81 unpack 0 0;
#X obj 70 104 + 1;
#X obj 70 137 pack 0 1 0;
#X obj 70 179 list trim;
#X obj 70 158 list prepend element;
#X obj 70 59 inlet;
#X obj 70 261 outlet;
#X obj 70 221 t b a;
#X text 48 33 transforms rvbap-output to be used with [mtx] from iemmatrix
;
#X connect 0 0 1 0;
#X connect 0 1 2 2;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 7 0;
#X connect 4 0 3 0;
#X connect 5 0 0 0;
#X connect 7 0 6 0;
#X connect 7 1 6 0;
#X restore 504 153 pd set-element;
#N canvas 181 626 802 273 peek 0;
#X floatatom 55 198 10 0 0 0 - - -;
#X floatatom 134 198 10 0 0 0 - - -;
#X floatatom 213 198 10 0 0 0 - - -;
#X floatatom 292 198 10 0 0 0 - - -;
#X obj 55 74 route 0 1 2 3 4 5 6 7;
#X floatatom 366 197 10 0 0 0 - - -;
#X floatatom 445 197 10 0 0 0 - - -;
#X floatatom 524 197 10 0 0 0 - - -;
#X floatatom 603 197 10 0 0 0 - - -;
#X obj 55 49 inlet;
#X connect 4 0 0 0;
#X connect 4 1 1 0;
#X connect 4 2 2 0;
#X connect 4 3 3 0;
#X connect 4 4 5 0;
#X connect 4 5 6 0;
#X connect 4 6 7 0;
#X connect 4 7 8 0;
#X connect 9 0 4 0;
#X restore 518 127 pd peek;
#X floatatom 590 256 5 0 0 1 interp - -;
#N canvas 1 96 450 300 tba 0;
#X obj 143 51 inlet;
#X obj 96 49 inlet;
#X obj 191 51 inlet;
#X obj 238 51 inlet;
#X obj 173 180 outlet;
#X obj 61 178 outlet;
#X obj 221 180 outlet;
#X obj 268 180 outlet;
#X obj 126 180 outlet;
#X obj 96 73 t b a;
#X obj 143 72 t b a;
#X obj 191 72 t b a;
#X obj 238 72 t b a;
#X connect 0 0 10 0;
#X connect 1 0 9 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 9 0 5 0;
#X connect 9 1 8 0;
#X connect 10 0 5 0;
#X connect 10 1 4 0;
#X connect 11 0 5 0;
#X connect 11 1 6 0;
#X connect 12 0 5 0;
#X connect 12 1 7 0;
#X restore 525 5 pd tba;
#X obj 601 -29 hsl 64 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X text 903 76 rvbap is almost compatible to;
#X obj 504 288 mtx_*~ 8 1 20;
#X text 905 96 Additionally it generates additional commands for controlling
a reverberated signal and has control to set the radial distance of
a sound.;
#X text 904 458 3) rvbap also will generate messages to control the
amount of reverberated signal to generate. This is meant to be used
with [matrix~] or [mtx_*~] from the IEMmatrix collection of externals.
;
#X text 905 316 2) For rvbap \, give azimuth and elevation and a distance
(1-inf \, default 1) for the desired location. Bang the first inlet
and vbap will output gain-factors for each speaker and the actual location
produced. This can be different from the desired one depending where
your speakers are.;
#X text 907 650 See rvbap-demo.pd for a more complex setup.;
#X text 903 528 To use it \, create a [mtx_*~] object that has double
the amount of outlets as you have speakers. Send the first half of
the matrix-signals to the speakers and the second half through a reverbarator
and add them to the respective speaker outs. The example shows this
in action for four speakers. Pay attention to the "set-element" subpatch
which translates the [rvbap] output to set matrix elements correctly.
;
#X text 582 128 <= here's the output of [rvbap];
#X obj 1084 76 pddp/helplink vbap;
#X obj 1107 38 import hexloader iemmatrix;
#X obj 411 171 inlet~;
#X obj 504 39 vbap 0 0;
#X msg 459 -144 bang;
#X obj 495 511 dac~ 1 2 3 4 5 6 7 8;
#X obj 497 -177 loadbang;
#X obj 370 374 gainvu~;
#X obj 186 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 198 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 162 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 174 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 234 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 246 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 210 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 222 118 vu 8 80 empty empty -1 -8 0 4 -66577 -1 1 0;
#X obj 419 374 gainvu~;
#X obj 467 374 gainvu~;
#X obj 516 374 gainvu~;
#X obj 567 373 gainvu~;
#X obj 616 373 gainvu~;
#X obj 664 373 gainvu~;
#X obj 713 373 gainvu~;
#X obj 684 195 noise~;
#X obj 123 118 vsl 33 80 0 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 6220 1;
#X obj 724 333 f;
#X obj 260 366 init 100;
#X msg 191 411 100;
#X obj 18 494 pack f f;
#X floatatom 18 542 5 0 0 0 - - -;
#X obj 18 339 grid grid1 144 0 1 144 0 1 0 0 0 10 10 93 395;
#X floatatom 118 542 5 0 0 0 - - -;
#X obj 18 519 graph-to-aziele;
#X obj 484 -92 define_loudspeakers 2 -45 0 45 90 135 180 -135 -90;
#X connect 0 0 19 0;
#X connect 1 0 19 1;
#X connect 2 0 19 2;
#X connect 7 0 19 3;
#X connect 13 0 22 1;
#X connect 14 0 13 0;
#X connect 15 0 22 0;
#X connect 16 0 15 0;
#X connect 18 0 22 2;
#X connect 19 0 32 0;
#X connect 19 1 32 1;
#X connect 19 2 32 2;
#X connect 19 3 32 3;
#X connect 20 0 7 0;
#X connect 22 0 36 0;
#X connect 22 1 45 0;
#X connect 22 2 46 0;
#X connect 22 3 47 0;
#X connect 22 4 48 0;
#X connect 22 5 49 0;
#X connect 22 6 50 0;
#X connect 22 7 51 0;
#X connect 31 0 22 1;
#X connect 32 0 16 0;
#X connect 32 0 17 0;
#X connect 32 1 9 0;
#X connect 32 2 10 0;
#X connect 32 3 11 0;
#X connect 33 0 62 0;
#X connect 35 0 62 0;
#X connect 36 0 34 0;
#X connect 36 2 39 0;
#X connect 45 0 34 1;
#X connect 45 2 40 0;
#X connect 46 0 34 2;
#X connect 46 2 37 0;
#X connect 47 0 34 3;
#X connect 47 2 38 0;
#X connect 48 0 34 4;
#X connect 48 2 43 0;
#X connect 49 0 34 5;
#X connect 49 2 44 0;
#X connect 50 0 34 6;
#X connect 50 2 41 0;
#X connect 51 0 34 7;
#X connect 51 2 42 0;
#X connect 52 0 22 1;
#X connect 53 0 54 0;
#X connect 54 0 36 1;
#X connect 54 0 45 1;
#X connect 54 0 46 1;
#X connect 54 0 47 1;
#X connect 54 0 48 1;
#X connect 54 0 49 1;
#X connect 54 0 50 1;
#X connect 54 0 51 1;
#X connect 55 0 53 0;
#X connect 56 0 53 0;
#X connect 57 0 61 0;
#X connect 59 0 57 0;
#X connect 59 1 57 1;
#X connect 61 0 58 0;
#X connect 61 0 0 0;
#X connect 61 1 60 0;
#X connect 61 1 2 0;
#X connect 62 0 32 0;
#X coords 0 -1 1 1 240 140 1 100 100;

View File

@ -0,0 +1,55 @@
#N canvas 304 297 813 602 10;
#X declare -lib iemgui;
#X obj 176 357 t b b;
#X msg 178 379 1;
#X obj 173 498 outlet~;
#X obj 203 523 outlet~;
#X obj 174 470 *~;
#X obj 202 471 *~;
#X obj 103 125 vsl 8 80 0 1 0 0 empty empty empty 0 -9 0 10 -204786
-1 -1 0 1;
#X obj 162 125 vu 8 80 empty empty -1 -8 0 5 -66577 -1 1 0;
#X obj 59 154 env~;
#X obj 363 128 import iemgui;
#X obj 121 153 knob 32 32 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 1611 1;
#X obj 118 193 nbx 3 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-204800 -1 -1 9.69127 256;
#X obj 119 123 nbx 3 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-204800 -1 -1 0 256;
#X obj 275 456 r \$0amp;
#X obj 226 101 s \$0amp;
#X obj 299 479 r \$0amp;
#X obj 174 125 vu 8 80 empty empty -1 -8 0 5 -66577 -1 1 0;
#X obj 96 28 loadbang;
#X msg 93 49 66;
#X obj 280 318 env~;
#X obj 307 319 env~;
#X obj 307 338 - 96;
#X obj 276 339 - 96;
#X obj 173 408 adc~ \$2 \$3;
#X obj 110 408 inlet~;
#X connect 0 0 1 0;
#X connect 1 0 23 0;
#X connect 4 0 2 0;
#X connect 4 0 19 0;
#X connect 5 0 3 0;
#X connect 5 0 20 0;
#X connect 6 0 12 0;
#X connect 8 0 11 0;
#X connect 12 0 14 0;
#X connect 13 0 5 1;
#X connect 13 0 4 1;
#X connect 15 0 5 1;
#X connect 17 0 18 0;
#X connect 18 0 10 0;
#X connect 19 0 22 0;
#X connect 20 0 21 0;
#X connect 21 0 16 0;
#X connect 22 0 7 0;
#X connect 23 0 4 0;
#X connect 23 0 8 0;
#X connect 23 1 5 0;
#X connect 24 0 4 0;
#X connect 24 0 5 0;
#X coords 0 -1 1 1 100 110 1 100 100;

View File

@ -0,0 +1,38 @@
#N canvas 9 96 871 352 10;
#X obj 50 80 playsample~;
#X obj 50 55 openpanel;
#X msg 50 31 bang;
#X text 96 30 click to load and play a sample;
#X floatatom 133 80 5 0 0 0 - - -;
#X floatatom 133 101 5 0 0 0 - - -;
#X text 182 80 pitch;
#X text 182 102 volume;
#X floatatom 76 142 5 0 0 0 - - -;
#X floatatom 122 142 5 0 0 0 - - -;
#X floatatom 168 142 5 0 0 0 - - -;
#X text 218 143 set azimuth \, elevation \, spread;
#N canvas 150 436 615 353 using 1;
#X obj 59 258 graph-to-aziele;
#X obj 59 233 pack f f;
#X floatatom 59 281 5 0 0 0 - - -;
#X obj 59 78 grid grid1 144 0 1 144 0 1 0 0.001 0.001 10 10 127 113
;
#X floatatom 159 281 5 0 0 0 - - -;
#X text 21 17 To use Yves Degoyon's GRID (http://ydegoyon.free.fr)
use graph-to-aziele.pd to count the azimuth and elevation.;
#X text 25 49 (note: GRID must output values between 0 - 1);
#X connect 0 0 2 0;
#X connect 0 1 4 0;
#X connect 1 0 0 0;
#X connect 3 0 1 0;
#X connect 3 1 1 1;
#X restore 506 112 pd using GRID with vbap;
#X obj 50 174 vbapmodule 1;
#X connect 0 0 13 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 4 0 0 1;
#X connect 5 0 0 2;
#X connect 8 0 13 1;
#X connect 9 0 13 2;
#X connect 10 0 13 3;

View File

@ -0,0 +1,22 @@
#N canvas 92 396 450 300 10;
#X obj 30 44 inlet~;
#X obj 62 158 send matrix;
#X obj 46 183 throw~ \$1chan;
#X floatatom 180 186 5 0 0 0 - - -;
#X floatatom 225 186 5 0 0 0 - - -;
#X floatatom 270 186 5 0 0 0 - - -;
#X text 137 217 actual azi / ele / spread;
#X obj 82 44 inlet;
#X obj 122 44 inlet;
#X obj 162 44 inlet;
#X text 210 44 azi / ele / spread;
#X obj 46 112 vbapsnd \$1;
#X connect 0 0 11 0;
#X connect 7 0 11 1;
#X connect 8 0 11 2;
#X connect 9 0 11 3;
#X connect 11 0 2 0;
#X connect 11 1 1 0;
#X connect 11 2 3 0;
#X connect 11 3 4 0;
#X connect 11 4 5 0;

View File

@ -0,0 +1,68 @@
#N canvas 31 96 661 597 10;
#X obj 133 20 inlet;
#X obj 189 171 vbap 0 0;
#X obj 240 20 inlet;
#X obj 359 20 inlet;
#X text 176 19 azimuth;
#X text 285 19 elevation;
#X text 405 19 spread;
#X obj 233 460 pack f f f;
#X obj 298 437 float \$1;
#X obj 298 414 loadbang;
#X msg 233 495 element \$3 \$1 \$2;
#X text 287 536 to matrix object;
#X obj 441 535 outlet;
#X obj 488 535 outlet;
#X obj 535 535 outlet;
#X obj 359 78 t b f;
#X obj 240 80 t b f;
#X obj 133 80 t b f;
#X obj 189 106 receive speaker_setup;
#X obj 189 256 unpack f f;
#X obj 189 279 + 1;
#X obj 167 429 ==;
#X obj 167 453 sel 1;
#X obj 189 303 t f f f;
#X obj 195 429 high;
#X obj 233 536 outlet;
#X obj 31 20 inlet~;
#X obj 31 83 outlet~;
#X text 28 113 for convenience;
#X floatatom 489 62 5 0 0 0 - - -;
#X obj 359 49 recent 10;
#X obj 240 51 recent 10;
#X obj 133 51 recent 10;
#X connect 0 0 32 0;
#X connect 1 0 19 0;
#X connect 1 1 12 0;
#X connect 1 2 13 0;
#X connect 1 3 14 0;
#X connect 2 0 31 0;
#X connect 3 0 30 0;
#X connect 7 0 10 0;
#X connect 8 0 7 2;
#X connect 9 0 8 0;
#X connect 10 0 25 0;
#X connect 15 0 1 0;
#X connect 15 1 1 3;
#X connect 16 0 1 0;
#X connect 16 1 1 2;
#X connect 17 0 1 0;
#X connect 17 1 1 1;
#X connect 18 0 1 0;
#X connect 19 0 20 0;
#X connect 19 1 7 1;
#X connect 20 0 23 0;
#X connect 21 0 22 0;
#X connect 22 0 25 0;
#X connect 23 0 21 0;
#X connect 23 1 24 0;
#X connect 23 2 7 0;
#X connect 24 0 21 1;
#X connect 26 0 27 0;
#X connect 29 0 30 1;
#X connect 29 0 31 1;
#X connect 29 0 32 1;
#X connect 30 0 15 0;
#X connect 31 0 16 0;
#X connect 32 0 17 0;

22
ly/A.ly 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
xA2...~ \fermata ^\markup { \box { "7''" }} \hideNotes xA16 \unHideNotes \bar "'" %1
s16 <xB xC>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
xD1~ ^\markup { \box { " 7'' " }} \bar "'" %1
xE1 \fermata \bar "'" %1
s2.
s1
xF4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
xG1 \startTrillSpan xA ^\markup { \box { "5''" }} \bar "'" %1
xA1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/B.ly 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
xA2.\glissando\< \bar "'"
xB1~\> \bar "'"
\tieHalfDashed xB2~ \hideNotes xB2~ \bar "'"
\tieHalfDashed xB2~ xB2~ \unHideNotes \bar "'"
xD1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< xE xF>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

11
ly/D.ly 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <xA xB xC xD xE>2\laissezVibrer
}

11
ly/DRONE.ly 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <xA xB xC xD xE>2\laissezVibrer
}

22
ly/LH.ly 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
xA2...~ \fermata ^\markup { \box { "7''" }} \hideNotes xA16 \unHideNotes \bar "'" %1
s16 <xB xC>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
xD1~ ^\markup { \box { " 7'' " }} \bar "'" %1
xE1 \fermata \bar "'" %1
s2.
s1
xF4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
xG1 \startTrillSpan xA ^\markup { \box { "5''" }} \bar "'" %1
xA1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

12
ly/R.ly 100755
View File

@ -0,0 +1,12 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
%\override NoteHead #'style = #'xcircle
xA'1 \verylongfermata ^\markup{"recorder....."}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

12
ly/RECORDER.ly 100755
View File

@ -0,0 +1,12 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
%\override NoteHead #'style = #'xcircle
xA'1 \verylongfermata ^\markup{"recorder....."}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/RH.ly 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
xA2.\glissando\< \bar "'"
xB1~\> \bar "'"
\tieHalfDashed xB2~ \hideNotes xB2~ \bar "'"
\tieHalfDashed xB2~ xB2~ \unHideNotes \bar "'"
xD1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< xE xF>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

69
ly/V.ly 100755
View File

@ -0,0 +1,69 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. xA4.-\markup{"Loi..."}\glissando\< s4
xB2..~-\markup{"di--s..."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 xB8~-\markup{"sssss...."} xB1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
xA'1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
xC4-\markup{"e..."}\fermata\glissando(
\tieDotted
xD'2.)~-\markup{"...l...met!"}
\override NoteHead #'style = #'cross
\hideNotes xD~ \unHideNotes xA'1^\markup{"flax!"} s1
\override NoteHead #'style = #'xcircle
s1 xB'4.~-\markup{"w- ooooo - l"} s1
\override NoteHead #'style = #'cross
s1 xE8~-\markup{"shhhhhh...."} xE1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<xD' xA'>1 \verylongfermata ^\markup{"(Recorder)"}

View File

@ -0,0 +1,69 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. xA4.-\markup{"Stou..."}\glissando\< s4
xB2..~-\markup{"rrr..."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 xB8~-\markup{"sssss..il..kkkk"} xB1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
xA'1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
xC4-\markup{"ca...n"}\fermata\glissando(
\tieDotted
xD'2.)~-\markup{"ti...aa...ci!"}
\override NoteHead #'style = #'cross
\hideNotes xD~ \unHideNotes xA'1^\markup{"Kant!"} s1
\override NoteHead #'style = #'xcircle
s1 xB'4.~-\markup{"cla-y"} s1
\override NoteHead #'style = #'cross
s1 xE8~-\markup{"cant..ti..a..cor..um"} xE1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<xD' xA'>1 \verylongfermata ^\markup{"(Recorder)"}

67
ly/VOICE-LEEDS.ly 100755
View File

@ -0,0 +1,67 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. xA4.-\markup{"Loi..."}\glissando\< s4
xB2..~-\markup{"di--s..."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 xB8~-\markup{"sssss...."} xB1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
xA'1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
xC4-\markup{"chau..."}\fermata\glissando(
\tieDotted
xD'2.)~-\markup{"...ss..errrr!"}
\override NoteHead #'style = #'cross
\hideNotes xD~ \unHideNotes xA'1^\markup{"kent!"} s1
\override NoteHead #'style = #'xcircle
s1 xB'4.~-\markup{"w- ooooo - l"} s1
\override NoteHead #'style = #'cross
s1 xE8~-\markup{"shhhhhh...."} xE1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<xD' xA'>1 \verylongfermata ^\markup{"(Recorder)"}

69
ly/VOICE.ly 100755
View File

@ -0,0 +1,69 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. xA4.-\markup{"black..."}\glissando\< s4
xB2..~-\markup{"cat...."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 xB8~-\markup{"rave--ins--bo--ourn"} xB1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
xA'1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
xC4-\markup{"||:excalibur:||"}\fermata\glissando(
\tieDotted
xD'2.)~-\markup{"47..136...54...75..136..60"}
\override NoteHead #'style = #'cross
\hideNotes xD~ \unHideNotes xA'1^\markup{"Witch!"} s1
\override NoteHead #'style = #'xcircle
s1 xB'4.~-\markup{"1 - 7 - 1"} s1
\override NoteHead #'style = #'cross
s1 xE8~-\markup{"drown...in...the..ford"} xE1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<xD' xA'>1 \verylongfermata ^\markup{"(Recorder)"}

181
ly/current.ly 100755
View File

@ -0,0 +1,181 @@
% LilyPond score file
\version "2.16.2"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Dislocated Spaces %%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 2014 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Rob Canning %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%% "Copyright Rob Canning 2014 %%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%% (Attribution-Non-Commercxial 2.0 UK %%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%% http://creativecommons.org %%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% http://rob.kiben.net %%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%modern = \accidentalStyle modern
%modernCautionary = \accidentalStyle modern-cautionary
proportionalStuff = {
% \set suggestAccidentals = ##t
\time 4/4
\override NoteHead #'style = #'neomensural
\override Stem #'length = #0
\override Score.Rest #'transparent = ##t
\override Score.Dots #'stencil = ##f
\override Flag #'stencil = #no-flag
\override Score.Stem #'transparent = ##t
\override Beam #'transparent = ##t
\override Staff.BarLine #'transparent = ##f
\override TupletNumber #'transparent = ##t
\override TupletBracket #'transparent = ##t
\override Staff.TimeSignature #'stencil = ##f
\override Staff.TimeSignature #'transparent = ##t
%\override Tie #'details #'ratio = #0.01
%\override Tie #'details #'height-limit = #0
%\override TextScript #'X-offset = #-16
\override TextScript #'Y-offset = #0
\override TextScript #'(font-name) = "Baskerville"
\override TextScript #'font-size = #-2
}
%%% THESE STRINGS GET REPLACED BY A SCRIPt
%%% WHICH INJECTS CONTENTS IN THEIR PLACE
DRONE
addin = \new Voice {
ADDIN
}
spacerVoice = \new Voice {
\proportionalStuff
\override MultiMeasureRest #'minimum-length = #18
\override MultiMeasureRest #'transparent = ##t
R1
}
markOrnIn = \once \override Script #'script-priority = #-100
textSpan = #(define-music-function (par loc dir str) (number? string?) #{\override TextSpanner #'direction = #$dir \override TextSpanner #'edge-text = #(cons $str ":") #})
noteHead = #(define-music-function (par loc sty) (symbol?) #{\once \override NoteHead #'style = #$sty #})
voiceA = {
\set Staff.instrumentName = ""
\set Staff.shortInstrumentName = ""
\change Staff = A \override Staff.TimeSignature #'style = #'()
\change Staff = B \override Staff.TimeSignature #'style = #'()
\override Staff.TimeSignature #'stencil = ##f
\override TupletNumber #'text = #tuplet-number::calc-fraction-text
\override NoteHead #'duration-log = #5
\override NoteHead #'style = #'neomensural
\autoBeamOff
#(set-accidental-style 'voice)
\change Staff = A \clef treble
\change Staff = B \clef bass
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
<< {\time 4/4
\voiceOne \change Staff = A
\override TextSpanner #'style = #'trill
\override TrillSpanner #'bound-details #'left #'text = #'()
\override Score.BarLine #'color = #black
%\override Staff.BarLine #'hair-thickness = #4.75
\override NoteHead #'duration-log = #5
\override Score.BarNumber #'Y-offset = #2
\override TextScript #'(font-name) = "Baskerville"
\override TextScript #'font-size = #-2
% RH.ly %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'style = #'diamond
\override NoteHead #'duration-log = #5
AAAAA
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
} \\
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\set Staff.pedalSustainStyle = #'bracket
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{
\proportionalStuff
\change Staff = B
\override NoteHead #'style = #'diamond
\override NoteHead #'duration-log = #5
BBBBB
s1 \bar ":|."
}
>>
}
voiceDrone = { \repeat unfold 58 { \drone }}
voiceAddin = {
\repeat unfold 4 { \addin }
}
voiceAS = {
% \skip 1*4/4*18
#(set-accidental-style 'voice)
\override NoteHead #'duration-log = #5
\override NoteHead #'style = #'neomensural
\repeat unfold 50 { \spacerVoice }
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
#(set-default-paper-size "a3" 'landscape)
#(set-global-staff-size 23)
\paper {
%page-count = 2
top-system-spacing #'minimum-distance = #22
top-system-spacing #'space = #22
last-bottom-spacing #'minimum-distance = #22
last-bottom-spacing #'space = #22
last-bottom-spacing #'padding = #2
last-bottom-spacing #'stretchability = #2
top-margin = 1\cm
bottom-margin = 1\cm
evenFooterMarkup = \markup \fill-line \override #'(font-name . "Optima") \fontsize #-2 {"Copyright Rob Canning 2014-2015 (Attribution-Non-Commercial 2.0 UK http://creativecommons.org)"}
oddFooterMarkup = \markup \fill-line \override #'(font-name . "Optima") \fontsize #-2 { " h t t p : / / r o b . k i b e n . n e t" }
evenHeaderMarkup = \markup \fill-line { " [D i s] L o c a t e d S p a c e [s] " }
between-system-space = 1\cm
ragged-bottom=##f
}
\header {
title = \markup \fontsize #3 {" [ D i s ] L o c a t e d S p a c e [s] "}
composer =\markup \override #'(font-name . "Optima") \fontsize #-1 {" R o b C a n n i n g 2 0 1 4 "}
subtitle = \markup \override #'(font-name . "Optima") \fontsize #1 {" f o r O r g a n a n d E l e c t r o n i c s "}
%subsubtitle = \markup \override #'(font-name . "Optima") \fontsize #-1 {" "}
subsubtitle = \markup \override #'(font-name . "Optima") \fontsize #-3 {" f o r L a u r e n R e d h e a d - Canterbury Version "}
}
\score {
\new PianoStaff <<
#(set-accidental-style 'voice)
\context Staff = A \new Voice \voiceAS
\context Staff = B \new Voice \voiceAS
\context Staff = A \new Voice \voiceA
\context Staff = B \new Voice \voiceDrone
\context Staff = A \new Voice \voiceAddin
>>
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

View File

@ -0,0 +1,609 @@
% LilyPond score file
\version "2.16.2"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Dislocated Spaces %%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 2014 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Rob Canning %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%% "Copyright Rob Canning 2014 %%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%% (Attribution-Non-Commercxial 2.0 UK %%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%% http://creativecommons.org %%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% http://rob.kiben.net %%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%modern = \accidentalStyle modern
%modernCautionary = \accidentalStyle modern-cautionary
proportionalStuff = {
% \set suggestAccidentals = ##t
\time 4/4
\override NoteHead #'style = #'neomensural
\override Stem #'length = #0
\override Score.Rest #'transparent = ##t
\override Score.Dots #'stencil = ##f
\override Flag #'stencil = #no-flag
\override Score.Stem #'transparent = ##t
\override Beam #'transparent = ##t
\override Staff.BarLine #'transparent = ##f
\override TupletNumber #'transparent = ##t
\override TupletBracket #'transparent = ##t
\override Staff.TimeSignature #'stencil = ##f
\override Staff.TimeSignature #'transparent = ##t
%\override Tie #'details #'ratio = #0.01
%\override Tie #'details #'height-limit = #0
%\override TextScript #'X-offset = #-16
\override TextScript #'Y-offset = #0
\override TextScript #'(font-name) = "Baskerville"
\override TextScript #'font-size = #-2
}
%%% THESE STRINGS GET REPLACED BY A SCRIPt
%%% WHICH INJECTS CONTENTS IN THEIR PLACE
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <bes' c ees, a, g,>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <ees, a, g, bes' c>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <g, bes' c ees, a,>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <c ees, a, g, bes'>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <a, g, bes' c ees,>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <bes' c ees, a, g,>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <ees, a, g, bes' c>2\laissezVibrer
}
addin = \new Voice {
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. c'4.-\markup{"black..."}\glissando\< s4
ees2..~-\markup{"cat...."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 ees8~-\markup{"rave--ins--bo--ourn"} ees1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
c''1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
des'4-\markup{"||:excalibur:||"}\fermata\glissando(
\tieDotted
bes'2.)~-\markup{"47..136...54...75..136..60"}
\override NoteHead #'style = #'cross
\hideNotes bes~ \unHideNotes c''1^\markup{"Witch!"} s1
\override NoteHead #'style = #'xcircle
s1 ees'4.~-\markup{"1 - 7 - 1"} s1
\override NoteHead #'style = #'cross
s1 c'8~-\markup{"drown...in...the..ford"} c'1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<bes' c''>1 \verylongfermata ^\markup{"(Recorder)"}
}
spacerVoice = \new Voice {
\proportionalStuff
\override MultiMeasureRest #'minimum-length = #18
\override MultiMeasureRest #'transparent = ##t
R1
}
markOrnIn = \once \override Script #'script-priority = #-100
textSpan = #(define-music-function (par loc dir str) (number? string?) #{\override TextSpanner #'direction = #$dir \override TextSpanner #'edge-text = #(cons $str ":") #})
noteHead = #(define-music-function (par loc sty) (symbol?) #{\once \override NoteHead #'style = #$sty #})
voiceA = {
\set Staff.instrumentName = ""
\set Staff.shortInstrumentName = ""
\change Staff = A \override Staff.TimeSignature #'style = #'()
\change Staff = B \override Staff.TimeSignature #'style = #'()
\override Staff.TimeSignature #'stencil = ##f
\override TupletNumber #'text = #tuplet-number::calc-fraction-text
\override NoteHead #'duration-log = #5
\override NoteHead #'style = #'neomensural
\autoBeamOff
#(set-accidental-style 'voice)
\change Staff = A \clef treble
\change Staff = B \clef bass
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
<< {\time 4/4
\voiceOne \change Staff = A
\override TextSpanner #'style = #'trill
\override TrillSpanner #'bound-details #'left #'text = #'()
\override Score.BarLine #'color = #black
%\override Staff.BarLine #'hair-thickness = #4.75
\override NoteHead #'duration-log = #5
\override Score.BarNumber #'Y-offset = #2
\override TextScript #'(font-name) = "Baskerville"
\override TextScript #'font-size = #-2
% RH.ly %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'style = #'diamond
\override NoteHead #'duration-log = #5
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
des'2...~ \fermata ^\markup { \box { "7''" }} \hideNotes des'16 \unHideNotes \bar "'" %1
s16 <bes' bes''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
c'''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
a''1 \fermata \bar "'" %1
s2.
s1
g''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
fis'''1 \startTrillSpan des' ^\markup { \box { "5''" }} \bar "'" %1
des'1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
g''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes g''16 \unHideNotes \bar "'" %1
s16 <fis''' des'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
bes'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
bes''1 \fermata \bar "'" %1
s2.
s1
c'''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
a''1 \startTrillSpan g'' ^\markup { \box { "5''" }} \bar "'" %1
g''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
c'''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes c'''16 \unHideNotes \bar "'" %1
s16 <a'' g''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
fis'''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
des'1 \fermata \bar "'" %1
s2.
s1
bes'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
bes''1 \startTrillSpan c''' ^\markup { \box { "5''" }} \bar "'" %1
c'''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
bes'2...~ \fermata ^\markup { \box { "7''" }} \hideNotes bes'16 \unHideNotes \bar "'" %1
s16 <bes'' c'''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
a''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
g''1 \fermata \bar "'" %1
s2.
s1
fis'''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
des'1 \startTrillSpan bes' ^\markup { \box { "5''" }} \bar "'" %1
bes'1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
fis'''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes fis'''16 \unHideNotes \bar "'" %1
s16 <des' bes'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
bes''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
c'''1 \fermata \bar "'" %1
s2.
s1
a''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
g''1 \startTrillSpan fis''' ^\markup { \box { "5''" }} \bar "'" %1
fis'''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
a''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes a''16 \unHideNotes \bar "'" %1
s16 <g'' fis'''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
des'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
bes'1 \fermata \bar "'" %1
s2.
s1
bes''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
c'''1 \startTrillSpan a'' ^\markup { \box { "5''" }} \bar "'" %1
a''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
bes''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes bes''16 \unHideNotes \bar "'" %1
s16 <c''' a''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
g''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
fis'''1 \fermata \bar "'" %1
s2.
s1
des'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
bes'1 \startTrillSpan bes'' ^\markup { \box { "5''" }} \bar "'" %1
bes''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
} \\
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\set Staff.pedalSustainStyle = #'bracket
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{
\proportionalStuff
\change Staff = B
\override NoteHead #'style = #'diamond
\override NoteHead #'duration-log = #5
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes2.\glissando\< \bar "'"
des1~\> \bar "'"
\tieHalfDashed des2~ \hideNotes des2~ \bar "'"
\tieHalfDashed des2~ des2~ \unHideNotes \bar "'"
bes1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< a' g'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
g'2.\glissando\< \bar "'"
fis'1~\> \bar "'"
\tieHalfDashed fis'2~ \hideNotes fis'2~ \bar "'"
\tieHalfDashed fis'2~ fis'2~ \unHideNotes \bar "'"
des1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis, bes>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes2.\glissando\< \bar "'"
a'1~\> \bar "'"
\tieHalfDashed a'2~ \hideNotes a'2~ \bar "'"
\tieHalfDashed a'2~ a'2~ \unHideNotes \bar "'"
fis'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< bes des>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
des2.\glissando\< \bar "'"
fis,1~\> \bar "'"
\tieHalfDashed fis,2~ \hideNotes fis,2~ \bar "'"
\tieHalfDashed fis,2~ fis,2~ \unHideNotes \bar "'"
a'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< g' fis'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis'2.\glissando\< \bar "'"
bes1~\> \bar "'"
\tieHalfDashed bes2~ \hideNotes bes2~ \bar "'"
\tieHalfDashed bes2~ bes2~ \unHideNotes \bar "'"
fis,1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< bes a'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
a'2.\glissando\< \bar "'"
g'1~\> \bar "'"
\tieHalfDashed g'2~ \hideNotes g'2~ \bar "'"
\tieHalfDashed g'2~ g'2~ \unHideNotes \bar "'"
bes1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< des fis,>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis,2.\glissando\< \bar "'"
bes1~\> \bar "'"
\tieHalfDashed bes2~ \hideNotes bes2~ \bar "'"
\tieHalfDashed bes2~ bes2~ \unHideNotes \bar "'"
g'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis' bes>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes2.\glissando\< \bar "'"
des1~\> \bar "'"
\tieHalfDashed des2~ \hideNotes des2~ \bar "'"
\tieHalfDashed des2~ des2~ \unHideNotes \bar "'"
bes1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< a' g'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
g'2.\glissando\< \bar "'"
fis'1~\> \bar "'"
\tieHalfDashed fis'2~ \hideNotes fis'2~ \bar "'"
\tieHalfDashed fis'2~ fis'2~ \unHideNotes \bar "'"
des1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis, bes>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
s1 \bar ":|."
}
>>
}
voiceDrone = { \repeat unfold 58 { \drone }}
voiceAddin = {
\repeat unfold 4 { \addin }
}
voiceAS = {
% \skip 1*4/4*18
#(set-accidental-style 'voice)
\override NoteHead #'duration-log = #5
\override NoteHead #'style = #'neomensural
\repeat unfold 50 { \spacerVoice }
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
#(set-default-paper-size "a3" 'landscape)
#(set-global-staff-size 23)
\paper {
%page-count = 2
top-system-spacing #'minimum-distance = #22
top-system-spacing #'space = #22
last-bottom-spacing #'minimum-distance = #22
last-bottom-spacing #'space = #22
last-bottom-spacing #'padding = #2
last-bottom-spacing #'stretchability = #2
top-margin = 1\cm
bottom-margin = 1\cm
evenFooterMarkup = \markup \fill-line \override #'(font-name . "Optima") \fontsize #-2 {"Copyright Rob Canning 2014-2015 (Attribution-Non-Commercial 2.0 UK http://creativecommons.org)"}
oddFooterMarkup = \markup \fill-line \override #'(font-name . "Optima") \fontsize #-2 { " h t t p : / / r o b . k i b e n . n e t" }
evenHeaderMarkup = \markup \fill-line { " [D i s] L o c a t e d S p a c e [s] " }
between-system-space = 1\cm
ragged-bottom=##f
}
\header {
title = \markup \fontsize #3 {" [ D i s ] L o c a t e d S p a c e [s] "}
composer =\markup \override #'(font-name . "Optima") \fontsize #-1 {" R o b C a n n i n g 2 0 1 4 "}
subtitle = \markup \override #'(font-name . "Optima") \fontsize #1 {" f o r O r g a n a n d E l e c t r o n i c s "}
%subsubtitle = \markup \override #'(font-name . "Optima") \fontsize #-1 {" "}
subsubtitle = \markup \override #'(font-name . "Optima") \fontsize #-3 {" f o r L a u r e n R e d h e a d - Canterbury Version "}
}
\score {
\new PianoStaff <<
#(set-accidental-style 'voice)
\context Staff = A \new Voice \voiceAS
\context Staff = B \new Voice \voiceAS
\context Staff = A \new Voice \voiceA
\context Staff = B \new Voice \voiceDrone
\context Staff = A \new Voice \voiceAddin
>>
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

35
ly/titlepage.ly 100755
View File

@ -0,0 +1,35 @@
\version "2.12.2"
#(set-global-staff-size 35)
#(define-markup-command (vspace layout props amount) (number?)
"This produces a invisible object taking vertical space."
(ly:make-stencil "" (cons -1 1) (cons 0 amount))
(ly:make-stencil "" (cons -1 1) (cons amount amount)))
titlePageMarkup = \markup \abs-fontsize #10 \column {
\vspace #54
\fill-line { \override #'(font-name . "Optima") \fontsize #32 \bold \fromproperty #'header:title }
\vspace #9
\fontsize #10 \fill-line { \override #'(font-name . "Optima") \fromproperty #'header:subtitle }
\vspace #8
% \fontsize #7 \fill-line { \fromproperty #'header:subsubtitle }
% \vspace #56
\fill-line { \override #'(font-name . "Optima") \fontsize #7 \fromproperty #'header:composer }
\vspace #24
% \fill-line { \postscript #"-20 0 moveto 40 0 rlineto stroke" }
% \vspace #48
}
\paper {
bookTitleMarkup = \titlePageMarkup
}
\pageBreak

11
ly/tmp/DRONE.ly 100755
View File

@ -0,0 +1,11 @@
r1 \bar ":" %%XXXXXXXdrone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <g, c bes fis' ees''>2\laissezVibrer
}

11
ly/tmp/DRONEA.tmp 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <bes' c ees, a, g,>2\laissezVibrer
}

11
ly/tmp/DRONEB.tmp 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <ees, a, g, bes' c>2\laissezVibrer
}

11
ly/tmp/DRONEC.tmp 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <g, bes' c ees, a,>2\laissezVibrer
}

11
ly/tmp/DRONED.tmp 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <c ees, a, g, bes'>2\laissezVibrer
}

11
ly/tmp/DRONEE.tmp 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <a, g, bes' c ees,>2\laissezVibrer
}

11
ly/tmp/DRONEF.tmp 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <bes' c ees, a, g,>2\laissezVibrer
}

11
ly/tmp/DRONEG.tmp 100755
View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <ees, a, g, bes' c>2\laissezVibrer
}

120
ly/tmp/LH.ly 100755
View File

@ -0,0 +1,120 @@
r1 \bar ":" %%XXXXXXX%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis2.\glissando\< \bar "'"
ees1~\> \bar "'"
\tieHalfDashed ees2~ \hideNotes ees2~ \bar "'"
\tieHalfDashed ees2~ ees2~ \unHideNotes \bar "'"
e1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< c' bes'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
aes'2.\glissando\< \bar "'"
fis1~\> \bar "'"
\tieHalfDashed fis2~ \hideNotes fis2~ \bar "'"
\tieHalfDashed fis2~ fis2~ \unHideNotes \bar "'"
cis1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< e c'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes'2.\glissando\< \bar "'"
aes'1~\> \bar "'"
\tieHalfDashed aes'2~ \hideNotes aes'2~ \bar "'"
\tieHalfDashed aes'2~ aes'2~ \unHideNotes \bar "'"
ees1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< cis e>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
c'2.\glissando\< \bar "'"
bes'1~\> \bar "'"
\tieHalfDashed bes'2~ \hideNotes bes'2~ \bar "'"
\tieHalfDashed bes'2~ bes'2~ \unHideNotes \bar "'"
fis1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< ees cis>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
e2.\glissando\< \bar "'"
c'1~\> \bar "'"
\tieHalfDashed c'2~ \hideNotes c'2~ \bar "'"
\tieHalfDashed c'2~ c'2~ \unHideNotes \bar "'"
aes'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis ees>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
cis2.\glissando\< \bar "'"
e1~\> \bar "'"
\tieHalfDashed e2~ \hideNotes e2~ \bar "'"
\tieHalfDashed e2~ e2~ \unHideNotes \bar "'"
bes'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< aes' fis>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
ees2.\glissando\< \bar "'"
cis1~\> \bar "'"
\tieHalfDashed cis2~ \hideNotes cis2~ \bar "'"
\tieHalfDashed cis2~ cis2~ \unHideNotes \bar "'"
c'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< bes' aes'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis2.\glissando\< \bar "'"
ees1~\> \bar "'"
\tieHalfDashed ees2~ \hideNotes ees2~ \bar "'"
\tieHalfDashed ees2~ ees2~ \unHideNotes \bar "'"
e1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< c' bes'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

22
ly/tmp/LHA.tmp 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
des'2...~ \fermata ^\markup { \box { "7''" }} \hideNotes des'16 \unHideNotes \bar "'" %1
s16 <bes' bes''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
c'''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
a''1 \fermata \bar "'" %1
s2.
s1
g''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
fis'''1 \startTrillSpan des' ^\markup { \box { "5''" }} \bar "'" %1
des'1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

22
ly/tmp/LHB.tmp 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
g''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes g''16 \unHideNotes \bar "'" %1
s16 <fis''' des'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
bes'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
bes''1 \fermata \bar "'" %1
s2.
s1
c'''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
a''1 \startTrillSpan g'' ^\markup { \box { "5''" }} \bar "'" %1
g''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

22
ly/tmp/LHC.tmp 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
c'''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes c'''16 \unHideNotes \bar "'" %1
s16 <a'' g''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
fis'''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
des'1 \fermata \bar "'" %1
s2.
s1
bes'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
bes''1 \startTrillSpan c''' ^\markup { \box { "5''" }} \bar "'" %1
c'''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

22
ly/tmp/LHD.tmp 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
bes'2...~ \fermata ^\markup { \box { "7''" }} \hideNotes bes'16 \unHideNotes \bar "'" %1
s16 <bes'' c'''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
a''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
g''1 \fermata \bar "'" %1
s2.
s1
fis'''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
des'1 \startTrillSpan bes' ^\markup { \box { "5''" }} \bar "'" %1
bes'1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

22
ly/tmp/LHE.tmp 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
fis'''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes fis'''16 \unHideNotes \bar "'" %1
s16 <des' bes'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
bes''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
c'''1 \fermata \bar "'" %1
s2.
s1
a''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
g''1 \startTrillSpan fis''' ^\markup { \box { "5''" }} \bar "'" %1
fis'''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

22
ly/tmp/LHF.tmp 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
a''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes a''16 \unHideNotes \bar "'" %1
s16 <g'' fis'''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
des'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
bes'1 \fermata \bar "'" %1
s2.
s1
bes''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
c'''1 \startTrillSpan a'' ^\markup { \box { "5''" }} \bar "'" %1
a''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

22
ly/tmp/LHG.tmp 100755
View File

@ -0,0 +1,22 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
bes''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes bes''16 \unHideNotes \bar "'" %1
s16 <c''' a''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
g''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
fis'''1 \fermata \bar "'" %1
s2.
s1
des'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
bes'1 \startTrillSpan bes'' ^\markup { \box { "5''" }} \bar "'" %1
bes''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

12
ly/tmp/RECORDER.ly 100755
View File

@ -0,0 +1,12 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
%\override NoteHead #'style = #'xcircle
cis''1 \verylongfermata ^\markup{"recorder....."}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

View File

@ -0,0 +1,12 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
%\override NoteHead #'style = #'xcircle
c''1 \verylongfermata ^\markup{"recorder....."}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

132
ly/tmp/RH.ly 100755
View File

@ -0,0 +1,132 @@
r1 \bar ":" %%XXXXXXX%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
cis'2...~ \fermata ^\markup { \box { "7''" }} \hideNotes cis'16 \unHideNotes \bar "'" %1
s16 <e' fis''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
ees'''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
c''1 \fermata \bar "'" %1
s2.
s1
bes''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
aes''1 \startTrillSpan cis' ^\markup { \box { "5''" }} \bar "'" %1
cis'1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
aes''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes aes''16 \unHideNotes \bar "'" %1
s16 <cis' e'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
fis''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
ees'''1 \fermata \bar "'" %1
s2.
s1
c''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
bes''1 \startTrillSpan aes'' ^\markup { \box { "5''" }} \bar "'" %1
aes''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
bes''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes bes''16 \unHideNotes \bar "'" %1
s16 <aes'' cis'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
e'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
fis''1 \fermata \bar "'" %1
s2.
s1
ees'''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
c''1 \startTrillSpan bes'' ^\markup { \box { "5''" }} \bar "'" %1
bes''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
c''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes c''16 \unHideNotes \bar "'" %1
s16 <bes'' aes''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
cis'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
e'1 \fermata \bar "'" %1
s2.
s1
fis''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
ees'''1 \startTrillSpan c'' ^\markup { \box { "5''" }} \bar "'" %1
c''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
ees'''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes ees'''16 \unHideNotes \bar "'" %1
s16 <c'' bes''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
aes''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
cis'1 \fermata \bar "'" %1
s2.
s1
e'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
fis''1 \startTrillSpan ees''' ^\markup { \box { "5''" }} \bar "'" %1
ees'''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
fis''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes fis''16 \unHideNotes \bar "'" %1
s16 <ees''' c''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
bes''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
aes''1 \fermata \bar "'" %1
s2.
s1
cis'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
e'1 \startTrillSpan fis'' ^\markup { \box { "5''" }} \bar "'" %1
fis''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/tmp/RHA.tmp 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes2.\glissando\< \bar "'"
des1~\> \bar "'"
\tieHalfDashed des2~ \hideNotes des2~ \bar "'"
\tieHalfDashed des2~ des2~ \unHideNotes \bar "'"
bes1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< a' g'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/tmp/RHB.tmp 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
g'2.\glissando\< \bar "'"
fis'1~\> \bar "'"
\tieHalfDashed fis'2~ \hideNotes fis'2~ \bar "'"
\tieHalfDashed fis'2~ fis'2~ \unHideNotes \bar "'"
des1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis, bes>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/tmp/RHC.tmp 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes2.\glissando\< \bar "'"
a'1~\> \bar "'"
\tieHalfDashed a'2~ \hideNotes a'2~ \bar "'"
\tieHalfDashed a'2~ a'2~ \unHideNotes \bar "'"
fis'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< bes des>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/tmp/RHD.tmp 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
des2.\glissando\< \bar "'"
fis,1~\> \bar "'"
\tieHalfDashed fis,2~ \hideNotes fis,2~ \bar "'"
\tieHalfDashed fis,2~ fis,2~ \unHideNotes \bar "'"
a'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< g' fis'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/tmp/RHE.tmp 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis'2.\glissando\< \bar "'"
bes1~\> \bar "'"
\tieHalfDashed bes2~ \hideNotes bes2~ \bar "'"
\tieHalfDashed bes2~ bes2~ \unHideNotes \bar "'"
fis,1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< bes a'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/tmp/RHF.tmp 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
a'2.\glissando\< \bar "'"
g'1~\> \bar "'"
\tieHalfDashed g'2~ \hideNotes g'2~ \bar "'"
\tieHalfDashed g'2~ g'2~ \unHideNotes \bar "'"
bes1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< des fis,>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

15
ly/tmp/RHG.tmp 100755
View File

@ -0,0 +1,15 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis,2.\glissando\< \bar "'"
bes1~\> \bar "'"
\tieHalfDashed bes2~ \hideNotes bes2~ \bar "'"
\tieHalfDashed bes2~ bes2~ \unHideNotes \bar "'"
g'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis' bes>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

69
ly/tmp/VOICE.ly 100755
View File

@ -0,0 +1,69 @@
r1 \bar ":" %%XXXXXXX%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. cis'4.-\markup{"Loi..."}\glissando\< s4
e'2..~-\markup{"di--s..."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 e'8~-\markup{"sssss...."} e'1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
cis''1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
fis''4-\markup{"e..."}\fermata\glissando(
\tieDotted
aes'2.)~-\markup{"...l...met!"}
\override NoteHead #'style = #'cross
\hideNotes aes~ \unHideNotes cis''1^\markup{"flax!"} s1
\override NoteHead #'style = #'xcircle
s1 e''4.~-\markup{"w- ooooo - l"} s1
\override NoteHead #'style = #'cross
s1 cis'8~-\markup{"shhhhhh...."} cis'1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<aes' cis''>1 \verylongfermata ^\markup{"(Recorder)"}

69
ly/tmp/VOICEA.tmp 100755
View File

@ -0,0 +1,69 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. c'4.-\markup{"black..."}\glissando\< s4
ees2..~-\markup{"cat...."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 ees8~-\markup{"rave--ins--bo--ourn"} ees1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
c''1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
des'4-\markup{"||:excalibur:||"}\fermata\glissando(
\tieDotted
bes'2.)~-\markup{"47..136...54...75..136..60"}
\override NoteHead #'style = #'cross
\hideNotes bes~ \unHideNotes c''1^\markup{"Witch!"} s1
\override NoteHead #'style = #'xcircle
s1 ees'4.~-\markup{"1 - 7 - 1"} s1
\override NoteHead #'style = #'cross
s1 c'8~-\markup{"drown...in...the..ford"} c'1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<bes' c''>1 \verylongfermata ^\markup{"(Recorder)"}

71
ly/tmp/ly/DRONE.ly 100755
View File

@ -0,0 +1,71 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <bes' c ees, a, g,>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <ees, a, g, bes' c>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <g, bes' c ees, a,>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <c ees, a, g, bes'>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <a, g, bes' c ees,>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <bes' c ees, a, g,>2\laissezVibrer
}drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <ees, a, g, bes' c>2\laissezVibrer
}

154
ly/tmp/ly/LH.ly 100755
View File

@ -0,0 +1,154 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
des'2...~ \fermata ^\markup { \box { "7''" }} \hideNotes des'16 \unHideNotes \bar "'" %1
s16 <bes' bes''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
c'''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
a''1 \fermata \bar "'" %1
s2.
s1
g''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
fis'''1 \startTrillSpan des' ^\markup { \box { "5''" }} \bar "'" %1
des'1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
g''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes g''16 \unHideNotes \bar "'" %1
s16 <fis''' des'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
bes'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
bes''1 \fermata \bar "'" %1
s2.
s1
c'''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
a''1 \startTrillSpan g'' ^\markup { \box { "5''" }} \bar "'" %1
g''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
c'''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes c'''16 \unHideNotes \bar "'" %1
s16 <a'' g''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
fis'''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
des'1 \fermata \bar "'" %1
s2.
s1
bes'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
bes''1 \startTrillSpan c''' ^\markup { \box { "5''" }} \bar "'" %1
c'''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
bes'2...~ \fermata ^\markup { \box { "7''" }} \hideNotes bes'16 \unHideNotes \bar "'" %1
s16 <bes'' c'''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
a''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
g''1 \fermata \bar "'" %1
s2.
s1
fis'''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
des'1 \startTrillSpan bes' ^\markup { \box { "5''" }} \bar "'" %1
bes'1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
fis'''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes fis'''16 \unHideNotes \bar "'" %1
s16 <des' bes'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
bes''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
c'''1 \fermata \bar "'" %1
s2.
s1
a''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
g''1 \startTrillSpan fis''' ^\markup { \box { "5''" }} \bar "'" %1
fis'''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
a''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes a''16 \unHideNotes \bar "'" %1
s16 <g'' fis'''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
des'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
bes'1 \fermata \bar "'" %1
s2.
s1
bes''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
c'''1 \startTrillSpan a'' ^\markup { \box { "5''" }} \bar "'" %1
a''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
bes''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes bes''16 \unHideNotes \bar "'" %1
s16 <c''' a''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
g''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
fis'''1 \fermata \bar "'" %1
s2.
s1
des'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
bes'1 \startTrillSpan bes'' ^\markup { \box { "5''" }} \bar "'" %1
bes''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

View File

@ -0,0 +1,12 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
%\override NoteHead #'style = #'xcircle
c''1 \verylongfermata ^\markup{"recorder....."}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

135
ly/tmp/ly/RH.ly 100755
View File

@ -0,0 +1,135 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes2.\glissando\< \bar "'"
des1~\> \bar "'"
\tieHalfDashed des2~ \hideNotes des2~ \bar "'"
\tieHalfDashed des2~ des2~ \unHideNotes \bar "'"
bes1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< a' g'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
g'2.\glissando\< \bar "'"
fis'1~\> \bar "'"
\tieHalfDashed fis'2~ \hideNotes fis'2~ \bar "'"
\tieHalfDashed fis'2~ fis'2~ \unHideNotes \bar "'"
des1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis, bes>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes2.\glissando\< \bar "'"
a'1~\> \bar "'"
\tieHalfDashed a'2~ \hideNotes a'2~ \bar "'"
\tieHalfDashed a'2~ a'2~ \unHideNotes \bar "'"
fis'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< bes des>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
des2.\glissando\< \bar "'"
fis,1~\> \bar "'"
\tieHalfDashed fis,2~ \hideNotes fis,2~ \bar "'"
\tieHalfDashed fis,2~ fis,2~ \unHideNotes \bar "'"
a'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< g' fis'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis'2.\glissando\< \bar "'"
bes1~\> \bar "'"
\tieHalfDashed bes2~ \hideNotes bes2~ \bar "'"
\tieHalfDashed bes2~ bes2~ \unHideNotes \bar "'"
fis,1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< bes a'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
a'2.\glissando\< \bar "'"
g'1~\> \bar "'"
\tieHalfDashed g'2~ \hideNotes g'2~ \bar "'"
\tieHalfDashed g'2~ g'2~ \unHideNotes \bar "'"
bes1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< des fis,>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis,2.\glissando\< \bar "'"
bes1~\> \bar "'"
\tieHalfDashed bes2~ \hideNotes bes2~ \bar "'"
\tieHalfDashed bes2~ bes2~ \unHideNotes \bar "'"
g'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis' bes>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes2.\glissando\< \bar "'"
des1~\> \bar "'"
\tieHalfDashed des2~ \hideNotes des2~ \bar "'"
\tieHalfDashed des2~ des2~ \unHideNotes \bar "'"
bes1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< a' g'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
g'2.\glissando\< \bar "'"
fis'1~\> \bar "'"
\tieHalfDashed fis'2~ \hideNotes fis'2~ \bar "'"
\tieHalfDashed fis'2~ fis'2~ \unHideNotes \bar "'"
des1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis, bes>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

69
ly/tmp/ly/VOICE.ly 100755
View File

@ -0,0 +1,69 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. c'4.-\markup{"black..."}\glissando\< s4
ees2..~-\markup{"cat...."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 ees8~-\markup{"rave--ins--bo--ourn"} ees1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
c''1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
des'4-\markup{"||:excalibur:||"}\fermata\glissando(
\tieDotted
bes'2.)~-\markup{"47..136...54...75..136..60"}
\override NoteHead #'style = #'cross
\hideNotes bes~ \unHideNotes c''1^\markup{"Witch!"} s1
\override NoteHead #'style = #'xcircle
s1 ees'4.~-\markup{"1 - 7 - 1"} s1
\override NoteHead #'style = #'cross
s1 c'8~-\markup{"drown...in...the..ford"} c'1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<bes' c''>1 \verylongfermata ^\markup{"(Recorder)"}

1
ly/tmp/ly/master 100755
View File

@ -0,0 +1 @@
0000000000000000000000000000000000000000 b57ec6b7a6350894f56b3e54659ec8d9cb2f4fb7 Rob Canning <rob@foo.net> 1426610015 +0000 clone: from git@gitorious.org:kyklos/kyklos.git

View File

@ -0,0 +1,11 @@
drone = \new Voice {
\change Staff = B
\proportionalStuff
\override NoteHead #'color = #grey
\override LaissezVibrerTie #'color = #grey
\override Slur #'color = #grey
\override Accidental #'color = #grey
r2 <g, c bes fis' ees''>2\laissezVibrer
}

120
ly/tmp/old/LH.ly 100755
View File

@ -0,0 +1,120 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis2.\glissando\< \bar "'"
ees1~\> \bar "'"
\tieHalfDashed ees2~ \hideNotes ees2~ \bar "'"
\tieHalfDashed ees2~ ees2~ \unHideNotes \bar "'"
e1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< c' bes'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
aes'2.\glissando\< \bar "'"
fis1~\> \bar "'"
\tieHalfDashed fis2~ \hideNotes fis2~ \bar "'"
\tieHalfDashed fis2~ fis2~ \unHideNotes \bar "'"
cis1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< e c'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
bes'2.\glissando\< \bar "'"
aes'1~\> \bar "'"
\tieHalfDashed aes'2~ \hideNotes aes'2~ \bar "'"
\tieHalfDashed aes'2~ aes'2~ \unHideNotes \bar "'"
ees1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< cis e>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
c'2.\glissando\< \bar "'"
bes'1~\> \bar "'"
\tieHalfDashed bes'2~ \hideNotes bes'2~ \bar "'"
\tieHalfDashed bes'2~ bes'2~ \unHideNotes \bar "'"
fis1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< ees cis>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
e2.\glissando\< \bar "'"
c'1~\> \bar "'"
\tieHalfDashed c'2~ \hideNotes c'2~ \bar "'"
\tieHalfDashed c'2~ c'2~ \unHideNotes \bar "'"
aes'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< fis ees>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
cis2.\glissando\< \bar "'"
e1~\> \bar "'"
\tieHalfDashed e2~ \hideNotes e2~ \bar "'"
\tieHalfDashed e2~ e2~ \unHideNotes \bar "'"
bes'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< aes' fis>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
ees2.\glissando\< \bar "'"
cis1~\> \bar "'"
\tieHalfDashed cis2~ \hideNotes cis2~ \bar "'"
\tieHalfDashed cis2~ cis2~ \unHideNotes \bar "'"
c'1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< bes' aes'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
r4
\override Glissando #'style = #'zigzag
\override Glissando #'color = #'green
fis2.\glissando\< \bar "'"
ees1~\> \bar "'"
\tieHalfDashed ees2~ \hideNotes ees2~ \bar "'"
\tieHalfDashed ees2~ ees2~ \unHideNotes \bar "'"
e1 \bar "'"
r1 \bar "'"
%\override Staff.BarLine #'color = #red
< c' bes'>1 \bar "||"
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

View File

@ -0,0 +1,12 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
%\override NoteHead #'style = #'xcircle
cis''1 \verylongfermata ^\markup{"recorder....."}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

132
ly/tmp/old/RH.ly 100755
View File

@ -0,0 +1,132 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
cis'2...~ \fermata ^\markup { \box { "7''" }} \hideNotes cis'16 \unHideNotes \bar "'" %1
s16 <e' fis''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
ees'''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
c''1 \fermata \bar "'" %1
s2.
s1
bes''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
aes''1 \startTrillSpan cis' ^\markup { \box { "5''" }} \bar "'" %1
cis'1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
aes''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes aes''16 \unHideNotes \bar "'" %1
s16 <cis' e'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
fis''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
ees'''1 \fermata \bar "'" %1
s2.
s1
c''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
bes''1 \startTrillSpan aes'' ^\markup { \box { "5''" }} \bar "'" %1
aes''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
bes''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes bes''16 \unHideNotes \bar "'" %1
s16 <aes'' cis'>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
e'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
fis''1 \fermata \bar "'" %1
s2.
s1
ees'''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
c''1 \startTrillSpan bes'' ^\markup { \box { "5''" }} \bar "'" %1
bes''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
c''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes c''16 \unHideNotes \bar "'" %1
s16 <bes'' aes''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
cis'1~ ^\markup { \box { " 7'' " }} \bar "'" %1
e'1 \fermata \bar "'" %1
s2.
s1
fis''4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
ees'''1 \startTrillSpan c'' ^\markup { \box { "5''" }} \bar "'" %1
c''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
ees'''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes ees'''16 \unHideNotes \bar "'" %1
s16 <c'' bes''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
aes''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
cis'1 \fermata \bar "'" %1
s2.
s1
e'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
fis''1 \startTrillSpan ees''' ^\markup { \box { "5''" }} \bar "'" %1
ees'''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #4
\tieDotted
fis''2...~ \fermata ^\markup { \box { "7''" }} \hideNotes fis''16 \unHideNotes \bar "'" %1
s16 <ees''' c''>2... \longfermata ^\markup { \box { "13''" }} \bar "'" %1
\tieDotted
bes''1~ ^\markup { \box { " 7'' " }} \bar "'" %1
aes''1 \fermata \bar "'" %1
s2.
s1
cis'4 \verylongfermata ^\markup { \box { "18''" }} \bar "'" %1
s1
\pitchedTrill
e'1 \startTrillSpan fis'' ^\markup { \box { "5''" }} \bar "'" %1
fis''1 \stopTrillSpan \fermata ^\markup { \box { "9''" }} \bar "||" %1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

View File

@ -0,0 +1,69 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\proportionalStuff
\override Tie #'details #'ratio = #0.01
\override Tie #'details #'height-limit = #0
\override Tie #'Y-offset = #-0.6
\override Tie #'thickness = #2
\change Staff = A
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override NoteHead #'style = #'xcircle
\override Glissando #'style = #'zigzag
\tieDashed
r4. cis'4.-\markup{"Loi..."}\glissando\< s4
e'2..~-\markup{"di--s..."}\>
%\hideNotes
\override NoteHead #'style = #'cross
s1 e'8~-\markup{"sssss...."} e'1~ s1
%\unHideNotes
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
cis''1 \verylongfermata ^\markup{"(recorder)"}
\override Slur #'color = #red
\override Glissando #'color = #red
\override Accidental #'color = #red
\override Script #'color = #red
\override TextScript #'color = #red
\override Tie #'color = #red
\override NoteHead #'color = #red
\override Glissando #'style = #'normal
\override NoteHead #'style = #'xcircle
fis''4-\markup{"e..."}\fermata\glissando(
\tieDotted
aes'2.)~-\markup{"...l...met!"}
\override NoteHead #'style = #'cross
\hideNotes aes~ \unHideNotes cis''1^\markup{"flax!"} s1
\override NoteHead #'style = #'xcircle
s1 e''4.~-\markup{"w- ooooo - l"} s1
\override NoteHead #'style = #'cross
s1 cis'8~-\markup{"shhhhhh...."} cis'1~ s1
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\override NoteHead #'color = #blue
\override Accidental #'color = #blue
\override TextScript #'color = #blue
\override Script #'color = #blue
\override NoteHead #'style = #'xcircle
<aes' cis''>1 \verylongfermata ^\markup{"(Recorder)"}

Some files were not shown because too many files have changed in this diff Show More