diff --git a/.gitmodules b/.gitmodules
new file mode 100644
index 0000000000..60de6263be
--- /dev/null
+++ b/.gitmodules
@@ -0,0 +1,3 @@
+[submodule "instance/pleroma-mods/pleroma-mod-catify"]
+	path = instance/pleroma-mods/pleroma-mod-catify
+	url = https://git.pleroma.social/absturztaube/pleroma-mod-catify.git
diff --git a/index.html b/index.html
index bc501dbb1a..7ff3ed51d9 100644
--- a/index.html
+++ b/index.html
@@ -432,5 +432,6 @@
         The moral of the story is in order to access the H.M.S. Neckbeard, you need to enable JavaScript.</noscript>
     <div id="app"></div>
     <!-- built files will be auto injected -->
+    <script type="text/javascript" src="/static/pleroma-mod-loader.js"></script>
   </body>
 </html>
diff --git a/instance/pleroma-mod-config.json b/instance/pleroma-mod-config.json
new file mode 100755
index 0000000000..1356ea35f1
--- /dev/null
+++ b/instance/pleroma-mod-config.json
@@ -0,0 +1,7 @@
+{
+    "modDirectory": "/instance/pleroma-mods/",
+    "mods": [
+        "catify",
+        "tracker"
+    ]
+}
diff --git a/instance/pleroma-mods/pleroma-mod-catify b/instance/pleroma-mods/pleroma-mod-catify
new file mode 160000
index 0000000000..ad4961791f
--- /dev/null
+++ b/instance/pleroma-mods/pleroma-mod-catify
@@ -0,0 +1 @@
+Subproject commit ad4961791f5774626bfba8176bcb4d269f154b5a
diff --git a/instance/pleroma-mods/pleroma-mod-tracker/LICENSE.md b/instance/pleroma-mods/pleroma-mod-tracker/LICENSE.md
new file mode 100644
index 0000000000..6a7234d5cc
--- /dev/null
+++ b/instance/pleroma-mods/pleroma-mod-tracker/LICENSE.md
@@ -0,0 +1,663 @@
+                    GNU AFFERO GENERAL PUBLIC LICENSE
+                       Version 3, 19 November 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <https://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU Affero General Public License is a free, copyleft license for
+software and other kinds of works, specifically designed to ensure
+cooperation with the community in the case of network server software.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+our General Public Licenses are 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.
+
+  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.
+
+  Developers that use our General Public Licenses protect your rights
+with two steps: (1) assert copyright on the software, and (2) offer
+you this License which gives you legal permission to copy, distribute
+and/or modify the software.
+
+  A secondary benefit of defending all users' freedom is that
+improvements made in alternate versions of the program, if they
+receive widespread use, become available for other developers to
+incorporate.  Many developers of free software are heartened and
+encouraged by the resulting cooperation.  However, in the case of
+software used on network servers, this result may fail to come about.
+The GNU General Public License permits making a modified version and
+letting the public access it on a server without ever releasing its
+source code to the public.
+
+  The GNU Affero General Public License is designed specifically to
+ensure that, in such cases, the modified source code becomes available
+to the community.  It requires the operator of a network server to
+provide the source code of the modified version running there to the
+users of that server.  Therefore, public use of a modified version, on
+a publicly accessible server, gives the public access to the source
+code of the modified version.
+
+  An older license, called the Affero General Public License and
+published by Affero, was designed to accomplish similar goals.  This is
+a different license, not a version of the Affero GPL, but Affero has
+released a new version of the Affero GPL which permits relicensing under
+this license.
+
+  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 Affero 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. Remote Network Interaction; Use with the GNU General Public License.
+
+  Notwithstanding any other provision of this License, if you modify the
+Program, your modified version must prominently offer all users
+interacting with it remotely through a computer network (if your version
+supports such interaction) an opportunity to receive the Corresponding
+Source of your version by providing access to the Corresponding Source
+from a network server at no charge, through some standard or customary
+means of facilitating copying of software.  This Corresponding Source
+shall include the Corresponding Source for any work covered by version 3
+of the GNU General Public License that is incorporated pursuant to the
+following paragraph.
+
+  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 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 work with which it is combined will remain governed by version
+3 of the GNU General Public License.
+
+  14. Revised Versions of this License.
+
+  The Free Software Foundation may publish revised and/or new versions of
+the GNU Affero 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 Affero 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 Affero 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 Affero 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 Affero 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 Affero General Public License for more details.
+
+    You should have received a copy of the GNU Affero General Public License
+    along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+  If your software can interact with users remotely through a computer
+network, you should also make sure that it provides a way for users to
+get its source.  For example, if your program is a web application, its
+interface could display a "Source" link that leads users to an archive
+of the code.  There are many ways you could offer source, and different
+solutions will be better for different programs; see section 13 for the
+specific requirements.
+
+  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 AGPL, see
+<https://www.gnu.org/licenses/>.
+
+
diff --git a/instance/pleroma-mods/pleroma-mod-tracker/README.md b/instance/pleroma-mods/pleroma-mod-tracker/README.md
new file mode 100644
index 0000000000..1dc99b0057
--- /dev/null
+++ b/instance/pleroma-mods/pleroma-mod-tracker/README.md
@@ -0,0 +1,23 @@
+# Pleroma Mod XM Tracker
+
+this script adds a MOD tracker to pleroma. Might have a huge impact on performance. please use carefully
+
+## Install
+
+do this in your pleroma-mods directory
+
+```
+sudo -u pleroma git clone https://git.pleroma.social/absturztaube/pleroma-mod-tracker.git
+```
+
+add `tracker` to your pleroma-mod-loader config
+
+## Configuration
+
+there is no configuration as of yet
+
+# The scene is dead..
+
+You can find me on fediverse: @absturztaube@fedi.absturztau.be
+
+Have fun
diff --git a/instance/pleroma-mods/pleroma-mod-tracker/audio-player.js b/instance/pleroma-mods/pleroma-mod-tracker/audio-player.js
new file mode 100644
index 0000000000..dff2ba673a
--- /dev/null
+++ b/instance/pleroma-mods/pleroma-mod-tracker/audio-player.js
@@ -0,0 +1,51 @@
+
+function AudioPlayer( callback, effect ) {
+  var AudioContext = window.AudioContext || window.webkitAudioContext;
+	var audioContext = new AudioContext();
+	var scriptProcessor = audioContext.createScriptProcessor( 0, 0, 2 );
+	var audioSource = new SineSource( audioContext.sampleRate );
+	var onaudioprocess = function( event ) {
+		var count = event.outputBuffer.length;
+		if( callback ) {
+			callback( count );
+		}
+		var leftBuf = event.outputBuffer.getChannelData( 0 );
+		var rightBuf = event.outputBuffer.getChannelData( 1 );
+		audioSource.getAudio( leftBuf, rightBuf, count );
+		if( effect ) {
+			effect( leftBuf, rightBuf, count );
+		}
+	}
+	this.getSamplingRate = function() {
+		return audioContext.sampleRate;
+	}
+	this.setAudioSource = function( audioSrc ) {
+		audioSource = audioSrc;
+	}
+	this.play = function() {
+		scriptProcessor.onaudioprocess = onaudioprocess;
+		scriptProcessor.connect( audioContext.destination );
+	}
+	this.stop = function() {
+		if( scriptProcessor.onaudioprocess ) {
+			scriptProcessor.disconnect( audioContext.destination );
+			scriptProcessor.onaudioprocess = null;
+		}
+	}
+}
+
+function SineSource( samplingRate ) {
+	// Simple AudioSource for testing.
+	var rate = samplingRate;
+	var freq = 2 * Math.PI * 440 / rate;
+	var phase = 0;
+	this.getSamplingRate = function() {
+		return rate;
+	}
+	this.getAudio = function( leftBuffer, rightBuffer, count ) {
+		for( var idx = 0; idx < count; idx++, phase++ ) {
+			leftBuffer[ idx ] = Math.sin( phase * freq );
+			rightBuffer[ idx ] = Math.sin( phase * freq * 0.5 );
+		}
+	}
+}
diff --git a/instance/pleroma-mods/pleroma-mod-tracker/ibxm.js b/instance/pleroma-mods/pleroma-mod-tracker/ibxm.js
new file mode 100644
index 0000000000..c290cce6ee
--- /dev/null
+++ b/instance/pleroma-mods/pleroma-mod-tracker/ibxm.js
@@ -0,0 +1,1467 @@
+
+function IBXMReplay( module, samplingRate ) {
+	/* Return a String representing the version of the replay. */
+	this.getVersion = function() {
+		return "20190513 (c)2019 mumart@gmail.com";
+	}
+	/* Return the sampling rate of playback. */
+	this.getSamplingRate = function() {
+		return samplingRate;
+	}
+	/* Set the sampling rate of playback.
+	   This can be used with Module.c2Rate to adjust the tempo and pitch.*/
+	this.setSamplingRate = function( rate ) {
+		if( rate < 8000 || rate > 128000 ) {
+			throw "Unsupported sampling rate!";
+		}
+		samplingRate = rate;
+	}
+	/* Enable or disable the linear interpolation filter. */
+	this.setInterpolation = function( interp ) {
+		interpolation = interp;
+	}
+	/* Returns true if the specified channel is muted. */
+	this.isMuted = function( channel ) {
+		if( channel >= 0 && channel < module.numChannels ) {
+			return muted[ channel ];
+		} else {
+			return false;
+		}
+	}
+	/* Mute or unmute the specified channel.
+	   If channel is negative, mute or unmute all channels. */
+	this.setMuted = function( channel, mute ) {
+		mute = mute ? true : false;
+		if( channel < 0 ) {
+			for( var idx = 0; idx < module.numChannels; idx++ ) {
+				muted[ idx ] = mute;
+			}
+		} else if( channel < module.numChannels ) {
+			muted[ channel ] = mute;
+		}
+	}
+	/* Get the current row position. */
+	this.getRow = function() {
+		return row;
+	}
+	/* Get the current pattern position in the sequence. */
+	this.getSequencePos = function() {
+		return seqPos;
+	}
+	/* Set the pattern in the sequence to play.
+	   The tempo is reset to the default. */
+	this.setSequencePos = function( pos ) {
+		if( pos >= module.sequenceLength ) {
+			pos = 0;
+		}
+		breakSeqPos = pos;
+		nextRow = 0;
+		tick = 1;
+		this.globalVol = module.defaultGVol;
+		speed = module.defaultSpeed > 0 ? module.defaultSpeed : 6;
+		tempo = module.defaultTempo > 0 ? module.defaultTempo : 125;
+		plCount = plChannel = -1;
+		for( var idx = 0; idx < playCount.length; idx++ ) {
+			var patIdx = module.sequence[ idx ];
+			var numRows = ( patIdx < module.numPatterns ) ? module.patterns[ patIdx ].numRows : 0;
+			playCount[ idx ] = new Int8Array( numRows );
+		}
+		for( var idx = 0; idx < module.numChannels; idx++ ) {
+			channels[ idx ] = new IBXMChannel( this, idx );
+		}
+		for( var idx = 0; idx < 128; idx++ ) {
+			rampBuf[ idx ] = 0;
+		}
+		mixIdx = mixLen = 0;
+		seqTick();
+	}
+	/* Returns the song duration in samples at the current sampling rate. */
+	this.calculateSongDuration = function() {
+		var duration = 0;
+		this.setSequencePos( 0 );
+		var songEnd = false;
+		while( !songEnd ) {
+			duration += calculateTickLen( tempo, samplingRate );
+			songEnd = seqTick();
+		}
+		this.setSequencePos( 0 );
+		return duration;
+	}
+	/* Seek to approximately the specified sample position.
+	   The actual sample position reached is returned. */
+	this.seek = function( samplePos ) {
+		this.setSequencePos( 0 );
+		var currentPos = 0;
+		var tickLen = calculateTickLen( tempo, samplingRate );
+		while( ( samplePos - currentPos ) >= tickLen ) {
+			for( var idx = 0; idx < module.numChannels; idx++ ) {
+				channels[ idx ].updateSampleIdx( tickLen * 2, samplingRate * 2 );
+			}
+			currentPos += tickLen;
+			seqTick();
+			tickLen = calculateTickLen( tempo, samplingRate );
+		}
+		return currentPos;
+	}
+	/* Seek to the specified position and row in the sequence. */
+	this.seekSequencePos = function( sequencePos, sequenceRow ) {
+		this.setSequencePos( 0 );
+		if( sequencePos < 0 || sequencePos >= module.sequenceLength ) {
+			sequencePos = 0;
+		}
+		if( sequenceRow >= module.patterns[ module.sequence[ sequencePos ] ].numRows ) {
+			sequenceRow = 0;
+		}
+		while( seqPos < sequencePos || row < sequenceRow ) {
+			var tickLen = calculateTickLen( tempo, samplingRate );
+			for( var idx = 0; idx < module.numChannels; idx++ ) {
+				channels[ idx ].updateSampleIdx( tickLen * 2, samplingRate * 2 );
+			}
+			if( seqTick() ) { /* Song end reached.*/
+				setSequencePos( sequencePos );
+				return;
+			}
+		}
+	}
+	/* Write count floating-point stereo samples into the specified buffers. */
+	this.getAudio = function( leftBuf, rightBuf, count ) {
+		var outIdx = 0;
+		while( outIdx < count ) {
+			if( mixIdx >= mixLen ) {
+				mixLen = mixAudio();
+				mixIdx = 0;
+			}
+			var remain = mixLen - mixIdx;
+			if( ( outIdx + remain ) > count ) {
+				remain = count - outIdx;
+			}
+			for( var end = outIdx + remain; outIdx < end; outIdx++, mixIdx++ ) {
+				leftBuf[ outIdx ] = mixBuf[ mixIdx * 2 ];
+				rightBuf[ outIdx ] = mixBuf[ mixIdx * 2 + 1 ];
+			}
+		}
+	}
+	var mixAudio = function() {
+		/* Generate audio. The number of samples produced is returned.*/
+		var tickLen = calculateTickLen( tempo, samplingRate );
+		for( var idx = 0, end = ( tickLen + 65 ) * 4; idx < end; idx++ ) {
+			/* Clear mix buffer.*/
+			mixBuf[ idx ] = 0;
+		}
+		for( var idx = 0; idx < module.numChannels; idx++ ) {
+			/* Resample and mix each channel.*/
+			var chan = channels[ idx ];
+			if( !muted[ idx ] ) {
+				chan.resample( mixBuf, 0, ( tickLen + 65 ) * 2, samplingRate * 2, interpolation );
+			}
+			chan.updateSampleIdx( tickLen * 2, samplingRate * 2 );
+		}
+		downsample( mixBuf, tickLen + 64 );
+		volumeRamp( tickLen );
+		/* Update the sequencer.*/
+		seqTick();
+		return tickLen;
+	}
+	var calculateTickLen = function( tempo, sampleRate ) {
+		return ( ( sampleRate * 5 ) / ( tempo * 2 ) ) | 0;
+	}
+	var volumeRamp = function( tickLen ) {
+		var rampRate = 2048 / samplingRate;
+		for( var idx = 0, a1 = 0; a1 < 1; idx += 2, a1 += rampRate ) {
+			var a2 = 1 - a1;
+			mixBuf[ idx     ] = mixBuf[ idx     ] * a1 + rampBuf[ idx     ] * a2;
+			mixBuf[ idx + 1 ] = mixBuf[ idx + 1 ] * a1 + rampBuf[ idx + 1 ] * a2;
+		}
+		rampBuf.set( mixBuf.subarray( tickLen * 2, ( tickLen + 64 ) * 2 ) );
+	}
+	var downsample = function( buf, count ) {
+		/* 2:1 downsampling with simple but effective anti-aliasing.*/
+		/* Buf must contain count * 2 + 1 stereo samples.*/
+		var outLen = count * 2;
+		for( inIdx = 0, outIdx = 0; outIdx < outLen; inIdx += 4, outIdx += 2 ) {
+			buf[ outIdx     ] = buf[ inIdx     ] * 0.25 + buf[ inIdx + 2 ] * 0.5 + buf[ inIdx + 4 ] * 0.25;
+			buf[ outIdx + 1 ] = buf[ inIdx + 1 ] * 0.25 + buf[ inIdx + 3 ] * 0.5 + buf[ inIdx + 5 ] * 0.25;
+		}
+	}
+	var seqTick = function() {
+		if( --tick <= 0 ) {
+			tick = speed;
+			seqRow();
+		} else {
+			for( var idx = 0; idx < module.numChannels; idx++ ) {
+				channels[ idx ].tick();
+			}
+		}
+		return playCount[ seqPos ][ row ] > 1;
+	}
+	var seqRow = function() {
+		if( nextRow < 0 ) {
+			breakSeqPos = seqPos + 1;
+			nextRow = 0;
+		}
+		if( breakSeqPos >= 0 ) {
+			if( breakSeqPos >= module.sequenceLength ) {
+				breakSeqPos = nextRow = 0;
+			}
+			while( module.sequence[ breakSeqPos ] >= module.numPatterns ) {
+				breakSeqPos++;
+				if( breakSeqPos >= module.sequenceLength ) {
+					breakSeqPos = nextRow = 0;
+				}
+			}
+			seqPos = breakSeqPos;
+			for( var idx = 0; idx < module.numChannels; idx++ ) {
+				channels[ idx ].plRow = 0;
+			}
+			breakSeqPos = -1;
+		}
+		var pattern = module.patterns[ module.sequence[ seqPos ] ];
+		row = nextRow;
+		if( row >= pattern.numRows ) row = 0;
+		var count = playCount[ seqPos ][ row ];
+		if( plCount < 0 && count < 127 ) {
+			playCount[ seqPos ][ row ] = count + 1;
+		}
+		nextRow = row + 1;
+		if( nextRow >= pattern.numRows ) {
+			nextRow = -1;
+		}
+		var noteIdx = row * module.numChannels;
+		for( var chanIdx = 0; chanIdx < module.numChannels; chanIdx++ ) {
+			var channel = channels[ chanIdx ];
+			pattern.getNote( noteIdx + chanIdx, note );
+			if( note.effect == 0xE ) {
+				note.effect = 0x70 | ( note.param >> 4 );
+				note.param &= 0xF;
+			}
+			if( note.effect == 0x93 ) {
+				note.effect = 0xF0 | ( note.param >> 4 );
+				note.param &= 0xF;
+			}
+			if( note.effect == 0 && note.param > 0 ) note.effect = 0x8A;
+			channel.row( note );
+			switch( note.effect ) {
+				case 0x81: /* Set Speed. */
+					if( note.param > 0 )
+						tick = speed = note.param;
+					break;
+				case 0xB: case 0x82: /* Pattern Jump.*/
+					if( plCount < 0 ) {
+						breakSeqPos = note.param;
+						nextRow = 0;
+					}
+					break;
+				case 0xD: case 0x83: /* Pattern Break.*/
+					if( plCount < 0 ) {
+						if( breakSeqPos < 0 )
+							breakSeqPos = seqPos + 1;
+						nextRow = ( note.param >> 4 ) * 10 + ( note.param & 0xF );
+					}
+					break;
+				case 0xF: /* Set Speed/Tempo.*/
+					if( note.param > 0 ) {
+						if( note.param < 32 )
+							tick = speed = note.param;
+						else
+							tempo = note.param;
+					}
+					break;
+				case 0x94: /* Set Tempo.*/
+					if( note.param > 32 )
+						tempo = note.param;
+					break;
+				case 0x76: case 0xFB : /* Pattern Loop.*/
+					if( note.param == 0 ) /* Set loop marker on this channel. */
+						channel.plRow = row;
+					if( channel.plRow < row && breakSeqPos < 0 ) { /* Marker valid. */
+						if( plCount < 0 ) { /* Not already looping, begin. */
+							plCount = note.param;
+							plChannel = chanIdx;
+						}
+						if( plChannel == chanIdx ) { /* Next Loop.*/
+							if( plCount == 0 ) { /* Loop finished. */
+								/* Invalidate current marker. */
+								channel.plRow = row + 1;
+							} else { /* Loop. */
+								nextRow = channel.plRow;
+							}
+							plCount--;
+						}
+					}
+					break;
+				case 0x7E: case 0xFE: /* Pattern Delay.*/
+					tick = speed + speed * note.param;
+					break;
+			}
+		}
+	}
+	var interpolation = true;
+	var rampBuf = new Float32Array( 64 * 2 );
+	var mixBuf = new Float32Array( ( calculateTickLen( 32, 128000 ) + 65 ) * 4 );
+	var mixIdx = 0, mixLen = 0;
+	var seqPos = 0, breakSeqPos = 0, row = 0, nextRow = 0, tick = 0;
+	var speed = 0, tempo = 0, plCount = 0, plChannel = 0;
+	var playCount = new Array( module.sequenceLength );
+	var channels = new Array( module.numChannels );
+	var muted = new Array( module.numChannels );
+	var note = new IBXMNote();
+	this.module = module;
+	this.globalVol = 0;
+	this.setSamplingRate( samplingRate );
+	this.setSequencePos( 0 );
+}
+
+function IBXMChannel( replay, id ) {
+	var sineTable = new Int16Array([
+		   0,  24,  49,  74,  97, 120, 141, 161, 180, 197, 212, 224, 235, 244, 250, 253,
+		 255, 253, 250, 244, 235, 224, 212, 197, 180, 161, 141, 120,  97,  74,  49,  24
+	]);
+	var instrument = new IBXMInstrument();
+	var sample = instrument.samples[ 0 ];
+	var keyOn = false;
+	var noteKey = 0, noteIns = 0, noteVol = 0, noteEffect = 0, noteParam = 0;
+	var sampleOffset = 0, sampleIdx = 0, freq = 0, ampl = 0, pann = 0;
+	var volume = 0, panning = replay.module.defaultPanning[ id ];
+	var fadeOutVol = 0, volEnvTick = 0, panEnvTick = 0;
+	var period = 0, portaPeriod = 0, retrigCount = 0, fxCount = 0, autoVibratoCount = 0;
+	var portaUpParam = 0, portaDownParam = 0, tonePortaParam = 0, offsetParam = 0;
+	var finePortaUpParam = 0, finePortaDownParam = 0, extraFinePortaParam = 0;
+	var arpeggioParam = 0, vslideParam = 0, globalVslideParam = 0, panningSlideParam = 0;
+	var fineVslideUpParam = 0, fineVslideDownParam = 0;
+	var retrigVolume = 0, retrigTicks = 0, tremorOnTicks = 0, tremorOffTicks = 0;
+	var vibratoType = 0, vibratoPhase = 0, vibratoSpeed = 0, vibratoDepth = 0;
+	var tremoloType = 0, tremoloPhase = 0, tremoloSpeed = 0, tremoloDepth = 0;
+	var tremoloAdd = 0, vibratoAdd = 0, arpeggioAdd = 0;
+	var randomSeed = ( id + 1 ) * 0xABCDEF;
+	this.plRow = 0;
+	this.resample = function( outBuf, offset, count, sampleRate, interpolate ) {
+		if( ampl <= 0 ) return;
+		var lGain = ampl * ( 1 - pann ) / 32768;
+		var rGain = ampl * pann / 32768;
+		var samIdx = sampleIdx;
+		var step = freq / sampleRate;
+		var loopLen = sample.loopLength;
+		var loopEnd = sample.loopStart + loopLen;
+		var sampleData = sample.sampleData;
+		var outIdx = offset * 2;
+		var outEnd = ( offset + count ) * 2;
+		if( interpolate ) {
+			while( outIdx < outEnd ) {
+				if( samIdx >= loopEnd ) {
+					if( loopLen <= 1 ) break;
+					while( samIdx >= loopEnd ) samIdx -= loopLen;
+				}
+				var x = samIdx | 0;
+				var c = sampleData[ x ];
+				var m = sampleData[ x + 1 ] - c;
+				var y = ( m * ( samIdx - x ) ) + c;
+				outBuf[ outIdx++ ] += y * lGain;
+				outBuf[ outIdx++ ] += y * rGain;
+				samIdx += step;
+			}
+		} else {
+			while( outIdx < outEnd ) {
+				if( samIdx >= loopEnd ) {
+					if( loopLen <= 1 ) break;
+					while( samIdx >= loopEnd ) samIdx -= loopLen;
+				}
+				var y = sampleData[ samIdx | 0 ];
+				outBuf[ outIdx++ ] += y * lGain;
+				outBuf[ outIdx++ ] += y * rGain;
+				samIdx += step;
+			}
+		}
+	}
+	this.updateSampleIdx = function( count, sampleRate ) {
+		sampleIdx += ( freq / sampleRate ) * count;
+		if( sampleIdx > sample.loopStart ) {
+			if( sample.loopLength > 1 ) {
+				sampleIdx = sample.loopStart + ( sampleIdx - sample.loopStart ) % sample.loopLength;
+			} else {
+				sampleIdx = sample.loopStart;
+			}
+		}
+	}
+	this.row = function( note ) {
+		noteKey = note.key;
+		noteIns = note.instrument;
+		noteVol = note.volume;
+		noteEffect = note.effect;
+		noteParam = note.param;
+		retrigCount++;
+		vibratoAdd = tremoloAdd = arpeggioAdd = fxCount = 0;
+		if( !( ( noteEffect == 0x7D || noteEffect == 0xFD ) && noteParam > 0 ) ) {
+			/* Not note delay.*/
+			trigger();
+		}
+		switch( noteEffect ) {
+			case 0x01: case 0x86: /* Porta Up. */
+				if( noteParam > 0 ) portaUpParam = noteParam;
+				portamentoUp( portaUpParam );
+				break;
+			case 0x02: case 0x85: /* Porta Down. */
+				if( noteParam > 0 ) portaDownParam = noteParam;
+				portamentoDown( portaDownParam );
+				break;
+			case 0x03: case 0x87: /* Tone Porta. */
+				if( noteParam > 0 ) tonePortaParam = noteParam;
+				break;
+			case 0x04: case 0x88: /* Vibrato. */
+				if( ( noteParam >> 4 ) > 0 ) vibratoSpeed = noteParam >> 4;
+				if( ( noteParam & 0xF ) > 0 ) vibratoDepth = noteParam & 0xF;
+				vibrato( false );
+				break;
+			case 0x05: case 0x8C: /* Tone Porta + Vol Slide. */
+				if( noteParam > 0 ) vslideParam = noteParam;
+				volumeSlide();
+				break;
+			case 0x06: case 0x8B: /* Vibrato + Vol Slide. */
+				if( noteParam > 0 ) vslideParam = noteParam;
+				vibrato( false );
+				volumeSlide();
+				break;
+			case 0x07: case 0x92: /* Tremolo. */
+				if( ( noteParam >> 4 ) > 0 ) tremoloSpeed = noteParam >> 4;
+				if( ( noteParam & 0xF ) > 0 ) tremoloDepth = noteParam & 0xF;
+				tremolo();
+				break;
+			case 0x08: /* Set Panning.*/
+				panning = noteParam & 0xFF;
+				break;
+			case 0x0A: case 0x84: /* Vol Slide. */
+				if( noteParam > 0 ) vslideParam = noteParam;
+				volumeSlide();
+				break;
+			case 0x0C: /* Set Volume. */
+				volume = noteParam >= 64 ? 64 : noteParam & 0x3F;
+				break;
+			case 0x10: case 0x96: /* Set Global Volume. */
+				replay.globalVol = noteParam >= 64 ? 64 : noteParam & 0x3F;
+				break;
+			case 0x11: /* Global Volume Slide. */
+				if( noteParam > 0 ) globalVslideParam = noteParam;
+				break;
+			case 0x14: /* Key Off. */
+				keyOn = false;
+				break;
+			case 0x15: /* Set Envelope Tick. */
+				volEnvTick = panEnvTick = noteParam & 0xFF;
+				break;
+			case 0x19: /* Panning Slide. */
+				if( noteParam > 0 ) panningSlideParam = noteParam;
+				break;
+			case 0x1B: case 0x91: /* Retrig + Vol Slide. */
+				if( ( noteParam >> 4 ) > 0 ) retrigVolume = noteParam >> 4;
+				if( ( noteParam & 0xF ) > 0 ) retrigTicks = noteParam & 0xF;
+				retrigVolSlide();
+				break;
+			case 0x1D: case 0x89: /* Tremor. */
+				if( ( noteParam >> 4 ) > 0 ) tremorOnTicks = noteParam >> 4;
+				if( ( noteParam & 0xF ) > 0 ) tremorOffTicks = noteParam & 0xF;
+				tremor();
+				break;
+			case 0x21: /* Extra Fine Porta. */
+				if( noteParam > 0 ) extraFinePortaParam = noteParam;
+				switch( extraFinePortaParam & 0xF0 ) {
+					case 0x10:
+						portamentoUp( 0xE0 | ( extraFinePortaParam & 0xF ) );
+						break;
+					case 0x20:
+						portamentoDown( 0xE0 | ( extraFinePortaParam & 0xF ) );
+						break;
+				}
+				break;
+			case 0x71: /* Fine Porta Up. */
+				if( noteParam > 0 ) finePortaUpParam = noteParam;
+				portamentoUp( 0xF0 | ( finePortaUpParam & 0xF ) );
+				break;
+			case 0x72: /* Fine Porta Down. */
+				if( noteParam > 0 ) finePortaDownParam = noteParam;
+				portamentoDown( 0xF0 | ( finePortaDownParam & 0xF ) );
+				break;
+			case 0x74: case 0xF3: /* Set Vibrato Waveform. */
+				if( noteParam < 8 ) vibratoType = noteParam;
+				break;
+			case 0x77: case 0xF4: /* Set Tremolo Waveform. */
+				if( noteParam < 8 ) tremoloType = noteParam;
+				break;
+			case 0x7A: /* Fine Vol Slide Up. */
+				if( noteParam > 0 ) fineVslideUpParam = noteParam;
+				volume += fineVslideUpParam;
+				if( volume > 64 ) volume = 64;
+				break;
+			case 0x7B: /* Fine Vol Slide Down. */
+				if( noteParam > 0 ) fineVslideDownParam = noteParam;
+				volume -= fineVslideDownParam;
+				if( volume < 0 ) volume = 0;
+				break;
+			case 0x7C: case 0xFC: /* Note Cut. */
+				if( noteParam <= 0 ) volume = 0;
+				break;
+			case 0x8A: /* Arpeggio. */
+				if( noteParam > 0 ) arpeggioParam = noteParam;
+				break;
+			case 0x95: /* Fine Vibrato.*/
+				if( ( noteParam >> 4 ) > 0 ) vibratoSpeed = noteParam >> 4;
+				if( ( noteParam & 0xF ) > 0 ) vibratoDepth = noteParam & 0xF;
+				vibrato( true );
+				break;
+			case 0xF8: /* Set Panning. */
+				panning = noteParam * 17;
+				break;
+		}
+		autoVibrato();
+		calculateFrequency();
+		calculateAmplitude();
+		updateEnvelopes();
+	}
+	this.tick = function() {
+		vibratoAdd = 0;
+		fxCount++;
+		retrigCount++;
+		if( !( noteEffect == 0x7D && fxCount <= noteParam ) ) {
+			switch( noteVol & 0xF0 ) {
+				case 0x60: /* Vol Slide Down.*/
+					volume -= noteVol & 0xF;
+					if( volume < 0 ) volume = 0;
+					break;
+				case 0x70: /* Vol Slide Up.*/
+					volume += noteVol & 0xF;
+					if( volume > 64 ) volume = 64;
+					break;
+				case 0xB0: /* Vibrato.*/
+					vibratoPhase += vibratoSpeed;
+					vibrato( false );
+					break;
+				case 0xD0: /* Pan Slide Left.*/
+					panning -= noteVol & 0xF;
+					if( panning < 0 ) panning = 0;
+					break;
+				case 0xE0: /* Pan Slide Right.*/
+					panning += noteVol & 0xF;
+					if( panning > 255 ) panning = 255;
+					break;
+				case 0xF0: /* Tone Porta.*/
+					tonePortamento();
+					break;
+			}
+		}
+		switch( noteEffect ) {
+			case 0x01: case 0x86: /* Porta Up. */
+				portamentoUp( portaUpParam );
+				break;
+			case 0x02: case 0x85: /* Porta Down. */
+				portamentoDown( portaDownParam );
+				break;
+			case 0x03: case 0x87: /* Tone Porta. */
+				tonePortamento();
+				break;
+			case 0x04: case 0x88: /* Vibrato. */
+				vibratoPhase += vibratoSpeed;
+				vibrato( false );
+				break;
+			case 0x05: case 0x8C: /* Tone Porta + Vol Slide. */
+				tonePortamento();
+				volumeSlide();
+				break;
+			case 0x06: case 0x8B: /* Vibrato + Vol Slide. */
+				vibratoPhase += vibratoSpeed;
+				vibrato( false );
+				volumeSlide();
+				break;
+			case 0x07: case 0x92: /* Tremolo. */
+				tremoloPhase += tremoloSpeed;
+				tremolo();
+				break;
+			case 0x0A: case 0x84: /* Vol Slide. */
+				volumeSlide();
+				break;
+			case 0x11: /* Global Volume Slide. */
+				replay.globalVol += ( globalVslideParam >> 4 ) - ( globalVslideParam & 0xF );
+				if( replay.globalVol < 0 ) replay.globalVol = 0;
+				if( replay.globalVol > 64 ) replay.globalVol = 64;
+				break;
+			case 0x19: /* Panning Slide. */
+				panning += ( panningSlideParam >> 4 ) - ( panningSlideParam & 0xF );
+				if( panning < 0 ) panning = 0;
+				if( panning > 255 ) panning = 255;
+				break;
+			case 0x1B: case 0x91: /* Retrig + Vol Slide. */
+				retrigVolSlide();
+				break;
+			case 0x1D: case 0x89: /* Tremor. */
+				tremor();
+				break;
+			case 0x79: /* Retrig. */
+				if( fxCount >= noteParam ) {
+					fxCount = 0;
+					sampleIdx = 0;
+				}
+				break;
+			case 0x7C: case 0xFC: /* Note Cut. */
+				if( noteParam == fxCount ) volume = 0;
+				break;
+			case 0x7D: case 0xFD: /* Note Delay. */
+				if( noteParam == fxCount ) trigger();
+				break;
+			case 0x8A: /* Arpeggio. */
+				if( fxCount > 2 ) fxCount = 0;
+				if( fxCount == 0 ) arpeggioAdd = 0;
+				if( fxCount == 1 ) arpeggioAdd = arpeggioParam >> 4;
+				if( fxCount == 2 ) arpeggioAdd = arpeggioParam & 0xF;
+				break;
+			case 0x95: /* Fine Vibrato. */
+				vibratoPhase += vibratoSpeed;
+				vibrato( true );
+				break;
+		}
+		autoVibrato();
+		calculateFrequency();
+		calculateAmplitude();
+		updateEnvelopes();
+	}
+	var updateEnvelopes = function() {
+		if( instrument.volumeEnvelope.enabled ) {
+			if( !keyOn ) {
+				fadeOutVol -= instrument.volumeFadeOut;
+				if( fadeOutVol < 0 ) fadeOutVol = 0;
+			}
+			volEnvTick = instrument.volumeEnvelope.nextTick( volEnvTick, keyOn );
+		}
+		if( instrument.panningEnvelope.enabled )
+			panEnvTick = instrument.panningEnvelope.nextTick( panEnvTick, keyOn );
+	}
+	var autoVibrato = function() {
+		var depth = instrument.vibratoDepth & 0x7F;
+		if( depth > 0 ) {
+			var sweep = instrument.vibratoSweep & 0x7F;
+			var rate = instrument.vibratoRate & 0x7F;
+			var type = instrument.vibratoType;
+			if( autoVibratoCount < sweep ) depth = depth * autoVibratoCount / sweep;
+			vibratoAdd += waveform( autoVibratoCount * rate >> 2, type + 4 ) * depth >> 8;
+			autoVibratoCount++;
+		}
+	}
+	var volumeSlide = function() {
+		var up = vslideParam >> 4;
+		var down = vslideParam & 0xF;
+		if( down == 0xF && up > 0 ) { /* Fine slide up.*/
+			if( fxCount == 0 ) volume += up;
+		} else if( up == 0xF && down > 0 ) { /* Fine slide down.*/
+			if( fxCount == 0 ) volume -= down;
+		} else if( fxCount > 0 || replay.module.fastVolSlides ) /* Normal.*/
+			volume += up - down;
+		if( volume > 64 ) volume = 64;
+		if( volume < 0 ) volume = 0;
+	}
+	var portamentoUp = function( param ) {
+		switch( param & 0xF0 ) {
+			case 0xE0: /* Extra-fine porta.*/
+				if( fxCount == 0 ) period -= param & 0xF;
+				break;
+			case 0xF0: /* Fine porta.*/
+				if( fxCount == 0 ) period -= ( param & 0xF ) << 2;
+				break;
+			default:/* Normal porta.*/
+				if( fxCount > 0 ) period -= param << 2;
+				break;
+		}
+		if( period < 0 ) period = 0;
+	}
+	var portamentoDown = function( param ) {
+		if( period > 0 ) {
+			switch( param & 0xF0 ) {
+				case 0xE0: /* Extra-fine porta.*/
+					if( fxCount == 0 ) period += param & 0xF;
+					break;
+				case 0xF0: /* Fine porta.*/
+					if( fxCount == 0 ) period += ( param & 0xF ) << 2;
+					break;
+				default:/* Normal porta.*/
+					if( fxCount > 0 ) period += param << 2;
+					break;
+			}
+			if( period > 65535 ) period = 65535;
+		}
+	}
+	var tonePortamento = function() {
+		if( period > 0 ) {
+			if( period < portaPeriod ) {
+				period += tonePortaParam << 2;
+				if( period > portaPeriod ) period = portaPeriod;
+			} else {
+				period -= tonePortaParam << 2;
+				if( period < portaPeriod ) period = portaPeriod;
+			}
+		}
+	}
+	var vibrato = function( fine ) {
+		vibratoAdd = waveform( vibratoPhase, vibratoType & 0x3 ) * vibratoDepth >> ( fine ? 7 : 5 );
+	}
+	var tremolo = function() {
+		tremoloAdd = waveform( tremoloPhase, tremoloType & 0x3 ) * tremoloDepth >> 6;
+	}
+	var waveform = function( phase, type ) {
+		var amplitude = 0;
+		switch( type ) {
+			default: /* Sine. */
+				amplitude = sineTable[ phase & 0x1F ];
+				if( ( phase & 0x20 ) > 0 ) amplitude = -amplitude;
+				break;
+			case 6: /* Saw Up.*/
+				amplitude = ( ( ( phase + 0x20 ) & 0x3F ) << 3 ) - 255;
+				break;
+			case 1: case 7: /* Saw Down. */
+				amplitude = 255 - ( ( ( phase + 0x20 ) & 0x3F ) << 3 );
+				break;
+			case 2: case 5: /* Square. */
+				amplitude = ( phase & 0x20 ) > 0 ? 255 : -255;
+				break;
+			case 3: case 8: /* Random. */
+				amplitude = ( randomSeed >> 20 ) - 255;
+				randomSeed = ( randomSeed * 65 + 17 ) & 0x1FFFFFFF;
+				break;
+		}
+		return amplitude;
+	}
+	var tremor = function() {
+		if( retrigCount >= tremorOnTicks ) tremoloAdd = -64;
+		if( retrigCount >= ( tremorOnTicks + tremorOffTicks ) )
+			tremoloAdd = retrigCount = 0;
+	}
+	var retrigVolSlide = function() {
+		if( retrigCount >= retrigTicks ) {
+			retrigCount = sampleIdx = 0;
+			switch( retrigVolume ) {
+				case 0x1: volume = volume -  1; break;
+				case 0x2: volume = volume -  2; break;
+				case 0x3: volume = volume -  4; break;
+				case 0x4: volume = volume -  8; break;
+				case 0x5: volume = volume - 16; break;
+				case 0x6: volume = ( volume * 2 / 3 ) | 0; break;
+				case 0x7: volume = volume >> 1; break;
+				case 0x8: /* ? */ break;
+				case 0x9: volume = volume +  1; break;
+				case 0xA: volume = volume +  2; break;
+				case 0xB: volume = volume +  4; break;
+				case 0xC: volume = volume +  8; break;
+				case 0xD: volume = volume + 16; break;
+				case 0xE: volume = ( volume * 3 / 2 ) | 0; break;
+				case 0xF: volume = volume << 1; break;
+			}
+			if( volume <  0 ) volume = 0;
+			if( volume > 64 ) volume = 64;
+		}
+	}
+	var calculateFrequency = function() {
+		var per = period + vibratoAdd;
+		if( replay.module.linearPeriods ) {
+			per = per - ( arpeggioAdd << 6 );
+			if( per < 28 || per > 7680 ) per = 7680;
+			freq = Math.round( replay.module.c2Rate * Math.pow( 2, ( 4608 - per ) / 768 ) );
+		} else {
+			per = per / Math.pow( 2, arpeggioAdd / 12 );
+			if( per < 28 ) per = 29021;
+			freq = Math.round( replay.module.c2Rate * 1712 / per );
+		}
+	}
+	var calculateAmplitude = function() {
+		var envVol = keyOn ? 64 : 0;
+		if( instrument.volumeEnvelope.enabled )
+			envVol = instrument.volumeEnvelope.calculateAmpl( volEnvTick );
+		var vol = volume + tremoloAdd;
+		if( vol > 64 ) vol = 64;
+		if( vol < 0 ) vol = 0;
+		vol = vol * fadeOutVol / 0x8000;
+		ampl = vol * envVol * replay.globalVol * replay.module.gain / 0x2000000;
+		var envPan = 32;
+		if( instrument.panningEnvelope.enabled )
+			envPan = instrument.panningEnvelope.calculateAmpl( panEnvTick );
+		var panRange = ( panning < 128 ) ? panning : ( 255 - panning );
+		pann = ( panning + ( panRange * ( envPan - 32 ) >> 5 ) ) / 255;
+	}
+	var trigger = function() {
+		if( noteIns > 0 && noteIns <= replay.module.numInstruments ) {
+			instrument = replay.module.instruments[ noteIns ];
+			var sam = instrument.samples[ instrument.keyToSample[ noteKey < 97 ? noteKey : 0 ] ];
+			volume = sam.volume >= 64 ? 64 : sam.volume & 0x3F;
+			if( sam.panning >= 0 ) panning = sam.panning & 0xFF;
+			if( period > 0 && sam.loopLength > 1 ) sample = sam; /* Amiga trigger.*/
+			sampleOffset = volEnvTick = panEnvTick = 0;
+			fadeOutVol = 32768;
+			keyOn = true;
+		}
+		if( noteEffect == 0x09 || noteEffect == 0x8F ) { /* Set Sample Offset. */
+			if( noteParam > 0 ) offsetParam = noteParam;
+			sampleOffset = offsetParam << 8;
+		}
+		if( noteVol >= 0x10 && noteVol < 0x60 )
+			volume = noteVol < 0x50 ? noteVol - 0x10 : 64;
+		switch( noteVol & 0xF0 ) {
+			case 0x80: /* Fine Vol Down.*/
+				volume -= noteVol & 0xF;
+				if( volume < 0 ) volume = 0;
+				break;
+			case 0x90: /* Fine Vol Up.*/
+				volume += noteVol & 0xF;
+				if( volume > 64 ) volume = 64;
+				break;
+			case 0xA0: /* Set Vibrato Speed.*/
+				if( ( noteVol & 0xF ) > 0 ) vibratoSpeed = noteVol & 0xF;
+				break;
+			case 0xB0: /* Vibrato.*/
+				if( ( noteVol & 0xF ) > 0 ) vibratoDepth = noteVol & 0xF;
+				vibrato( false );
+				break;
+			case 0xC0: /* Set Panning.*/
+				panning = ( noteVol & 0xF ) * 17;
+				break;
+			case 0xF0: /* Tone Porta.*/
+				if( ( noteVol & 0xF ) > 0 ) tonePortaParam = noteVol & 0xF;
+				break;
+		}
+		if( noteKey > 0 ) {
+			if( noteKey > 96 ) {
+				keyOn = false;
+			} else {
+				var isPorta = ( noteVol & 0xF0 ) == 0xF0 ||
+					noteEffect == 0x03 || noteEffect == 0x05 ||
+					noteEffect == 0x87 || noteEffect == 0x8C;
+				if( !isPorta ) sample = instrument.samples[ instrument.keyToSample[ noteKey ] ];
+				var fineTune = sample.fineTune;
+				if( noteEffect == 0x75 || noteEffect == 0xF2 ) { /* Set Fine Tune. */
+					fineTune = ( ( noteParam & 0xF ) << 4 ) - 128;
+				}
+				var key = noteKey + sample.relNote;
+				if( key < 1 ) key = 1;
+				if( key > 120 ) key = 120;
+				var per = ( key << 6 ) + ( fineTune >> 1 );
+				if( replay.module.linearPeriods ) {
+					portaPeriod = 7744 - per;
+				} else {
+					portaPeriod = 29021 * Math.pow( 2, -per / 768 );
+				}
+				if( !isPorta ) {
+					period = portaPeriod;
+					sampleIdx = sampleOffset;
+					if( vibratoType < 4 ) vibratoPhase = 0;
+					if( tremoloType < 4 ) tremoloPhase = 0;
+					retrigCount = autoVibratoCount = 0;
+				}
+			}
+		}
+	}
+}
+
+function IBXMNote() {
+	this.key = 0;
+	this.instrument = 0;
+	this.volume = 0;
+	this.effect = 0;
+	this.param = 0;
+	this.toChars = function( chars ) {
+		const keyToString = "A-A#B-C-C#D-D#E-F-F#G-G#";
+		const b36ToString = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";
+		chars[ 0 ] = ( this.key > 0 && this.key < 118 ) ? keyToString.codePointAt( ( ( this.key + 2 ) % 12 ) * 2 ) : 45;
+		chars[ 1 ] = ( this.key > 0 && this.key < 118 ) ? keyToString.codePointAt( ( ( this.key + 2 ) % 12 ) * 2 + 1 ) : 45;
+		chars[ 2 ] = ( this.key > 0 && this.key < 118 ) ? 48 + ( ( ( this.key + 2 ) / 12 ) | 0 ) : 45;
+		chars[ 3 ] = ( this.instrument > 0xF && this.instrument < 0xFF ) ? b36ToString.codePointAt( ( this.instrument >> 4 ) & 0xF ) : 45;
+		chars[ 4 ] = ( this.instrument > 0x0 && this.instrument < 0xFF ) ? b36ToString.codePointAt( this.instrument & 0xF ) : 45;
+		chars[ 5 ] = ( this.volume > 0xF && this.volume < 0xFF ) ? b36ToString.codePointAt( ( this.volume >> 4 ) & 0xF ) : 45;
+		chars[ 6 ] = ( this.volume > 0x0 && this.volume < 0xFF ) ? b36ToString.codePointAt( this.volume & 0xF ) : 45;
+		if( ( this.effect > 0 || this.param > 0 ) && this.effect < 36 ) {
+			chars[ 7 ] = b36ToString.codePointAt( this.effect );
+		} else if( this.effect > 0x80 && this.effect < 0x9F ) {
+			chars[ 7 ] = 96 + ( this.effect & 0x1F );
+		} else {
+			chars[ 7 ] = 45;
+		}
+		chars[ 8 ] = ( this.effect > 0 || this.param > 0 ) ? b36ToString.codePointAt( ( this.param >> 4 ) & 0xF ) : 45;
+		chars[ 9 ] = ( this.effect > 0 || this.param > 0 ) ? b36ToString.codePointAt( this.param & 0xF ) : 45;
+		return chars;
+	}
+}
+
+function IBXMPattern( numChannels, numRows ) {
+	this.numRows = numRows;
+	this.data = new Int8Array( numChannels * numRows * 5 );
+	this.getNote = function( index, note ) {
+		var offset = index * 5;
+		note.key = this.data[ offset ] & 0xFF;
+		note.instrument = this.data[ offset + 1 ] & 0xFF;
+		note.volume = this.data[ offset + 2 ] & 0xFF;
+		note.effect = this.data[ offset + 3 ] & 0xFF;
+		note.param = this.data[ offset + 4 ] & 0xFF;
+		return note;
+	}
+}
+
+function IBXMInstrument() {
+	this.name = "";
+	this.numSamples = 1;
+	this.vibratoType = 0;
+	this.vibratoSweep = 0;
+	this.vibratoDepth = 0;
+	this.vibratoRate = 0;
+	this.volumeFadeOut = 0;
+	this.volumeEnvelope = new IBXMEnvelope();
+	this.panningEnvelope = new IBXMEnvelope();
+	this.keyToSample = new Int8Array( 97 );
+	this.samples = [ new IBXMSample() ];
+}
+
+function IBXMEnvelope() {
+	this.enabled = false;
+	this.sustain = false;
+	this.looped = false;
+	this.sustainTick = 0;
+	this.loopStartTick = 0;
+	this.loopEndTick = 0;
+	this.numPoints = 1;
+	this.pointsTick = new Int32Array( 1 );
+	this.pointsAmpl = new Int32Array( 1 );
+	this.nextTick = function( tick, keyOn ) {
+		tick++;
+		if( this.looped && tick >= this.loopEndTick ) tick = this.loopStartTick;
+		if( this.sustain && keyOn && tick >= this.sustainTick ) tick = this.sustainTick;
+		return tick;
+	}
+	this.calculateAmpl = function( tick ) {
+		var ampl = this.pointsAmpl[ this.numPoints - 1 ];
+		if( tick < this.pointsTick[ this.numPoints - 1 ] ) {
+			var point = 0;
+			for( var idx = 1; idx < this.numPoints; idx++ )
+				if( this.pointsTick[ idx ] <= tick ) point = idx;
+			var dt = this.pointsTick[ point + 1 ] - this.pointsTick[ point ];
+			var da = this.pointsAmpl[ point + 1 ] - this.pointsAmpl[ point ];
+			ampl = this.pointsAmpl[ point ];
+			ampl += ( da / dt ) * ( tick - this.pointsTick[ point ] );
+		}
+		return ampl;
+	}
+}
+
+function IBXMSample() {
+	this.name = "";
+	this.volume = 0;
+	this.panning = -1;
+	this.relNote = 0;
+	this.fineTune = 0;
+	this.loopStart = 0;
+	this.loopLength = 0;
+	this.sampleData = new Int16Array( 1 );
+	this.setSampleData = function( sampleData, loopStart, loopLength, pingPong ) {
+		var sampleLength = sampleData.length;
+		/* Fix loop if necessary.*/
+		if( loopStart < 0 || loopStart > sampleLength )
+			loopStart = sampleLength;
+		if( loopLength < 0 || ( loopStart + loopLength ) > sampleLength )
+			loopLength = sampleLength - loopStart;
+		sampleLength = loopStart + loopLength;
+		/* Allocate new sample.*/
+		var newSampleData = new Int16Array( sampleLength + ( pingPong ? loopLength : 0 ) + 1 );
+		newSampleData.set( sampleData.subarray( 0, sampleLength ) );
+		sampleData = newSampleData;
+		if( pingPong ) {
+			/* Calculate reversed loop.*/
+			for( var idx = 0; idx < loopLength; idx++ )
+				sampleData[ sampleLength + idx ] = sampleData[ sampleLength - idx - 1 ];
+			loopLength *= 2;
+		}
+		/* Extend loop for linear interpolation.*/
+		sampleData[ loopStart + loopLength ] = sampleData[ loopStart ];
+		this.sampleData = sampleData;
+		this.loopStart = loopStart;
+		this.loopLength = loopLength;
+	}
+}
+
+function IBXMData( buffer ) {
+	this.sByte = function( offset ) {
+		return buffer[ offset ] | 0;
+	}
+	this.uByte = function( offset ) {
+		return buffer[ offset ] & 0xFF;
+	}
+	this.ubeShort = function( offset ) {
+		return ( ( buffer[ offset ] & 0xFF ) << 8 ) | ( buffer[ offset + 1 ] & 0xFF );
+	}
+	this.uleShort = function( offset ) {
+		return ( buffer[ offset ] & 0xFF ) | ( ( buffer[ offset + 1 ] & 0xFF ) << 8 );
+	}
+	this.uleInt = function( offset ) {
+		var value = buffer[ offset ] & 0xFF;
+		value = value | ( ( buffer[ offset + 1 ] & 0xFF ) << 8 );
+		value = value | ( ( buffer[ offset + 2 ] & 0xFF ) << 16 );
+		value = value | ( ( buffer[ offset + 3 ] & 0x7F ) << 24 );
+		return value;
+	}
+	this.strLatin1 = function( offset, length ) {
+		var str = new Array( length );
+		for( var idx = 0; idx < length; idx++ ) {
+			var chr = buffer[ offset + idx ] & 0xFF;
+			str[ idx ] = String.fromCharCode( chr < 32 ? 32 : chr );
+		}
+		return str.join('');
+	}
+	this.samS8 = function( offset, length ) {
+		var sampleData = new Int16Array( length );
+		for( var idx = 0; idx < length; idx++ ) {
+			sampleData[ idx ] = buffer[ offset + idx ] << 8;
+		}
+		return sampleData;
+	}
+	this.samS8D = function( offset, length ) {
+		var sampleData = new Int16Array( length );
+		var sam = 0;
+		for( var idx = 0; idx < length; idx++ ) {
+			sam += buffer[ offset + idx ] | 0;
+			sampleData[ idx ] = sam << 8;
+		}
+		return sampleData;
+	}
+	this.samU8 = function( offset, length ) {
+		var sampleData = new Int16Array( length );
+		for( var idx = 0; idx < length; idx++ ) {
+			sampleData[ idx ] = ( ( buffer[ offset + idx ] & 0xFF ) - 128 ) << 8;
+		}
+		return sampleData;
+	}
+	this.samS16 = function( offset, samples ) {
+		var sampleData = new Int16Array( samples );
+		for( var idx = 0; idx < samples; idx++ ) {
+			sampleData[ idx ] = ( buffer[ offset + idx * 2 ] & 0xFF ) | ( buffer[ offset + idx * 2 + 1 ] << 8 );
+		}
+		return sampleData;
+	}
+	this.samS16D = function( offset, samples ) {
+		var sampleData = new Int16Array( samples );
+		var sam = 0;
+		for( var idx = 0; idx < samples; idx++ ) {
+			sam += ( buffer[ offset + idx * 2 ] & 0xFF ) | ( buffer[ offset + idx * 2 + 1 ] << 8 );
+			sampleData[ idx ] = sam;
+		}
+		return sampleData;
+	}
+	this.samU16 = function( offset, samples ) {
+		var sampleData = new Int16Array( samples );
+		for( var idx = 0; idx < samples; idx++ ) {
+			var sam = ( buffer[ offset + idx * 2 ] & 0xFF ) | ( ( buffer[ offset + idx * 2 + 1 ] & 0xFF ) << 8 );
+			sampleData[ idx ] = sam - 32768;
+		}
+		return sampleData;
+	}
+}
+
+function IBXMModule( moduleData ) {
+	this.songName = "Blank";
+	this.numChannels = 4;
+	this.numInstruments = 1;
+	this.numPatterns = 1;
+	this.sequenceLength = 1;
+	this.restartPos = 0;
+	this.defaultGVol = 64;
+	this.defaultSpeed = 6;
+	this.defaultTempo = 125;
+	this.c2Rate = 8287;
+	this.gain = 64;
+	this.linearPeriods = false;
+	this.fastVolSlides = false;
+	this.defaultPanning = new Int32Array( [ 51, 204, 204, 51 ] );
+	this.sequence = new Int32Array( 1 );
+	this.patterns = [ new IBXMPattern( 4, 64 ) ];
+	this.instruments = [ new IBXMInstrument(), new IBXMInstrument() ];
+	this.loadXM = function( ibxmData ) {
+		if( ibxmData.uleShort( 58 ) != 0x0104 )
+			throw "XM format version must be 0x0104!";
+		this.songName = ibxmData.strLatin1( 17, 20 );
+		var deltaEnv = ibxmData.strLatin1( 38, 20 ).startsWith( "DigiBooster Pro" );
+		var dataOffset = 60 + ibxmData.uleInt( 60 );
+		this.sequenceLength = ibxmData.uleShort( 64 );
+		this.restartPos = ibxmData.uleShort( 66 );
+		this.numChannels = ibxmData.uleShort( 68 );
+		this.numPatterns = ibxmData.uleShort( 70 );
+		this.numInstruments = ibxmData.uleShort( 72 );
+		this.linearPeriods = ( ibxmData.uleShort( 74 ) & 0x1 ) > 0;
+		this.defaultGVol = 64;
+		this.defaultSpeed = ibxmData.uleShort( 76 );
+		this.defaultTempo = ibxmData.uleShort( 78 );
+		this.c2Rate = 8363;
+		this.gain = 64;
+		this.fastVolSlides = false;
+		this.defaultPanning = new Int32Array( this.numChannels );
+		for( var idx = 0; idx < this.numChannels; idx++ ) this.defaultPanning[ idx ] = 128;
+		this.sequence = new Int32Array( this.sequenceLength );
+		for( var seqIdx = 0; seqIdx < this.sequenceLength; seqIdx++ ) {
+			var entry = ibxmData.uByte( 80 + seqIdx );
+			this.sequence[ seqIdx ] = entry < this.numPatterns ? entry : 0;
+		}
+		this.patterns = new Array( this.numPatterns );
+		for( var patIdx = 0; patIdx < this.numPatterns; patIdx++ ) {
+			if( ibxmData.uByte( dataOffset + 4 ) != 0 )
+				throw "Unknown pattern packing type!";
+			var numRows = ibxmData.uleShort( dataOffset + 5 );
+			if( numRows < 1 ) {
+				numRows = 1;
+			}
+			var numNotes = numRows * this.numChannels;
+			var pattern = this.patterns[ patIdx ] = new IBXMPattern( this.numChannels, numRows );
+			var patternDataLength = ibxmData.uleShort( dataOffset + 7 );
+			dataOffset += ibxmData.uleInt( dataOffset );
+			var nextOffset = dataOffset + patternDataLength;
+			if( patternDataLength > 0 ) {
+				var patternDataOffset = 0;
+				for( var note = 0; note < numNotes; note++ ) {
+					var flags = ibxmData.uByte( dataOffset );
+					if( ( flags & 0x80 ) == 0 ) flags = 0x1F; else dataOffset++;
+					var key = ( flags & 0x01 ) > 0 ? ibxmData.sByte( dataOffset++ ) : 0;
+					pattern.data[ patternDataOffset++ ] = key;
+					var ins = ( flags & 0x02 ) > 0 ? ibxmData.sByte( dataOffset++ ) : 0;
+					pattern.data[ patternDataOffset++ ] = ins;
+					var vol = ( flags & 0x04 ) > 0 ? ibxmData.sByte( dataOffset++ ) : 0;
+					pattern.data[ patternDataOffset++ ] = vol;
+					var fxc = ( flags & 0x08 ) > 0 ? ibxmData.sByte( dataOffset++ ) : 0;
+					var fxp = ( flags & 0x10 ) > 0 ? ibxmData.sByte( dataOffset++ ) : 0;
+					if( fxc >= 0x40 ) fxc = fxp = 0;
+					pattern.data[ patternDataOffset++ ] = fxc;
+					pattern.data[ patternDataOffset++ ] = fxp;
+				}
+			}
+			dataOffset = nextOffset;
+		}
+		this.instruments = new Array( this.numInstruments + 1 );
+		this.instruments[ 0 ] = new IBXMInstrument();
+		for( var insIdx = 1; insIdx <= this.numInstruments; insIdx++ ) {
+			var instrument = this.instruments[ insIdx ] = new IBXMInstrument();
+			instrument.name = ibxmData.strLatin1( dataOffset + 4, 22 );
+			var numSamples = ibxmData.uleShort( dataOffset + 27 );
+			if( numSamples > 0 ) {
+				instrument.numSamples = numSamples;
+				instrument.samples = new Array( numSamples );
+				for( var keyIdx = 0; keyIdx < 96; keyIdx++ )
+					instrument.keyToSample[ keyIdx + 1 ] = ibxmData.uByte( dataOffset + 33 + keyIdx );
+				var volEnv = instrument.volumeEnvelope = new IBXMEnvelope();
+				volEnv.pointsTick = new Int32Array( 16 );
+				volEnv.pointsAmpl = new Int32Array( 16 );
+				var pointTick = 0;
+				for( var point = 0; point < 12; point++ ) {
+					var pointOffset = dataOffset + 129 + ( point * 4 );
+					pointTick = ( deltaEnv ? pointTick : 0 ) + ibxmData.uleShort( pointOffset );
+					volEnv.pointsTick[ point ] = pointTick;
+					volEnv.pointsAmpl[ point ] = ibxmData.uleShort( pointOffset + 2 );
+				}
+				var panEnv = instrument.panningEnvelope = new IBXMEnvelope();
+				panEnv.pointsTick = new Int32Array( 16 );
+				panEnv.pointsAmpl = new Int32Array( 16 );
+				pointTick = 0;
+				for( var point = 0; point < 12; point++ ) {
+					var pointOffset = dataOffset + 177 + ( point * 4 );
+					pointTick = ( deltaEnv ? pointTick : 0 ) + ibxmData.uleShort( pointOffset );
+					panEnv.pointsTick[ point ] = pointTick;
+					panEnv.pointsAmpl[ point ] = ibxmData.uleShort( pointOffset + 2 );
+				}
+				volEnv.numPoints = ibxmData.uByte( dataOffset + 225 );
+				if( volEnv.numPoints > 12 ) volEnv.numPoints = 0;
+				panEnv.numPoints = ibxmData.uByte( dataOffset + 226 );
+				if( panEnv.numPoints > 12 ) panEnv.numPoints = 0;
+				volEnv.sustainTick = volEnv.pointsTick[ ibxmData.uByte( dataOffset + 227 ) & 0xF ];
+				volEnv.loopStartTick = volEnv.pointsTick[ ibxmData.uByte( dataOffset + 228 ) & 0xF ];
+				volEnv.loopEndTick = volEnv.pointsTick[ ibxmData.uByte( dataOffset + 229 ) & 0xF ];
+				panEnv.sustainTick = panEnv.pointsTick[ ibxmData.uByte( dataOffset + 230 ) & 0xF ];
+				panEnv.loopStartTick = panEnv.pointsTick[ ibxmData.uByte( dataOffset + 231 ) & 0xF ];
+				panEnv.loopEndTick = panEnv.pointsTick[ ibxmData.uByte( dataOffset + 232 ) & 0xF ];
+				volEnv.enabled = volEnv.numPoints > 0 && ( ibxmData.uByte( dataOffset + 233 ) & 0x1 ) > 0;
+				volEnv.sustain = ( ibxmData.uByte( dataOffset + 233 ) & 0x2 ) > 0;
+				volEnv.looped = ( ibxmData.uByte( dataOffset + 233 ) & 0x4 ) > 0;
+				panEnv.enabled = panEnv.numPoints > 0 && ( ibxmData.uByte( dataOffset + 234 ) & 0x1 ) > 0;
+				panEnv.sustain = ( ibxmData.uByte( dataOffset + 234 ) & 0x2 ) > 0;
+				panEnv.looped = ( ibxmData.uByte( dataOffset + 234 ) & 0x4 ) > 0;
+				instrument.vibratoType = ibxmData.uByte( dataOffset + 235 );
+				instrument.vibratoSweep = ibxmData.uByte( dataOffset + 236 );
+				instrument.vibratoDepth = ibxmData.uByte( dataOffset + 237 );
+				instrument.vibratoRate = ibxmData.uByte( dataOffset + 238 );
+				instrument.volumeFadeOut = ibxmData.uleShort( dataOffset + 239 );
+			}
+			dataOffset += ibxmData.uleInt( dataOffset );
+			var sampleHeaderOffset = dataOffset;
+			dataOffset += numSamples * 40;
+			for( var samIdx = 0; samIdx < numSamples; samIdx++ ) {
+				var sample = instrument.samples[ samIdx ] = new IBXMSample();
+				var sampleDataBytes = ibxmData.uleInt( sampleHeaderOffset );
+				var sampleLoopStart = ibxmData.uleInt( sampleHeaderOffset + 4 );
+				var sampleLoopLength = ibxmData.uleInt( sampleHeaderOffset + 8 );
+				sample.volume = ibxmData.sByte( sampleHeaderOffset + 12 );
+				sample.fineTune = ibxmData.sByte( sampleHeaderOffset + 13 );
+				var looped = ( ibxmData.uByte( sampleHeaderOffset + 14 ) & 0x3 ) > 0;
+				var pingPong = ( ibxmData.uByte( sampleHeaderOffset + 14 ) & 0x2 ) > 0;
+				var sixteenBit = ( ibxmData.uByte( sampleHeaderOffset + 14 ) & 0x10 ) > 0;
+				sample.panning = ibxmData.uByte( sampleHeaderOffset + 15 );
+				sample.relNote = ibxmData.sByte( sampleHeaderOffset + 16 );
+				sample.name = ibxmData.strLatin1( sampleHeaderOffset + 18, 22 );
+				sampleHeaderOffset += 40;
+				if( !looped || ( sampleLoopStart + sampleLoopLength ) > sampleDataBytes ) {
+					sampleLoopStart = sampleDataBytes;
+					sampleLoopLength = 0;
+				}
+				if( sixteenBit ) {
+					sample.setSampleData( ibxmData.samS16D( dataOffset, sampleDataBytes >> 1 ), sampleLoopStart >> 1, sampleLoopLength >> 1, pingPong );
+				} else {
+					sample.setSampleData( ibxmData.samS8D( dataOffset, sampleDataBytes ), sampleLoopStart, sampleLoopLength, pingPong );
+				}
+				dataOffset += sampleDataBytes;
+			}
+		}
+	}
+	this.loadS3M = function( ibxmData ) {
+		this.songName = ibxmData.strLatin1( 0, 28 );
+		this.sequenceLength = ibxmData.uleShort( 32 );
+		this.numInstruments = ibxmData.uleShort( 34 );
+		this.numPatterns = ibxmData.uleShort( 36 );
+		var flags = ibxmData.uleShort( 38 );
+		var version = ibxmData.uleShort( 40 );
+		this.fastVolSlides = ( ( flags & 0x40 ) == 0x40 ) || version == 0x1300;
+		var signedSamples = ibxmData.uleShort( 42 ) == 1;
+		if( ibxmData.uleInt( 44 ) != 0x4d524353 ) throw "Not an S3M file!";
+		this.defaultGVol = ibxmData.uByte( 48 );
+		this.defaultSpeed = ibxmData.uByte( 49 );
+		this.defaultTempo = ibxmData.uByte( 50 );
+		this.c2Rate = 8363;
+		this.gain = ibxmData.uByte( 51 ) & 0x7F;
+		var stereoMode = ( ibxmData.uByte( 51 ) & 0x80 ) == 0x80;
+		var defaultPan = ibxmData.uByte( 53 ) == 0xFC;
+		var channelMap = new Int32Array( 32 );
+		this.numChannels = 0;
+		for( var chanIdx = 0; chanIdx < 32; chanIdx++ ) {
+			channelMap[ chanIdx ] = -1;
+			if( ibxmData.uByte( 64 + chanIdx ) < 16 )
+				channelMap[ chanIdx ] = this.numChannels++;
+		}
+		this.sequence = new Int32Array( this.sequenceLength );
+		for( var seqIdx = 0; seqIdx < this.sequenceLength; seqIdx++ )
+			this.sequence[ seqIdx ] = ibxmData.uByte( 96 + seqIdx );
+		var moduleDataIdx = 96 + this.sequenceLength;
+		this.instruments = new Array( this.numInstruments + 1 );
+		this.instruments[ 0 ] = new IBXMInstrument();
+		for( var instIdx = 1; instIdx <= this.numInstruments; instIdx++ ) {
+			var instrument = this.instruments[ instIdx ] = new IBXMInstrument();
+			var sample = instrument.samples[ 0 ];
+			var instOffset = ibxmData.uleShort( moduleDataIdx ) << 4;
+			moduleDataIdx += 2;
+			instrument.name = ibxmData.strLatin1( instOffset + 48, 28 );
+			if( ibxmData.uByte( instOffset ) != 1 ) continue;
+			if( ibxmData.uleShort( instOffset + 76 ) != 0x4353 ) continue;
+			var sampleOffset = ibxmData.uByte( instOffset + 13 ) << 20;
+			sampleOffset += ibxmData.uleShort( instOffset + 14 ) << 4;
+			var sampleLength = ibxmData.uleInt( instOffset + 16 );
+			var loopStart = ibxmData.uleInt( instOffset + 20 );
+			var loopLength = ibxmData.uleInt( instOffset + 24 ) - loopStart;
+			sample.volume = ibxmData.uByte( instOffset + 28 );
+			sample.panning = -1;
+			var packed = ibxmData.uByte( instOffset + 30 ) != 0;
+			var loopOn = ( ibxmData.uByte( instOffset + 31 ) & 0x1 ) == 0x1;
+			if( loopStart + loopLength > sampleLength )
+				loopLength = sampleLength - loopStart;
+			if( loopLength < 1 || !loopOn ) {
+				loopStart = sampleLength;
+				loopLength = 0;
+			}
+			var stereo = ( ibxmData.uByte( instOffset + 31 ) & 0x2 ) == 0x2;
+			var sixteenBit = ( ibxmData.uByte( instOffset + 31 ) & 0x4 ) == 0x4;
+			if( packed ) throw "Packed samples not supported!";
+			var c2Rate = ibxmData.uleInt( instOffset + 32 );
+			var tune = ( Math.log( c2Rate ) - Math.log( this.c2Rate ) ) * 12 / Math.log( 2 );
+			sample.relNote = Math.round( tune );
+			sample.fineTune = Math.round( ( tune - sample.relNote ) * 128 );
+			if( sixteenBit ) {
+				if( signedSamples ) {
+					sample.setSampleData( ibxmData.samS16( sampleOffset, sampleLength ), loopStart, loopLength, false );
+				} else {
+					sample.setSampleData( ibxmData.samU16( sampleOffset, sampleLength ), loopStart, loopLength, false );
+				}
+			} else {
+				if( signedSamples ) {
+					sample.setSampleData( ibxmData.samS8( sampleOffset, sampleLength ), loopStart, loopLength, false );
+				} else {
+					sample.setSampleData( ibxmData.samU8( sampleOffset, sampleLength ), loopStart, loopLength, false );
+				}
+			}
+		}
+		this.patterns = new Array( this.numPatterns );
+		for( var patIdx = 0; patIdx < this.numPatterns; patIdx++ ) {
+			var pattern = this.patterns[ patIdx ] = new IBXMPattern( this.numChannels, 64 );
+			var inOffset = ( ibxmData.uleShort( moduleDataIdx ) << 4 ) + 2;
+			var rowIdx = 0;
+			while( rowIdx < 64 ) {
+				var token = ibxmData.uByte( inOffset++ );
+				if( token == 0 ) {
+					rowIdx++;
+					continue;
+				}
+				var noteKey = 0;
+				var noteIns = 0;
+				if( ( token & 0x20 ) == 0x20 ) { /* Key + Instrument.*/
+					noteKey = ibxmData.uByte( inOffset++ );
+					noteIns = ibxmData.uByte( inOffset++ );
+					if( noteKey < 0xFE )
+						noteKey = ( noteKey >> 4 ) * 12 + ( noteKey & 0xF ) + 1;
+					if( noteKey == 0xFF ) noteKey = 0;
+				}
+				var noteVol = 0;
+				if( ( token & 0x40 ) == 0x40 ) { /* Volume Column.*/
+					noteVol = ( ibxmData.uByte( inOffset++ ) & 0x7F ) + 0x10;
+					if( noteVol > 0x50 ) noteVol = 0;
+				}
+				var noteEffect = 0;
+				var noteParam = 0;
+				if( ( token & 0x80 ) == 0x80 ) { /* Effect + Param.*/
+					noteEffect = ibxmData.uByte( inOffset++ );
+					noteParam = ibxmData.uByte( inOffset++ );
+					if( noteEffect < 1 || noteEffect >= 0x40 )
+						noteEffect = noteParam = 0;
+					if( noteEffect > 0 ) noteEffect += 0x80;
+				}
+				var chanIdx = channelMap[ token & 0x1F ];
+				if( chanIdx >= 0 ) {
+					var noteOffset = ( rowIdx * this.numChannels + chanIdx ) * 5;
+					pattern.data[ noteOffset     ] = noteKey;
+					pattern.data[ noteOffset + 1 ] = noteIns;
+					pattern.data[ noteOffset + 2 ] = noteVol;
+					pattern.data[ noteOffset + 3 ] = noteEffect;
+					pattern.data[ noteOffset + 4 ] = noteParam;
+				}
+			}
+			moduleDataIdx += 2;
+		}
+		this.defaultPanning = new Int32Array( this.numChannels );
+		for( var chanIdx = 0; chanIdx < 32; chanIdx++ ) {
+			if( channelMap[ chanIdx ] < 0 ) continue;
+			var panning = 7;
+			if( stereoMode ) {
+				panning = 12;
+				if( ibxmData.uByte( 64 + chanIdx ) < 8 ) panning = 3;
+			}
+			if( defaultPan ) {
+				var panFlags = ibxmData.uByte( moduleDataIdx + chanIdx );
+				if( ( panFlags & 0x20 ) == 0x20 ) panning = panFlags & 0xF;
+			}
+			this.defaultPanning[ channelMap[ chanIdx ] ] = panning * 17;
+		}
+	}
+	this.loadMod = function( ibxmData ) {
+		this.songName = ibxmData.strLatin1( 0, 20 );
+		this.sequenceLength = ibxmData.uByte( 950 ) & 0x7F;
+		this.restartPos = ibxmData.uByte( 951 ) & 0x7F;
+		if( this.restartPos >= this.sequenceLength ) this.restartPos = 0;
+		this.sequence = new Int32Array( 128 );
+		for( var seqIdx = 0; seqIdx < 128; seqIdx++ ) {
+			var patIdx = ibxmData.uByte( 952 + seqIdx ) & 0x7F;
+			this.sequence[ seqIdx ] = patIdx;
+			if( patIdx >= this.numPatterns ) this.numPatterns = patIdx + 1;
+		}
+		switch( ibxmData.ubeShort( 1082 ) ) {
+			case 0x4b2e: /* M.K. */
+			case 0x4b21: /* M!K! */
+			case 0x5434: /* FLT4 */
+				this.numChannels = 4;
+				this.c2Rate = 8287; /* PAL */
+				this.gain = 64;
+				break;
+			case 0x484e: /* xCHN */
+				this.numChannels = ibxmData.uByte( 1080 ) - 48;
+				this.c2Rate = 8363; /* NTSC */
+				this.gain = 32;
+				break;
+			case 0x4348: /* xxCH */
+				this.numChannels  = ( ibxmData.uByte( 1080 ) - 48 ) * 10;
+				this.numChannels += ibxmData.uByte( 1081 ) - 48;
+				this.c2Rate = 8363; /* NTSC */
+				this.gain = 32;
+				break;
+			default:
+				throw "MOD Format not recognised!";
+		}
+		this.defaultGVol = 64;
+		this.defaultSpeed = 6;
+		this.defaultTempo = 125;
+		this.linearPeriods = false;
+		this.fastVolSlides = false;
+		this.defaultPanning = new Int32Array( this.numChannels );
+		for( var idx = 0; idx < this.numChannels; idx++ ) {
+			this.defaultPanning[ idx ] = 51;
+			if( ( idx & 3 ) == 1 || ( idx & 3 ) == 2 )
+				this.defaultPanning[ idx ] = 204;
+		}
+		var moduleDataIdx = 1084;
+		this.patterns = new Array( this.numPatterns );
+		for( var patIdx = 0; patIdx < this.numPatterns; patIdx++ ) {
+			var pattern = this.patterns[ patIdx ] = new IBXMPattern( this.numChannels, 64 );
+			for( var patDataIdx = 0; patDataIdx < pattern.data.length; patDataIdx += 5 ) {
+				var period = ( ibxmData.uByte( moduleDataIdx ) & 0xF ) << 8;
+				period = ( period | ibxmData.uByte( moduleDataIdx + 1 ) ) * 4;
+				if( period >= 112 && period <= 6848 ) {
+					var key = Math.round( -12 * Math.log( period / 29021 ) / Math.log( 2 ) );
+					pattern.data[ patDataIdx ] = key;
+				}
+				var ins = ( ibxmData.uByte( moduleDataIdx + 2 ) & 0xF0 ) >> 4;
+				ins = ins | ibxmData.uByte( moduleDataIdx ) & 0x10;
+				pattern.data[ patDataIdx + 1 ] = ins;
+				var effect = ibxmData.uByte( moduleDataIdx + 2 ) & 0x0F;
+				var param  = ibxmData.uByte( moduleDataIdx + 3 );
+				if( param == 0 && ( effect < 3 || effect == 0xA ) ) effect = 0;
+				if( param == 0 && ( effect == 5 || effect == 6 ) ) effect -= 2;
+				if( effect == 8 ) {
+					if( this.numChannels == 4 ) {
+						effect = param = 0;
+					} else if( param > 128 ) {
+						param = 128;
+					} else {
+						param = ( param * 255 ) >> 7;
+					}
+				}
+				pattern.data[ patDataIdx + 3 ] = effect;
+				pattern.data[ patDataIdx + 4 ] = param;
+				moduleDataIdx += 4;
+			}
+		}
+		this.numInstruments = 31;
+		this.instruments = new Array( this.numInstruments + 1 );
+		this.instruments[ 0 ] = new IBXMInstrument();
+		for( var instIdx = 1; instIdx <= this.numInstruments; instIdx++ ) {
+			var instrument = this.instruments[ instIdx ] = new IBXMInstrument();
+			var sample = instrument.samples[ 0 ];
+			instrument.name = ibxmData.strLatin1( instIdx * 30 - 10, 22 );
+			var sampleLength = ibxmData.ubeShort( instIdx * 30 + 12 ) * 2;
+			var fineTune = ( ibxmData.uByte( instIdx * 30 + 14 ) & 0xF ) << 4;
+			sample.fineTune = ( fineTune < 128 ) ? fineTune : fineTune - 256;
+			var volume = ibxmData.uByte( instIdx * 30 + 15 ) & 0x7F;
+			sample.volume = ( volume <= 64 ) ? volume : 64;
+			sample.panning = -1;
+			var loopStart = ibxmData.ubeShort( instIdx * 30 + 16 ) * 2;
+			var loopLength = ibxmData.ubeShort( instIdx * 30 + 18 ) * 2;
+			if( loopStart + loopLength > sampleLength ) {
+				if( loopStart / 2 + loopLength <= sampleLength ) {
+					/* Some old modules have loop start in bytes. */
+					loopStart = loopStart / 2;
+				} else {
+					loopLength = sampleLength - loopStart;
+				}
+			}
+			if( loopLength < 4 ) {
+				loopStart = sampleLength;
+				loopLength = 0;
+			}
+			sample.setSampleData( ibxmData.samS8( moduleDataIdx, sampleLength ), loopStart, loopLength, false );
+			moduleDataIdx += sampleLength;
+		}
+	}
+	if( moduleData ) {
+		var ibxmData = new IBXMData( moduleData );
+		if( ibxmData.strLatin1( 0, 17 ) == "Extended Module: " ) {
+			this.loadXM( ibxmData );
+		} else if( ibxmData.strLatin1( 44, 4 ) == "SCRM" ) {
+			this.loadS3M( ibxmData );
+		} else {
+			this.loadMod( ibxmData );
+		}
+	}
+}
diff --git a/instance/pleroma-mods/pleroma-mod-tracker/mod.js b/instance/pleroma-mods/pleroma-mod-tracker/mod.js
new file mode 100644
index 0000000000..97b9fad3b4
--- /dev/null
+++ b/instance/pleroma-mods/pleroma-mod-tracker/mod.js
@@ -0,0 +1,258 @@
+PleromaModPlayer = function (attachment) {
+  this.file = attachment.querySelector("a").href;
+  this.attachment = attachment.cloneNode(true);
+  this.attachment.setAttribute("class", "mod-player");
+  attachment.parentNode.replaceChild(this.attachment, attachment);
+  this.initComponents();
+  this.module = null;
+  this.replay = null;
+  this.patternDisplay = null;
+  this.samplePosition = 0;
+  this.channel = 0;
+  this.patternDisplay = new PatternDisplay(PleromaModTracker.chars.sheet, PleromaModTracker.chars.x, PleromaModTracker.chars.y);
+  this.patternCanvas.width = this.patternDisplay.getMaxWidth(PleromaModTracker.chars.x);
+  this.patternCanvas.height = this.patternDisplay.getMaxHeight();
+  this.loadFile();
+};
+[
+  function initComponents () {
+    if (!window.CompatAudioContext) {
+      const error = document.createElement("div");
+      error.setAttribute("class", "alert error");
+      error.innerText = "can't use webaudio. check if webaudio is enabled.";
+      this.attachment.appendChild(error);
+      return;
+    }
+
+    this.songName = this.attachment.querySelector("a");
+    this.songName.setAttribute("class", "mod-title");
+
+    const controls = document.createElement("div");
+    controls.setAttribute("class", "mod-controls");
+    
+    this.playButton = document.createElement("button");
+    this.playButton.onclick = () => { this.play() };
+    this.playButton.innerText = " ▶ ";
+    this.playButton.disabled = !window.CompatAudioContext;
+    controls.appendChild(this.playButton);
+
+    this.stopButton = document.createElement("button");
+    this.stopButton.onclick = () => { this.stop() };
+    this.stopButton.innerText = " ■ ";
+    controls.appendChild(this.stopButton);
+
+    this.seekBar = document.createElement("input");
+    this.seekBar.setAttribute("class", "mod-seekbar");
+    this.seekBar.setAttribute("type", "range");
+    this.seekBar.onmousedown = () => { this.stop() };
+    this.seekBar.onmouseup = () => { this.play() };
+    controls.appendChild(this.seekBar);
+
+    this.attachment.appendChild(controls);
+
+    this.patternCanvas = document.createElement("canvas");
+    this.patternCanvas.setAttribute("class", "mod-patterns");
+    this.attachment.appendChild(this.patternCanvas);
+
+    this.instruments = document.createElement("div");
+    this.instruments.setAttribute("class", "mod-instruments");
+    this.attachment.appendChild(this.instruments);
+  },
+
+  function play () {
+    this.stop();
+    PleromaModTracker.currentDisplay = this;
+    PleromaModTracker.player.setAudioSource(this.replay);
+    this.samplePosition = this.replay.seek(this.seekBar.value * PleromaModTracker.player.getSamplingRate());
+    PleromaModTracker.setReverb(50);
+    PleromaModTracker.player.play();
+  },
+  function stop () {
+    PleromaModTracker.player.stop();
+    PleromaModTracker.currentDisplay = null;
+  },
+
+  function loadFile () {
+    window.fetch(this.file).then((response) => {
+      if (response.ok) {
+        response.arrayBuffer().then((buffer) => {
+          this.setModule(new Int8Array(buffer));
+        }).catch((error) => {
+          console.error("can't read module data");
+          console.error(error);
+        });
+      }
+    }).catch((error) => {
+      console.warn("can't load module");
+      console.warn(error);
+    });
+  },
+
+  function setModule (moduleData) {
+    this.module = new IBXMModule(moduleData);
+    const rate = PleromaModTracker.player.getSamplingRate();
+    this.replay = new IBXMReplay(this.module, rate);
+    const duration = Math.round(this.replay.calculateSongDuration() / rate);
+    this.samplePosition = 0;
+    this.seekBar.value = 0;
+    this.seekBar.max = duration;
+    this.songName.innerText = this.module.songName;
+    let instruments = "";
+    for (let idx = 1; idx < this.module.instruments.length; idx++) {
+      const name = this.module.instruments[idx].name;
+      if (name.trim().length > 0) {
+        const instrument = (idx < 16 ? "&nbsp;" : "") + idx.toString(16);
+        instruments = instruments + instrument + " " + name.replace(/\s/g, "&nbsp;") + "<br/>";
+      }
+    }
+    this.instruments.innerHTML = instruments;
+    this.channel = 0;
+    this.clearDisplay();
+    this.updateDisplay();
+  },
+
+  function updateDisplay (count) {
+    if (count) {
+      this.samplePosition += count;
+    }
+    this.seekBar.value = this.samplePosition / PleromaModTracker.player.getSamplingRate();
+    this.patternDisplay.display(this.module, this.replay, this.channel, this.patternCanvas);
+  },
+
+  function clearDisplay () {
+    const context = this.patternCanvas.getContext("2d");
+    context.fillStyle = "black";
+    context.fillRect(0, 0, this.patternCanvas.width, this.patternCanvas.height);
+  },
+].forEach((fn) => { PleromaModPlayer.prototype[fn.name] = fn; });
+
+PleromaModTracker = function () {
+  this.config = {
+    stylesheet: "style.css",
+    pattern: "\\.(xm|mod|s3m)$"
+  };
+  this.toUpdate = [];
+  this.ready = false;
+};
+[
+  function onMutation (mutation, observer) {
+    for (const addedNode of mutation.addedNodes) {
+      this.handlePost(addedNode);
+    }
+  },
+
+  function onReady () {
+    const posts = document.querySelectorAll(".status");
+    for (const post of posts) {
+      this.handlePost(post);
+    }
+  },
+
+  function handlePost (postElement) {
+    if (
+      postElement.querySelectorAll &&
+      postElement.querySelectorAll(".attachments").length > 0
+    ) {
+      const attachments = this.getModuleAttachments(postElement);
+      for (const attachment of attachments) {
+        if (this.ready) {
+          new PleromaModPlayer(attachment);
+        } else {
+          this.toUpdate.push(attachment);
+        }
+      }
+    }
+  },
+
+  function getModuleAttachments (postElement) {
+    const result = [];
+    const nonGalleryElements = postElement.querySelectorAll(".non-gallery");
+    const regex = new RegExp(this.config.pattern, "i");
+    for (const nonGalleryElement of nonGalleryElements) {
+      if (
+        regex.test(nonGalleryElement.querySelector("a").href)
+      ) {
+        result.push(nonGalleryElement);
+      }
+    }
+    return result;
+  },
+
+  function catchUp () {
+    for (const attachment of this.toUpdate) {
+      new PleromaModPlayer(attachment);
+    }
+    this.toUpdate = [];
+  },
+
+  function run () {
+    PleromaModLoader.includeModCss("pleroma-mod-tracker/" + this.config.stylesheet);
+    PleromaModTracker.chars = {
+      x: 8,
+      y: 16
+    };
+    if (!window.CompatAudioContext) {
+      this.ready = true;
+      this.catchUp();
+      return;
+    }
+    Promise.all([
+      PleromaModLoader.includeModScript("pleroma-mod-tracker/audio-player.js"),
+      PleromaModLoader.includeModScript("pleroma-mod-tracker/ibxm.js"),
+      PleromaModLoader.includeModScript("pleroma-mod-tracker/pattern-display.js"),
+    ]).then(() => {
+      const imageCharset = new Image();
+      imageCharset.src = PleromaModLoader.getModDir() + "pleroma-mod-tracker/topaz8.png";
+      imageCharset.addEventListener("load", () => {
+        initCharset(imageCharset, PleromaModTracker.chars.x, PleromaModTracker.chars.y, (chs) => {
+          PleromaModTracker.chars.sheet = chs;
+          PleromaModTracker.player = new AudioPlayer(
+            PleromaModTracker.onPlayerUpdate,
+            PleromaModTracker.onEffect
+          );
+          this.ready = true;
+          this.catchUp();
+        });
+      });
+    });
+  },
+].forEach((fn) => { PleromaModTracker.prototype[fn.name] = fn; });
+
+window.CompatAudioContext = window.AudioContext || window.webkitAudioContext;
+PleromaModTracker.currentDisplay = null;
+
+[
+  function onPlayerUpdate (count) {
+    if (PleromaModTracker.currentDisplay) {
+      PleromaModTracker.currentDisplay.updateDisplay(count);
+    }
+  },
+
+  function setReverb (milliSeconds) {
+    const length = Math.round(PleromaModTracker.player.getSamplingRate() * milliSeconds / 1000);
+    PleromaModTracker.reverb = {
+      idx: 0,
+      length: length,
+      bufferLeft: new Float32Array(length),
+      bufferRight: new Float32Array(length)
+    };
+  },
+
+  function onEffect (mixBufferLeft, mixBufferRight, count) {
+    if (PleromaModTracker.reverb.length) {
+      const reverb = PleromaModTracker.reverb;
+      for (let mixIdx = 0; mixIdx < count; mixIdx++) {
+        mixBufferLeft[mixIdx] = (mixBufferLeft[mixIdx] * 3 + reverb.bufferRight[reverb.idx]) * 0.25;
+        mixBufferRight[mixIdx] = (mixBufferRight[mixIdx] * 3 + reverb.bufferLeft[reverb.idx]) * 0.25;
+        reverb.bufferLeft[reverb.idx] = mixBufferLeft[mixIdx];
+        reverb.bufferRight[reverb.idx] = mixBufferRight[mixIdx];
+        reverb.idx++;
+        if (reverb.idx >= reverb.length) {
+          reverb.idx = 0;
+        }
+      }
+    }
+  }
+].forEach((fn) => { PleromaModTracker[fn.name] = fn; });
+
+PleromaModLoader.registerMod(PleromaModTracker);
diff --git a/instance/pleroma-mods/pleroma-mod-tracker/pattern-display.js b/instance/pleroma-mods/pleroma-mod-tracker/pattern-display.js
new file mode 100644
index 0000000000..d14146cf23
--- /dev/null
+++ b/instance/pleroma-mods/pleroma-mod-tracker/pattern-display.js
@@ -0,0 +1,191 @@
+
+function PatternDisplay( charsetImg, cw, ch ) {
+	const fxclr = [
+		/* 0 1 2 3 4 5 6 7 8 9 : ; < = > ? */
+		   1,1,1,1,1,7,7,5,5,4,0,0,0,0,0,0,
+		/* @ A B C D E F G H I J K L M N O */
+		   0,5,6,5,6,0,6,5,5,0,0,0,4,0,0,0,
+		/* P Q R S T U V W X Y Z [ \ ] ^ _ */
+		   5,0,4,0,5,0,0,0,1,0,0,0,0,0,0,0,
+		/* ` a b c d e f g h i j k l m n o */
+		   0,6,6,6,5,1,1,1,1,5,1,7,7,0,0,4,
+		/* p q r s t u v w x y z { | } ~ */
+		   0,4,5,0,6,1,5,0,0,0,0,0,0,0,0
+	];
+	const exclr = [
+		/* 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F */
+		   0,1,1,1,1,1,6,5,0,4,0,0,0,0,0,0,0,5,5,4,4,4,4
+	];
+	const sxclr = [
+		/* 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F */
+		   5,4,1,1,5,0,0,0,5,0,0,0,0,0,0,0,0,5,4,4,4,4,4
+	];
+	const vcclr = [
+		/* 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F */
+		   5,5,5,5,5,0,5,5,5,5,0,0,0,0,0,0,0,1,1,5,5,5,1
+	];
+	var scrollX = 0, scrollWidth = 0;
+	var drawChar = function( chr, row, col, clr, ctx ) {
+		ctx.drawImage( charsetImg, ( chr - 32 ) * cw, clr * ch, cw, ch, col * cw, row * ch, cw, ch );
+	};
+	var drawString = function( str, row, col, clr, ctx ) {
+		for( var idx = 0, len = str.length; idx < len; idx++ ) {
+			drawChar( str.codePointAt( idx ), row, col + idx, clr, ctx );
+		}
+	};
+	var drawInt = function( val, row, col, clr, len, ctx ) {
+		while( len > 0 ) {
+			len = len - 1;
+			drawChar( 48 + val % 10, row, col + len, clr, ctx );
+			val = ( val / 10 ) | 0;
+		}
+	};
+	this.getColumn = function( x ) {
+		if( x < 4 * cw ) {
+			return -1;
+		} else {
+			return ( ( x - 4 * cw ) / ( 11 * cw ) ) | 0;
+		}
+	};
+	this.getNumCols = function( canvas ) {
+		return ( ( canvas.width - 4 * cw ) / ( 11 * cw ) ) | 0;
+	};
+	this.getMaxWidth = function( numChannels ) {
+		return 4 * cw + numChannels * 11 * cw;
+	};
+	this.getMaxHeight = function() {
+		return 17 * ch;
+	};
+	this.getScrollX = function() {
+		return scrollX * cw;
+	};
+	this.getScrollY = function() {
+		return 16 * ch;
+	};
+	this.getScrollWidth = function() {
+		return scrollWidth * cw;
+	};
+	this.display = function( module, replay, channel, canvas ) {
+		var pat = module.sequence[ replay.getSequencePos() ];
+		var row = replay.getRow();
+		var ctx = canvas.getContext( "2d" );
+		if( pat < 0 || pat >= module.numPatterns ) {
+			pat = 0;
+		}
+		var numChan = module.numChannels;
+		var pattern = module.patterns[ pat ];
+		var numRows = pattern.numRows;
+		var numCols = this.getNumCols( canvas );
+		if( numCols > numChan - channel ) {
+			numCols = numChan - channel;
+		}
+		var note = new IBXMNote();
+		var chars = [ 10 ];
+		drawInt( pat, 0, 0, 3, 3, ctx );
+		drawChar( 32, 0, 3, 0, ctx );
+		for( var c = 0; c < numCols; c++ ) {
+			if( replay.isMuted( c + channel ) ) {
+				drawString( " Muted  ", 0, c * 11 + 4, 3, ctx );
+				drawInt( c + channel, 0, c * 11 + 12, 3, 2, ctx );
+			} else {
+				drawString( "Channel ", 0, c * 11 + 4, 0, ctx );
+				drawInt( c + channel, 0, c * 11 + 12, 0, 2, ctx );
+			}
+			drawChar( 32, 0, c * 11 + 14, 0, ctx );
+		}
+		for( var y = 1; y < 16; y++ ) {
+			var r = row - 8 + y;
+			if( r >= 0 && r < numRows ) {
+				var bclr = ( y == 8 ) ? 8 : 0;
+				drawInt( r, y, 0, bclr, 3, ctx );
+				drawChar( 32, y, 3, bclr, ctx );
+				for( var c = 0; c < numCols; c++ ) {
+					var x = 4 + c * 11;
+					pattern.getNote( r * numChan + c + channel, note ).toChars( chars );
+					if( replay.isMuted( c + channel ) ) {
+						for( var idx = 0; idx < 10; idx++ ) {
+							drawChar( chars[ idx ], y, x + idx, bclr, ctx );
+						}
+					} else {
+						var clr = chars[ 0 ] == 45 ? bclr : bclr + 2;
+						for( var idx = 0; idx < 3; idx++ ) {
+							drawChar( chars[ idx ], y, x + idx, clr, ctx );
+						}
+						for( var idx = 3; idx < 5; idx++ ) {
+							clr = chars[ idx ] == 45 ? bclr : bclr + 3;
+							drawChar( chars[ idx ], y, x + idx, clr, ctx );
+						}
+						clr = bclr;
+						if( chars[ 5 ] >= 48 && chars[ 5 ] <= 70 ) {
+							clr = bclr + vcclr[ chars[ 5 ] - 48 ];
+						}
+						drawChar( chars[ 5 ], y, x + 5, clr, ctx );
+						drawChar( chars[ 6 ], y, x + 6, clr, ctx );
+						if( chars[ 7 ] == 69 ) {
+							clr = bclr;
+							if( chars[ 8 ] >= 48 && chars[ 8 ] <= 70 ) {
+								clr = clr + exclr[ chars[ 8 ] - 48 ];
+							}
+						} else if( chars[ 7 ] == 115 ) {
+							clr = bclr;
+							if( chars[ 8 ] >= 48 && chars[ 8 ] <= 70 ) {
+								clr = clr + sxclr[ chars[ 8 ] - 48 ];
+							}
+						} else {
+							clr = bclr;
+							if( chars[ 7 ] >= 48 && chars[ 7 ] <= 126 ) {
+								clr = clr + fxclr[ chars[ 7 ] - 48 ];
+							}
+						}
+						for( var idx = 7; idx < 10; idx++ ) {
+							drawChar( chars[ idx ], y, x + idx, clr, ctx );
+						}
+					}
+					drawChar( 32, y, x + 10, 0, ctx );
+				}
+			} else {
+				drawString( "    ", y, 0, 0, ctx );
+				for( var c = 0; c < numCols; c++ ) {
+					drawString( "           ", y, 4 + c * 11, 0, ctx );
+				}
+			}
+		}
+		scrollX = 4 + Math.round( numCols * 11 * channel / numChan );
+		scrollWidth = Math.round( numCols * 11 * numCols / numChan );
+		for( var c = 0; c < scrollX; c++ ) {
+			drawChar( 32, 16, c, 0, ctx );
+		}
+		drawChar( 91, 16, scrollX - 1, 0, ctx );
+		for( var c = scrollX, c1 = scrollX + scrollWidth - 1; c < c1; c++ ) {
+			drawChar( 61, 16, c, 0, ctx );
+		}
+		drawChar( 93, 16, scrollX + scrollWidth - 1, 0, ctx );
+		for( var c = scrollX + scrollWidth, c1 = 4 + numCols * 11; c < c1; c++ ) {
+			drawChar( 32, 16, c, 0, ctx );
+		}
+	};
+}
+
+function initCharset( maskImg, cw, ch, callback ) {
+	const pal = [
+	/*   Blue       Green      Cyan       Red        Magenta    Yellow     White      Lime */
+		"#0000C0", "#008000", "#008080", "#800000", "#800080", "#806600", "#808080", "#668000",
+		"#0066FF", "#00FF00", "#00FFFF", "#FF0000", "#FF00FF", "#FFCC00", "#FFFFFF", "#CCFF00"
+	];
+	var can = maskImg.ownerDocument.createElement( "canvas" );
+	can.width = cw * 96;
+	can.height = ch * pal.length;
+	var ctx = can.getContext( "2d" );
+	for( var r = 0; r < pal.length; r++ ) {
+		ctx.fillStyle = "black";
+		ctx.fillRect( 0, r * ch, cw, ch );
+		ctx.fillStyle = pal[ r ];
+		ctx.fillRect( cw, r * ch, cw * 95, ch );
+		for( var c = 1; c < 96; c++ ) {
+			var x = ( c - 1 ) & 0x1F;
+			var y = ( c - 1 ) >> 5;
+			ctx.drawImage( maskImg, x * cw, y * ch, cw, ch, c * cw, r * ch, cw, ch  );
+		}
+	}
+	createImageBitmap( can, 0, 0, can.width, can.height ).then( callback );
+}
diff --git a/instance/pleroma-mods/pleroma-mod-tracker/style.css b/instance/pleroma-mods/pleroma-mod-tracker/style.css
new file mode 100644
index 0000000000..f476788d5f
--- /dev/null
+++ b/instance/pleroma-mods/pleroma-mod-tracker/style.css
@@ -0,0 +1,68 @@
+.mod-player {
+  width: 100%;
+}
+
+.mod-player .mod-controls {
+  display: flex;
+}
+
+.mod-player .mod-controls button {
+  width: 30px;
+}
+
+.mod-player .mod-controls input {
+  flex-grow: 1;
+}
+
+.mod-player .mod-patterns {
+  width: 100%;
+}
+
+.mod-player .mod-instruments {
+  font-family: monospace;
+}
+
+.xm-player {
+  display: block;
+  width: 100%;
+  margin-right: 10px;
+}
+
+.xm-player .xm-info > div {
+  display: block;
+  width: 100%;
+  margin-top: 5px;
+}
+
+.xm-player .xm-info .label, .xm-player .xm-info .value {
+  width: 49%;
+  display: inline-block;
+}
+
+.xm-player .xm-info .value {
+  float: right;
+  text-align: right;
+}
+
+.xm-player > .xm-controls > div {
+  display: inline-block;
+  width: 49%;
+}
+
+.xm-player > .xm-controls button {
+  height: 25px;
+  width: 30px;
+}
+
+.xm-player .xm-controls .xm-status {
+  float: right;
+  text-align: right;
+  font-family: monospace;
+}
+
+.xm-player .xm-patterns .xm-pattern-display {
+  width: 100%;
+  background-color: black;
+  border: 1px solid gray;
+  height: 200px;
+}
diff --git a/instance/pleroma-mods/pleroma-mod-tracker/topaz8.png b/instance/pleroma-mods/pleroma-mod-tracker/topaz8.png
new file mode 100755
index 0000000000..18f6311990
Binary files /dev/null and b/instance/pleroma-mods/pleroma-mod-tracker/topaz8.png differ
diff --git a/static/pleroma-mod-loader.js b/static/pleroma-mod-loader.js
new file mode 100755
index 0000000000..6f94304d6b
--- /dev/null
+++ b/static/pleroma-mod-loader.js
@@ -0,0 +1,166 @@
+function PleromaModLoader () {
+  this.config = {
+    "modDirectory": "/instance/pleroma-mods/",
+    "mods": []
+  };
+  this.loadConfig();
+  this.loadedMods = {};
+  this.classes = {};
+}
+[
+  function loadMods () {
+    for (const mod of this.config.mods) {
+      const modObject = new PleromaMod(mod);
+      modObject.include();
+      this.loadedMods[mod] = modObject;
+    }
+  },
+
+  function loadConfig () {
+    window.fetch("/instance/pleroma-mod-config.json").then((response) => {
+      if (response.ok) {
+        response.json().then((json) => {
+          for (const key in json) {
+            this.config[key] = json[key];
+          }
+          this.loadMods();
+        }).catch((error) => {
+          console.error("can't parse loader config");
+          console.error(error);
+        });
+      }
+    }).catch((error) => {
+      console.warn("can't load mod loader config");
+      console.warn(error);
+    });
+  },
+
+  function registerClass (className, object) {
+    this.classes[className] = object;
+  },
+
+  function waitUntilReady () {
+    const postPanel = document.getElementsByClassName("post-status-form");
+    const loginPanel = document.getElementsByClassName("login-form");
+    if (postPanel.length > 0 || loginPanel.length > 0) {
+      for (var modName in this.loadedMods) {
+        const mod = this.loadedMods[modName];
+        if (mod.instance.onReady) {
+          mod.instance.onReady();
+        }
+      }
+      this.createObserver();
+    } else {
+      window.setTimeout(() => { this.waitUntilReady(); }, 1000);
+    }
+  },
+
+  function createObserver () {
+    this.containers = {
+      main: document.getElementsByClassName("main")[0],
+      notifications: document.getElementsByClassName("notifications")[0]
+    };
+
+    const observerConfig = { subtree: true, childList: true };
+    this.observer = new MutationObserver((mutations, observer) => {
+      for (var modName in this.loadedMods) {
+        const mod = this.loadedMods[modName];
+        if (mod.instance.onMutation) {
+          for (const mutation of mutations) {
+            let filter = null;
+            if (mod.instance.config.filter) {
+              filter = new RegExp(mod.instance.config.filter.join("|"));
+            }
+            if (!filter || filter.test(mutation.target.className)) {
+              mod.instance.onMutation(mutation, observer);
+            }
+          }
+        }
+      }
+    });
+    this.observer.observe(this.containers.main, observerConfig);
+    if (this.containers.notifications) {
+      this.observer.observe(this.containers.notifications, observerConfig);
+    }
+  }
+].forEach((fn) => { PleromaModLoader.prototype[fn.name] = fn; });
+[
+  function registerMod (mod) {
+    window.__pleromaModLoader.registerClass(mod.name, mod);
+  },
+
+  function includeModScript (src) {
+    return PleromaModLoader.includeScript(window.__pleromaModLoader.config.modDirectory + src);
+  },
+
+  function includeModCss (src) {
+    return PleromaModLoader.includeCss(window.__pleromaModLoader.config.modDirectory + src);
+  },
+
+  function includeScript (src) {
+    return new Promise((resolve) => {
+      const body = document.getElementsByTagName("body")[0];
+      const script = document.createElement("script");
+      script.setAttribute("src", src);
+      script.setAttribute("type", "text/javascript");
+      script.onload = () => { resolve(); };
+      body.appendChild(script);
+    });
+  },
+
+  function includeCss (src) {
+    return new Promise((resolve) => {
+      const head = document.getElementsByTagName("head")[0];
+      const link = document.createElement("link");
+      link.setAttribute("href", src);
+      link.setAttribute("rel", "stylesheet");
+      link.setAttribute("type", "text/css");
+      link.onload = () => { resolve(); };
+      head.appendChild(link);
+    });
+  },
+
+  function getModDir () {
+    return window.__pleromaModLoader.config.modDirectory;
+  }
+].forEach((fn) => { PleromaModLoader[fn.name] = fn; });
+
+function PleromaMod (name) {
+  this.name = name;
+  this.instance = null;
+}
+[
+  function getClassName () {
+    let className = "PleromaMod";
+    const nameParts = this.name.split("-");
+    for (const namePart of nameParts) {
+      className += namePart.substring(0, 1).toUpperCase();
+      className += namePart.substring(1);
+    }
+    return className;
+  },
+
+  function include () {
+    console.log("loading " + this.name);
+    PleromaModLoader.includeScript(
+      PleromaModLoader.getModDir() + "pleroma-mod-" + this.name + "/mod.js"
+    ).then(() => {
+      this.modLoaded();
+    });
+  },
+
+  function modLoaded () {
+    console.log(this.name + " loaded");
+    this.instance = new window.__pleromaModLoader.classes[this.getClassName()]();
+    this.run();
+  },
+
+  function run () {
+    if (this.instance) {
+      this.instance.run();
+    }
+  }
+].forEach((fn) => { PleromaMod.prototype[fn.name] = fn; });
+
+window.__pleromaModLoader = new PleromaModLoader();
+window.__pleromaModLoader.waitUntilReady();