diff --git a/project/jni/application/atari800/AndroidAppSettings.cfg b/project/jni/application/atari800/AndroidAppSettings.cfg
new file mode 100644
index 000000000..034287b25
--- /dev/null
+++ b/project/jni/application/atari800/AndroidAppSettings.cfg
@@ -0,0 +1,26 @@
+# The application settings for Android libSDL port
+AppSettingVersion=9
+LibSdlVersion=1.2
+AppName="Atari800 emulator"
+AppFullName=net.sourceforge.atari800
+ScreenOrientation=h
+AppDataDownloadUrl="Download Atari ROM, note that it is ILLEGAL to download it without owning Atari device!|https://sites.google.com/site/xpelyax/Home/atari800.zip?attredirects=0&d=1"
+SdlVideoResize=y
+NeedDepthBuffer=n
+AppUsesMouse=n
+AppNeedsArrowKeys=y
+AppUsesJoystick=n
+AppUsesMultitouch=n
+NonBlockingSwapBuffers=n
+RedefinedKeys="RETURN SPACE KP_PLUS KP_MINUS F1 ESCAPE F2 F3"
+AppTouchscreenKeyboardKeysAmount=6
+AppTouchscreenKeyboardKeysAmountAutoFire=2
+MultiABI=n
+AppVersionCode=21001
+AppVersionName="2.1.0.01"
+CompiledLibraries="sdl_mixer"
+CustomBuildScript=n
+AppCflags='-O2 -finline-functions -DSOUND'
+AppLdflags='-Lobj/local/armeabi -lpng'
+AppSubdirsBuild=''
+ReadmeText='^You may press "Home" now - the data will be downloaded in background'
diff --git a/project/jni/application/atari800/COPYING b/project/jni/application/atari800/COPYING
new file mode 100644
index 000000000..3912109b5
--- /dev/null
+++ b/project/jni/application/atari800/COPYING
@@ -0,0 +1,340 @@
+		    GNU GENERAL PUBLIC LICENSE
+		       Version 2, June 1991
+
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+                       51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+			    Preamble
+
+  The licenses for most software are designed to take away your
+freedom to share and change it.  By contrast, the GNU General Public
+License is intended to guarantee your freedom to share and change free
+software--to make sure the software is free for all its users.  This
+General Public License applies to most of the Free Software
+Foundation's software and to any other program whose authors commit to
+using it.  (Some other Free Software Foundation software is covered by
+the GNU Library General Public License instead.)  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+this service if you wish), that you receive source code or can get it
+if you want it, that you can change the software or use pieces of it
+in new free programs; and that you know you can do these things.
+
+  To protect your rights, we need to make restrictions that forbid
+anyone to deny you these rights or to ask you to surrender the rights.
+These restrictions translate to certain responsibilities for you if you
+distribute copies of the software, or if you modify it.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must give the recipients all the rights that
+you have.  You must make sure that they, too, receive or can get the
+source code.  And you must show them these terms so they know their
+rights.
+
+  We protect your rights with two steps: (1) copyright the software, and
+(2) offer you this license which gives you legal permission to copy,
+distribute and/or modify the software.
+
+  Also, for each author's protection and ours, we want to make certain
+that everyone understands that there is no warranty for this free
+software.  If the software is modified by someone else and passed on, we
+want its recipients to know that what they have is not the original, so
+that any problems introduced by others will not reflect on the original
+authors' reputations.
+
+  Finally, any free program is threatened constantly by software
+patents.  We wish to avoid the danger that redistributors of a free
+program will individually obtain patent licenses, in effect making the
+program proprietary.  To prevent this, we have made it clear that any
+patent must be licensed for everyone's free use or not licensed at all.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+		    GNU GENERAL PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. This License applies to any program or other work which contains
+a notice placed by the copyright holder saying it may be distributed
+under the terms of this General Public License.  The "Program", below,
+refers to any such program or work, and a "work based on the Program"
+means either the Program or any derivative work under copyright law:
+that is to say, a work containing the Program or a portion of it,
+either verbatim or with modifications and/or translated into another
+language.  (Hereinafter, translation is included without limitation in
+the term "modification".)  Each licensee is addressed as "you".
+
+Activities other than copying, distribution and modification are not
+covered by this License; they are outside its scope.  The act of
+running the Program is not restricted, and the output from the Program
+is covered only if its contents constitute a work based on the
+Program (independent of having been made by running the Program).
+Whether that is true depends on what the Program does.
+
+  1. You may copy and distribute 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 and disclaimer of warranty; keep intact all the
+notices that refer to this License and to the absence of any warranty;
+and give any other recipients of the Program a copy of this License
+along with the Program.
+
+You may charge a fee for the physical act of transferring a copy, and
+you may at your option offer warranty protection in exchange for a fee.
+
+  2. You may modify your copy or copies of the Program or any portion
+of it, thus forming a work based on the Program, and copy and
+distribute such modifications or work under the terms of Section 1
+above, provided that you also meet all of these conditions:
+
+    a) You must cause the modified files to carry prominent notices
+    stating that you changed the files and the date of any change.
+
+    b) You must cause any work that you distribute or publish, that in
+    whole or in part contains or is derived from the Program or any
+    part thereof, to be licensed as a whole at no charge to all third
+    parties under the terms of this License.
+
+    c) If the modified program normally reads commands interactively
+    when run, you must cause it, when started running for such
+    interactive use in the most ordinary way, to print or display an
+    announcement including an appropriate copyright notice and a
+    notice that there is no warranty (or else, saying that you provide
+    a warranty) and that users may redistribute the program under
+    these conditions, and telling the user how to view a copy of this
+    License.  (Exception: if the Program itself is interactive but
+    does not normally print such an announcement, your work based on
+    the Program is not required to print an announcement.)
+
+These requirements apply to the modified work as a whole.  If
+identifiable sections of that work are not derived from the Program,
+and can be reasonably considered independent and separate works in
+themselves, then this License, and its terms, do not apply to those
+sections when you distribute them as separate works.  But when you
+distribute the same sections as part of a whole which is a work based
+on the Program, the distribution of the whole must be on the terms of
+this License, whose permissions for other licensees extend to the
+entire whole, and thus to each and every part regardless of who wrote it.
+
+Thus, it is not the intent of this section to claim rights or contest
+your rights to work written entirely by you; rather, the intent is to
+exercise the right to control the distribution of derivative or
+collective works based on the Program.
+
+In addition, mere aggregation of another work not based on the Program
+with the Program (or with a work based on the Program) on a volume of
+a storage or distribution medium does not bring the other work under
+the scope of this License.
+
+  3. You may copy and distribute the Program (or a work based on it,
+under Section 2) in object code or executable form under the terms of
+Sections 1 and 2 above provided that you also do one of the following:
+
+    a) Accompany it with the complete corresponding machine-readable
+    source code, which must be distributed under the terms of Sections
+    1 and 2 above on a medium customarily used for software interchange; or,
+
+    b) Accompany it with a written offer, valid for at least three
+    years, to give any third party, for a charge no more than your
+    cost of physically performing source distribution, a complete
+    machine-readable copy of the corresponding source code, to be
+    distributed under the terms of Sections 1 and 2 above on a medium
+    customarily used for software interchange; or,
+
+    c) Accompany it with the information you received as to the offer
+    to distribute corresponding source code.  (This alternative is
+    allowed only for noncommercial distribution and only if you
+    received the program in object code or executable form with such
+    an offer, in accord with Subsection b above.)
+
+The source code for a work means the preferred form of the work for
+making modifications to it.  For an executable work, complete source
+code means all the source code for all modules it contains, plus any
+associated interface definition files, plus the scripts used to
+control compilation and installation of the executable.  However, as a
+special exception, the source code distributed need not include
+anything that is normally distributed (in either source or binary
+form) with the major components (compiler, kernel, and so on) of the
+operating system on which the executable runs, unless that component
+itself accompanies the executable.
+
+If distribution of executable or object code is made by offering
+access to copy from a designated place, then offering equivalent
+access to copy the source code from the same place counts as
+distribution of the source code, even though third parties are not
+compelled to copy the source along with the object code.
+
+  4. You may not copy, modify, sublicense, or distribute the Program
+except as expressly provided under this License.  Any attempt
+otherwise to copy, modify, sublicense or distribute the Program is
+void, and will automatically terminate your rights under this License.
+However, parties who have received copies, or rights, from you under
+this License will not have their licenses terminated so long as such
+parties remain in full compliance.
+
+  5. You are not required to accept this License, since you have not
+signed it.  However, nothing else grants you permission to modify or
+distribute the Program or its derivative works.  These actions are
+prohibited by law if you do not accept this License.  Therefore, by
+modifying or distributing the Program (or any work based on the
+Program), you indicate your acceptance of this License to do so, and
+all its terms and conditions for copying, distributing or modifying
+the Program or works based on it.
+
+  6. Each time you redistribute the Program (or any work based on the
+Program), the recipient automatically receives a license from the
+original licensor to copy, distribute or modify the Program subject to
+these terms and conditions.  You may not impose any further
+restrictions on the recipients' exercise of the rights granted herein.
+You are not responsible for enforcing compliance by third parties to
+this License.
+
+  7. If, as a consequence of a court judgment or allegation of patent
+infringement or for any other reason (not limited to patent issues),
+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
+distribute so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you
+may not distribute the Program at all.  For example, if a patent
+license would not permit royalty-free redistribution of the Program by
+all those who receive copies directly or indirectly through you, then
+the only way you could satisfy both it and this License would be to
+refrain entirely from distribution of the Program.
+
+If any portion of this section is held invalid or unenforceable under
+any particular circumstance, the balance of the section is intended to
+apply and the section as a whole is intended to apply in other
+circumstances.
+
+It is not the purpose of this section to induce you to infringe any
+patents or other property right claims or to contest validity of any
+such claims; this section has the sole purpose of protecting the
+integrity of the free software distribution system, which is
+implemented by public license practices.  Many people have made
+generous contributions to the wide range of software distributed
+through that system in reliance on consistent application of that
+system; it is up to the author/donor to decide if he or she is willing
+to distribute software through any other system and a licensee cannot
+impose that choice.
+
+This section is intended to make thoroughly clear what is believed to
+be a consequence of the rest of this License.
+
+  8. If the distribution and/or use of the Program is restricted in
+certain countries either by patents or by copyrighted interfaces, the
+original copyright holder who places the Program under this License
+may add an explicit geographical distribution limitation excluding
+those countries, so that distribution is permitted only in or among
+countries not thus excluded.  In such case, this License incorporates
+the limitation as if written in the body of this License.
+
+  9. The Free Software Foundation may publish revised and/or new versions
+of the 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 a version number of this License which applies to it and "any
+later version", you have the option of following the terms and conditions
+either of that version or of any later version published by the Free
+Software Foundation.  If the Program does not specify a version number of
+this License, you may choose any version ever published by the Free Software
+Foundation.
+
+  10. If you wish to incorporate parts of the Program into other free
+programs whose distribution conditions are different, write to the author
+to ask for permission.  For software which is copyrighted by the Free
+Software Foundation, write to the Free Software Foundation; we sometimes
+make exceptions for this.  Our decision will be guided by the two goals
+of preserving the free status of all derivatives of our free software and
+of promoting the sharing and reuse of software generally.
+
+			    NO WARRANTY
+
+  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, 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.
+
+  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE 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.
+
+		     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
+convey the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software
+    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+
+
+Also add information on how to contact you by electronic and paper mail.
+
+If the program is interactive, make it output a short notice like this
+when it starts in an interactive mode:
+
+    Gnomovision version 69, Copyright (C) year name of author
+    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, the commands you use may
+be called something other than `show w' and `show c'; they could even be
+mouse-clicks or menu items--whatever suits your program.
+
+You should also get your employer (if you work as a programmer) or your
+school, if any, to sign a "copyright disclaimer" for the program, if
+necessary.  Here is a sample; alter the names:
+
+  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
+  `Gnomovision' (which makes passes at compilers) written by James Hacker.
+
+  <signature of Ty Coon>, 1 April 1989
+  Ty Coon, President of Vice
+
+This General Public License does not permit incorporating your program into
+proprietary programs.  If your program is a subroutine library, you may
+consider it more useful to permit linking proprietary applications with the
+library.  If this is what you want to do, use the GNU Library General
+Public License instead of this License.
diff --git a/project/jni/application/atari800/README.1ST b/project/jni/application/atari800/README.1ST
new file mode 100644
index 000000000..3ece39a93
--- /dev/null
+++ b/project/jni/application/atari800/README.1ST
@@ -0,0 +1,34 @@
+Atari800 emulator version 2.1.0
+-------------------------------
+
+This is free and portable Atari800/XL/XE/5200 emulator, originally written
+by David Firth and now developed by the Atari800 Development Team (please
+see DOC/CREDITS). This program is copyrighted and released under the GPL
+(see COPYING).
+
+Please read DOC/README, DOC/INSTALL and DOC/USAGE.
+
+For news in this release please do read DOC/NEWS.
+
+If you have a problem running this emulator please read DOC/FAQ first.
+If the problem persists then please ask in newsgroup comp.sys.atari.8bit
+or in the atari800-users mailing list (see below).
+
+Look at DOC/BUGS before reporting something you consider a bug.
+
+If you want to help developing Atari800 emulator you can subscribe to our
+mailing list (http://lists.sourceforge.net/lists/listinfo/atari800-users).
+DOC/TODO might point you in the right direction.
+
+This version, and all versions back to 0.8.2 have been released by me (Petr
+Stehlik) and are now available at Sourceforge.net (URL below). Thanks
+go to David Firth and all the people that helped making this release.
+
+EnJoy!
+
+Petr Stehlik
+March 27, 2009
+
+E-mail: pstehlik@sophics.cz
+
+Project homepage: http://atari800.sourceforge.net/
diff --git a/project/jni/application/atari800/atari800.man b/project/jni/application/atari800/atari800.man
new file mode 100644
index 000000000..91cf179b4
--- /dev/null
+++ b/project/jni/application/atari800/atari800.man
@@ -0,0 +1,820 @@
+.TH ATARI800 1 "March 26, 2009"
+
+.SH NAME
+atari800 \- Atari 800 Emulator, Version 2.1.0
+
+.SH SYNOPSIS
+\fBatari800\fP [options] [files...]
+
+.SH DESCRIPTION
+\fIatari800\fP emulates the Atari 800, Atari 800 XL, Atari 130 XE and
+Atari 5200 Games System.
+
+.SS Options
+
+.TP
+\fB-help
+Print complete and up-to-date list of command line switches
+.TP
+\fB-v
+Print emulator version
+.TP
+\fB-verbose
+Display framerate when exiting
+.TP
+\fB-config filename
+Specify an alternative configuration filename
+
+.TP
+\fB-osa_rom filename
+Path to file containing Atari Rev.A Operating System.
+Used to override paths defined at compile time.
+.TP
+\fB-osb_rom filename
+Path to file containing Atari Rev.B Operating System.
+Used to override paths defined at compile time.
+.TP
+\fB-xlxe_rom filename
+Path to file containing Atari XL/XE Operating System.
+Used to override paths defined at compile time.
+.TP
+\fB-5200_rom filename
+Path to file containing Atari 5200 Games System ROM.
+Used to override paths defined at compile time.
+.TP
+\fB-basic_rom filename
+Path to file containing Atari BASIC ROM.
+Used to override paths defined at compile time.
+
+.TP
+\fB-atari
+Emulate Atari 800
+.TP
+\fB-xl
+Emulate Atari 800 XL
+.TP
+\fB-xe
+Emulate Atari 130 XE
+.TP
+\fB-320xe
+Emulate Atari 320 XE (Compy Shop)
+.TP
+\fB-rambo
+Emulate Atari 320 XE (Rambo)
+.TP
+\fB-5200
+Emulate Atari 5200
+.TP
+\fB-emuos
+Use EmuOS
+
+.TP
+\fB-a
+Use Atari OS/A for Atari 800
+.TP
+\fB-b
+Use Atari OS/B for Atari 800
+.TP
+\fB-c
+Enable RAM between 0xc000 and 0xcfff in Atari 800
+
+.TP
+\fB-axlon <n>
+Use Atari 800 Axlon memory expansion: <n> k total RAM
+.TP
+\fB-axlon0f
+Use Axlon shadow at 0x0fc0-0x0fff
+.TP
+\fB-mosaic <n>
+Use 400/800 Mosaic memory expansion: <n> k total RAM
+
+.TP
+\fB-pal
+Emulate PAL TV mode
+.TP
+\fB-ntsc
+Emulate NTSC TV mode
+
+.TP
+\fB-nobasic
+Used to disable Basic when starting the emulator in XL/XE mode.
+Simulates the Option key being held down during system boot.
+.TP
+\fB-basic
+Turn on Atari BASIC ROM
+
+.TP
+\fB-cart <filename>
+Insert cartridge (CART or raw format)
+.TP
+\fB-run <filename>
+Run Atari program (EXE, COM, XEX, BAS, LST)
+.TP
+\fB-state <filename>
+Load saved-state file
+.TP
+\fB-tape <filename>
+Attach cassette image (CAS format or raw file)
+.TP
+\fB-boottape <filename>
+Attach cassette image and boot it
+
+.TP
+\fB-1400
+Emulate the Atari 1400XL
+.TP
+\fB-xld
+Emulate the Atari 1450XLD
+.TP
+\fB-bb
+Emulate the CSS Black Box
+.TP
+\fB-mio
+Emulate the ICD MIO board
+
+.TP
+\fB-nopatch
+Normally the OS is patched giving very fast I/O. This options prevents
+the patch from being applied so that the OS accesses the serial port
+hardware directly. This option will probably never be needed since
+programs that access the serial hardware should work even if the OS
+has been patched.
+.TP
+\fB-nopatchall
+Don't patch OS at all, H:, P: and R: devices won't work
+
+.TP
+\fB-H1 <path>
+Set path for H1: device
+.TP
+\fB-H2 <path>
+Set path for H2: device
+.TP
+\fB-H3 <path>
+Set path for H3: device
+.TP
+\fB-H4 <path>
+Set path for H4: device
+.TP
+\fB-Hpath <path>
+Set path for Atari executables on the H: device
+.TP
+\fB-hreadonly
+Enable read-only mode for H: device
+.TP
+\fB-hreadwrite
+Disable read-only mode for H: device
+.TP
+\fB-devbug
+Put debugging messages for H: and P: devices in log file
+
+.TP
+\fB-rtime
+Enable R-Time 8 emulation
+.TP
+\fB-nortime
+Disable R-Time 8 emulation
+
+.TP
+\fBrdevice [<dev>]
+Enable R: device. If <dev> is specified then it's used as host serial device
+name (e.g. /dev/ttyS0 on linux). If there is no <dev> specified then R:
+is directed to network.
+
+.TP
+\fB-mouse off
+Do not use mouse
+.TP
+\fB-mouse pad
+Emulate paddles
+.TP
+\fB-mouse touch
+Emulate Atari Touch Tablet
+.TP
+\fB-mouse koala
+Emulate Koala Pad
+.TP
+\fB-mouse pen
+Emulate Light Pen
+.TP
+\fB-mouse gun
+Emulate Light Gun
+.TP
+\fB-mouse amiga
+Emulate Amiga mouse
+.TP
+\fB-mouse st
+Emulate Atari ST mouse
+.TP
+\fB-mouse trak
+Emulate Atari Trak-Ball
+.TP
+\fB-mouse joy
+Emulate joystick using mouse
+.TP
+\fB-mouseport <num>
+Set mouse port 1-4 (default 1)
+.TP
+\fB-mousespeed <num>
+Set mouse speed 1-9 (default 3)
+.TP
+\fB-multijoy
+Emulate MultiJoy4 interface
+.TP
+\fB-directmouse
+Use mouse's absolute position
+.TP
+\fB-cx85 <num>
+Emulate CX85 numeric keypad on port <num>
+.TP
+\fB-grabmouse
+SDL only, prevent mouse pointer from leaving the window
+
+.TP
+\fB-record <filename>
+Record all input events to <filename>. Can be used for gaming contests
+(highest score etc).
+.TP
+\fB-playback <filename>
+Playback input events from <filename>. Watch an expert play the game.
+
+.TP
+\fB-refresh
+Controls screen refresh rate. A numerical value follows this option
+which specifies how many emulated screen updates are required before
+the actual screen is updated. This value effects the speed of the
+emulation: A higher value results in faster CPU emulation but a
+less frequently updated screen.
+
+.TP
+\fB-artif <mode>
+Set artifacting mode 0-4 (0 = disable)
+.TP
+\fB-paletten/p <filename>
+Read Atari NTSC/PAL colors from ACT file
+.TP
+\fB-blackn/p <num>
+Set NTSC/PAL black level 0-255
+.TP
+\fB-whiten/p <num>
+Set NTSC/PAL white level 0-255
+.TP
+\fB-colorsn/p <num>
+Set NTSC/PAL color intensity
+.TP
+\fB-genpaln/p
+Generate artifical NTSC/PAL palette
+.TP
+\fB-colshiftn/p <num>
+Set color shift (-genpal only)
+.TP
+\fB-screenshots <pattern>
+Set filename pattern for screenshots. Use to override the default
+atari000.png, atari001.png etc. filenames. Hashes are replaced with
+raising numbers. Existing files are overwritten only if all the files
+defined by the pattern exist.
+
+.TP
+\fB-showspeed
+Show percentage of actual speed
+
+.TP
+\fB-sound
+Enable sound
+.TP
+\fB-nosound
+Disable sound
+.TP
+\fB-dsprate <freq>
+Set mixing frequency (Hz)
+.TP
+\fB-snddelay <time>
+Set sound delay (milliseconds)
+
+.SS Curses Options
+
+.TP
+\fB-left
+Use columns 0 to 39
+.TP
+\fB-central
+Use columns 20 to 59
+.TP
+\fB-right
+Use columns 40 to 79
+.TP
+\fB-wide1
+Use columns 0 to 79. In this mode only the even character positions
+are used. The odd locations are filled with spaces.
+.TP
+\fB-wide2
+Use columns 0 to 79. This mode is similar to \fB-wide1\fP except that
+the spaces are in reverse video if the previous character was also
+in reverse video.
+
+.SS Falcon Options
+
+.TP
+\fB-interlace <x>
+Generate Falcon screen only every x frame
+.TP
+\fB-videl
+Direct VIDEL programming (Falcon/VGA only)
+.TP
+\fB-double
+Double the screen size on NOVA
+.TP
+\fB-delta
+Delta screen output (differences only)
+.TP
+\fB-joyswap
+Swap joysticks
+
+.SS Java NestedVM
+
+.TP
+\fB-scale <n>
+Scale width and height by <n>
+
+.SS SDL Options
+
+.TP
+\fB-fullscreen
+Start in fullscreen mode (tries to switch to 336x240 resolution)
+.TP
+\fB-windowed
+Start in a window (does not change your working resolution)
+.TP
+\fB-rotate90
+Run the emulator with rotated display (useful for devices with 240x320
+screen)
+.TP
+\fB-width number-of-pixels
+Host horizontal resolution for fullscreen
+.TP
+\fB-height number-of-pixels
+Host vertical resolution for fullscreen
+.TP
+\fB-bpp number-of-bits
+Host color depth for running in fullscreen
+
+.TP
+\fB-audio16
+Enable 16-bit sound output
+
+.TP
+\fB-nojoystick
+Do not initialize SDL joysticks
+.TP
+\fB-joy0 path-to-device
+Define path to device used in LPTjoy 0. Available on linux-ia32 only.
+.TP
+\fB-joy1 path-to-device
+Define path to device used in LPTjoy 1. Available on linux-ia32 only.
+
+.TP
+\fB-ntscemu
+Emulate NTSC composite video (640x480x16 only)
+This includes NTSC TV artifacts.  "-artif" is not needed in this mode and will
+not work.  This mode does not use a palette.  The video signal is emulated
+instead.  Palette options such as -genpaln have no effect in this mode.
+The following items are for -ntscemu only:
+
+.TP
+\fB-ntsc_hue <n>
+Set NTSC hue -1..1 (like TV Tint control)
+.TP
+\fB-ntsc_sat <n>
+Set NTSC saturation (like TV Colour control)
+.TP
+\fB-ntsc_cont <n>
+Set NTSC contrast (also called white level)
+.TP
+\fB-ntsc_bright <n>
+Set NTSC brightness (also called black level)
+.TP
+\fB-ntsc_sharp <n>
+Set NTSC sharpness
+.TP
+\fB-ntsc_burst <n>
+Set NTSC burst phase (artificating colours) (CTIA?) Drol, Choplifter,
+Ultima: 0.70
+.TP
+\fB-ntsc_gauss <n>
+Set NTSC Gaussian factor (can affect artifacting colours, sharpness and
+ghosting)
+.TP
+\fB-ntsc_gamma <n>
+Set NTSC gamma adjustment
+.TP
+\fB-ntsc_ramp <n>
+Set NTSC saturation ramp factor (amount by which bright colours become
+desaturated or washed out)
+.TP
+\fB-scanlines <n>
+Set scanlines percentage (ntscemu only)
+.TP
+\fB-scanlinesnoint
+Disable scanlines interpolation (ntscemu only)
+.TP
+\fB-proto80
+Emulate a prototype 80 column board for the 1090
+.TP
+\fB-xep80
+Emulate the XEP80
+.TP
+\fB-xep80port <n>
+Use XEP80 on joystick port <n>
+
+
+.SS X11 Options
+
+.TP
+\fB-small
+Run the emulator in a small window where each Atari 800 pixel is
+represented by one X Window pixel
+.TP
+\fB-large
+Runs the emulator in a large window where each Atari 800 pixel is
+represented by a 2x2 X Window rectange. This mode is selected by
+default.
+.TP
+\fB-huge
+Runs the emulator in a huge window where each Atari 800 pixel is
+represented by a 3x3 X Window rectange
+.TP
+\fB-clip_x number-of-pixels
+Set left offset for clipping
+.TP
+\fB-clip_width number-of-pixels
+Set the width of the clipping-area
+.TP
+\fB-clip_y number-of-pixels
+Set top offset for clipping
+.TP
+\fB-clip_height number-of-pixels
+Set the height of the clipping-area
+.TP
+\fB-private_cmap
+Use private colormap
+.TP
+\fB-sio
+Show SIO monitor
+.TP
+\fB-x11bug
+Enable debug code in atari_x11.c
+
+.TP
+\fB-keypad
+Keypad mode
+
+.PD 0
+
+.SH KEYBOARD, JOYSTICK AND OTHER CONTROLLERS
+
+.TP
+\fBF1
+Built in user interface
+.TP
+\fBF2
+Option key
+.TP
+\fBF3
+Select key
+.TP
+\fBF4
+Start key
+.TP
+\fBF5
+Reset key ("warm reset")
+.TP
+\fBShift+F5
+Reboot ("cold reset")
+.TP
+\fBF6
+Help key (XL/XE only)
+.TP
+\fBF7
+Break key
+.TP
+\fBF8
+Enter monitor
+.TP
+\fBF9
+Exit emulator
+.TP
+\fBF10
+Save screenshot
+.TP
+\fBShift+F10
+Save interlaced screenshot
+.TP
+\fBAlt+R
+Run Atari program
+.TP
+\fBAlt+D
+Disk management
+.TP
+\fBAlt+C
+Cartridge management
+.TP
+\fBAlt+Y
+Select system
+.TP
+\fBAlt+O
+Sound settings
+.TP
+\fBAlt+W
+Sound recording start/stop
+.TP
+\fBAlt+S
+Save state file
+.TP
+\fBAlt+L
+Load state file
+.TP
+\fBAlt+A
+About the emulator
+.TP
+\fBInsert
+Insert line (Atari Shift+'>')
+.TP
+\fBCtrl+Insert
+Insert character (Atari Ctrl+'>')
+.TP
+\fBShift+Ctrl+Insert
+Shift+Ctrl+'>'
+.TP
+\fBDelete
+Delete line (Atari Shift+Backspace)
+.TP
+\fBShift+Backspace
+Delete line (Atari Shift+Backspace)
+.TP
+\fBCtrl+Delete
+Delete character (Atari Ctrl+Backspace)
+.TP
+\fBCtrl+Backspace
+Delete character (Atari Ctrl+Backspace)
+.TP
+\fBShift+Ctrl+Delete
+Shift+Ctrl+Backspace
+.TP
+\fBShift+Ctrl+Backspace
+Shift+Ctrl+Backspace
+.TP
+\fBHome
+Clear (Atari Shift+'<')
+.TP
+\fBCtrl+Home
+Ctrl+'<' (also clears screen)
+.TP
+\fBShift+Ctrl+Home
+Shift+Ctrl+'<'
+.TP
+\fB~
+Inverse video
+.TP
+\fBUp
+Up (Atari Ctrl+'-')
+.TP
+\fBDown
+Down (Atari Ctrl+'=')
+.TP
+\fBLeft
+Left (Atari ctrl+'+')
+.TP
+\fBRight
+Right (Atari ctrl+'*')
+.TP
+\fBCtrl+Up
+-
+.TP
+\fBCtrl+Down
+=
+.TP
+\fBCtrl+Left
++
+.TP
+\fBCtrl+Right
+*
+.TP
+\fBShift+Up
+_ (Atari Shift+'-')
+.TP
+\fBShift+Down
+| (Atari Shift+'=')
+.TP
+\fBShift+Left
+\ (Atari Shift+'+')
+.TP
+\fBShift+Right
+^ (Atari Shift+'*')
+.TP
+\fBShift+Ctrl+Up
+Shift+Ctrl+-
+.TP
+\fBShift+Ctrl+Down
+Shift+Ctrl+=
+.TP
+\fBCtrl+'\\'
+Ctrl+Esc  (Workaround for Windows)
+.TP
+\fBShift+Ctrl+'\\'
+Shift+Ctrl+Esc (Workaround for Windows)
+
+.PP
+CX85 Keypad (if enabled):
+.TP
+\fBhost keypad 0123456789-.
+0123456789-.
+.TP
+\fBhost keypad /
+NO
+.TP
+\fBhost keypad Ctrl+/
+ESCAPE
+.TP
+\fBhost keypad *
+DELETE
+.TP
+\fBhost keypad +
+YES
+.TP
+\fBhost keypad Enter
++ENTER
+
+.PP
+Paddles, Atari touch tablet, Koala pad, light pen, light gun,
+ST/Amiga mouse, Atari trak-ball, joystick and Atari 5200 analog
+controller are emulated using mouse on ports that support it.
+See the options above for how to enable mouse.
+
+.SS Basic
+
+No function keys or Alt+letter shortcuts.
+Use Ctrl+C to enter the monitor.
+Controllers not supported in this version.
+
+.SS Curses
+
+F10 (Save screenshot) does not work in the default CURSES_BASIC build.
+Shift+F5 and Shift+F10 don't work at all.
+Avoid Ctrl + C, H, J, M, Q, S and Z. The remaining control characters
+can be typed. Control characters are displayed on the screen
+with the associated upper case character in bold.
+
+Controllers not supported in this version.
+
+.SS Falcon
+
+.TP
+\fBHelp
+Help key (XL/XE)
+
+.PP
+Joystick 0 is operated by the numeric keypad (make sure that the numeric
+keypad has been enabled).
+
+        7 8 9
+         \\|/
+        4 5 6
+         /|\\
+        1 2 3
+
+        And 0 is the fire key.
+
+Mouse not supported in this version.
+
+.SS SDL
+
+.TP
+\fB`
+Atari/Inverse key
+.TP
+\fBLSUPER
+Atari/Inverse key (unusable under Windows)
+.TP
+\fBRSUPER
+CapsToggle (+Shift = CapsLock)
+
+.TP
+\fBLAlt+F
+Switch fullscreen (probably doesn't work in Windows)
+.TP
+\fBLAlt+G
+Switch WIDTH_MODE (so you can set 320x240)
+.TP
+\fBLAlt+B
+Switch BLACK-AND-WHITE
+.TP
+\fBLAlt+J
+Swap \fBkeyboard_emulated\fP joysticks
+.TP
+\fBLAlt+E
+Switch bpp (for debug only, will be removed soon)
+.TP
+\fBLAlt+M
+Grab mouse (prevents mouse pointer from leaving the window)
+
+These keys work with the NTSC composite video emualtion (-ntscemu):
+(This interface should be considered experimental and is subject to change)
+.TP
+\fBLAlt+1
+Decrease NTSC sharpness 
+.TP
+\fBLAlt+2
+Increase NTSC sharpness 
+.TP
+\fBLAlt+3
+Decrease NTSC saturation (like TV Colour control)
+.TP
+\fBLAlt+4
+Increase NTSC saturation
+.TP
+\fBLAlt+5
+Decrease NTSC brightness (also called black level)
+.TP
+\fBLAlt+6
+Increase NTSC brightness
+.TP
+\fBLAlt+7
+Decrease NTSC contrast (also called white level) 
+.TP
+\fBLAlt+8
+Increase NTSC contrast
+.TP
+\fBLAlt+9
+Decrease NTSC burst phase (use this to change artifacting colours) 
+.TP
+\fBLAlt+0
+Increase NTSC burst phase
+.TP
+\fBLAlt+-
+Decrease NTSC Gaussian factor (ghosting, sharpness, artif colours)
+.TP
+\fBLAlt+=
+Increase NTSC Gaussian factor (ghosting, sharpness, artif colours)
+.TP
+\fBLAlt+[
+Decrease scanlines percentage (NTSC mode only)
+.TP
+\fBLAlt+]
+Increase scanlines percentage (NTSC mode only)
+.TP
+\fBLAlt+;
+Decrease NTSC hue (like TV Tint control)
+.TP
+\fBLAlt+'
+Increase NTSC hue (like TV Tint control)
+.TP
+\fBLAlt+Ins
+Decrease NTSC saturation ramp(reduce saturation for bright colours) 
+.TP
+\fBLAlt+Ins
+Increase NTSC saturation ramp(reduce saturation for bright colours) 
+.TP
+\fBLAlt+Shift+X
+Enable/disable XEP80 screen (use with -xep80)
+
+
+.PP
+Apart from standard joysticks (handled by the SDL) up to two keyboard joysticks
+are supported. The keys used for joystick directions and the trigger can be
+freely defined in the config UI (Controller Config -> Define layout).
+Keyboard joystick emulation can be enabled/disabled in the Controller Config.
+By default, joy 0 is enabled and joy 1 is disabled (to not steal normal
+AWDS keys in the emulator).
+
+.SS X11
+
+.TP
+\fBAlt
+Atari key (either Alt key will work)
+
+.PP
+Joystick 0 is operated by the mouse position relative to the center of
+the screen. The mouse button acts as the trigger.  On Linux, standard
+joysticks are also supported.
+
+.PD 1
+
+.SH FILES
+.TP
+\fI/usr/share/atari800/ATARIOSA.ROM\fR
+Atari O/S A
+.TP
+\fI/usr/share/atari800/ATARIOSB.ROM\fR
+Atari O/S B
+.TP
+\fI/usr/share/atari800/ATARIXL.ROM\fR
+Atari 800 XL O/S
+.TP
+\fI/usr/share/atari800/ATARI5200.ROM\fR
+Atari 5200 O/S
+.TP
+\fI/usr/share/atari800/ATARIBAS.ROM\fR
+Atari Basic
+
+.SH BUGS
+See the BUGS file.
diff --git a/project/jni/application/atari800/icon.png b/project/jni/application/atari800/icon.png
new file mode 100644
index 000000000..4ecd79846
Binary files /dev/null and b/project/jni/application/atari800/icon.png differ
diff --git a/project/jni/application/atari800/src/afile.c b/project/jni/application/atari800/src/afile.c
new file mode 100755
index 000000000..de2a9f3ea
--- /dev/null
+++ b/project/jni/application/atari800/src/afile.c
@@ -0,0 +1,216 @@
+/*
+ * afile.c - Detection and opening of different Atari file types.
+ *
+ * Copyright (c) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+#include "config.h"
+#include "atari.h"
+#include "afile.h"
+#include "binload.h"
+#include "cartridge.h"
+#include "cassette.h"
+#include "gtia.h"
+#include "log.h"
+#include "sio.h"
+#include "statesav.h"
+#include "util.h"
+#ifdef HAVE_LIBZ
+#include <zlib.h>
+#endif
+#include <stdio.h>
+
+
+int AFILE_DetectFileType(const char *filename)
+{
+	UBYTE header[4];
+	int file_length;
+	FILE *fp = fopen(filename, "rb");
+	if (fp == NULL)
+		return AFILE_ERROR;
+	if (fread(header, 1, 4, fp) != 4) {
+		fclose(fp);
+		return AFILE_ERROR;
+	}
+	switch (header[0]) {
+	case 0:
+		if (header[1] == 0 && (header[2] != 0 || header[3] != 0) /* && file_length < 37 * 1024 */) {
+			fclose(fp);
+			return AFILE_BAS;
+		}
+		break;
+	case 0x1f:
+		if (header[1] == 0x8b) {
+#ifndef HAVE_LIBZ
+			fclose(fp);
+			Log_print("\"%s\" is a compressed file.", filename);
+			Log_print("This executable does not support compressed files. You can uncompress this file");
+			Log_print("with an external program that supports gzip (*.gz) files (e.g. gunzip)");
+			Log_print("and then load into this emulator.");
+			return AFILE_ERROR;
+#else /* HAVE_LIBZ */
+			gzFile gzf;
+			fclose(fp);
+			gzf = gzopen(filename, "rb");
+			if (gzf == NULL)
+				return AFILE_ERROR;
+			if (gzread(gzf, header, 4) != 4) {
+				gzclose(gzf);
+				return AFILE_ERROR;
+			}
+			gzclose(gzf);
+			if (header[0] == 0x96 && header[1] == 0x02)
+				return AFILE_ATR_GZ;
+			if (header[0] == 'A' && header[1] == 'T' && header[2] == 'A' && header[3] == 'R')
+				return AFILE_STATE_GZ;
+			return AFILE_XFD_GZ;
+#endif /* HAVE_LIBZ */
+		}
+		break;
+	case '0':
+	case '1':
+	case '2':
+	case '3':
+	case '4':
+	case '5':
+	case '6':
+	case '7':
+	case '8':
+	case '9':
+		if ((header[1] >= '0' && header[1] <= '9') || header[1] == ' ') {
+			fclose(fp);
+			return AFILE_LST;
+		}
+		break;
+	case 'A':
+		if (header[1] == 'T' && header[2] == 'A' && header[3] == 'R') {
+			fclose(fp);
+			return AFILE_STATE;
+		}
+		break;
+	case 'C':
+		if (header[1] == 'A' && header[2] == 'R' && header[3] == 'T') {
+			fclose(fp);
+			return AFILE_CART;
+		}
+		break;
+	case 'F':
+		if (header[1] == 'U' && header[2] == 'J' && header[3] == 'I') {
+			fclose(fp);
+			return AFILE_CAS;
+		}
+		break;
+	case 0x96:
+		if (header[1] == 0x02) {
+			fclose(fp);
+			return AFILE_ATR;
+		}
+		break;
+	case 0xf9:
+	case 0xfa:
+		fclose(fp);
+		return AFILE_DCM;
+	case 0xff:
+		if (header[1] == 0xff && (header[2] != 0xff || header[3] != 0xff)) {
+			fclose(fp);
+			return AFILE_XEX;
+		}
+		break;
+	default:
+		break;
+	}
+	file_length = Util_flen(fp);
+	fclose(fp);
+	/* Detect .pro images */
+	/* # of sectors is in header */
+	if ((file_length-16)%(128+12) == 0 &&
+			header[0]*256 + header[1] == (file_length-16)/(128+12) &&
+			header[2] == 'P') {
+#ifdef DEBUG_PRO
+		Log_print(".pro file detected");
+#endif
+		return AFILE_PRO;
+	}
+	/* 40K or a-power-of-two between 4K and CARTRIDGE_MAX_SIZE */
+	if (file_length >= 4 * 1024 && file_length <= CARTRIDGE_MAX_SIZE
+	 && ((file_length & (file_length - 1)) == 0 || file_length == 40 * 1024))
+		return AFILE_ROM;
+	/* BOOT_TAPE is a raw file containing a program booted from a tape */
+	if ((header[1] << 7) == file_length)
+		return AFILE_BOOT_TAPE;
+	if ((file_length & 0x7f) == 0)
+		return AFILE_XFD;
+	return AFILE_ERROR;
+}
+
+int AFILE_OpenFile(const char *filename, int reboot, int diskno, int readonly)
+{
+	int type = AFILE_DetectFileType(filename);
+	switch (type) {
+	case AFILE_ATR:
+	case AFILE_XFD:
+	case AFILE_ATR_GZ:
+	case AFILE_XFD_GZ:
+	case AFILE_DCM:
+	case AFILE_PRO:
+		if (!SIO_Mount(diskno, filename, readonly))
+			return AFILE_ERROR;
+		if (reboot)
+			Atari800_Coldstart();
+		break;
+	case AFILE_XEX:
+	case AFILE_BAS:
+	case AFILE_LST:
+		if (!BINLOAD_Loader(filename))
+			return AFILE_ERROR;
+		break;
+	case AFILE_CART:
+	case AFILE_ROM:
+		/* TODO: select format for ROMs; switch 5200 ? */
+		if (CARTRIDGE_Insert(filename) != 0)
+			return AFILE_ERROR;
+		if (reboot)
+			Atari800_Coldstart();
+		break;
+	case AFILE_CAS:
+	case AFILE_BOOT_TAPE:
+		if (!CASSETTE_Insert(filename))
+			return AFILE_ERROR;
+		if (reboot) {
+			CASSETTE_hold_start = TRUE;
+			Atari800_Coldstart();
+		}
+		break;
+	case AFILE_STATE:
+	case AFILE_STATE_GZ:
+#ifdef BASIC
+		Log_print("State files are not supported in BASIC version");
+		return AFILE_ERROR;
+#else
+		if (!StateSav_ReadAtariState(filename, "rb"))
+			return AFILE_ERROR;
+		/* Don't press Option */
+		GTIA_consol_table[1] = GTIA_consol_table[2] = 0xf;
+		break;
+#endif
+	default:
+		break;
+	}
+	return type;
+}
diff --git a/project/jni/application/atari800/src/afile.h b/project/jni/application/atari800/src/afile.h
new file mode 100755
index 000000000..8551702d6
--- /dev/null
+++ b/project/jni/application/atari800/src/afile.h
@@ -0,0 +1,49 @@
+#ifndef AFILE_H_
+#define AFILE_H_
+
+/* File types returned by AFILE_DetectFileType() and AFILE_OpenFile(). */
+#define AFILE_ERROR      0
+#define AFILE_ATR        1
+#define AFILE_XFD        2
+#define AFILE_ATR_GZ     3
+#define AFILE_XFD_GZ     4
+#define AFILE_DCM        5
+#define AFILE_XEX        6
+#define AFILE_BAS        7
+#define AFILE_LST        8
+#define AFILE_CART       9
+#define AFILE_ROM        10
+#define AFILE_CAS        11
+#define AFILE_BOOT_TAPE  12
+#define AFILE_STATE      13
+#define AFILE_STATE_GZ   14
+#define AFILE_PRO        15
+
+/* ATR format header */
+struct AFILE_ATR_Header {
+	unsigned char magic1;
+	unsigned char magic2;
+	unsigned char seccountlo;
+	unsigned char seccounthi;
+	unsigned char secsizelo;
+	unsigned char secsizehi;
+	unsigned char hiseccountlo;
+	unsigned char hiseccounthi;
+	unsigned char gash[7];
+	unsigned char writeprotect;
+};
+
+/* First two bytes of an ATR file. */
+#define AFILE_ATR_MAGIC1  0x96
+#define AFILE_ATR_MAGIC2  0x02
+
+/* Auto-detects file type and returns one of AFILE_* values. */
+int AFILE_DetectFileType(const char *filename);
+
+/* Auto-detects file type and mounts the file in the emulator.
+   reboot: Atari800_Coldstart() for disks, cartridges and tapes
+   diskno: drive number for disks (1-8)
+   readonly: mount disks as read-only */
+int AFILE_OpenFile(const char *filename, int reboot, int diskno, int readonly);
+
+#endif /* AFILE_H_ */
diff --git a/project/jni/application/atari800/src/akey.h b/project/jni/application/atari800/src/akey.h
new file mode 100755
index 000000000..0095433b1
--- /dev/null
+++ b/project/jni/application/atari800/src/akey.h
@@ -0,0 +1,246 @@
+#ifndef AKEY_H_
+#define AKEY_H_
+/* akey.h: Atari key codes */
+
+/* INPUT_key_code values */
+#define AKEY_NONE -1
+
+/* Special key codes. */
+#define AKEY_WARMSTART             -2
+#define AKEY_COLDSTART             -3
+#define AKEY_EXIT                  -4
+#define AKEY_BREAK                 -5
+#define AKEY_UI                    -7
+#define AKEY_SCREENSHOT            -8
+#define AKEY_SCREENSHOT_INTERLACE  -9
+#define AKEY_START                 -10
+#define AKEY_SELECT                -11
+#define AKEY_OPTION                -12
+#define AKEY_PBI_BB_MENU           -13
+#define AKEY_CX85_1                -14
+#define AKEY_CX85_2                -15
+#define AKEY_CX85_3                -16
+#define AKEY_CX85_4                -17
+#define AKEY_CX85_5                -18
+#define AKEY_CX85_6                -19
+#define AKEY_CX85_7                -20
+#define AKEY_CX85_8                -21
+#define AKEY_CX85_9                -22
+#define AKEY_CX85_0                -23
+#define AKEY_CX85_PERIOD           -24
+#define AKEY_CX85_MINUS            -25
+#define AKEY_CX85_PLUS_ENTER       -26
+#define AKEY_CX85_ESCAPE           -27
+#define AKEY_CX85_NO               -28
+#define AKEY_CX85_DELETE           -29
+#define AKEY_CX85_YES              -30
+
+#define AKEY_SHFT 0x40
+#define AKEY_CTRL 0x80
+#define AKEY_SHFTCTRL 0xc0
+
+#define AKEY_0 0x32
+#define AKEY_1 0x1f
+#define AKEY_2 0x1e
+#define AKEY_3 0x1a
+#define AKEY_4 0x18
+#define AKEY_5 0x1d
+#define AKEY_6 0x1b
+#define AKEY_7 0x33
+#define AKEY_8 0x35
+#define AKEY_9 0x30
+
+#define AKEY_CTRL_0 (AKEY_CTRL | AKEY_0)
+#define AKEY_CTRL_1 (AKEY_CTRL | AKEY_1)
+#define AKEY_CTRL_2 (AKEY_CTRL | AKEY_2)
+#define AKEY_CTRL_3 (AKEY_CTRL | AKEY_3)
+#define AKEY_CTRL_4 (AKEY_CTRL | AKEY_4)
+#define AKEY_CTRL_5 (AKEY_CTRL | AKEY_5)
+#define AKEY_CTRL_6 (AKEY_CTRL | AKEY_6)
+#define AKEY_CTRL_7 (AKEY_CTRL | AKEY_7)
+#define AKEY_CTRL_8 (AKEY_CTRL | AKEY_8)
+#define AKEY_CTRL_9 (AKEY_CTRL | AKEY_9)
+
+#define AKEY_a 0x3f
+#define AKEY_b 0x15
+#define AKEY_c 0x12
+#define AKEY_d 0x3a
+#define AKEY_e 0x2a
+#define AKEY_f 0x38
+#define AKEY_g 0x3d
+#define AKEY_h 0x39
+#define AKEY_i 0x0d
+#define AKEY_j 0x01
+#define AKEY_k 0x05
+#define AKEY_l 0x00
+#define AKEY_m 0x25
+#define AKEY_n 0x23
+#define AKEY_o 0x08
+#define AKEY_p 0x0a
+#define AKEY_q 0x2f
+#define AKEY_r 0x28
+#define AKEY_s 0x3e
+#define AKEY_t 0x2d
+#define AKEY_u 0x0b
+#define AKEY_v 0x10
+#define AKEY_w 0x2e
+#define AKEY_x 0x16
+#define AKEY_y 0x2b
+#define AKEY_z 0x17
+
+#define AKEY_A (AKEY_SHFT | AKEY_a)
+#define AKEY_B (AKEY_SHFT | AKEY_b)
+#define AKEY_C (AKEY_SHFT | AKEY_c)
+#define AKEY_D (AKEY_SHFT | AKEY_d)
+#define AKEY_E (AKEY_SHFT | AKEY_e)
+#define AKEY_F (AKEY_SHFT | AKEY_f)
+#define AKEY_G (AKEY_SHFT | AKEY_g)
+#define AKEY_H (AKEY_SHFT | AKEY_h)
+#define AKEY_I (AKEY_SHFT | AKEY_i)
+#define AKEY_J (AKEY_SHFT | AKEY_j)
+#define AKEY_K (AKEY_SHFT | AKEY_k)
+#define AKEY_L (AKEY_SHFT | AKEY_l)
+#define AKEY_M (AKEY_SHFT | AKEY_m)
+#define AKEY_N (AKEY_SHFT | AKEY_n)
+#define AKEY_O (AKEY_SHFT | AKEY_o)
+#define AKEY_P (AKEY_SHFT | AKEY_p)
+#define AKEY_Q (AKEY_SHFT | AKEY_q)
+#define AKEY_R (AKEY_SHFT | AKEY_r)
+#define AKEY_S (AKEY_SHFT | AKEY_s)
+#define AKEY_T (AKEY_SHFT | AKEY_t)
+#define AKEY_U (AKEY_SHFT | AKEY_u)
+#define AKEY_V (AKEY_SHFT | AKEY_v)
+#define AKEY_W (AKEY_SHFT | AKEY_w)
+#define AKEY_X (AKEY_SHFT | AKEY_x)
+#define AKEY_Y (AKEY_SHFT | AKEY_y)
+#define AKEY_Z (AKEY_SHFT | AKEY_z)
+
+#define AKEY_CTRL_a (AKEY_CTRL | AKEY_a)
+#define AKEY_CTRL_b (AKEY_CTRL | AKEY_b)
+#define AKEY_CTRL_c (AKEY_CTRL | AKEY_c)
+#define AKEY_CTRL_d (AKEY_CTRL | AKEY_d)
+#define AKEY_CTRL_e (AKEY_CTRL | AKEY_e)
+#define AKEY_CTRL_f (AKEY_CTRL | AKEY_f)
+#define AKEY_CTRL_g (AKEY_CTRL | AKEY_g)
+#define AKEY_CTRL_h (AKEY_CTRL | AKEY_h)
+#define AKEY_CTRL_i (AKEY_CTRL | AKEY_i)
+#define AKEY_CTRL_j (AKEY_CTRL | AKEY_j)
+#define AKEY_CTRL_k (AKEY_CTRL | AKEY_k)
+#define AKEY_CTRL_l (AKEY_CTRL | AKEY_l)
+#define AKEY_CTRL_m (AKEY_CTRL | AKEY_m)
+#define AKEY_CTRL_n (AKEY_CTRL | AKEY_n)
+#define AKEY_CTRL_o (AKEY_CTRL | AKEY_o)
+#define AKEY_CTRL_p (AKEY_CTRL | AKEY_p)
+#define AKEY_CTRL_q (AKEY_CTRL | AKEY_q)
+#define AKEY_CTRL_r (AKEY_CTRL | AKEY_r)
+#define AKEY_CTRL_s (AKEY_CTRL | AKEY_s)
+#define AKEY_CTRL_t (AKEY_CTRL | AKEY_t)
+#define AKEY_CTRL_u (AKEY_CTRL | AKEY_u)
+#define AKEY_CTRL_v (AKEY_CTRL | AKEY_v)
+#define AKEY_CTRL_w (AKEY_CTRL | AKEY_w)
+#define AKEY_CTRL_x (AKEY_CTRL | AKEY_x)
+#define AKEY_CTRL_y (AKEY_CTRL | AKEY_y)
+#define AKEY_CTRL_z (AKEY_CTRL | AKEY_z)
+
+#define AKEY_CTRL_A (AKEY_CTRL | AKEY_A)
+#define AKEY_CTRL_B (AKEY_CTRL | AKEY_B)
+#define AKEY_CTRL_C (AKEY_CTRL | AKEY_C)
+#define AKEY_CTRL_D (AKEY_CTRL | AKEY_D)
+#define AKEY_CTRL_E (AKEY_CTRL | AKEY_E)
+#define AKEY_CTRL_F (AKEY_CTRL | AKEY_F)
+#define AKEY_CTRL_G (AKEY_CTRL | AKEY_G)
+#define AKEY_CTRL_H (AKEY_CTRL | AKEY_H)
+#define AKEY_CTRL_I (AKEY_CTRL | AKEY_I)
+#define AKEY_CTRL_J (AKEY_CTRL | AKEY_J)
+#define AKEY_CTRL_K (AKEY_CTRL | AKEY_K)
+#define AKEY_CTRL_L (AKEY_CTRL | AKEY_L)
+#define AKEY_CTRL_M (AKEY_CTRL | AKEY_M)
+#define AKEY_CTRL_N (AKEY_CTRL | AKEY_N)
+#define AKEY_CTRL_O (AKEY_CTRL | AKEY_O)
+#define AKEY_CTRL_P (AKEY_CTRL | AKEY_P)
+#define AKEY_CTRL_Q (AKEY_CTRL | AKEY_Q)
+#define AKEY_CTRL_R (AKEY_CTRL | AKEY_R)
+#define AKEY_CTRL_S (AKEY_CTRL | AKEY_S)
+#define AKEY_CTRL_T (AKEY_CTRL | AKEY_T)
+#define AKEY_CTRL_U (AKEY_CTRL | AKEY_U)
+#define AKEY_CTRL_V (AKEY_CTRL | AKEY_V)
+#define AKEY_CTRL_W (AKEY_CTRL | AKEY_W)
+#define AKEY_CTRL_X (AKEY_CTRL | AKEY_X)
+#define AKEY_CTRL_Y (AKEY_CTRL | AKEY_Y)
+#define AKEY_CTRL_Z (AKEY_CTRL | AKEY_Z)
+
+#define AKEY_HELP 0x11
+#define AKEY_DOWN 0x8f
+#define AKEY_LEFT 0x86
+#define AKEY_RIGHT 0x87
+#define AKEY_UP 0x8e
+#define AKEY_BACKSPACE 0x34
+#define AKEY_DELETE_CHAR 0xb4
+#define AKEY_DELETE_LINE 0x74
+#define AKEY_INSERT_CHAR 0xb7
+#define AKEY_INSERT_LINE 0x77
+#define AKEY_ESCAPE 0x1c
+#define AKEY_ATARI 0x27
+#define AKEY_CAPSLOCK 0x7c
+#define AKEY_CAPSTOGGLE 0x3c
+#define AKEY_TAB 0x2c
+#define AKEY_SETTAB 0x6c
+#define AKEY_CLRTAB 0xac
+#define AKEY_RETURN 0x0c
+#define AKEY_SPACE 0x21
+#define AKEY_EXCLAMATION 0x5f
+#define AKEY_DBLQUOTE 0x5e
+#define AKEY_HASH 0x5a
+#define AKEY_DOLLAR 0x58
+#define AKEY_PERCENT 0x5d
+#define AKEY_AMPERSAND 0x5b
+#define AKEY_QUOTE 0x73
+#define AKEY_AT 0x75
+#define AKEY_PARENLEFT 0x70
+#define AKEY_PARENRIGHT 0x72
+#define AKEY_LESS 0x36
+#define AKEY_GREATER 0x37
+#define AKEY_EQUAL 0x0f
+#define AKEY_QUESTION 0x66
+#define AKEY_MINUS 0x0e
+#define AKEY_PLUS 0x06
+#define AKEY_ASTERISK 0x07
+#define AKEY_SLASH 0x26
+#define AKEY_COLON 0x42
+#define AKEY_SEMICOLON 0x02
+#define AKEY_COMMA 0x20
+#define AKEY_FULLSTOP 0x22
+#define AKEY_UNDERSCORE 0x4e
+#define AKEY_BRACKETLEFT 0x60
+#define AKEY_BRACKETRIGHT 0x62
+#define AKEY_CIRCUMFLEX 0x47
+#define AKEY_BACKSLASH 0x46
+#define AKEY_BAR 0x4f
+#define AKEY_CLEAR (AKEY_SHFT | AKEY_LESS)
+#define AKEY_CARET (AKEY_SHFT | AKEY_ASTERISK)
+#define AKEY_F1 0x03
+#define AKEY_F2 0x04
+#define AKEY_F3	0x13
+#define AKEY_F4 0x14
+
+/* Following keys cannot be read with both shift and control pressed:
+   J K L ; + * Z X C V B F1 F2 F3 F4 HELP	 */
+
+/* 5200 key codes */
+#define AKEY_5200_START 0x39
+#define AKEY_5200_PAUSE 0x31
+#define AKEY_5200_RESET 0x29
+#define AKEY_5200_0 0x25
+#define AKEY_5200_1 0x3f
+#define AKEY_5200_2 0x3d
+#define AKEY_5200_3 0x3b
+#define AKEY_5200_4 0x37
+#define AKEY_5200_5 0x35
+#define AKEY_5200_6 0x33
+#define AKEY_5200_7 0x2f
+#define AKEY_5200_8 0x2d
+#define AKEY_5200_9 0x2b
+#define AKEY_5200_HASH 0x23
+#define AKEY_5200_ASTERISK 0x27
+
+#endif /* AKEY_H_ */
diff --git a/project/jni/application/atari800/src/antic.c b/project/jni/application/atari800/src/antic.c
new file mode 100644
index 000000000..da56c5d63
--- /dev/null
+++ b/project/jni/application/atari800/src/antic.c
@@ -0,0 +1,4229 @@
+/*
+ * antic.c - ANTIC chip emulation
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <string.h>
+
+#include "antic.h"
+#include "atari.h"
+#include "cpu.h"
+#include "gtia.h"
+#include "log.h"
+#include "memory.h"
+#include "pokey.h"
+#include "util.h"
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+#include "input.h"
+#include "screen.h"
+#endif
+#ifndef BASIC
+#include "statesav.h"
+#endif
+#ifdef NEW_CYCLE_EXACT
+#include "cycle_map.h"
+#endif
+
+#define LCHOP 3			/* do not build leftmost 0..3 characters in wide mode */
+#define RCHOP 3			/* do not build rightmost 0..3 characters in wide mode */
+
+int ANTIC_break_ypos = 999;
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+static int gtia_bug_active = FALSE; /* The GTIA bug mode is active */
+#endif
+#ifdef NEW_CYCLE_EXACT
+static void draw_partial_scanline(int l,int r);
+static void update_scanline_chbase(void);
+static void update_scanline_invert(void);
+static void update_scanline_blank(void);
+const int *ANTIC_cpu2antic_ptr;
+const int *ANTIC_antic2cpu_ptr;
+int ANTIC_delayed_wsync = 0;
+static int dmactl_changed = 0;
+static UBYTE delayed_DMACTL;
+static int draw_antic_ptr_changed = 0;
+static UBYTE need_load;
+static int dmactl_bug_chdata;
+#ifndef NO_GTIA11_DELAY
+/* the position in the ring buffer where the last change before */
+/* the previous line occurred to PRIOR */
+static int prevline_prior_pos = 0;
+/* the position in the ring buffer where the last change before */
+/* the current line occurred to PRIOR */
+static int curline_prior_pos = 0;
+/* the current position in the ring buffer where the most recent */
+/* change to PRIOR occurred */
+int ANTIC_prior_curpos = 0;
+/* ring buffer to hold the previous values of PRIOR */
+UBYTE ANTIC_prior_val_buf[ANTIC_PRIOR_BUF_SIZE];
+/* can be negative, leave as signed ints */
+/* ring buffer to hold the positions where PRIOR changed */
+int ANTIC_prior_pos_buf[ANTIC_PRIOR_BUF_SIZE];
+#endif /* NO_GTIA11_DELAY */
+#endif /* NEW_CYCLE_EXACT */
+
+/* Video memory access is hidden behind these macros. It allows to track dirty video memory
+   to improve video system performance */
+#ifdef DIRTYRECT
+
+static UWORD *scratchUWordPtr;
+static UWORD scratchUWord;
+static ULONG *scratchULongPtr;
+static ULONG scratchULong;
+static UBYTE *scratchUBytePtr;
+static UBYTE scratchUByte;
+
+#ifdef NODIRTYCOMPARE
+
+#define WRITE_VIDEO(ptr, val) \
+	do { \
+		scratchUWordPtr = (ptr); \
+		Screen_dirty[((ULONG) scratchUWordPtr - (ULONG) Screen_atari) >> 3] = 1; \
+		*scratchUWordPtr = (val); \
+	} while (0);
+#define WRITE_VIDEO_LONG(ptr, val) \
+	do { \
+		scratchULongPtr = (ptr); \
+		Screen_dirty[((ULONG) scratchULongPtr - (ULONG) Screen_atari) >> 3] = 1; \
+		*scratchULongPtr = (val); \
+	} while (0)
+#define WRITE_VIDEO_BYTE(ptr, val) \
+	do { \
+		scratchUBytePtr = (ptr); \
+		Screen_dirty[((ULONG) scratchUBytePtr - (ULONG) Screen_atari) >> 3] = 1; \
+		*scratchUBytePtr = (val); \
+	} while (0)
+#define FILL_VIDEO(ptr, val, size) \
+	do { \
+		scratchUBytePtr = (UBYTE*) (ptr); \
+		scratchULong = (ULONG) (size); \
+		memset(Screen_dirty + (((ULONG) scratchUBytePtr - (ULONG) Screen_atari) >> 3), 1, scratchULong >> 3); \
+		memset(scratchUBytePtr, (val), scratchULong); \
+	} while (0)
+
+#else /* NODIRTYCOMPARE not defined: */
+
+#define WRITE_VIDEO(ptr, val) \
+	do { \
+		scratchUWordPtr = (ptr); \
+		scratchUWord = (val); \
+		if (*scratchUWordPtr != scratchUWord) { \
+			Screen_dirty[((ULONG) scratchUWordPtr - (ULONG) Screen_atari) >> 3] = 1; \
+			*scratchUWordPtr = scratchUWord; \
+		} \
+	} while (0)
+#define WRITE_VIDEO_LONG(ptr, val) \
+	do { \
+		scratchULongPtr = (ptr); \
+		scratchULong = (val); \
+		if (*scratchULongPtr != scratchULong) { \
+			Screen_dirty[((ULONG) scratchULongPtr - (ULONG) Screen_atari) >> 3] = 1; \
+			*scratchULongPtr = scratchULong; \
+		} \
+	} while (0)
+#define WRITE_VIDEO_BYTE(ptr, val) \
+	do { \
+		scratchUBytePtr = (ptr); \
+		scratchUByte = (val); \
+		if (*scratchUBytePtr != scratchUByte) { \
+			Screen_dirty[((ULONG) scratchUBytePtr - (ULONG) Screen_atari) >> 3] = 1; \
+			*scratchUBytePtr = scratchUByte; \
+		} \
+	} while (0)
+static UBYTE *scratchFillLimit;
+#define FILL_VIDEO(ptr, val, size) \
+	do { \
+		scratchUBytePtr = (UBYTE *) (ptr); \
+		scratchUByte = (UBYTE) (val); \
+		scratchFillLimit = scratchUBytePtr + (size); \
+		for (; scratchUBytePtr < scratchFillLimit; scratchUBytePtr++) { \
+			if (*scratchUBytePtr != scratchUByte) { \
+				Screen_dirty[((ULONG) scratchUBytePtr - (ULONG) Screen_atari) >> 3] = 1; \
+				*scratchUBytePtr = scratchUByte; \
+			} \
+		} \
+	} while (0)
+
+#endif /* NODIRTYCOMPARE */
+
+#else /* DIRTYRECT not defined: */
+
+#define WRITE_VIDEO(ptr, val) (*(ptr) = val)
+#define WRITE_VIDEO_LONG(ptr, val) (*(ptr) = val)
+#define WRITE_VIDEO_BYTE(ptr, val) (*(ptr) = val)
+#define FILL_VIDEO(ptr, val, size) memset(ptr, val, size)
+
+#endif /* DIRTYRECT */
+
+#define READ_VIDEO_LONG(ptr) (*(ptr))
+
+void ANTIC_VideoMemset(UBYTE *ptr, UBYTE val, ULONG size)
+{
+	FILL_VIDEO(ptr, val, size);
+}
+
+void ANTIC_VideoPutByte(UBYTE *ptr, UBYTE val)
+{
+	WRITE_VIDEO_BYTE(ptr, val);
+}
+
+
+/* Memory access helpers----------------------------------------------------- */
+/* Some optimizations result in unaligned 32-bit accesses. These macros have
+   been introduced for machines that don't allow unaligned memory accesses. */
+
+#ifdef DIRTYRECT
+/* STAT_UNALIGNED_WORDS doesn't work with DIRTYRECT */
+#define WRITE_VIDEO_LONG_UNALIGNED  WRITE_VIDEO_LONG
+#else
+#define WRITE_VIDEO_LONG_UNALIGNED(ptr, val)  UNALIGNED_PUT_LONG((ptr), (val), Screen_atari_write_long_stat)
+#endif
+
+#ifdef WORDS_UNALIGNED_OK
+#define IS_ZERO_ULONG(x) (! UNALIGNED_GET_LONG(x, pm_scanline_read_long_stat))
+#define DO_GTIA_BYTE(p, l, x) { \
+		WRITE_VIDEO_LONG_UNALIGNED((ULONG *) (p),     (l)[(x) >> 4]); \
+		WRITE_VIDEO_LONG_UNALIGNED((ULONG *) (p) + 1, (l)[(x) & 0xf]); \
+	}
+#else /* WORDS_UNALIGNED_OK */
+#define IS_ZERO_ULONG(x) (!((const UBYTE *)(x))[0] && !((const UBYTE *)(x))[1] && !((const UBYTE *)(x))[2] && !((const UBYTE *)(x))[3])
+#define DO_GTIA_BYTE(p, l, x) { \
+		WRITE_VIDEO((UWORD *) (p),     (UWORD) ((l)[(x) >> 4])); \
+		WRITE_VIDEO((UWORD *) (p) + 1, (UWORD) ((l)[(x) >> 4])); \
+		WRITE_VIDEO((UWORD *) (p) + 2, (UWORD) ((l)[(x) & 0xf])); \
+		WRITE_VIDEO((UWORD *) (p) + 3, (UWORD) ((l)[(x) & 0xf])); \
+	}
+#endif /* WORDS_UNALIGNED_OK */
+
+/* ANTIC Registers --------------------------------------------------------- */
+
+UBYTE ANTIC_DMACTL;
+UBYTE ANTIC_CHACTL;
+UWORD ANTIC_dlist;
+UBYTE ANTIC_HSCROL;
+UBYTE ANTIC_VSCROL;
+UBYTE ANTIC_PMBASE;
+UBYTE ANTIC_CHBASE;
+UBYTE ANTIC_NMIEN;
+UBYTE ANTIC_NMIST;
+
+/* ANTIC Memory ------------------------------------------------------------ */
+
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+static UBYTE antic_memory[52];
+#define ANTIC_margin 4
+/* It's number of bytes in antic_memory, which are never loaded, but may be
+   read in wide playfield mode. These bytes are uninitialized, because on
+   real computer there's some kind of 'garbage'. Possibly 1 is enough, but
+   4 bytes surely won't cause negative indexes. :) */
+
+/* Screen -----------------------------------------------------------------
+   Define screen as ULONG to ensure that it is Longword aligned.
+   This allows special optimisations under certain conditions.
+   ------------------------------------------------------------------------ */
+
+static UWORD *scrn_ptr;
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+/* Separate access to XE extended memory ----------------------------------- */
+/* It's available in 130 XE and 320 KB Compy Shop.
+   Note: during ANTIC access to extended memory in Compy Shop Self Test
+   is disabled. It is unknown if this is true for real 130 XE. If not,
+   then some extra code has to be added to:
+   - check if selftest_enabled is set
+   - check if the address is in range 0x5000..0x57ff
+   - if both conditions are true, then access memory instead of ANTIC_xe_ptr */
+
+/* Pointer to 16 KB seen by ANTIC in 0x4000-0x7fff.
+   If it's the same what the CPU sees (and what's in MEMORY_mem[0x4000..0x7fff],
+   then NULL. */
+const UBYTE *ANTIC_xe_ptr = NULL;
+
+/* ANTIC Timing --------------------------------------------------------------
+
+NOTE: this information was written before NEW_CYCLE_EXACT was introduced!
+
+I've introduced global variable ANTIC_xpos, which contains current number of cycle
+in a line. This simplifies ANTIC/CPU timing much. The CPU_GO() function which
+emulates CPU is now void and is called with ANTIC_xpos limit, below which CPU can go.
+
+All strange variables holding 'unused cycles', 'DMA cycles', 'allocated cycles'
+etc. are removed. Simply whenever ANTIC fetches a byte, it takes single cycle,
+which can be done now with ANTIC_xpos++. There's only one exception: in text modes
+2-5 ANTIC takes more bytes than cycles, because it does less than ANTIC_DMAR refresh
+cycles.
+
+Now emulation is really screenline-oriented. We do ANTIC_ypos++ after a line,
+not inside it.
+
+This simplified diagram shows when what is done in a line:
+
+MDPPPPDD..............(------R/S/F------)..........
+^  ^     ^      ^     ^                     ^    ^ ^        ---> time/xpos
+0  |  NMIST_C NMI_C SCR_C                 WSYNC_C|LINE_C
+VSCON_C                                        VSCOF_C
+
+M - fetch Missiles
+D - fetch DL
+P - fetch Players
+S - fetch Screen
+F - fetch Font (in text modes)
+R - refresh Memory (ANTIC_DMAR cycles)
+
+Only Memory Refresh happens in every line, other tasks are optional.
+
+Below are exact diagrams for some non-scrolled modes:
+                                                                                                    11111111111111
+          11111111112222222222333333333344444444445555555555666666666677777777778888888888999999999900000000001111
+012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123
+                            /--------------------------narrow------------------------------\
+                    /----------------------------------normal--------------------------------------\
+            /-------------------------------------------wide--------------------------------------------\
+
+blank line:
+MDPPPPDD.................R...R...R...R...R...R...R...R...R........................................................
+
+mode 8,9:
+MDPPPPDD....S.......S....R..SR...R..SR...R..SR...R..SR...R..S.......S.......S.......S.......S.......S.............
+
+mode a,b,c:
+MDPPPPDD....S...S...S...SR..SR..SR..SR..SR..SR..SR..SR..SR..S...S...S...S...S...S...S...S...S...S...S...S.........
+
+mode d,e,f:
+MDPPPPDD....S.S.S.S.S.S.SRS.SRS.SRS.SRS.SRS.SRS.SRS.SRS.SRS.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.S.........
+
+Notes:
+* At the beginning of a line fetched are:
+  - a byte of Missiles
+  - a byte of DL (instruction)
+  - four bytes of Players
+  - two bytes of DL argument (jump or screen address)
+  The emulator, however, fetches them all continuously.
+
+* Refresh cycles and Screen/Font fetches have been tested for some modes (see above).
+  This is for making the emulator more accurate, able to change colour registers,
+  sprite positions or GTIA modes during scanline. These modes are the most commonly used
+  with those effects.
+  Currently this isn't implemented, and all R/S/F cycles are fetched continuously in *all* modes
+  (however, right number of cycles is taken in every mode, basing on screen width and HSCROL).
+
+There are a few constants representing following events:
+
+* VSCON_C - in first VSC line dctr is loaded with VSCROL
+
+* ANTIC_NMIST_C - NMIST is updated (set to 0x9f on DLI, set to 0x5f on VBLKI)
+
+* ANTIC_NMI_C - If NMIEN permits, NMI interrupt is generated
+
+* SCR_C - We draw whole line of screen. On a real computer you can change
+  ANTIC/GTIA registers while displaying screen, however this emulator
+  isn't that accurate.
+
+* ANTIC_WSYNC_C - ANTIC holds CPU until this moment, when WSYNC is written
+
+* VSCOF_C - in last VSC line dctr is compared with VSCROL
+
+* ANTIC_LINE_C - simply end of line (this used to be called CPUL)
+
+All constants are determined by tests on real Atari computer. It is assumed,
+that ANTIC registers are read with LDA, LDX, LDY and written with STA, STX,
+STY, all in absolute addressing mode. All these instructions last 4 cycles
+and perform read/write operation in last cycle. The CPU emulation should
+correctly emulate WSYNC and add cycles for current instruction BEFORE
+executing it. That's why VSCOF_C > ANTIC_LINE_C is correct.
+
+How WSYNC is now implemented:
+
+* On writing WSYNC:
+  - if ANTIC_xpos <= ANTIC_WSYNC_C && ANTIC_xpos_limit >= ANTIC_WSYNC_C,
+    we only change ANTIC_xpos to ANTIC_WSYNC_C - that's all
+  - otherwise we set ANTIC_wsync_halt and change ANTIC_xpos to ANTIC_xpos_limit causing CPU_GO()
+    to return
+
+* At the beginning of CPU_GO() (CPU emulation), when ANTIC_wsync_halt is set:
+  - if ANTIC_xpos_limit < ANTIC_WSYNC_C we return
+  - else we set ANTIC_xpos to ANTIC_WSYNC_C, reset ANTIC_wsync_halt and emulate some cycles
+
+We don't emulate ANTIC_NMIST_C, ANTIC_NMI_C and SCR_C if it is unnecessary.
+These are all cases:
+
+* Common overscreen line
+  Nothing happens except that ANTIC gets ANTIC_DMAR cycles:
+  ANTIC_xpos += ANTIC_DMAR; GOEOL;
+
+* First overscreen line - start of vertical blank
+  - CPU goes until ANTIC_NMIST_C
+  - ANTIC sets NMIST to 0x5f
+  if (ANTIC_NMIEN & 0x40) {
+      - CPU goes until ANTIC_NMI_C
+      - ANTIC forces NMI
+  }
+  - ANTIC gets ANTIC_DMAR cycles
+  - CPU goes until ANTIC_LINE_C
+
+* Screen line without DLI
+  - ANTIC fetches DL and P/MG
+  - CPU goes until SCR_C
+  - ANTIC draws whole line fetching Screen/Font and refreshing memory
+  - CPU goes until ANTIC_LINE_C
+
+* Screen line with DLI
+  - ANTIC fetches DL and P/MG
+  - CPU goes until ANTIC_NMIST_C
+  - ANTIC sets NMIST to 0x9f
+  if (ANTIC_NMIEN & 0x80) {
+      - CPU goes until ANTIC_NMI_C
+      - ANTIC forces NMI
+  }
+  - CPU goes until SCR_C
+  - ANTIC draws line with ANTIC_DMAR
+  - CPU goes until ANTIC_LINE_C
+
+  -------------------------------------------------------------------------- */
+
+#define VSCON_C	1
+#define SCR_C	28
+#define VSCOF_C	112
+
+unsigned int ANTIC_screenline_cpu_clock = 0;
+
+#ifdef NEW_CYCLE_EXACT
+#define UPDATE_DMACTL do{if (dmactl_changed) { \
+		dmactl_changed = 0; \
+		ANTIC_PutByte(ANTIC_OFFSET_DMACTL, delayed_DMACTL); \
+	} \
+	if (draw_antic_ptr_changed) { \
+		draw_antic_ptr_changed = 0; \
+		draw_antic_ptr = saved_draw_antic_ptr; \
+	}}while(0)
+#else
+#define UPDATE_DMACTL do{}while(0)
+#endif /* NEW_CYCLE_EXACT */
+#define UPDATE_GTIA_BUG /* update GTIA if it was in bug mode */\
+	do{if(gtia_bug_active) {\
+		/* restore draw_antic_ptr for multi-line modes*/\
+		draw_antic_ptr = draw_antic_table[GTIA_PRIOR >> 6][anticmode];\
+		gtia_bug_active = FALSE;\
+	}}while(0)
+#define GOEOL_CYCLE_EXACT  CPU_GO(ANTIC_antic2cpu_ptr[ANTIC_LINE_C]); \
+	ANTIC_xpos = ANTIC_cpu2antic_ptr[ANTIC_xpos]; \
+	ANTIC_xpos -= ANTIC_LINE_C; \
+	ANTIC_screenline_cpu_clock += ANTIC_LINE_C; \
+	ANTIC_ypos++; \
+	GTIA_UpdatePmplColls();
+#define GOEOL CPU_GO(ANTIC_LINE_C); ANTIC_xpos -= ANTIC_LINE_C; ANTIC_screenline_cpu_clock += ANTIC_LINE_C; UPDATE_DMACTL; ANTIC_ypos++; UPDATE_GTIA_BUG
+#define OVERSCREEN_LINE	ANTIC_xpos += ANTIC_DMAR; GOEOL
+
+int ANTIC_xpos = 0;
+int ANTIC_xpos_limit;
+int ANTIC_wsync_halt = FALSE;
+
+int ANTIC_ypos;						/* Line number - lines 8..247 are on screen */
+
+/* Timing in first line of modes 2-5
+In these modes ANTIC takes more bytes than cycles. Despite this, it would be
+possible that SCR_C + cycles_taken > ANTIC_WSYNC_C. To avoid this we must take some
+cycles before SCR_C. before_cycles contains number of them, while extra_cycles
+contains difference between bytes taken and cycles taken plus before_cycles. */
+
+#define BEFORE_CYCLES (SCR_C - 28)
+/* It's number of cycles taken before SCR_C for not scrolled, narrow playfield.
+   It wasn't tested, but should be ok. ;) */
+
+/* Light pen support ------------------------------------------------------- */
+
+static UBYTE PENH;
+static UBYTE PENV;
+UBYTE ANTIC_PENH_input = 0x00;
+UBYTE ANTIC_PENV_input = 0xff;
+
+#ifndef BASIC
+
+/* Internal ANTIC registers ------------------------------------------------ */
+
+static UWORD screenaddr;		/* Screen Pointer */
+static UBYTE IR;				/* Instruction Register */
+static UBYTE anticmode;			/* Antic mode */
+static UBYTE dctr;				/* Delta Counter */
+static UBYTE lastline;			/* dctr limit */
+static UBYTE need_dl;			/* boolean: fetch DL next line */
+static UBYTE vscrol_off;		/* boolean: displaying line ending VSC */
+
+#endif
+
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+
+/* Pre-computed values for improved performance ---------------------------- */
+
+#define NORMAL0 0				/* modes 2,3,4,5,0xd,0xe,0xf */
+#define NORMAL1 1				/* modes 6,7,0xa,0xb,0xc */
+#define NORMAL2 2				/* modes 8,9 */
+#define SCROLL0 3				/* modes 2,3,4,5,0xd,0xe,0xf with HSC */
+#define SCROLL1 4				/* modes 6,7,0xa,0xb,0xc with HSC */
+#define SCROLL2 5				/* modes 8,9 with HSC */
+static int md;					/* current mode NORMAL0..SCROLL2 */
+/* tables for modes NORMAL0..SCROLL2 */
+static int chars_read[6];
+static int chars_displayed[6];
+static int x_min[6];
+static int ch_offset[6];
+static int load_cycles[6];
+static int font_cycles[6];
+static int before_cycles[6];
+static int extra_cycles[6];
+
+/* border parameters for current display width */
+static int left_border_chars;
+static int right_border_start;
+#ifdef NEW_CYCLE_EXACT
+static int left_border_start = LCHOP * 4;
+static int right_border_end = (48 - RCHOP) * 4;
+#define LBORDER_START left_border_start
+#define RBORDER_END right_border_end
+#else
+#define LBORDER_START (LCHOP * 4)
+#define RBORDER_END ((48 - RCHOP) * 4)
+#endif /* NEW_CYCLE_EXACT */
+
+/* set with CHBASE *and* CHACTL - bits 0..2 set if flip on */
+static UWORD chbase_20;			/* CHBASE for 20 character mode */
+
+/* set with CHACTL */
+static UBYTE invert_mask;
+static int blank_mask;
+
+/* A scanline of AN0 and AN1 signals as transmitted from ANTIC to GTIA.
+   In every byte, bit 0 is AN0 and bit 1 is AN1 */
+static UBYTE an_scanline[Screen_WIDTH / 2 + 8];
+
+/* lookup tables */
+static UBYTE blank_lookup[256];
+static UWORD lookup2[256];
+ULONG ANTIC_lookup_gtia9[16];
+ULONG ANTIC_lookup_gtia11[16];
+static UBYTE playfield_lookup[257];
+static UBYTE mode_e_an_lookup[256];
+
+/* Colour lookup table
+   This single table replaces 4 previously used: cl_word, cur_prior,
+   prior_table and pf_colls. It should be treated as a two-dimensional table,
+   with playfield colours in rows and PMG colours in columns:
+       no_PMG PM0 PM1 PM01 PM2 PM3 PM23 PM023 PM123 PM0123 PM25 PM35 PM235 colls ... ...
+   BAK
+   ...
+   HI2
+   HI3
+   PF0
+   PF1
+   PF2
+   PF3
+   The table contains word value (lsb = msb) of colour to be drawn.
+   The table is being updated taking current PRIOR setting into consideration.
+   '...' represent two unused columns and single unused row.
+   HI2 and HI3 are used only if colour_translation_table is being used.
+   They're colours of hi-res pixels on PF2 and PF3 respectively (PF2 is
+   default background for hi-res, PF3 is PM5).
+   Columns PM023, PM123 and PM0123 are used when PRIOR & 0xf equals any
+   of 5,7,0xc,0xd,0xe,0xf. The columns represent PM0, PM1 and PM01 respectively
+   covered by PM2 and/or PM3. This is to handle black colour on PF2 and PF3.
+   Columns PM25, PM35 and PM235 are used when PRIOR & 0x1f equals any
+   of 0x10,0x1a,0x1c,0x1e. The columns represent PM2, PM3 and PM23
+   respectively covered by PM5. This to handle colour on PF0 and PF1:
+   PF3 if (PRIOR & 0x1f) == 0x10, PF0 or PF1 otherwise.
+   Additional column 'colls' holds collisions of playfields with PMG. */
+
+UWORD ANTIC_cl[128];
+
+#define C_PM0	0x01
+#define C_PM1	0x02
+#define C_PM01	0x03
+#define C_PM2	0x04
+#define C_PM3	0x05
+#define C_PM23	0x06
+#define C_PM023	0x07
+#define C_PM123	0x08
+#define C_PM0123 0x09
+#define C_PM25	0x0a
+#define C_PM35	0x0b
+#define C_PM235	0x0c
+#define C_COLLS	0x0d
+#define C_BAK	0x00
+#define C_HI2	0x20
+#define C_HI3	0x30
+#define C_PF0	0x40
+#define C_PF1	0x50
+#define C_PF2	0x60
+#define C_PF3	0x70
+#define C_BLACK	(C_PF3 | C_PM25)
+
+/* these are byte-offsets in the table, so left shift for indexing word table
+   has been avoided */
+#define COLOUR(x) (*(UWORD *) ((UBYTE *) ANTIC_cl + (x) ))
+#define L_PM0	(2 * C_PM0)
+#define L_PM1	(2 * C_PM1)
+#define L_PM01	(2 * C_PM01)
+#define L_PM2	(2 * C_PM2)
+#define L_PM3	(2 * C_PM3)
+#define L_PM23	(2 * C_PM23)
+#define L_PM023	(2 * C_PM023)
+#define L_PM123	(2 * C_PM123)
+#define L_PM0123 (2 * C_PM0123)
+#define L_PM25	(2 * C_PM25)
+#define L_PM35	(2 * C_PM35)
+#define L_PM235	(2 * C_PM235)
+#define L_COLLS	(2 * C_COLLS)
+#define L_BAK	(2 * C_BAK)
+#define L_HI2	(2 * C_HI2)
+#define L_HI3	(2 * C_HI3)
+#define L_PF0	(2 * C_PF0)
+#define L_PF1	(2 * C_PF1)
+#define L_PF2	(2 * C_PF2)
+#define L_PF3	(2 * C_PF3)
+#define L_BLACK	(2 * C_BLACK)
+
+/* Blank areas optimizations
+   Routines for most graphics modes take advantage of fact, that often
+   large areas of screen are background colour. If it is possible, 8 pixels
+   of background are drawn at once - with two longs or four words, if
+   the platform doesn't allow unaligned long access.
+   Artifacting also uses unaligned long access if it's supported. */
+
+#ifdef WORDS_UNALIGNED_OK
+
+#define INIT_BACKGROUND_6 ULONG background = ANTIC_cl[C_PF2] | (((ULONG) ANTIC_cl[C_PF2]) << 16);
+#define INIT_BACKGROUND_8 ULONG background = ANTIC_lookup_gtia9[0];
+#define DRAW_BACKGROUND(colreg) { \
+		WRITE_VIDEO_LONG_UNALIGNED((ULONG *) ptr, background); \
+		WRITE_VIDEO_LONG_UNALIGNED(((ULONG *) ptr) + 1, background); \
+		ptr += 4; \
+	}
+#define DRAW_ARTIF { \
+		WRITE_VIDEO_LONG_UNALIGNED((ULONG *) ptr, art_curtable[(UBYTE) (screendata_tally >> 10)]); \
+		WRITE_VIDEO_LONG_UNALIGNED(((ULONG *) ptr) + 1, art_curtable[(UBYTE) (screendata_tally >> 6)]); \
+		ptr += 4; \
+	}
+
+#else
+
+#define INIT_BACKGROUND_6
+#define INIT_BACKGROUND_8
+#define DRAW_BACKGROUND(colreg) {\
+		WRITE_VIDEO(ptr,     ANTIC_cl[colreg]); \
+		WRITE_VIDEO(ptr + 1, ANTIC_cl[colreg]); \
+		WRITE_VIDEO(ptr + 2, ANTIC_cl[colreg]); \
+		WRITE_VIDEO(ptr + 3, ANTIC_cl[colreg]); \
+		ptr += 4;\
+	}
+#define DRAW_ARTIF {\
+		WRITE_VIDEO(ptr++, ((UWORD *) art_curtable)[(screendata_tally & 0x03fc00) >> 9]); \
+		WRITE_VIDEO(ptr++, ((UWORD *) art_curtable)[((screendata_tally & 0x03fc00) >> 9) + 1]); \
+		WRITE_VIDEO(ptr++, ((UWORD *) art_curtable)[(screendata_tally & 0x003fc0) >> 5]); \
+		WRITE_VIDEO(ptr++, ((UWORD *) art_curtable)[((screendata_tally & 0x003fc0) >> 5) + 1]); \
+	}
+
+#endif /* WORDS_UNALIGNED_OK */
+
+#define DRAW_ARTIF_NEW {\
+		WRITE_VIDEO(ptr++, art_lookup_new[(screendata_tally & 0x03f000) >> 12]); \
+		WRITE_VIDEO(ptr++, art_lookup_new[(screendata_tally & 0x00fc00) >> 10]); \
+		WRITE_VIDEO(ptr++, art_lookup_new[(screendata_tally & 0x003f00) >> 8]); \
+		WRITE_VIDEO(ptr++, art_lookup_new[(screendata_tally & 0x000fc0) >> 6]); \
+	}
+
+/* Hi-res modes optimizations
+   Now hi-res modes are drawn with words, not bytes. Endianess defaults
+   to little-endian. WORDS_BIGENDIAN should be defined when compiling on
+   a big-endian machine. */
+
+#ifdef WORDS_BIGENDIAN
+#define BYTE0_MASK		0xff00
+#define BYTE1_MASK		0x00ff
+#define HIRES_MASK_01	0xfff0
+#define HIRES_MASK_10	0xf0ff
+#define HIRES_LUM_01	0x000f
+#define HIRES_LUM_10	0x0f00
+#else
+#define BYTE0_MASK		0x00ff
+#define BYTE1_MASK		0xff00
+#define HIRES_MASK_01	0xf0ff
+#define HIRES_MASK_10	0xfff0
+#define HIRES_LUM_01	0x0f00
+#define HIRES_LUM_10	0x000f
+#endif
+
+static UWORD hires_lookup_n[128];
+static UWORD hires_lookup_m[128];
+#define hires_norm(x)	hires_lookup_n[(x) >> 1]
+#define hires_mask(x)	hires_lookup_m[(x) >> 1]
+
+#ifndef USE_COLOUR_TRANSLATION_TABLE
+int ANTIC_artif_new = FALSE; /* New type of artifacting */
+UWORD ANTIC_hires_lookup_l[128];	/* accessed in gtia.c */
+#define hires_lum(x)	ANTIC_hires_lookup_l[(x) >> 1]
+#endif
+
+/* Player/Missile Graphics ------------------------------------------------- */
+
+#define PF0PM (*(UBYTE *) &ANTIC_cl[C_PF0 | C_COLLS])
+#define PF1PM (*(UBYTE *) &ANTIC_cl[C_PF1 | C_COLLS])
+#define PF2PM (*(UBYTE *) &ANTIC_cl[C_PF2 | C_COLLS])
+#define PF3PM (*(UBYTE *) &ANTIC_cl[C_PF3 | C_COLLS])
+#define PF_COLLS(x) (((UBYTE *) &ANTIC_cl)[(x) + L_COLLS])
+
+static int singleline;
+int ANTIC_player_dma_enabled;
+int ANTIC_player_gra_enabled;
+int ANTIC_missile_dma_enabled;
+int ANTIC_missile_gra_enabled;
+int ANTIC_player_flickering;
+int ANTIC_missile_flickering;
+
+static UWORD pmbase_s;
+static UWORD pmbase_d;
+
+/* PMG lookup tables */
+static UBYTE pm_lookup_table[20][256];
+/* current PMG lookup table */
+static const UBYTE *pm_lookup_ptr;
+
+#define PL_00	0	/* 0x00,0x01,0x02,0x03,0x04,0x06,0x08,0x09,0x0a,0x0b */
+#define PL_05	1	/* 0x05,0x07,0x0c,0x0d,0x0e,0x0f */
+#define PL_10	2	/* 0x10,0x1a */
+#define PL_11	3	/* 0x11,0x18,0x19 */
+#define PL_12	4	/* 0x12 */
+#define PL_13	5	/* 0x13,0x1b */
+#define PL_14	6	/* 0x14,0x16 */
+#define PL_15	7	/* 0x15,0x17,0x1d,0x1f */
+#define PL_1c	8	/* 0x1c */
+#define PL_1e	9	/* 0x1e */
+#define PL_20	10	/* 0x20,0x21,0x22,0x23,0x24,0x26,0x28,0x29,0x2a,0x2b */
+#define PL_25	11	/* 0x25,0x27,0x2c,0x2d,0x2e,0x2f */
+#define PL_30	12	/* 0x30,0x3a */
+#define PL_31	13	/* 0x31,0x38,0x39 */
+#define PL_32	14	/* 0x32 */
+#define PL_33	15	/* 0x33,0x3b */
+#define PL_34	16	/* 0x34,0x36 */
+#define PL_35	17	/* 0x35,0x37,0x3d,0x3f */
+#define PL_3c	18	/* 0x3c */
+#define PL_3e	19	/* 0x3e */
+
+static const UBYTE prior_to_pm_lookup[64] = {
+	PL_00, PL_00, PL_00, PL_00, PL_00, PL_05, PL_00, PL_05,
+	PL_00, PL_00, PL_00, PL_00, PL_05, PL_05, PL_05, PL_05,
+	PL_10, PL_11, PL_12, PL_13, PL_14, PL_15, PL_14, PL_15,
+	PL_11, PL_11, PL_10, PL_13, PL_1c, PL_15, PL_1e, PL_15,
+	PL_20, PL_20, PL_20, PL_20, PL_20, PL_25, PL_20, PL_25,
+	PL_20, PL_20, PL_20, PL_20, PL_25, PL_25, PL_25, PL_25,
+	PL_30, PL_31, PL_32, PL_33, PL_34, PL_35, PL_34, PL_35,
+	PL_31, PL_31, PL_30, PL_33, PL_3c, PL_35, PL_3e, PL_35
+};
+
+static void init_pm_lookup(void)
+{
+	static const UBYTE pm_lookup_template[10][16] = {
+		/* PL_20 */
+		{ L_BAK, L_PM0, L_PM1, L_PM01, L_PM2, L_PM0, L_PM1, L_PM01,
+		L_PM3, L_PM0, L_PM1, L_PM01, L_PM23, L_PM0, L_PM1, L_PM01 },
+		/* PL_25 */
+		{ L_BAK, L_PM0, L_PM1, L_PM01, L_PM2, L_PM023, L_PM123, L_PM0123,
+		L_PM3, L_PM023, L_PM123, L_PM0123, L_PM23, L_PM023, L_PM123, L_PM0123 },
+		/* PL_30 */
+		{ L_PF3, L_PM0, L_PM1, L_PM01, L_PM25, L_PM0, L_PM1, L_PM01,
+		L_PM35, L_PM0, L_PM1, L_PM01, L_PM235, L_PM0, L_PM1, L_PM01 },
+		/* PL_31 */
+		{ L_PF3, L_PM0, L_PM1, L_PM01, L_PM2, L_PM0, L_PM1, L_PM01,
+		L_PM3, L_PM0, L_PM1, L_PM01, L_PM23, L_PM0, L_PM1, L_PM01 },
+		/* PL_32 */
+		{ L_PF3, L_PM0, L_PM1, L_PM01, L_PF3, L_PM0, L_PM1, L_PM01,
+		L_PF3, L_PM0, L_PM1, L_PM01, L_PF3, L_PM0, L_PM1, L_PM01 },
+		/* PL_33 */
+		{ L_PF3, L_PM0, L_PM1, L_PM01, L_BLACK, L_PM0, L_PM1, L_PM01,
+		L_BLACK, L_PM0, L_PM1, L_PM01, L_BLACK, L_PM0, L_PM1, L_PM01 },
+		/* PL_34 */
+		{ L_PF3, L_PF3, L_PF3, L_PF3, L_PF3, L_PF3, L_PF3, L_PF3,
+		L_PF3, L_PF3, L_PF3, L_PF3, L_PF3, L_PF3, L_PF3, L_PF3 },
+		/* PL_35 */
+		{ L_PF3, L_PF3, L_PF3, L_PF3, L_BLACK, L_BLACK, L_BLACK, L_BLACK,
+		L_BLACK, L_BLACK, L_BLACK, L_BLACK, L_BLACK, L_BLACK, L_BLACK, L_BLACK },
+		/* PL_3c */
+		{ L_PF3, L_PF3, L_PF3, L_PF3, L_PM25, L_PM25, L_PM25, L_PM25,
+		L_PM25, L_PM25, L_PM25, L_PM25, L_PM25, L_PM25, L_PM25, L_PM25 },
+		/* PL_3e */
+		{ L_PF3, L_PF3, L_PF3, L_PF3, L_PM25, L_BLACK, L_BLACK, L_BLACK,
+		L_PM25, L_BLACK, L_BLACK, L_BLACK, L_PM25, L_BLACK, L_BLACK, L_BLACK }
+	};
+
+	static const UBYTE multi_to_normal[] = {
+		L_BAK,
+		L_PM0, L_PM1, L_PM0,
+		L_PM2, L_PM3, L_PM2,
+		L_PM023, L_PM123, L_PM023,
+		L_PM25, L_PM35, L_PM25
+	};
+
+	int i;
+	int j;
+	UBYTE temp;
+
+	for (i = 0; i <= 1; i++)
+		for (j = 0; j <= 255; j++) {
+			pm_lookup_table[i + 10][j] = temp = pm_lookup_template[i][(j & 0xf) | (j >> 4)];
+			pm_lookup_table[i][j] = temp <= L_PM235 ? multi_to_normal[temp >> 1] : temp;
+		}
+	for (; i <= 9; i++) {
+		for (j = 0; j <= 15; j++) {
+			pm_lookup_table[i + 10][j] = temp = pm_lookup_template[i < 7 ? 0 : 1][j];
+			pm_lookup_table[i][j] = temp <= L_PM235 ? multi_to_normal[temp >> 1] : temp;
+		}
+		for (; j <= 255; j++) {
+			pm_lookup_table[i + 10][j] = temp = pm_lookup_template[i][j & 0xf];
+			pm_lookup_table[i][j] = temp <= L_PM235 ? multi_to_normal[temp >> 1] : temp;
+		}
+	}
+}
+
+static const UBYTE hold_missiles_tab[16] = {
+	0x00,0x03,0x0c,0x0f,0x30,0x33,0x3c,0x3f,
+	0xc0,0xc3,0xcc,0xcf,0xf0,0xf3,0xfc,0xff};
+
+static void pmg_dma(void)
+{
+	/* VDELAY bit set == GTIA ignores PMG DMA in even lines */
+	if (ANTIC_player_dma_enabled) {
+		if (ANTIC_player_gra_enabled) {
+			const UBYTE *base;
+			if (singleline) {
+				if (ANTIC_xe_ptr != NULL && pmbase_s < 0x8000 && pmbase_s >= 0x4000)
+					base = ANTIC_xe_ptr + pmbase_s - 0x4000 + ANTIC_ypos;
+				else
+					base = MEMORY_mem + pmbase_s + ANTIC_ypos;
+				if (ANTIC_ypos & 1) {
+					GTIA_GRAFP0 = base[0x400];
+					GTIA_GRAFP1 = base[0x500];
+					GTIA_GRAFP2 = base[0x600];
+					GTIA_GRAFP3 = base[0x700];
+				}
+				else {
+					if ((GTIA_VDELAY & 0x10) == 0)
+						GTIA_GRAFP0 = base[0x400];
+					if ((GTIA_VDELAY & 0x20) == 0)
+						GTIA_GRAFP1 = base[0x500];
+					if ((GTIA_VDELAY & 0x40) == 0)
+						GTIA_GRAFP2 = base[0x600];
+					if ((GTIA_VDELAY & 0x80) == 0)
+						GTIA_GRAFP3 = base[0x700];
+				}
+			}
+			else {
+				if (ANTIC_xe_ptr != NULL && pmbase_d < 0x8000 && pmbase_d >= 0x4000)
+					base = ANTIC_xe_ptr + (pmbase_d - 0x4000) + (ANTIC_ypos >> 1);
+				else
+					base = MEMORY_mem + pmbase_d + (ANTIC_ypos >> 1);
+				if (ANTIC_ypos & 1) {
+					GTIA_GRAFP0 = base[0x200];
+					GTIA_GRAFP1 = base[0x280];
+					GTIA_GRAFP2 = base[0x300];
+					GTIA_GRAFP3 = base[0x380];
+				}
+				else {
+					if ((GTIA_VDELAY & 0x10) == 0)
+						GTIA_GRAFP0 = base[0x200];
+					if ((GTIA_VDELAY & 0x20) == 0)
+						GTIA_GRAFP1 = base[0x280];
+					if ((GTIA_VDELAY & 0x40) == 0)
+						GTIA_GRAFP2 = base[0x300];
+					if ((GTIA_VDELAY & 0x80) == 0)
+						GTIA_GRAFP3 = base[0x380];
+				}
+			}
+		}
+		ANTIC_xpos += 4;
+	}
+	if (ANTIC_missile_dma_enabled) {
+		if (ANTIC_missile_gra_enabled) {
+			UBYTE data;
+			if (ANTIC_xe_ptr != NULL && pmbase_s < 0x8000 && pmbase_s >= 0x4000)
+				data = ANTIC_xe_ptr[singleline ? pmbase_s + ANTIC_ypos + 0x300 - 0x4000 : pmbase_d + (ANTIC_ypos >> 1) + 0x180 - 0x4000];
+			else
+				data = MEMORY_dGetByte(singleline ? pmbase_s + ANTIC_ypos + 0x300 : pmbase_d + (ANTIC_ypos >> 1) + 0x180);
+			/* in odd lines load all missiles, in even only those, for which VDELAY bit is zero */
+			GTIA_GRAFM = ANTIC_ypos & 1 ? data : ((GTIA_GRAFM ^ data) & hold_missiles_tab[GTIA_VDELAY & 0xf]) ^ data;
+		}
+		ANTIC_xpos++;
+	}
+}
+
+/* Artifacting ------------------------------------------------------------ */
+
+int ANTIC_artif_mode;
+
+static UWORD art_lookup_new[64];
+static UWORD art_colour1_new;
+static UWORD art_colour2_new;
+
+static ULONG art_lookup_normal[256];
+static ULONG art_lookup_reverse[256];
+static ULONG art_bkmask_normal[256];
+static ULONG art_lummask_normal[256];
+static ULONG art_bkmask_reverse[256];
+static ULONG art_lummask_reverse[256];
+
+static ULONG *art_curtable = art_lookup_normal;
+static ULONG *art_curbkmask = art_bkmask_normal;
+static ULONG *art_curlummask = art_lummask_normal;
+
+static UWORD art_normal_colpf1_save;
+static UWORD art_normal_colpf2_save;
+static UWORD art_reverse_colpf1_save;
+static UWORD art_reverse_colpf2_save;
+
+static void setup_art_colours(void)
+{
+	static UWORD *art_colpf1_save = &art_normal_colpf1_save;
+	static UWORD *art_colpf2_save = &art_normal_colpf2_save;
+	UWORD curlum = ANTIC_cl[C_PF1] & 0x0f0f;
+
+	if (curlum != *art_colpf1_save || ANTIC_cl[C_PF2] != *art_colpf2_save) {
+		if (curlum < (ANTIC_cl[C_PF2] & 0x0f0f)) {
+			art_colpf1_save = &art_reverse_colpf1_save;
+			art_colpf2_save = &art_reverse_colpf2_save;
+			art_curtable = art_lookup_reverse;
+			art_curlummask = art_lummask_reverse;
+			art_curbkmask = art_bkmask_reverse;
+		}
+		else {
+			art_colpf1_save = &art_normal_colpf1_save;
+			art_colpf2_save = &art_normal_colpf2_save;
+			art_curtable = art_lookup_normal;
+			art_curlummask = art_lummask_normal;
+			art_curbkmask = art_bkmask_normal;
+		}
+		if (curlum ^ *art_colpf1_save) {
+			int i;
+			ULONG new_colour = curlum ^ *art_colpf1_save;
+			new_colour |= new_colour << 16;
+			*art_colpf1_save = curlum;
+			for (i = 0; i <= 255; i++)
+				art_curtable[i] ^= art_curlummask[i] & new_colour;
+		}
+		if (ANTIC_cl[C_PF2] ^ *art_colpf2_save) {
+			int i;
+			ULONG new_colour = ANTIC_cl[C_PF2] ^ *art_colpf2_save;
+			new_colour |= new_colour << 16;
+			*art_colpf2_save = ANTIC_cl[C_PF2];
+			for (i = 0; i <= 255; i++)
+				art_curtable[i] ^= art_curbkmask[i] & new_colour;
+		}
+
+	}
+}
+
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+/* Initialization ---------------------------------------------------------- */
+
+int ANTIC_Initialise(int *argc, char *argv[])
+{
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+	int i, j;
+
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = FALSE;			/* error, argument missing! */
+		
+		if (strcmp(argv[i], "-artif") == 0) {
+			if (i_a) {
+				ANTIC_artif_mode = Util_sscandec(argv[++i]);
+				if (ANTIC_artif_mode < 0 || ANTIC_artif_mode > 4) {
+					Log_print("Invalid artifacting mode, using default.");
+					ANTIC_artif_mode = 0;
+				}
+			}
+			else a_m = TRUE;
+		}
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-artif <num>     Set artifacting mode 0-4 (0 = disable)");
+			}
+			argv[j++] = argv[i];
+		}
+
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return FALSE;
+		}
+	}
+	*argc = j;
+
+	ANTIC_UpdateArtifacting();
+
+	playfield_lookup[0x00] = L_BAK;
+	playfield_lookup[0x40] = L_PF0;
+	playfield_lookup[0x80] = L_PF1;
+	playfield_lookup[0xc0] = L_PF2;
+	playfield_lookup[0x100] = L_PF3;
+	blank_lookup[0x80] = blank_lookup[0xa0] = blank_lookup[0xc0] = blank_lookup[0xe0] = 0x00;
+	hires_mask(0x00) = 0xffff;
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+	hires_mask(0x40) = BYTE0_MASK;
+	hires_mask(0x80) = BYTE1_MASK;
+	hires_mask(0xc0) = 0;
+#else
+	hires_mask(0x40) = HIRES_MASK_01;
+	hires_mask(0x80) = HIRES_MASK_10;
+	hires_mask(0xc0) = 0xf0f0;
+	hires_lum(0x00) = hires_lum(0x40) = hires_lum(0x80) = hires_lum(0xc0) = 0;
+#endif
+	init_pm_lookup();
+	mode_e_an_lookup[0] = 0;
+	mode_e_an_lookup[1] = mode_e_an_lookup[4] = mode_e_an_lookup[0x10] = mode_e_an_lookup[0x40] = 0;
+	mode_e_an_lookup[2] = mode_e_an_lookup[8] = mode_e_an_lookup[0x20] = mode_e_an_lookup[0x80] = 1;
+	mode_e_an_lookup[3] = mode_e_an_lookup[12] = mode_e_an_lookup[0x30] = mode_e_an_lookup[0xc0] = 2;
+#ifdef NEW_CYCLE_EXACT
+	CYCLE_MAP_Create();
+	ANTIC_cpu2antic_ptr = &CYCLE_MAP_cpu2antic[0];
+	ANTIC_antic2cpu_ptr = &CYCLE_MAP_antic2cpu[0];
+#endif /* NEW_CYCLE_EXACT */
+
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+	return TRUE;
+}
+
+void ANTIC_Reset(void)
+{
+	ANTIC_NMIEN = 0x00;
+	ANTIC_NMIST = 0x1f;
+	ANTIC_PutByte(ANTIC_OFFSET_DMACTL, 0);
+}
+
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+
+/* Border ------------------------------------------------------------------ */
+
+#define DO_BORDER_1 {\
+	if (IS_ZERO_ULONG(pm_scanline_ptr)) {\
+		ULONG *l_ptr = (ULONG *) ptr;\
+		WRITE_VIDEO_LONG(l_ptr++, background); \
+		WRITE_VIDEO_LONG(l_ptr++, background); \
+		ptr = (UWORD *) l_ptr;\
+		pm_scanline_ptr += 4;\
+	}\
+	else {\
+		int k = 4;\
+		do
+
+#define DO_BORDER DO_BORDER_1\
+			WRITE_VIDEO(ptr++, COLOUR(pm_lookup_ptr[*pm_scanline_ptr++]));\
+		while (--k);\
+	}\
+}
+
+#define DO_GTIA10_BORDER DO_BORDER_1\
+			WRITE_VIDEO(ptr++, COLOUR(pm_lookup_ptr[*pm_scanline_ptr++ | 1]));\
+		while (--k);\
+	}\
+}
+
+static void do_border(void)
+{
+	int kk;
+	UWORD *ptr = &scrn_ptr[LBORDER_START];
+	const UBYTE *pm_scanline_ptr = &GTIA_pm_scanline[LBORDER_START];
+	ULONG background = ANTIC_lookup_gtia9[0];
+	/* left border */
+	for (kk = left_border_chars; kk; kk--)
+			DO_BORDER
+	/* right border */
+	ptr = &scrn_ptr[right_border_start];
+	pm_scanline_ptr = &GTIA_pm_scanline[right_border_start];
+	while (pm_scanline_ptr < &GTIA_pm_scanline[RBORDER_END])
+			DO_BORDER
+}
+
+static void do_border_gtia10(void)
+{
+	int kk;
+	UWORD *ptr = &scrn_ptr[LBORDER_START];
+	const UBYTE *pm_scanline_ptr = &GTIA_pm_scanline[LBORDER_START];
+	ULONG background = ANTIC_cl[C_PM0] | (ANTIC_cl[C_PM0] << 16);
+	/* left border */
+	for (kk = left_border_chars; kk; kk--)
+		DO_GTIA10_BORDER
+	WRITE_VIDEO(ptr, COLOUR(pm_lookup_ptr[*pm_scanline_ptr | 1])); /* one extra pixel, because of the right shift of gtia10*/
+	/* right border */
+	pm_scanline_ptr = &GTIA_pm_scanline[right_border_start];
+	if (pm_scanline_ptr < &GTIA_pm_scanline[RBORDER_END]) {
+		ptr = &scrn_ptr[right_border_start + 1]; /*start one pixel further right because of the right shift of gtia10*/
+		WRITE_VIDEO(ptr++, COLOUR(pm_lookup_ptr[pm_scanline_ptr[1] | 1]));
+		WRITE_VIDEO(ptr++, COLOUR(pm_lookup_ptr[pm_scanline_ptr[2] | 1]));
+		WRITE_VIDEO(ptr++, COLOUR(pm_lookup_ptr[pm_scanline_ptr[3] | 1]));
+		pm_scanline_ptr += 4;
+		while (pm_scanline_ptr < &GTIA_pm_scanline[RBORDER_END])
+			DO_GTIA10_BORDER
+	}
+}
+
+static void do_border_gtia11(void)
+{
+	int kk;
+	UWORD *ptr = &scrn_ptr[LBORDER_START];
+	const UBYTE *pm_scanline_ptr = &GTIA_pm_scanline[LBORDER_START];
+	ULONG background = ANTIC_lookup_gtia11[0];
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+	ANTIC_cl[C_PF3] = colour_translation_table[GTIA_COLPF3 & 0xf0];
+#else
+	ANTIC_cl[C_PF3] &= 0xf0f0;
+#endif
+	ANTIC_cl[C_BAK] = (UWORD) background;
+	/* left border */
+	for (kk = left_border_chars; kk; kk--)
+		DO_BORDER
+	/* right border */
+	ptr = &scrn_ptr[right_border_start];
+	pm_scanline_ptr = &GTIA_pm_scanline[right_border_start];
+	while (pm_scanline_ptr < &GTIA_pm_scanline[RBORDER_END])
+		DO_BORDER
+	GTIA_COLOUR_TO_WORD(ANTIC_cl[C_PF3],GTIA_COLPF3)
+	GTIA_COLOUR_TO_WORD(ANTIC_cl[C_BAK],GTIA_COLBK)
+}
+
+static void draw_antic_0(void)
+{
+	UWORD *ptr = scrn_ptr + LBORDER_START;
+	if (GTIA_pm_dirty) {
+		const UBYTE *pm_scanline_ptr = &GTIA_pm_scanline[LBORDER_START];
+		ULONG background = ANTIC_lookup_gtia9[0];
+		do
+			DO_BORDER
+		while (pm_scanline_ptr < &GTIA_pm_scanline[RBORDER_END]);
+	}
+	else
+		FILL_VIDEO(ptr, ANTIC_cl[C_BAK], (RBORDER_END - LBORDER_START) * 2);
+}
+
+static void draw_antic_0_gtia10(void)
+{
+	UWORD *ptr = scrn_ptr + LBORDER_START;
+	if (GTIA_pm_dirty) {
+		const UBYTE *pm_scanline_ptr = &GTIA_pm_scanline[LBORDER_START];
+		ULONG background = ANTIC_cl[C_PM0] | (ANTIC_cl[C_PM0] << 16);
+		do
+			DO_GTIA10_BORDER
+		while (pm_scanline_ptr < &GTIA_pm_scanline[RBORDER_END]);
+	}
+	else
+		FILL_VIDEO(ptr, ANTIC_cl[C_PM0], (RBORDER_END - LBORDER_START) * 2);
+}
+
+static void draw_antic_0_gtia11(void)
+{
+	UWORD *ptr = scrn_ptr + LBORDER_START;
+	if (GTIA_pm_dirty) {
+		const UBYTE *pm_scanline_ptr = &GTIA_pm_scanline[LBORDER_START];
+		ULONG background = ANTIC_lookup_gtia11[0];
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+		ANTIC_cl[C_PF3] = colour_translation_table[GTIA_COLPF3 & 0xf0];
+#else
+		ANTIC_cl[C_PF3] &= 0xf0f0;
+#endif
+		ANTIC_cl[C_BAK] = (UWORD) background;
+		do
+			DO_BORDER
+		while (pm_scanline_ptr < &GTIA_pm_scanline[RBORDER_END]);
+		GTIA_COLOUR_TO_WORD(ANTIC_cl[C_PF3],GTIA_COLPF3)
+		GTIA_COLOUR_TO_WORD(ANTIC_cl[C_BAK],GTIA_COLBK)
+	}
+	else
+		FILL_VIDEO(ptr, ANTIC_lookup_gtia11[0], (RBORDER_END - LBORDER_START) * 2);
+}
+
+/* ANTIC modes ------------------------------------------------------------- */
+
+static const UBYTE gtia_10_lookup[] =
+{L_BAK, L_BAK, L_BAK, L_BAK, L_PF0, L_PF1, L_PF2, L_PF3,
+ L_BAK, L_BAK, L_BAK, L_BAK, L_PF0, L_PF1, L_PF2, L_PF3};
+static const UBYTE gtia_10_pm[] =
+{1, 2, 4, 8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
+
+static void draw_an_gtia9(const ULONG *t_pm_scanline_ptr)
+{
+	int i = ((const UBYTE *) t_pm_scanline_ptr - GTIA_pm_scanline) & ~1;
+	while (i < right_border_start) {
+		UWORD *ptr = scrn_ptr + i;
+		int pixel = (an_scanline[i] << 2) + an_scanline[i + 1];
+		UBYTE pm_reg;
+		WRITE_VIDEO_LONG((ULONG *) ptr, ANTIC_lookup_gtia9[pixel]);
+		pm_reg = GTIA_pm_scanline[i];
+		if (pm_reg) {
+			pm_reg = pm_lookup_ptr[pm_reg];
+			if (pm_reg == L_PF3) {
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+				WRITE_VIDEO(ptr, colour_translation_table[pixel | GTIA_COLPF3]);
+#else
+				WRITE_VIDEO(ptr, pixel | (pixel << 8) | ANTIC_cl[C_PF3]);
+#endif
+			}
+			else {
+				WRITE_VIDEO(ptr, COLOUR(pm_reg));
+			}
+		}
+		i++;
+		pm_reg = GTIA_pm_scanline[i];
+		if (pm_reg) {
+			pm_reg = pm_lookup_ptr[pm_reg];
+			if (pm_reg == L_PF3) {
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+				WRITE_VIDEO(ptr + 1, colour_translation_table[pixel | GTIA_COLPF3]);
+#else
+				WRITE_VIDEO(ptr + 1, pixel | (pixel << 8) | ANTIC_cl[C_PF3]);
+#endif
+			}
+			else {
+				WRITE_VIDEO(ptr + 1, COLOUR(pm_reg));
+			}
+		}
+		i++;
+	}
+	do_border();
+}
+
+static void draw_an_gtia10(const ULONG *t_pm_scanline_ptr)
+{
+	int i = ((const UBYTE *) t_pm_scanline_ptr - GTIA_pm_scanline) | 1;
+	UWORD lookup_gtia10[16];
+	lookup_gtia10[0] = ANTIC_cl[C_PM0];
+	lookup_gtia10[1] = ANTIC_cl[C_PM1];
+	lookup_gtia10[2] = ANTIC_cl[C_PM2];
+	lookup_gtia10[3] = ANTIC_cl[C_PM3];
+	lookup_gtia10[12] = lookup_gtia10[4] = ANTIC_cl[C_PF0];
+	lookup_gtia10[13] = lookup_gtia10[5] = ANTIC_cl[C_PF1];
+	lookup_gtia10[14] = lookup_gtia10[6] = ANTIC_cl[C_PF2];
+	lookup_gtia10[15] = lookup_gtia10[7] = ANTIC_cl[C_PF3];
+	lookup_gtia10[8] = lookup_gtia10[9] = lookup_gtia10[10] = lookup_gtia10[11] = ANTIC_cl[C_BAK];
+	while (i < right_border_start) {
+		UWORD *ptr = scrn_ptr + i;
+		int pixel = (an_scanline[i - 1] << 2) + an_scanline[i];
+		UBYTE pm_reg;
+		int colreg;
+		pm_reg = GTIA_pm_scanline[i];
+		if (pm_reg) {
+			colreg = gtia_10_lookup[pixel];
+			PF_COLLS(colreg) |= pm_reg;
+			pm_reg |= gtia_10_pm[pixel];
+			WRITE_VIDEO(ptr, COLOUR(pm_lookup_ptr[pm_reg] | colreg));
+		}
+		else {
+			WRITE_VIDEO(ptr, lookup_gtia10[pixel]);
+		}
+		i++;
+		pm_reg = GTIA_pm_scanline[i];
+		if (pm_reg) {
+			colreg = gtia_10_lookup[pixel];
+			PF_COLLS(colreg) |= pm_reg;
+			pm_reg |= gtia_10_pm[pixel];
+			WRITE_VIDEO(ptr + 1, COLOUR(pm_lookup_ptr[pm_reg] | colreg));
+		}
+		else {
+			WRITE_VIDEO(ptr + 1, lookup_gtia10[pixel]);
+		}
+		i++;
+	}
+	do_border_gtia10();
+}
+
+static void draw_an_gtia11(const ULONG *t_pm_scanline_ptr)
+{
+	int i = ((const UBYTE *) t_pm_scanline_ptr - GTIA_pm_scanline) & ~1;
+	while (i < right_border_start) {
+		UWORD *ptr = scrn_ptr + i;
+		int pixel = (an_scanline[i] << 2) + an_scanline[i + 1];
+		UBYTE pm_reg;
+		WRITE_VIDEO_LONG((ULONG *) ptr, ANTIC_lookup_gtia11[pixel]);
+		pm_reg = GTIA_pm_scanline[i];
+		if (pm_reg) {
+			pm_reg = pm_lookup_ptr[pm_reg];
+			if (pm_reg == L_PF3) {
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+				WRITE_VIDEO(ptr, colour_translation_table[pixel ? pixel | GTIA_COLPF3 : GTIA_COLPF3 & 0xf0]);
+#else
+				WRITE_VIDEO(ptr, pixel ? (pixel << 4) | (pixel << 12) | ANTIC_cl[C_PF3] : ANTIC_cl[C_PF3] & 0xf0f0);
+#endif
+			}
+			else {
+				WRITE_VIDEO(ptr, COLOUR(pm_reg));
+			}
+		}
+		i++;
+		pm_reg = GTIA_pm_scanline[i];
+		if (pm_reg) {
+			pm_reg = pm_lookup_ptr[pm_reg];
+			if (pm_reg == L_PF3) {
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+				WRITE_VIDEO(ptr + 1, colour_translation_table[pixel ? pixel | GTIA_COLPF3 : GTIA_COLPF3 & 0xf0]);
+#else
+				WRITE_VIDEO(ptr + 1, pixel ? (pixel << 4) | (pixel << 12) | ANTIC_cl[C_PF3] : ANTIC_cl[C_PF3] & 0xf0f0);
+#endif
+			}
+			else {
+				WRITE_VIDEO(ptr + 1, COLOUR(pm_reg));
+			}
+		}
+		i++;
+	}
+	do_border_gtia11();
+}
+
+static void draw_an_gtia_bug(const ULONG *t_pm_scanline_ptr)
+{
+	static const UBYTE gtia_bug_colreg[] = {L_PF0, L_PF1, L_PF2, L_PF3};
+	UWORD lookup_gtia_bug[16];
+	int i;
+	lookup_gtia_bug[0] = ANTIC_cl[C_PF0];
+	lookup_gtia_bug[1] = ANTIC_cl[C_PF1];
+	lookup_gtia_bug[2] = ANTIC_cl[C_PF2];
+	lookup_gtia_bug[3] = ANTIC_cl[C_PF3];
+	i = ((const UBYTE *) t_pm_scanline_ptr - GTIA_pm_scanline);
+	while (i < right_border_start) {
+		UWORD *ptr = scrn_ptr + i;
+		int pixel = an_scanline[i];
+		UBYTE pm_reg;
+		int colreg;
+		pm_reg = GTIA_pm_scanline[i];
+		if (pm_reg) {
+			colreg = gtia_bug_colreg[pixel];
+			PF_COLLS(colreg) |= pm_reg;
+			WRITE_VIDEO(ptr, COLOUR(pm_lookup_ptr[pm_reg] | colreg));
+		}
+		else {
+			WRITE_VIDEO(ptr, lookup_gtia_bug[pixel]);
+		}
+		i++;
+	}
+	do_border();
+}
+
+#define DEFINE_DRAW_AN(anticmode) \
+	static void draw_antic_ ## anticmode ## _gtia9 (int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)\
+	{\
+		prepare_an_antic_ ## anticmode (nchars, antic_memptr, t_pm_scanline_ptr);\
+		draw_an_gtia9(t_pm_scanline_ptr);\
+	}\
+	static void draw_antic_ ## anticmode ## _gtia10 (int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)\
+	{\
+		prepare_an_antic_ ## anticmode (nchars, antic_memptr, t_pm_scanline_ptr);\
+		draw_an_gtia10(t_pm_scanline_ptr);\
+	}\
+	static void draw_antic_ ## anticmode ## _gtia11 (int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)\
+	{\
+		prepare_an_antic_ ## anticmode (nchars, antic_memptr, t_pm_scanline_ptr);\
+		draw_an_gtia11(t_pm_scanline_ptr);\
+	}
+
+#define CHAR_LOOP_BEGIN do {
+#define CHAR_LOOP_END } while (--nchars);
+
+#define DO_PMG_LORES PF_COLLS(colreg) |= pm_pixel = *c_pm_scanline_ptr++;\
+	WRITE_VIDEO(ptr++, COLOUR(pm_lookup_ptr[pm_pixel] | colreg));
+
+#ifdef ALTERNATE_LOOP_COUNTERS 	/* speeds-up pmg in hires a bit or not? try it :) */
+#define FOUR_LOOP_BEGIN(data) data |= 0x800000; do {	/* data becomes negative after four data <<= 2 */
+#define FOUR_LOOP_END(data) } while (data >= 0);
+#else
+#define FOUR_LOOP_BEGIN(data) int k = 4; do {
+#define FOUR_LOOP_END(data) } while (--k);
+#endif
+
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+
+#define INIT_HIRES hires_norm(0x00) = ANTIC_cl[C_PF2];\
+	hires_norm(0x40) = hires_norm(0x10) = hires_norm(0x04) = (ANTIC_cl[C_PF2] & BYTE0_MASK) | (ANTIC_cl[C_HI2] & BYTE1_MASK);\
+	hires_norm(0x80) = hires_norm(0x20) = hires_norm(0x08) = (ANTIC_cl[C_HI2] & BYTE0_MASK) | (ANTIC_cl[C_PF2] & BYTE1_MASK);\
+	hires_norm(0xc0) = hires_norm(0x30) = hires_norm(0x0c) = ANTIC_cl[C_HI2];
+
+#define DO_PMG_HIRES(data) {\
+	const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;\
+	int pm_pixel;\
+	int mask;\
+	FOUR_LOOP_BEGIN(data)\
+		pm_pixel = *c_pm_scanline_ptr++;\
+		if (data & 0xc0)\
+			PF2PM |= pm_pixel;\
+		mask = hires_mask(data & 0xc0);\
+		pm_pixel = pm_lookup_ptr[pm_pixel] | L_PF2;\
+		WRITE_VIDEO(ptr++, (COLOUR(pm_pixel) & mask) | (COLOUR(pm_pixel + (L_HI2 - L_PF2)) & ~mask));\
+		data <<= 2;\
+	FOUR_LOOP_END(data)\
+}
+
+#else /* USE_COLOUR_TRANSLATION_TABLE */
+
+#define INIT_HIRES hires_norm(0x00) = ANTIC_cl[C_PF2];\
+	hires_norm(0x40) = hires_norm(0x10) = hires_norm(0x04) = (ANTIC_cl[C_PF2] & HIRES_MASK_01) | hires_lum(0x40);\
+	hires_norm(0x80) = hires_norm(0x20) = hires_norm(0x08) = (ANTIC_cl[C_PF2] & HIRES_MASK_10) | hires_lum(0x80);\
+	hires_norm(0xc0) = hires_norm(0x30) = hires_norm(0x0c) = (ANTIC_cl[C_PF2] & 0xf0f0) | hires_lum(0xc0);
+
+#define INIT_ARTIF_NEW art_lookup_new[0] = art_lookup_new[1] = art_lookup_new[2] = art_lookup_new[3] = \
+	art_lookup_new[16] = art_lookup_new[17] = art_lookup_new[18] = art_lookup_new[19] = \
+	art_lookup_new[32] = art_lookup_new[33] = art_lookup_new[34] = art_lookup_new[35] = \
+	art_lookup_new[48] = art_lookup_new[49] = art_lookup_new[50] = art_lookup_new[51] = ANTIC_cl[C_PF2];\
+	art_lookup_new[7] = art_lookup_new[23] = art_lookup_new[39] = art_lookup_new[55] = (ANTIC_cl[C_PF2] & HIRES_MASK_01) | hires_lum(0x40);\
+	art_lookup_new[56] = art_lookup_new[57] = art_lookup_new[58] = art_lookup_new[59] = (ANTIC_cl[C_PF2] & HIRES_MASK_10) | hires_lum(0x80);\
+	art_lookup_new[12] = art_lookup_new[13] = art_lookup_new[14] = art_lookup_new[15] = \
+	art_lookup_new[28] = art_lookup_new[29] = art_lookup_new[30] = art_lookup_new[31] = \
+	art_lookup_new[44] = art_lookup_new[45] = art_lookup_new[46] = art_lookup_new[47] = \
+	art_lookup_new[60] = art_lookup_new[61] = art_lookup_new[62] = art_lookup_new[63] = (ANTIC_cl[C_PF2] & 0xf0f0) | hires_lum(0xc0);\
+	if ((ANTIC_cl[C_PF2] & 0x0F00) != (ANTIC_cl[C_PF1] & 0x0F00)) { \
+		art_lookup_new[4] = art_lookup_new[5] = art_lookup_new[36] = art_lookup_new[37] = \
+		art_lookup_new[52] = art_lookup_new[53 ]= ((art_colour1_new & BYTE1_MASK & ~(HIRES_LUM_01))) | hires_lum(0x40) | (ANTIC_cl[C_PF2] & BYTE0_MASK);\
+		art_lookup_new[20] = art_lookup_new[21] = (art_colour1_new & 0xf0f0) | hires_lum(0xc0);\
+		art_lookup_new[8] = art_lookup_new[9] = art_lookup_new[11] = art_lookup_new[40] = \
+		art_lookup_new[43] = ((art_colour2_new & BYTE0_MASK & ~(HIRES_LUM_10))) | hires_lum(0x80) | (ANTIC_cl[C_PF2] & BYTE1_MASK);\
+		art_lookup_new[10] = art_lookup_new[41] = art_lookup_new[42] = (art_colour2_new & 0xf0f0) | hires_lum(0xc0);\
+		}\
+	else {\
+		art_lookup_new[4] = art_lookup_new[5] = art_lookup_new[36] = art_lookup_new[37] = \
+		art_lookup_new[52] = art_lookup_new[53 ]= art_lookup_new[20] = art_lookup_new[21] = \
+		art_lookup_new[8] = art_lookup_new[9] = art_lookup_new[11] = art_lookup_new[40] = \
+		art_lookup_new[43] = art_lookup_new[10] = art_lookup_new[41] = art_lookup_new[42] = ANTIC_cl[C_PF2];\
+		}\
+	art_lookup_new[6] = art_lookup_new[22] = art_lookup_new[38] = art_lookup_new[54] = (ANTIC_cl[C_PF2] & HIRES_MASK_01) | hires_lum(0x40);\
+	art_lookup_new[24] = art_lookup_new[25] = art_lookup_new[26] = art_lookup_new[27] = (ANTIC_cl[C_PF2] & HIRES_MASK_10) | hires_lum(0x80);
+
+#define DO_PMG_HIRES(data) {\
+	const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;\
+	int pm_pixel;\
+	FOUR_LOOP_BEGIN(data)\
+		pm_pixel = *c_pm_scanline_ptr++;\
+		if (data & 0xc0)\
+			PF2PM |= pm_pixel;\
+		WRITE_VIDEO(ptr++, (COLOUR(pm_lookup_ptr[pm_pixel] | L_PF2) & hires_mask(data & 0xc0)) | hires_lum(data & 0xc0));\
+		data <<= 2;\
+	FOUR_LOOP_END(data)\
+}
+
+#define DO_PMG_HIRES_NEW(data, tally) {\
+	const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;\
+	int pm_pixel;\
+	FOUR_LOOP_BEGIN(data)\
+		pm_pixel = *c_pm_scanline_ptr++;\
+		if (pm_pixel) \
+			WRITE_VIDEO(ptr++, (COLOUR(pm_lookup_ptr[pm_pixel] | L_PF2)));\
+		else\
+			WRITE_VIDEO(ptr++, art_lookup_new[(tally & 0xfc0000) >> 18]); \
+		data <<= 2;\
+		tally <<= 6;\
+	FOUR_LOOP_END(data)\
+}
+
+#endif /* USE_COLOUR_TRANSLATION_TABLE */
+
+#ifdef NEW_CYCLE_EXACT
+#define ADD_FONT_CYCLES
+#else
+#define ADD_FONT_CYCLES ANTIC_xpos += font_cycles[md]
+#endif
+
+#ifdef PAGED_MEM
+
+#define INIT_ANTIC_2	int t_chbase = (dctr ^ chbase_20) & 0xfc07;\
+	ADD_FONT_CYCLES;\
+	blank_lookup[0x60] = (anticmode == 2 || dctr & 0xe) ? 0xff : 0;\
+	blank_lookup[0x00] = blank_lookup[0x20] = blank_lookup[0x40] = (dctr & 0xe) == 8 ? 0 : 0xff;
+
+#define GET_CHDATA_ANTIC_2	chdata = (screendata & invert_mask) ? 0xff : 0;\
+	if (blank_lookup[screendata & blank_mask])\
+		chdata ^= MEMORY_dGetByte(t_chbase + ((UWORD) (screendata & 0x7f) << 3));
+
+#else /* PAGED_MEM */
+
+#define INIT_ANTIC_2	const UBYTE *chptr;\
+	if (ANTIC_xe_ptr != NULL && chbase_20 < 0x8000 && chbase_20 >= 0x4000)\
+		chptr = ANTIC_xe_ptr + ((dctr ^ chbase_20) & 0x3c07);\
+	else\
+		chptr = MEMORY_mem + ((dctr ^ chbase_20) & 0xfc07);\
+	ADD_FONT_CYCLES;\
+	blank_lookup[0x60] = (anticmode == 2 || dctr & 0xe) ? 0xff : 0;\
+	blank_lookup[0x00] = blank_lookup[0x20] = blank_lookup[0x40] = (dctr & 0xe) == 8 ? 0 : 0xff;
+
+#define GET_CHDATA_ANTIC_2	chdata = (screendata & invert_mask) ? 0xff : 0;\
+	if (blank_lookup[screendata & blank_mask])\
+		chdata ^= chptr[(screendata & 0x7f) << 3];
+
+#endif /* PAGED_MEM */
+
+static void draw_antic_2(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	INIT_BACKGROUND_6
+	INIT_ANTIC_2
+	INIT_HIRES
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int chdata;
+
+		GET_CHDATA_ANTIC_2
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+			if (chdata) {
+				WRITE_VIDEO(ptr++, hires_norm(chdata & 0xc0));
+				WRITE_VIDEO(ptr++, hires_norm(chdata & 0x30));
+				WRITE_VIDEO(ptr++, hires_norm(chdata & 0x0c));
+				WRITE_VIDEO(ptr++, hires_norm((chdata & 0x03) << 2));
+			}
+			else
+				DRAW_BACKGROUND(C_PF2)
+		}
+		else
+			DO_PMG_HIRES(chdata)
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+#ifdef NEW_CYCLE_EXACT
+static void draw_antic_2_dmactl_bug(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	INIT_BACKGROUND_6
+	INIT_ANTIC_2
+	INIT_HIRES
+
+	CHAR_LOOP_BEGIN
+		/* UBYTE screendata = *antic_memptr++; */
+
+/* In this glitched mode, the output depends on the MSB of the last char */
+/* drawn in the previous line, and invert_mask.  It seems to reveal that */
+/* ANTIC has a latch that is set by the MSB of the char that controls an */
+/* invert gate. */
+/* When this gate was set on the last line and the next line is glitched */
+/* it remains set and the whole line appears inverted */
+/* We'll use this modeline to draw antic f glitched as well, and set */
+/* dmactl_bug_chdata to 0 */
+		int chdata = (dmactl_bug_chdata & invert_mask) ? 0xff : 0;
+		/* GET_CHDATA_ANTIC_2 */
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+
+			if (chdata) {
+				WRITE_VIDEO(ptr++, hires_norm(chdata & 0xc0));
+				WRITE_VIDEO(ptr++, hires_norm(chdata & 0x30));
+				WRITE_VIDEO(ptr++, hires_norm(chdata & 0x0c));
+				WRITE_VIDEO(ptr++, hires_norm((chdata & 0x03) << 2));
+			}
+			else
+				DRAW_BACKGROUND(C_PF2)
+		}
+		else
+			DO_PMG_HIRES(chdata)
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+#endif
+
+static void draw_antic_2_artif(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	ULONG screendata_tally;
+	INIT_ANTIC_2
+	{
+		UBYTE screendata = *antic_memptr++;
+		UBYTE chdata;
+		GET_CHDATA_ANTIC_2
+		screendata_tally = chdata;
+	}
+	setup_art_colours();
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		ULONG chdata;
+
+		GET_CHDATA_ANTIC_2
+		screendata_tally <<= 8;
+		screendata_tally |= chdata;
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			DRAW_ARTIF
+		else {
+			chdata = screendata_tally >> 8;
+			DO_PMG_HIRES(chdata)
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+#ifndef USE_COLOUR_TRANSLATION_TABLE
+static void draw_antic_2_artif_new(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	ULONG screendata_tally;
+	ULONG pmtally;
+	UBYTE screendata = *antic_memptr++;
+	UBYTE chdata;
+	INIT_ANTIC_2
+	INIT_ARTIF_NEW
+	GET_CHDATA_ANTIC_2
+	screendata_tally = chdata;
+	setup_art_colours();
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		ULONG chdata;
+
+		GET_CHDATA_ANTIC_2
+		screendata_tally <<= 8;
+		screendata_tally |= chdata;
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			DRAW_ARTIF_NEW
+		else {
+			chdata = screendata_tally >> 8;
+			pmtally = ((screendata_tally & 0x03f000) << 6) |
+					  ((screendata_tally & 0x00fc00) << 2) |
+					  ((screendata_tally & 0x003f00) >> 2) |
+					  ((screendata_tally & 0x000fc0) >> 6);
+			DO_PMG_HIRES_NEW(chdata,pmtally)
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+#endif
+
+static void prepare_an_antic_2(int nchars, const UBYTE *antic_memptr, const ULONG *t_pm_scanline_ptr)
+{
+	UBYTE *an_ptr = (UBYTE *) t_pm_scanline_ptr + (an_scanline - GTIA_pm_scanline);
+#ifdef PAGED_MEM
+	int t_chbase = (dctr ^ chbase_20) & 0xfc07;
+#else
+	const UBYTE *chptr;
+	if (ANTIC_xe_ptr != NULL && chbase_20 < 0x8000 && chbase_20 >= 0x4000)
+		chptr = ANTIC_xe_ptr + ((dctr ^ chbase_20) & 0x3c07);
+	else
+		chptr = MEMORY_mem + ((dctr ^ chbase_20) & 0xfc07);
+#endif
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int chdata;
+		GET_CHDATA_ANTIC_2
+		*an_ptr++ = chdata >> 6;
+		*an_ptr++ = (chdata >> 4) & 3;
+		*an_ptr++ = (chdata >> 2) & 3;
+		*an_ptr++ = chdata & 3;
+	CHAR_LOOP_END
+}
+
+static void draw_antic_2_gtia9(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	INIT_ANTIC_2
+	if ((unsigned long) ptr & 2) { /* HSCROL & 1 */
+		prepare_an_antic_2(nchars, antic_memptr, t_pm_scanline_ptr);
+		draw_an_gtia9(t_pm_scanline_ptr);
+		return;
+	}
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int chdata;
+
+		GET_CHDATA_ANTIC_2
+		WRITE_VIDEO_LONG((ULONG *) ptr, ANTIC_lookup_gtia9[chdata >> 4]);
+		WRITE_VIDEO_LONG((ULONG *) ptr + 1, ANTIC_lookup_gtia9[chdata & 0xf]);
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			ptr += 4;
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int k = 4;
+			UBYTE pm_reg;
+			do {
+				pm_reg = pm_lookup_ptr[*c_pm_scanline_ptr++];
+				if (pm_reg) {
+					if (pm_reg == L_PF3) {
+						UBYTE tmp = k > 2 ? chdata >> 4 : chdata & 0xf;
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+						WRITE_VIDEO(ptr, colour_translation_table[tmp | GTIA_COLPF3]);
+#else
+						WRITE_VIDEO(ptr, tmp | ((UWORD)tmp << 8) | ANTIC_cl[C_PF3]);
+#endif
+					}
+					else
+					{
+						WRITE_VIDEO(ptr, COLOUR(pm_reg));
+					}
+				}
+				ptr++;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void draw_antic_2_gtia10(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+#ifdef WORDS_UNALIGNED_OK
+	ULONG lookup_gtia10[16];
+#else
+	UWORD lookup_gtia10[16];
+#endif
+	INIT_ANTIC_2
+	if ((unsigned long) ptr & 2) { /* HSCROL & 1 */
+		prepare_an_antic_2(nchars, antic_memptr, t_pm_scanline_ptr);
+		draw_an_gtia10(t_pm_scanline_ptr);
+		return;
+	}
+
+#ifdef WORDS_UNALIGNED_OK
+	lookup_gtia10[0] = ANTIC_cl[C_PM0] | (ANTIC_cl[C_PM0] << 16);
+	lookup_gtia10[1] = ANTIC_cl[C_PM1] | (ANTIC_cl[C_PM1] << 16);
+	lookup_gtia10[2] = ANTIC_cl[C_PM2] | (ANTIC_cl[C_PM2] << 16);
+	lookup_gtia10[3] = ANTIC_cl[C_PM3] | (ANTIC_cl[C_PM3] << 16);
+	lookup_gtia10[12] = lookup_gtia10[4] = ANTIC_cl[C_PF0] | (ANTIC_cl[C_PF0] << 16);
+	lookup_gtia10[13] = lookup_gtia10[5] = ANTIC_cl[C_PF1] | (ANTIC_cl[C_PF1] << 16);
+	lookup_gtia10[14] = lookup_gtia10[6] = ANTIC_cl[C_PF2] | (ANTIC_cl[C_PF2] << 16);
+	lookup_gtia10[15] = lookup_gtia10[7] = ANTIC_cl[C_PF3] | (ANTIC_cl[C_PF3] << 16);
+	lookup_gtia10[8] = lookup_gtia10[9] = lookup_gtia10[10] = lookup_gtia10[11] = ANTIC_lookup_gtia9[0];
+#else
+	lookup_gtia10[0] = ANTIC_cl[C_PM0];
+	lookup_gtia10[1] = ANTIC_cl[C_PM1];
+	lookup_gtia10[2] = ANTIC_cl[C_PM2];
+	lookup_gtia10[3] = ANTIC_cl[C_PM3];
+	lookup_gtia10[12] = lookup_gtia10[4] = ANTIC_cl[C_PF0];
+	lookup_gtia10[13] = lookup_gtia10[5] = ANTIC_cl[C_PF1];
+	lookup_gtia10[14] = lookup_gtia10[6] = ANTIC_cl[C_PF2];
+	lookup_gtia10[15] = lookup_gtia10[7] = ANTIC_cl[C_PF3];
+	lookup_gtia10[8] = lookup_gtia10[9] = lookup_gtia10[10] = lookup_gtia10[11] = ANTIC_cl[C_BAK];
+#endif
+	ptr++;
+	t_pm_scanline_ptr = (const ULONG *) (((const UBYTE *) t_pm_scanline_ptr) + 1);
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int chdata;
+
+		GET_CHDATA_ANTIC_2
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+			DO_GTIA_BYTE(ptr, lookup_gtia10, chdata)
+			ptr += 4;
+		}
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int pm_pixel;
+			int colreg;
+			int k = 4;
+			UBYTE t_screendata = chdata >> 4;
+			do {
+				colreg = gtia_10_lookup[t_screendata];
+				PF_COLLS(colreg) |= pm_pixel = *c_pm_scanline_ptr++;
+				pm_pixel |= gtia_10_pm[t_screendata];
+				WRITE_VIDEO(ptr++, COLOUR(pm_lookup_ptr[pm_pixel] | colreg));
+				if (k == 3)
+					t_screendata = chdata & 0x0f;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border_gtia10();
+}
+
+static void draw_antic_2_gtia11(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	INIT_ANTIC_2
+	if ((unsigned long) ptr & 2) { /* HSCROL & 1 */
+		prepare_an_antic_2(nchars, antic_memptr, t_pm_scanline_ptr);
+		draw_an_gtia11(t_pm_scanline_ptr);
+		return;
+	}
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int chdata;
+
+		GET_CHDATA_ANTIC_2
+		WRITE_VIDEO_LONG((ULONG *) ptr, ANTIC_lookup_gtia11[chdata >> 4]);
+		WRITE_VIDEO_LONG((ULONG *) ptr + 1, ANTIC_lookup_gtia11[chdata & 0xf]);
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			ptr += 4;
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int k = 4;
+			UBYTE pm_reg;
+			do {
+				pm_reg = pm_lookup_ptr[*c_pm_scanline_ptr++];
+				if (pm_reg) {
+					if (pm_reg == L_PF3) {
+						UBYTE tmp = k > 2 ? chdata & 0xf0 : chdata << 4;
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+						WRITE_VIDEO(ptr, colour_translation_table[tmp ? tmp | GTIA_COLPF3 : GTIA_COLPF3 & 0xf0]);
+#else
+						WRITE_VIDEO(ptr, tmp ? tmp | ((UWORD)tmp << 8) | ANTIC_cl[C_PF3] : ANTIC_cl[C_PF3] & 0xf0f0);
+#endif
+					}
+					else
+					{
+						WRITE_VIDEO(ptr, COLOUR(pm_reg));
+					}
+				}
+				ptr++;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border_gtia11();
+}
+
+static void draw_antic_2_gtia_bug(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	prepare_an_antic_2(nchars, antic_memptr, t_pm_scanline_ptr);
+	draw_an_gtia_bug(t_pm_scanline_ptr);
+	return;
+}
+
+static void draw_antic_4(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	INIT_BACKGROUND_8
+#ifdef PAGED_MEM
+	UWORD t_chbase = ((anticmode == 4 ? dctr : dctr >> 1) ^ chbase_20) & 0xfc07;
+#else
+	const UBYTE *chptr;
+	if (ANTIC_xe_ptr != NULL && chbase_20 < 0x8000 && chbase_20 >= 0x4000)
+		chptr = ANTIC_xe_ptr + (((anticmode == 4 ? dctr : dctr >> 1) ^ chbase_20) & 0x3c07);
+	else
+		chptr = MEMORY_mem + (((anticmode == 4 ? dctr : dctr >> 1) ^ chbase_20) & 0xfc07);
+#endif
+
+	ADD_FONT_CYCLES;
+	lookup2[0x0f] = lookup2[0x00] = ANTIC_cl[C_BAK];
+	lookup2[0x4f] = lookup2[0x1f] = lookup2[0x13] =
+	lookup2[0x40] = lookup2[0x10] = lookup2[0x04] = lookup2[0x01] = ANTIC_cl[C_PF0];
+	lookup2[0x8f] = lookup2[0x2f] = lookup2[0x17] = lookup2[0x11] =
+	lookup2[0x80] = lookup2[0x20] = lookup2[0x08] = lookup2[0x02] = ANTIC_cl[C_PF1];
+	lookup2[0xc0] = lookup2[0x30] = lookup2[0x0c] = lookup2[0x03] = ANTIC_cl[C_PF2];
+	lookup2[0xcf] = lookup2[0x3f] = lookup2[0x1b] = lookup2[0x12] = ANTIC_cl[C_PF3];
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		const UWORD *lookup;
+		UBYTE chdata;
+		if (screendata & 0x80)
+			lookup = lookup2 + 0xf;
+		else
+			lookup = lookup2;
+#ifdef PAGED_MEM
+		chdata = MEMORY_dGetByte(t_chbase + ((UWORD) (screendata & 0x7f) << 3));
+#else
+		chdata = chptr[(screendata & 0x7f) << 3];
+#endif
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+			if (chdata) {
+				WRITE_VIDEO(ptr++, lookup[chdata & 0xc0]);
+				WRITE_VIDEO(ptr++, lookup[chdata & 0x30]);
+				WRITE_VIDEO(ptr++, lookup[chdata & 0x0c]);
+				WRITE_VIDEO(ptr++, lookup[chdata & 0x03]);
+			}
+			else
+				DRAW_BACKGROUND(C_BAK)
+		}
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int pm_pixel;
+			int colreg;
+			int k = 4;
+			playfield_lookup[0xc0] = screendata & 0x80 ? L_PF3 : L_PF2;
+			do {
+				colreg = playfield_lookup[chdata & 0xc0];
+				DO_PMG_LORES
+				chdata <<= 2;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	playfield_lookup[0xc0] = L_PF2;
+	do_border();
+}
+
+static void prepare_an_antic_4(int nchars, const UBYTE *antic_memptr, const ULONG *t_pm_scanline_ptr)
+{
+	UBYTE *an_ptr = (UBYTE *) t_pm_scanline_ptr + (an_scanline - GTIA_pm_scanline);
+#ifdef PAGED_MEM
+	UWORD t_chbase = ((anticmode == 4 ? dctr : dctr >> 1) ^ chbase_20) & 0xfc07;
+#else
+	const UBYTE *chptr;
+	if (ANTIC_xe_ptr != NULL && chbase_20 < 0x8000 && chbase_20 >= 0x4000)
+		chptr = ANTIC_xe_ptr + (((anticmode == 4 ? dctr : dctr >> 1) ^ chbase_20) & 0x3c07);
+	else
+		chptr = MEMORY_mem + (((anticmode == 4 ? dctr : dctr >> 1) ^ chbase_20) & 0xfc07);
+#endif
+
+	ADD_FONT_CYCLES;
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		UBYTE an;
+		UBYTE chdata;
+#ifdef PAGED_MEM
+		chdata = MEMORY_dGetByte(t_chbase + ((UWORD) (screendata & 0x7f) << 3));
+#else
+		chdata = chptr[(screendata & 0x7f) << 3];
+#endif
+		an = mode_e_an_lookup[chdata & 0xc0];
+		*an_ptr++ = (an == 2 && screendata & 0x80) ? 3 : an;
+		an = mode_e_an_lookup[chdata & 0x30];
+		*an_ptr++ = (an == 2 && screendata & 0x80) ? 3 : an;
+		an = mode_e_an_lookup[chdata & 0x0c];
+		*an_ptr++ = (an == 2 && screendata & 0x80) ? 3 : an;
+		an = mode_e_an_lookup[chdata & 0x03];
+		*an_ptr++ = (an == 2 && screendata & 0x80) ? 3 : an;
+	CHAR_LOOP_END
+}
+
+DEFINE_DRAW_AN(4)
+
+static void draw_antic_6(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+#ifdef PAGED_MEM
+	UWORD t_chbase = (anticmode == 6 ? dctr & 7 : dctr >> 1) ^ chbase_20;
+#else
+	const UBYTE *chptr;
+	if (ANTIC_xe_ptr != NULL && chbase_20 < 0x8000 && chbase_20 >= 0x4000)
+		chptr = ANTIC_xe_ptr + (((anticmode == 6 ? dctr & 7 : dctr >> 1) ^ chbase_20) - 0x4000);
+	else
+		chptr = MEMORY_mem + ((anticmode == 6 ? dctr & 7 : dctr >> 1) ^ chbase_20);
+#endif
+
+	ADD_FONT_CYCLES;
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		UBYTE chdata;
+		UWORD colour;
+		int kk = 2;
+		colour = COLOUR((playfield_lookup + 0x40)[screendata & 0xc0]);
+#ifdef PAGED_MEM
+		chdata = MEMORY_dGetByte(t_chbase + ((UWORD) (screendata & 0x3f) << 3));
+#else
+		chdata = chptr[(screendata & 0x3f) << 3];
+#endif
+		do {
+			if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+				if (chdata & 0xf0) {
+					if (chdata & 0x80) {
+						WRITE_VIDEO(ptr++, colour);
+					}
+					else {
+						WRITE_VIDEO(ptr++, ANTIC_cl[C_BAK]);
+					}
+					if (chdata & 0x40) {
+						WRITE_VIDEO(ptr++, colour);
+					}
+					else {
+						WRITE_VIDEO(ptr++, ANTIC_cl[C_BAK]);
+					}
+					if (chdata & 0x20) {
+						WRITE_VIDEO(ptr++, colour);
+					}
+					else {
+						WRITE_VIDEO(ptr++, ANTIC_cl[C_BAK]);
+					}
+					if (chdata & 0x10) {
+						WRITE_VIDEO(ptr++, colour);
+					}
+					else {
+						WRITE_VIDEO(ptr++, ANTIC_cl[C_BAK]);
+					}
+				}
+				else {
+					WRITE_VIDEO(ptr++, ANTIC_cl[C_BAK]);
+					WRITE_VIDEO(ptr++, ANTIC_cl[C_BAK]);
+					WRITE_VIDEO(ptr++, ANTIC_cl[C_BAK]);
+					WRITE_VIDEO(ptr++, ANTIC_cl[C_BAK]);
+				}
+				chdata <<= 4;
+			}
+			else {
+				const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+				int pm_pixel;
+				UBYTE setcol = (playfield_lookup + 0x40)[screendata & 0xc0];
+				int colreg;
+				int k = 4;
+				do {
+					colreg = chdata & 0x80 ? setcol : L_BAK;
+					DO_PMG_LORES
+					chdata <<= 1;
+				} while (--k);
+
+			}
+			t_pm_scanline_ptr++;
+		} while (--kk);
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void prepare_an_antic_6(int nchars, const UBYTE *antic_memptr, const ULONG *t_pm_scanline_ptr)
+{
+	UBYTE *an_ptr = (UBYTE *) t_pm_scanline_ptr + (an_scanline - GTIA_pm_scanline);
+#ifdef PAGED_MEM
+	UWORD t_chbase = (anticmode == 6 ? dctr & 7 : dctr >> 1) ^ chbase_20;
+#else
+	const UBYTE *chptr;
+	if (ANTIC_xe_ptr != NULL && chbase_20 < 0x8000 && chbase_20 >= 0x4000)
+		chptr = ANTIC_xe_ptr + (((anticmode == 6 ? dctr & 7 : dctr >> 1) ^ chbase_20) - 0x4000);
+	else
+		chptr = MEMORY_mem + ((anticmode == 6 ? dctr & 7 : dctr >> 1) ^ chbase_20);
+#endif
+
+	ADD_FONT_CYCLES;
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		UBYTE an = screendata >> 6;
+		UBYTE chdata;
+#ifdef PAGED_MEM
+		chdata = MEMORY_dGetByte(t_chbase + ((UWORD) (screendata & 0x3f) << 3));
+#else
+		chdata = chptr[(screendata & 0x3f) << 3];
+#endif
+		*an_ptr++ = chdata & 0x80 ? an : 0;
+		*an_ptr++ = chdata & 0x40 ? an : 0;
+		*an_ptr++ = chdata & 0x20 ? an : 0;
+		*an_ptr++ = chdata & 0x10 ? an : 0;
+		*an_ptr++ = chdata & 0x08 ? an : 0;
+		*an_ptr++ = chdata & 0x04 ? an : 0;
+		*an_ptr++ = chdata & 0x02 ? an : 0;
+		*an_ptr++ = chdata & 0x01 ? an : 0;
+	CHAR_LOOP_END
+}
+
+DEFINE_DRAW_AN(6)
+
+static void draw_antic_8(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	lookup2[0x00] = ANTIC_cl[C_BAK];
+	lookup2[0x40] = ANTIC_cl[C_PF0];
+	lookup2[0x80] = ANTIC_cl[C_PF1];
+	lookup2[0xc0] = ANTIC_cl[C_PF2];
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int kk = 4;
+		do {
+			if ((const UBYTE *) t_pm_scanline_ptr >= GTIA_pm_scanline + 4 * (48 - RCHOP))
+				break;
+			if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+				UWORD data = lookup2[screendata & 0xc0];
+				WRITE_VIDEO(ptr++, data);
+				WRITE_VIDEO(ptr++, data);
+				WRITE_VIDEO(ptr++, data);
+				WRITE_VIDEO(ptr++, data);
+			}
+			else {
+				const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+				int pm_pixel;
+				int colreg = playfield_lookup[screendata & 0xc0];
+				int k = 4;
+				do {
+					DO_PMG_LORES
+				} while (--k);
+			}
+			screendata <<= 2;
+			t_pm_scanline_ptr++;
+		} while (--kk);
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void prepare_an_antic_8(int nchars, const UBYTE *antic_memptr, const ULONG *t_pm_scanline_ptr)
+{
+	UBYTE *an_ptr = (UBYTE *) t_pm_scanline_ptr + (an_scanline - GTIA_pm_scanline);
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int kk = 4;
+		do {
+			UBYTE data = mode_e_an_lookup[screendata & 0xc0];
+			*an_ptr++ = data;
+			*an_ptr++ = data;
+			*an_ptr++ = data;
+			*an_ptr++ = data;
+			screendata <<= 2;
+		} while (--kk);
+	CHAR_LOOP_END
+}
+
+DEFINE_DRAW_AN(8)
+
+static void draw_antic_9(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	lookup2[0x00] = ANTIC_cl[C_BAK];
+	lookup2[0x80] = lookup2[0x40] = ANTIC_cl[C_PF0];
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int kk = 4;
+		do {
+			if ((const UBYTE *) t_pm_scanline_ptr >= GTIA_pm_scanline + 4 * (48 - RCHOP))
+				break;
+			if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x80]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x80]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x40]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x40]);
+				screendata <<= 2;
+			}
+			else {
+				const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+				int pm_pixel;
+				int colreg;
+				int k = 4;
+				do {
+					colreg = (screendata & 0x80) ? L_PF0 : L_BAK;
+					DO_PMG_LORES
+					if (k & 0x01)
+						screendata <<= 1;
+				} while (--k);
+			}
+			t_pm_scanline_ptr++;
+		} while (--kk);
+	CHAR_LOOP_END
+	do_border();
+}
+
+/* ANTIC modes 9, b and c use BAK and PF0 colours only so they're not visible in GTIA modes */
+
+static void draw_antic_9_gtia9(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	draw_antic_0();
+}
+
+static void draw_antic_9_gtia10(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	draw_antic_0_gtia10();
+}
+
+static void draw_antic_9_gtia11(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	draw_antic_0_gtia11();
+}
+
+static void draw_antic_a(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	lookup2[0x00] = ANTIC_cl[C_BAK];
+	lookup2[0x40] = lookup2[0x10] = ANTIC_cl[C_PF0];
+	lookup2[0x80] = lookup2[0x20] = ANTIC_cl[C_PF1];
+	lookup2[0xc0] = lookup2[0x30] = ANTIC_cl[C_PF2];
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int kk = 2;
+		do {
+			if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0xc0]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0xc0]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x30]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x30]);
+				screendata <<= 4;
+			}
+			else {
+				const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+				int pm_pixel;
+				int colreg;
+				int k = 4;
+				do {
+					colreg = playfield_lookup[screendata & 0xc0];
+					DO_PMG_LORES
+					if (k & 0x01)
+						screendata <<= 2;
+				} while (--k);
+			}
+			t_pm_scanline_ptr++;
+		} while (--kk);
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void prepare_an_antic_a(int nchars, const UBYTE *antic_memptr, const ULONG *t_pm_scanline_ptr)
+{
+	UBYTE *an_ptr = (UBYTE *) t_pm_scanline_ptr + (an_scanline - GTIA_pm_scanline);
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		UBYTE data = mode_e_an_lookup[screendata & 0xc0];
+		*an_ptr++ = data;
+		*an_ptr++ = data;
+		data = mode_e_an_lookup[screendata & 0x30];
+		*an_ptr++ = data;
+		*an_ptr++ = data;
+		data = mode_e_an_lookup[screendata & 0x0c];
+		*an_ptr++ = data;
+		*an_ptr++ = data;
+		data = mode_e_an_lookup[screendata & 0x03];
+		*an_ptr++ = data;
+		*an_ptr++ = data;
+	CHAR_LOOP_END
+}
+
+DEFINE_DRAW_AN(a)
+
+static void draw_antic_c(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	lookup2[0x00] = ANTIC_cl[C_BAK];
+	lookup2[0x80] = lookup2[0x40] = lookup2[0x20] = lookup2[0x10] = ANTIC_cl[C_PF0];
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		int kk = 2;
+		do {
+			if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x80]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x40]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x20]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x10]);
+				screendata <<= 4;
+			}
+			else {
+				const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+				int pm_pixel;
+				int colreg;
+				int k = 4;
+				do {
+					colreg = (screendata & 0x80) ? L_PF0 : L_BAK;
+					DO_PMG_LORES
+					screendata <<= 1;
+				} while (--k);
+			}
+			t_pm_scanline_ptr++;
+		} while (--kk);
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void draw_antic_e(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	INIT_BACKGROUND_8
+	lookup2[0x00] = ANTIC_cl[C_BAK];
+	lookup2[0x40] = lookup2[0x10] = lookup2[0x04] = lookup2[0x01] = ANTIC_cl[C_PF0];
+	lookup2[0x80] = lookup2[0x20] = lookup2[0x08] = lookup2[0x02] = ANTIC_cl[C_PF1];
+	lookup2[0xc0] = lookup2[0x30] = lookup2[0x0c] = lookup2[0x03] = ANTIC_cl[C_PF2];
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+			if (screendata) {
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0xc0]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x30]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x0c]);
+				WRITE_VIDEO(ptr++, lookup2[screendata & 0x03]);
+			}
+			else
+				DRAW_BACKGROUND(C_BAK)
+		}
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int pm_pixel;
+			int colreg;
+			int k = 4;
+			do {
+				colreg = playfield_lookup[screendata & 0xc0];
+				DO_PMG_LORES
+				screendata <<= 2;
+			} while (--k);
+
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void prepare_an_antic_e(int nchars, const UBYTE *antic_memptr, const ULONG *t_pm_scanline_ptr)
+{
+	UBYTE *an_ptr = (UBYTE *) t_pm_scanline_ptr + (an_scanline - GTIA_pm_scanline);
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		*an_ptr++ = mode_e_an_lookup[screendata & 0xc0];
+		*an_ptr++ = mode_e_an_lookup[screendata & 0x30];
+		*an_ptr++ = mode_e_an_lookup[screendata & 0x0c];
+		*an_ptr++ = mode_e_an_lookup[screendata & 0x03];
+	CHAR_LOOP_END
+}
+
+static void draw_antic_e_gtia9(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	ULONG lookup[16];
+	if ((unsigned long) ptr & 2) { /* HSCROL & 1 */
+		prepare_an_antic_e(nchars, antic_memptr, t_pm_scanline_ptr);
+		draw_an_gtia9(t_pm_scanline_ptr);
+		return;
+	}
+	lookup[0] = lookup[1] = lookup[4] = lookup[5] = ANTIC_lookup_gtia9[0];
+	lookup[2] = lookup[6] = ANTIC_lookup_gtia9[1];
+	lookup[3] = lookup[7] = ANTIC_lookup_gtia9[2];
+	lookup[8] = lookup[9] = ANTIC_lookup_gtia9[4];
+	lookup[10] = ANTIC_lookup_gtia9[5];
+	lookup[11] = ANTIC_lookup_gtia9[6];
+	lookup[12] = lookup[13] = ANTIC_lookup_gtia9[8];
+	lookup[14] = ANTIC_lookup_gtia9[9];
+	lookup[15] = ANTIC_lookup_gtia9[10];
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		WRITE_VIDEO_LONG((ULONG *) ptr, lookup[screendata >> 4]);
+		WRITE_VIDEO_LONG((ULONG *) ptr + 1, lookup[screendata & 0xf]);
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			ptr += 4;
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int k = 4;
+			UBYTE pm_reg;
+			do {
+				pm_reg = pm_lookup_ptr[*c_pm_scanline_ptr++];
+				if (pm_reg) {
+					if (pm_reg == L_PF3) {
+						UBYTE tmp = k > 2 ? screendata >> 4 : screendata & 0xf;
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+						WRITE_VIDEO(ptr, colour_translation_table[tmp | GTIA_COLPF3]);
+#else
+						WRITE_VIDEO(ptr, tmp | ((UWORD)tmp << 8) | ANTIC_cl[C_PF3]);
+#endif
+					}
+					else
+					{
+						WRITE_VIDEO(ptr, COLOUR(pm_reg));
+					}
+				}
+				ptr++;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void draw_antic_e_gtia10 (int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	prepare_an_antic_e(nchars, antic_memptr, t_pm_scanline_ptr);
+	draw_an_gtia10(t_pm_scanline_ptr);
+}
+static void draw_antic_e_gtia11 (int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	prepare_an_antic_e(nchars, antic_memptr, t_pm_scanline_ptr);
+	draw_an_gtia11(t_pm_scanline_ptr);
+}
+
+static void draw_antic_f(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	INIT_BACKGROUND_6
+	INIT_HIRES
+
+	CHAR_LOOP_BEGIN
+		int screendata = *antic_memptr++;
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+			if (screendata) {
+				WRITE_VIDEO(ptr++, hires_norm(screendata & 0xc0));
+				WRITE_VIDEO(ptr++, hires_norm(screendata & 0x30));
+				WRITE_VIDEO(ptr++, hires_norm(screendata & 0x0c));
+				WRITE_VIDEO(ptr++, hires_norm((screendata & 0x03) << 2));
+			}
+			else
+				DRAW_BACKGROUND(C_PF2)
+		}
+		else
+			DO_PMG_HIRES(screendata)
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void draw_antic_f_artif(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	ULONG screendata_tally = *antic_memptr++;
+
+	setup_art_colours();
+	CHAR_LOOP_BEGIN
+		int screendata = *antic_memptr++;
+		screendata_tally <<= 8;
+		screendata_tally |= screendata;
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			DRAW_ARTIF
+		else {
+			screendata = antic_memptr[-2];
+			DO_PMG_HIRES(screendata)
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+#ifndef USE_COLOUR_TRANSLATION_TABLE
+static void draw_antic_f_artif_new(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	ULONG pmtally;
+	ULONG screendata_tally = *antic_memptr++;
+	INIT_ARTIF_NEW
+
+	setup_art_colours();
+	CHAR_LOOP_BEGIN
+		int screendata = *antic_memptr++;
+		screendata_tally <<= 8;
+		screendata_tally |= screendata;
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			DRAW_ARTIF_NEW
+		else {
+			screendata = antic_memptr[-2];
+			pmtally = ((screendata_tally & 0x03f000) << 6) |
+					  ((screendata_tally & 0x00fc00) << 2) |
+					  ((screendata_tally & 0x003f00) >> 2) |
+					  ((screendata_tally & 0x000fc0) >> 6);
+			DO_PMG_HIRES_NEW(screendata,pmtally)
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+#endif
+
+static void prepare_an_antic_f(int nchars, const UBYTE *antic_memptr, const ULONG *t_pm_scanline_ptr)
+{
+	UBYTE *an_ptr = (UBYTE *) t_pm_scanline_ptr + (an_scanline - GTIA_pm_scanline);
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		*an_ptr++ = screendata >> 6;
+		*an_ptr++ = (screendata >> 4) & 3;
+		*an_ptr++ = (screendata >> 2) & 3;
+		*an_ptr++ = screendata & 3;
+	CHAR_LOOP_END
+}
+
+static void draw_antic_f_gtia9(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	if ((unsigned long) ptr & 2) { /* HSCROL & 1 */
+		prepare_an_antic_f(nchars, antic_memptr, t_pm_scanline_ptr);
+		draw_an_gtia9(t_pm_scanline_ptr);
+		return;
+	}
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		WRITE_VIDEO_LONG((ULONG *) ptr, ANTIC_lookup_gtia9[screendata >> 4]);
+		WRITE_VIDEO_LONG((ULONG *) ptr + 1, ANTIC_lookup_gtia9[screendata & 0xf]);
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			ptr += 4;
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int k = 4;
+			UBYTE pm_reg;
+			do {
+				pm_reg = pm_lookup_ptr[*c_pm_scanline_ptr++];
+				if (pm_reg) {
+					if (pm_reg == L_PF3) {
+						UBYTE tmp = k > 2 ? screendata >> 4 : screendata & 0xf;
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+						WRITE_VIDEO(ptr, colour_translation_table[tmp | GTIA_COLPF3]);
+#else
+						WRITE_VIDEO(ptr, tmp | ((UWORD)tmp << 8) | ANTIC_cl[C_PF3]);
+#endif
+					}
+					else {
+						WRITE_VIDEO(ptr, COLOUR(pm_reg));
+					}
+				}
+				ptr++;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+static void draw_antic_f_gtia10(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+#ifdef WORDS_UNALIGNED_OK
+	ULONG lookup_gtia10[16];
+#else
+	UWORD lookup_gtia10[16];
+#endif
+	if ((unsigned long) ptr & 2) { /* HSCROL & 1 */
+		prepare_an_antic_f(nchars, antic_memptr, t_pm_scanline_ptr);
+		draw_an_gtia10(t_pm_scanline_ptr);
+		return;
+	}
+#ifdef WORDS_UNALIGNED_OK
+	lookup_gtia10[0] = ANTIC_cl[C_PM0] | (ANTIC_cl[C_PM0] << 16);
+	lookup_gtia10[1] = ANTIC_cl[C_PM1] | (ANTIC_cl[C_PM1] << 16);
+	lookup_gtia10[2] = ANTIC_cl[C_PM2] | (ANTIC_cl[C_PM2] << 16);
+	lookup_gtia10[3] = ANTIC_cl[C_PM3] | (ANTIC_cl[C_PM3] << 16);
+	lookup_gtia10[12] = lookup_gtia10[4] = ANTIC_cl[C_PF0] | (ANTIC_cl[C_PF0] << 16);
+	lookup_gtia10[13] = lookup_gtia10[5] = ANTIC_cl[C_PF1] | (ANTIC_cl[C_PF1] << 16);
+	lookup_gtia10[14] = lookup_gtia10[6] = ANTIC_cl[C_PF2] | (ANTIC_cl[C_PF2] << 16);
+	lookup_gtia10[15] = lookup_gtia10[7] = ANTIC_cl[C_PF3] | (ANTIC_cl[C_PF3] << 16);
+	lookup_gtia10[8] = lookup_gtia10[9] = lookup_gtia10[10] = lookup_gtia10[11] = ANTIC_lookup_gtia9[0];
+#else
+	lookup_gtia10[0] = ANTIC_cl[C_PM0];
+	lookup_gtia10[1] = ANTIC_cl[C_PM1];
+	lookup_gtia10[2] = ANTIC_cl[C_PM2];
+	lookup_gtia10[3] = ANTIC_cl[C_PM3];
+	lookup_gtia10[12] = lookup_gtia10[4] = ANTIC_cl[C_PF0];
+	lookup_gtia10[13] = lookup_gtia10[5] = ANTIC_cl[C_PF1];
+	lookup_gtia10[14] = lookup_gtia10[6] = ANTIC_cl[C_PF2];
+	lookup_gtia10[15] = lookup_gtia10[7] = ANTIC_cl[C_PF3];
+	lookup_gtia10[8] = lookup_gtia10[9] = lookup_gtia10[10] = lookup_gtia10[11] = ANTIC_cl[C_BAK];
+#endif
+	ptr++;
+	t_pm_scanline_ptr = (const ULONG *) (((const UBYTE *) t_pm_scanline_ptr) + 1);
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+			DO_GTIA_BYTE(ptr, lookup_gtia10, screendata)
+			ptr += 4;
+		}
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int pm_pixel;
+			int colreg;
+			int k = 4;
+			UBYTE t_screendata = screendata >> 4;
+			do {
+				colreg = gtia_10_lookup[t_screendata];
+				PF_COLLS(colreg) |= pm_pixel = *c_pm_scanline_ptr++; /*playfield colours can generate collisions*/
+				pm_pixel |= gtia_10_pm[t_screendata]; /*but player colours don't*/
+				WRITE_VIDEO(ptr++, COLOUR(pm_lookup_ptr[pm_pixel] | colreg)); /*although they mix with the real players*/
+				if (k == 3)
+					t_screendata = screendata & 0x0f;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border_gtia10();
+}
+
+static void draw_antic_f_gtia11(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	if ((unsigned long) ptr & 2) { /* HSCROL & 1 */
+		prepare_an_antic_f(nchars, antic_memptr, t_pm_scanline_ptr);
+		draw_an_gtia11(t_pm_scanline_ptr);
+		return;
+	}
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		WRITE_VIDEO_LONG((ULONG *) ptr, ANTIC_lookup_gtia11[screendata >> 4]);
+		WRITE_VIDEO_LONG((ULONG *) ptr + 1, ANTIC_lookup_gtia11[screendata & 0xf]);
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr))
+			ptr += 4;
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int k = 4;
+			UBYTE pm_reg;
+			do {
+				pm_reg = pm_lookup_ptr[*c_pm_scanline_ptr++];
+				if (pm_reg) {
+					if (pm_reg == L_PF3) {
+						UBYTE tmp = k > 2 ? screendata & 0xf0 : screendata << 4;
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+						WRITE_VIDEO(ptr, colour_translation_table[tmp ? tmp | GTIA_COLPF3 : GTIA_COLPF3 & 0xf0]);
+#else
+						WRITE_VIDEO(ptr, tmp ? tmp | ((UWORD)tmp << 8) | ANTIC_cl[C_PF3] : ANTIC_cl[C_PF3] & 0xf0f0);
+#endif
+					}
+					else
+					{
+						WRITE_VIDEO(ptr, COLOUR(pm_reg));
+					}
+				}
+				ptr++;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border_gtia11();
+}
+
+/* GTIA-switch-to-mode-00 bug
+If while drawing line in hi-res mode PRIOR is changed from 0x40..0xff to
+0x00..0x3f, GTIA doesn't back to hi-res, but starts generating mode similar
+to ANTIC's 0xe, but with colours PF0, PF1, PF2, PF3. */
+
+/* Technical explaination by perrym:
+ * in gtia.pdf there is a flip-flop at page 40, drawing location C3 with
+ * what looks like W and A on the gates
+ * This is set by AN2=0 AN1=1 AN0=1 durning HBLANK
+ * The middle input to the lower NOR gate is the inverted signal !NRM(?)
+ * (NRM means NORMAL?) which arrives from the top left of the page.
+ * This signal is defined on page 38, positions C2/B2
+ * where there is a NOR gate pointing downwards with 00 written to the
+ * right of its output.
+ * !NRM is the condition that PRIOR is not set to b7=0,b6=0.
+ * When PRIOR is not set to NRM, the flip-flip is always reset,
+ * which seems necessary for the proper operation of the GTIA modes.
+ * If PRIOR is reset to NRM then the flip-flop remains reset, and
+ * since ANTIC data in hi-res modes is sent as PF0-PF3, this data is used
+ * by GTIA directly.*/
+
+static void draw_antic_f_gtia_bug(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	lookup2[0x00] = ANTIC_cl[C_PF0];
+	lookup2[0x40] = lookup2[0x10] = lookup2[0x04] = lookup2[0x01] = ANTIC_cl[C_PF1];
+	lookup2[0x80] = lookup2[0x20] = lookup2[0x08] = lookup2[0x02] = ANTIC_cl[C_PF2];
+	lookup2[0xc0] = lookup2[0x30] = lookup2[0x0c] = lookup2[0x03] = ANTIC_cl[C_PF3];
+
+	CHAR_LOOP_BEGIN
+		UBYTE screendata = *antic_memptr++;
+		if (IS_ZERO_ULONG(t_pm_scanline_ptr)) {
+			WRITE_VIDEO(ptr++, lookup2[screendata & 0xc0]);
+			WRITE_VIDEO(ptr++, lookup2[screendata & 0x30]);
+			WRITE_VIDEO(ptr++, lookup2[screendata & 0x0c]);
+			WRITE_VIDEO(ptr++, lookup2[screendata & 0x03]);
+		}
+		else {
+			const UBYTE *c_pm_scanline_ptr = (const UBYTE *) t_pm_scanline_ptr;
+			int pm_pixel;
+			int colreg;
+			int k = 4;
+			do {
+				colreg = (playfield_lookup + 0x40)[screendata & 0xc0];
+				DO_PMG_LORES
+				screendata <<= 2;
+			} while (--k);
+		}
+		t_pm_scanline_ptr++;
+	CHAR_LOOP_END
+	do_border();
+}
+
+/* pointer to a function that draws a single line of graphics */
+typedef void (*draw_antic_function)(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr);
+
+/* tables for all GTIA and ANTIC modes */
+static draw_antic_function draw_antic_table[4][16] = {
+/* normal */
+		{ NULL,			NULL,			draw_antic_2,	draw_antic_2,
+		draw_antic_4,	draw_antic_4,	draw_antic_6,	draw_antic_6,
+		draw_antic_8,	draw_antic_9,	draw_antic_a,	draw_antic_c,
+		draw_antic_c,	draw_antic_e,	draw_antic_e,	draw_antic_f},
+/* GTIA 9 */
+		{ NULL,			NULL,			draw_antic_2_gtia9,	draw_antic_2_gtia9,
+		draw_antic_4_gtia9,	draw_antic_4_gtia9,	draw_antic_6_gtia9,	draw_antic_6_gtia9,
+		draw_antic_8_gtia9,	draw_antic_9_gtia9,	draw_antic_a_gtia9,	draw_antic_9_gtia9,
+		draw_antic_9_gtia9, draw_antic_e_gtia9,	draw_antic_e_gtia9,	draw_antic_f_gtia9},
+/* GTIA 10 */
+		{ NULL,			NULL,			draw_antic_2_gtia10,	draw_antic_2_gtia10,
+		draw_antic_4_gtia10,	draw_antic_4_gtia10,	draw_antic_6_gtia10,	draw_antic_6_gtia10,
+		draw_antic_8_gtia10,	draw_antic_9_gtia10,	draw_antic_a_gtia10,	draw_antic_9_gtia10,
+		draw_antic_9_gtia10,	draw_antic_e_gtia10,	draw_antic_e_gtia10,	draw_antic_f_gtia10},
+/* GTIA 11 */
+		{ NULL,			NULL,			draw_antic_2_gtia11,	draw_antic_2_gtia11,
+		draw_antic_4_gtia11,	draw_antic_4_gtia11,	draw_antic_6_gtia11,	draw_antic_6_gtia11,
+		draw_antic_8_gtia11,	draw_antic_9_gtia11,	draw_antic_a_gtia11,	draw_antic_9_gtia11,
+		draw_antic_9_gtia11,	draw_antic_e_gtia11,	draw_antic_e_gtia11,	draw_antic_f_gtia11}};
+
+/* pointer to current GTIA/ANTIC mode routine */
+static draw_antic_function draw_antic_ptr = draw_antic_8;
+#ifdef NEW_CYCLE_EXACT
+static draw_antic_function saved_draw_antic_ptr;
+#endif
+/* pointer to current GTIA mode blank drawing routine */
+static void (*draw_antic_0_ptr)(void) = draw_antic_0;
+
+#ifdef NEW_CYCLE_EXACT
+/* wrapper for antic_0, for dmactl bugs */
+static void draw_antic_0_dmactl_bug(int nchars, const UBYTE *antic_memptr, UWORD *ptr, const ULONG *t_pm_scanline_ptr)
+{
+	draw_antic_0_ptr();
+}
+#endif
+
+/* Artifacting ------------------------------------------------------------ */
+
+void ANTIC_UpdateArtifacting(void)
+{
+#define ART_BROWN 0
+#define ART_BLUE 1
+#define ART_DARK_BROWN 2
+#define ART_DARK_BLUE 3
+#define ART_BRIGHT_BROWN 4
+#define ART_BRIGHT_BLUE 5
+#define ART_RED 6
+#define ART_GREEN 7
+	static const UBYTE art_colour_table[4][8] = {
+		{ 0x88, 0x14, 0x88, 0x14, 0x8f, 0x1f, 0xbb, 0x5f },	/* brownblue */
+		{ 0x14, 0x88, 0x14, 0x88, 0x1f, 0x8f, 0x5f, 0xbb },	/* bluebrown */
+		{ 0xd6, 0x46, 0xd6, 0x46, 0xdf, 0x4a, 0x4f, 0xac },	/* redgreen */
+		{ 0x46, 0xd6, 0x46, 0xd6, 0x4a, 0xdf, 0xac, 0x4f }	/* greenred */
+	};
+
+	int i;
+	int j;
+	int c;
+	const UBYTE *art_colours;
+	UBYTE q;
+	UBYTE art_white;
+
+	if (ANTIC_artif_mode == 0) {
+		draw_antic_table[0][2] = draw_antic_table[0][3] = draw_antic_2;
+		draw_antic_table[0][0xf] = draw_antic_f;
+		return;
+	}
+
+#ifndef USE_COLOUR_TRANSLATION_TABLE
+	if (ANTIC_artif_new) {
+		static UWORD new_art_colour_table[4][2] = {
+			{0x4040, 0x8080},
+			{0x8080, 0x4040},
+			{0x8080, 0xd0d0},
+			{0xd0d0, 0x8080}
+		};
+		draw_antic_table[0][2] = draw_antic_table[0][3] = draw_antic_2_artif_new;
+		draw_antic_table[0][0xf] = draw_antic_f_artif_new;
+		art_colour1_new = new_art_colour_table[ANTIC_artif_mode - 1][0];
+		art_colour2_new = new_art_colour_table[ANTIC_artif_mode - 1][1];
+	}
+	else
+#endif
+	{
+		draw_antic_table[0][2] = draw_antic_table[0][3] = draw_antic_2_artif;
+		draw_antic_table[0][0xf] = draw_antic_f_artif;
+	}
+
+	art_colours = (ANTIC_artif_mode <= 4 ? art_colour_table[ANTIC_artif_mode - 1] : art_colour_table[2]);
+
+	art_reverse_colpf1_save = art_normal_colpf1_save = ANTIC_cl[C_PF1] & 0x0f0f;
+	art_reverse_colpf2_save = art_normal_colpf2_save = ANTIC_cl[C_PF2];
+	art_white = (ANTIC_cl[C_PF2] & 0xf0) | (ANTIC_cl[C_PF1] & 0x0f);
+
+	for (i = 0; i <= 255; i++) {
+		art_bkmask_normal[i] = 0;
+		art_lummask_normal[i] = 0;
+		art_bkmask_reverse[255 - i] = 0;
+		art_lummask_reverse[255 - i] = 0;
+
+		for (j = 0; j <= 3; j++) {
+			q = i << j;
+			if (!(q & 0x20)) {
+				if ((q & 0xf8) == 0x50)
+					c = ART_BLUE;				/* 01010 */
+				else if ((q & 0xf8) == 0xD8)
+					c = ART_DARK_BLUE;			/* 11011 */
+				else {							/* xx0xx */
+					((UBYTE *) art_lookup_normal)[(i << 2) + j] = GTIA_COLPF2;
+					((UBYTE *) art_lookup_reverse)[((255 - i) << 2) + j] = art_white;
+					((UBYTE *) art_bkmask_normal)[(i << 2) + j] = 0xff;
+					((UBYTE *) art_lummask_reverse)[((255 - i) << 2) + j] = 0x0f;
+					((UBYTE *) art_bkmask_reverse)[((255 - i) << 2) + j] = 0xf0;
+					continue;
+				}
+			}
+			else if (q & 0x40) {
+				if (q & 0x10)
+					goto colpf1_pixel;			/* x111x */
+				else if (q & 0x80) {
+					if (q & 0x08)
+						c = ART_BRIGHT_BROWN;	/* 11101 */
+					else
+						goto colpf1_pixel;		/* 11100 */
+				}
+				else
+					c = ART_GREEN;				/* 0110x */
+			}
+			else if (q & 0x10) {
+				if (q & 0x08) {
+					if (q & 0x80)
+						c = ART_BRIGHT_BROWN;	/* 00111 */
+					else
+						goto colpf1_pixel;		/* 10111 */
+				}
+				else
+					c = ART_RED;				/* x0110 */
+			}
+			else
+				c = ART_BROWN;					/* x010x */
+
+			((UBYTE *) art_lookup_reverse)[((255 - i) << 2) + j] =
+			((UBYTE *) art_lookup_normal)[(i << 2) + j] = art_colours[(j & 1) ^ c];
+			continue;
+
+			colpf1_pixel:
+			((UBYTE *) art_lookup_normal)[(i << 2) + j] = art_white;
+			((UBYTE *) art_lookup_reverse)[((255 - i) << 2) + j] = GTIA_COLPF2;
+			((UBYTE *) art_bkmask_reverse)[((255 - i) << 2) + j] = 0xff;
+			((UBYTE *) art_lummask_normal)[(i << 2) + j] = 0x0f;
+			((UBYTE *) art_bkmask_normal)[(i << 2) + j] = 0xf0;
+		}
+	}
+}
+
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+/* Display List ------------------------------------------------------------ */
+
+UBYTE ANTIC_GetDLByte(UWORD *paddr)
+{
+	int addr = *paddr;
+	UBYTE result;
+	if (ANTIC_xe_ptr != NULL && addr < 0x8000 && addr >= 0x4000)
+		result = ANTIC_xe_ptr[addr - 0x4000];
+	else
+		result = MEMORY_GetByte((UWORD) addr);
+	addr++;
+	if ((addr & 0x3FF) == 0)
+		addr -= 0x400;
+	*paddr = (UWORD) addr;
+	return result;
+}
+
+UWORD ANTIC_GetDLWord(UWORD *paddr)
+{
+	UBYTE lsb = ANTIC_GetDLByte(paddr);
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+	if (ANTIC_player_flickering && ((GTIA_VDELAY & 0x80) == 0 || ANTIC_ypos & 1))
+		GTIA_GRAFP3 = lsb;
+#endif
+	return (ANTIC_GetDLByte(paddr) << 8) + lsb;
+}
+
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+
+/* Real ANTIC doesn't fetch beginning bytes in HSC
+   nor screen+47 in wide playfield. This function does. */
+static void antic_load(void)
+{
+#ifdef PAGED_MEM
+	UBYTE *antic_memptr = antic_memory + ANTIC_margin;
+	UWORD new_screenaddr = screenaddr + chars_read[md];
+	if ((screenaddr ^ new_screenaddr) & 0xf000) {
+		do
+			*antic_memptr++ = MEMORY_dGetByte(screenaddr++);
+		while (screenaddr & 0xfff);
+		screenaddr -= 0x1000;
+		new_screenaddr -= 0x1000;
+	}
+	while (screenaddr < new_screenaddr)
+		*antic_memptr++ = MEMORY_dGetByte(screenaddr++);
+#else
+	UWORD new_screenaddr = screenaddr + chars_read[md];
+	if ((screenaddr ^ new_screenaddr) & 0xf000) {
+		int bytes = (-screenaddr) & 0xfff;
+		if (ANTIC_xe_ptr != NULL && screenaddr < 0x8000 && screenaddr >= 0x4000) {
+			memcpy(antic_memory + ANTIC_margin, ANTIC_xe_ptr + (screenaddr - 0x4000), bytes);
+			if (new_screenaddr & 0xfff)
+				memcpy(antic_memory + ANTIC_margin + bytes, ANTIC_xe_ptr + (screenaddr + bytes - 0x5000), new_screenaddr & 0xfff);
+		}
+		else if ((screenaddr & 0xf000) == 0xd000) {
+			MEMORY_CopyFromMem(screenaddr, antic_memory + ANTIC_margin, bytes);
+			if (new_screenaddr & 0xfff)
+				MEMORY_CopyFromMem((UWORD) (screenaddr + bytes - 0x1000), antic_memory + ANTIC_margin + bytes, new_screenaddr & 0xfff);
+		}
+		else {
+			MEMORY_dCopyFromMem(screenaddr, antic_memory + ANTIC_margin, bytes);
+			if (new_screenaddr & 0xfff)
+				MEMORY_dCopyFromMem(screenaddr + bytes - 0x1000, antic_memory + ANTIC_margin + bytes, new_screenaddr & 0xfff);
+		}
+		screenaddr = new_screenaddr - 0x1000;
+	}
+	else {
+		if (ANTIC_xe_ptr != NULL && screenaddr < 0x8000 && screenaddr >= 0x4000)
+			memcpy(antic_memory + ANTIC_margin, ANTIC_xe_ptr + (screenaddr - 0x4000), chars_read[md]);
+		else if ((screenaddr & 0xf000) == 0xd000)
+			MEMORY_CopyFromMem(screenaddr, antic_memory + ANTIC_margin, chars_read[md]);
+		else
+			MEMORY_dCopyFromMem(screenaddr, antic_memory + ANTIC_margin, chars_read[md]);
+		screenaddr = new_screenaddr;
+	}
+#endif
+}
+
+#ifdef NEW_CYCLE_EXACT
+int ANTIC_cur_screen_pos = ANTIC_NOT_DRAWING;
+#endif
+
+#ifdef USE_CURSES
+void curses_display_line(int anticmode, const UBYTE *screendata);
+
+static int scanlines_to_curses_display = 0;
+#endif
+
+/* This function emulates one frame drawing screen at Screen_atari */
+void ANTIC_Frame(int draw_display)
+{
+	static const UBYTE mode_type[32] = {
+		NORMAL0, NORMAL0, NORMAL0, NORMAL0, NORMAL0, NORMAL0, NORMAL1, NORMAL1,
+		NORMAL2, NORMAL2, NORMAL1, NORMAL1, NORMAL1, NORMAL0, NORMAL0, NORMAL0,
+		SCROLL0, SCROLL0, SCROLL0, SCROLL0, SCROLL0, SCROLL0, SCROLL1, SCROLL1,
+		SCROLL2, SCROLL2, SCROLL1, SCROLL1, SCROLL1, SCROLL0, SCROLL0, SCROLL0
+	};
+	static const UBYTE normal_lastline[16] =
+		{ 0, 0, 7, 9, 7, 15, 7, 15, 7, 3, 3, 1, 0, 1, 0, 0 };
+	UBYTE vscrol_flag = FALSE;
+	UBYTE no_jvb = TRUE;
+#ifndef NEW_CYCLE_EXACT
+	UBYTE need_load;
+#endif
+
+#ifdef NEW_CYCLE_EXACT
+	int cpu2antic_index;
+#endif /* NEW_CYCLE_EXACT */
+#ifndef NO_GTIA11_DELAY
+#ifdef NEW_CYCLE_EXACT
+	int stop = FALSE;
+/* can be negative, leave as signed ints */
+	int old_curline_prior_pos;
+	int last_pos;
+	int change_pos;
+#else
+	int delayed_gtia11 = 250;
+#endif /* NEW_CYCLE_EXACT */
+#endif /* NO_GTIA11_DELAY */
+
+	ANTIC_ypos = 0;
+	do {
+		POKEY_Scanline();		/* check and generate IRQ */
+		OVERSCREEN_LINE;
+	} while (ANTIC_ypos < 8);
+
+	scrn_ptr = (UWORD *) Screen_atari;
+#ifdef NEW_CYCLE_EXACT
+	ANTIC_cur_screen_pos = ANTIC_NOT_DRAWING;
+#endif
+	need_dl = TRUE;
+	do {
+		if ((INPUT_mouse_mode == INPUT_MOUSE_PEN || INPUT_mouse_mode == INPUT_MOUSE_GUN) && (ANTIC_ypos >> 1 == ANTIC_PENV_input)) {
+			PENH = ANTIC_PENH_input;
+			PENV = ANTIC_PENV_input;
+			if (GTIA_GRACTL & 4)
+				GTIA_TRIG_latch[INPUT_mouse_port] = 0;
+		}
+
+		POKEY_Scanline();		/* check and generate IRQ */
+		pmg_dma();
+
+#ifdef USE_CURSES
+		if (--scanlines_to_curses_display == 0)
+			curses_display_line(anticmode, antic_memory + ANTIC_margin);
+#endif
+
+		need_load = FALSE;
+		if (need_dl) {
+			if (ANTIC_DMACTL & 0x20) {
+				IR = ANTIC_GetDLByte(&ANTIC_dlist);
+				anticmode = IR & 0xf;
+				ANTIC_xpos++;
+				/* PMG flickering :-) */
+				if (ANTIC_missile_flickering)
+					GTIA_GRAFM = ANTIC_ypos & 1 ? IR : ((GTIA_GRAFM ^ IR) & hold_missiles_tab[GTIA_VDELAY & 0xf]) ^ IR;
+				if (ANTIC_player_flickering) {
+					UBYTE hold = ANTIC_ypos & 1 ? 0 : GTIA_VDELAY;
+					if ((hold & 0x10) == 0)
+						GTIA_GRAFP0 = MEMORY_dGetByte((UWORD) (CPU_regPC - ANTIC_xpos + 8));
+					if ((hold & 0x20) == 0)
+						GTIA_GRAFP1 = MEMORY_dGetByte((UWORD) (CPU_regPC - ANTIC_xpos + 9));
+					if ((hold & 0x40) == 0)
+						GTIA_GRAFP2 = MEMORY_dGetByte((UWORD) (CPU_regPC - ANTIC_xpos + 10));
+					if ((hold & 0x80) == 0)
+						GTIA_GRAFP3 = MEMORY_dGetByte((UWORD) (CPU_regPC - ANTIC_xpos + 11));
+				}
+			}
+			else
+				IR &= 0x7f;	/* repeat last instruction, but don't generate DLI */
+
+			dctr = 0;
+			need_dl = FALSE;
+			vscrol_off = FALSE;
+
+			switch (anticmode) {
+			case 0x00:
+				lastline = (IR >> 4) & 7;
+				if (vscrol_flag) {
+					lastline = ANTIC_VSCROL;
+					vscrol_flag = FALSE;
+					vscrol_off = TRUE;
+				}
+				break;
+			case 0x01:
+				lastline = 0;
+				if (IR & 0x40 && ANTIC_DMACTL & 0x20) {
+					ANTIC_dlist = ANTIC_GetDLWord(&ANTIC_dlist);
+					ANTIC_xpos += 2;
+					no_jvb = FALSE;
+				}
+				else
+					if (vscrol_flag) {
+						lastline = ANTIC_VSCROL;
+						vscrol_flag = FALSE;
+						vscrol_off = TRUE;
+					}
+				break;
+			default:
+				lastline = normal_lastline[anticmode];
+				if (IR & 0x20) {
+					if (!vscrol_flag) {
+						CPU_GO(VSCON_C);
+						dctr = ANTIC_VSCROL;
+						vscrol_flag = TRUE;
+					}
+				}
+				else if (vscrol_flag) {
+					lastline = ANTIC_VSCROL;
+					vscrol_flag = FALSE;
+					vscrol_off = TRUE;
+				}
+				if (IR & 0x40 && ANTIC_DMACTL & 0x20) {
+					screenaddr = ANTIC_GetDLWord(&ANTIC_dlist);
+					ANTIC_xpos += 2;
+				}
+				md = mode_type[IR & 0x1f];
+				need_load = TRUE;
+				draw_antic_ptr = draw_antic_table[GTIA_PRIOR >> 6][anticmode];
+				break;
+			}
+		}
+#ifdef NEW_CYCLE_EXACT
+		cpu2antic_index = 0;
+		if (anticmode < 2 || (ANTIC_DMACTL & 3) == 0 ||
+			(anticmode >= 8 && !need_load)) {
+			cpu2antic_index = 0;
+		}
+		else {
+/* TODO: use a cleaner lookup table here */
+			if (!(IR & 0x10) && ((ANTIC_DMACTL & 3) == 1))
+				cpu2antic_index = 1;
+			else if ((!(IR &0x10) && ((ANTIC_DMACTL & 3) == 2)) ||
+				((IR & 0x10) && ((ANTIC_DMACTL & 3) == 1))) {
+				cpu2antic_index = 2;
+			}
+			else
+				cpu2antic_index = 10;
+			if (IR & 0x10) {
+				cpu2antic_index += (ANTIC_HSCROL >> 1);
+			}
+			if (anticmode >=2 && anticmode <=7 && !need_load)
+				cpu2antic_index += 17;
+			if (anticmode ==6 || anticmode ==7)
+				cpu2antic_index += 17 * 2;
+		 	else if (anticmode==8 || anticmode == 9)
+				cpu2antic_index += 17 * 6;
+			else if (anticmode >=0xa && anticmode <=0xc)
+				cpu2antic_index += 17 * 5;
+			else if (anticmode >=0x0d)
+				cpu2antic_index += 17 * 4;
+		}
+		ANTIC_cpu2antic_ptr = &CYCLE_MAP_cpu2antic[CYCLE_MAP_SIZE * cpu2antic_index];
+		ANTIC_antic2cpu_ptr = &CYCLE_MAP_antic2cpu[CYCLE_MAP_SIZE * cpu2antic_index];
+#endif /* NEW_CYCLE_EXACT */
+
+		if ((IR & 0x4f) == 1 && (ANTIC_DMACTL & 0x20)) {
+			ANTIC_dlist = ANTIC_GetDLWord(&ANTIC_dlist);
+			ANTIC_xpos += 2;
+		}
+
+#ifdef NEW_CYCLE_EXACT
+		/* begin drawing here */
+		if (draw_display) {
+			ANTIC_cur_screen_pos = LBORDER_START;
+			ANTIC_xpos = ANTIC_antic2cpu_ptr[ANTIC_xpos]; /* convert antic to cpu(need for WSYNC) */
+			if (dctr == lastline) {
+				if (no_jvb)
+					need_dl = TRUE;
+				if (IR & 0x80) {
+					CPU_GO(ANTIC_antic2cpu_ptr[ANTIC_NMIST_C]);
+					ANTIC_NMIST = 0x9f;
+					if (ANTIC_NMIEN & 0x80) {
+						CPU_GO(ANTIC_antic2cpu_ptr[ANTIC_NMI_C]);
+						CPU_NMI();
+					}
+				}
+			}
+		}
+		else /* force this to be within an else if NEW_CYCLE_EXACT */
+#endif /* NEW_CYCLE_EXACT */
+		if (dctr == lastline) {
+			if (no_jvb)
+				need_dl = TRUE;
+			if (IR & 0x80) {
+				CPU_GO(ANTIC_NMIST_C);
+				ANTIC_NMIST = 0x9f;
+				if (ANTIC_NMIEN & 0x80) {
+					CPU_GO(ANTIC_NMI_C);
+					CPU_NMI();
+				}
+			}
+		}
+		if (!draw_display) {
+			ANTIC_xpos += ANTIC_DMAR;
+			if (anticmode < 2 || (ANTIC_DMACTL & 3) == 0) {
+				GOEOL;
+				if (no_jvb) {
+					dctr++;
+					dctr &= 0xf;
+				}
+				continue;
+			}
+			if (need_load) {
+				ANTIC_xpos += load_cycles[md];
+				if (anticmode <= 5)	/* extra cycles in font modes */
+					ANTIC_xpos += before_cycles[md] - extra_cycles[md];
+			}
+			if (anticmode < 8)
+				ANTIC_xpos += font_cycles[md];
+			GOEOL;
+			dctr++;
+			dctr &= 0xf;
+			continue;
+		}
+#ifndef NO_YPOS_BREAK_FLICKER
+#define YPOS_BREAK_FLICKER do{if (ANTIC_ypos == ANTIC_break_ypos - 1000) {\
+				static int toggle;\
+				if (toggle == 1) {\
+					FILL_VIDEO(scrn_ptr + LBORDER_START, 0x0f0f, (RBORDER_END - LBORDER_START) * 2);\
+				}\
+				toggle = !toggle;\
+			}}while(0)
+#else
+#define YPOS_BREAK_FLICKER do{}while(0)
+#endif /* NO_YPOS_BREAK_FLICKER */
+
+#ifdef NEW_CYCLE_EXACT
+		GTIA_NewPmScanline();
+		if (anticmode < 2 || (ANTIC_DMACTL & 3) == 0) {
+			GOEOL_CYCLE_EXACT;
+			draw_partial_scanline(ANTIC_cur_screen_pos, RBORDER_END);
+			UPDATE_DMACTL;
+			UPDATE_GTIA_BUG;
+			ANTIC_cur_screen_pos = ANTIC_NOT_DRAWING;
+			YPOS_BREAK_FLICKER;
+			scrn_ptr += Screen_WIDTH / 2;
+			if (no_jvb) {
+				dctr++;
+				dctr &= 0xf;
+			}
+			continue;
+		}
+
+		GOEOL_CYCLE_EXACT;
+		draw_partial_scanline(ANTIC_cur_screen_pos, RBORDER_END);
+		UPDATE_DMACTL;
+		UPDATE_GTIA_BUG;
+		ANTIC_cur_screen_pos = ANTIC_NOT_DRAWING;
+
+#else /* NEW_CYCLE_EXACT not defined */
+		if (need_load && anticmode <= 5 && ANTIC_DMACTL & 3)
+			ANTIC_xpos += before_cycles[md];
+
+		CPU_GO(SCR_C);
+		GTIA_NewPmScanline();
+
+		ANTIC_xpos += ANTIC_DMAR;
+
+		if (anticmode < 2 || (ANTIC_DMACTL & 3) == 0) {
+			draw_antic_0_ptr();
+			GOEOL;
+			YPOS_BREAK_FLICKER;
+			scrn_ptr += Screen_WIDTH / 2;
+			if (no_jvb) {
+				dctr++;
+				dctr &= 0xf;
+			}
+			continue;
+		}
+
+		if (need_load) {
+			antic_load();
+#ifdef USE_CURSES
+			/* Normally, we would call curses_display_line here,
+			   and not use scanlines_to_curses_display at all.
+			   That would however cause incorrect color of the "MEMORY"
+			   menu item in Self Test - it isn't set properly
+			   in the first scanline. We therefore postpone
+			   curses_display_line call to the next scanline. */
+			scanlines_to_curses_display = 1;
+#endif
+			ANTIC_xpos += load_cycles[md];
+			if (anticmode <= 5)	/* extra cycles in font modes */
+				ANTIC_xpos -= extra_cycles[md];
+		}
+
+		draw_antic_ptr(chars_displayed[md],
+			antic_memory + ANTIC_margin + ch_offset[md],
+			scrn_ptr + x_min[md],
+			(ULONG *) &GTIA_pm_scanline[x_min[md]]);
+
+#endif /* NEW_CYCLE_EXACT */
+#ifndef NO_GTIA11_DELAY
+#ifndef NEW_CYCLE_EXACT
+		if (GTIA_PRIOR >= 0xc0)
+			delayed_gtia11 = ANTIC_ypos + 1;
+		else
+			if (ANTIC_ypos == delayed_gtia11) {
+				ULONG *ptr = (ULONG *) (scrn_ptr + 4 * LCHOP);
+				int k = 2 * (48 - LCHOP - RCHOP);
+				do {
+					WRITE_VIDEO_LONG(ptr, READ_VIDEO_LONG(ptr) | READ_VIDEO_LONG(ptr - Screen_WIDTH / 4));
+					ptr++;
+				} while (--k);
+			}
+#else /* NEW_CYCLE_EXACT defined */
+/* Basic explaination: */
+/* the ring buffer ANTIC_prior_pos_buf has three pointers: */
+/*     A   B  C              D     E    F      G   */
+/*     ^                     ^                 ^   */
+/* prevline_prior_pos  curline_prior_pos  ANTIC_prior_curpos  */
+/* G would be the most recent change which occurred during drawing */
+/* of the current line, D is the most recent */
+/* change before the current line was drawn, and A is the most recent */
+/* change before the previous line was drawn */
+/* curline_prior_pos is saved in old_curline_prior_pos */
+/* then the code will increase either curline_prior_pos or */
+/* prevline_prior_pos depending if the change at B or E occurred */
+/* earlier in the scanline ignoring which scanline it was */
+/* eg: */
+/*                              A occurs on some previous scanline */
+/* prev:     B                      C                          D     */
+/* current:                     E                    F           G   */
+/* so from the left end of the screen, the changes occurred in the order */
+/* B,E,C,F,D,G */
+/* then the code will read the values in that order, and each time it will */
+/* update prev_prior_val and cur_prior_val to be equal the the PRIOR values */
+/* "in effect" *before* those changes occurred.  If those PRIOR values */
+/* should cause a GTIA11_DELAY effect to occur then this is processed */
+/* for that portion of the scanline */
+/* At the end of processing, the buffer would look like: */
+/* the ring buffer ANTIC_prior_pos_buf has three pointers: */
+/*     A   B  C              D     E    F      G   */
+/*                           ^                 ^   */
+/*                    prevline_prior_pos  curline_prior_pos==ANTIC_prior_curpos  */
+
+		stop = FALSE;
+		last_pos = LBORDER_START;
+		old_curline_prior_pos = curline_prior_pos;
+		do {
+
+			UBYTE prev_prior_val;
+			UBYTE cur_prior_val;
+			prev_prior_val = ANTIC_prior_val_buf[prevline_prior_pos];
+			cur_prior_val = ANTIC_prior_val_buf[curline_prior_pos];
+
+			if (prevline_prior_pos == old_curline_prior_pos &&
+				curline_prior_pos == ANTIC_prior_curpos) {
+			/* no more changes */
+				change_pos = RBORDER_END;
+				stop = TRUE;
+			}
+			else if (prevline_prior_pos != old_curline_prior_pos &&
+				curline_prior_pos != ANTIC_prior_curpos) {
+			/* find leftmost change */
+				int pnext = (prevline_prior_pos + 1) % ANTIC_PRIOR_BUF_SIZE;
+				int cnext = (curline_prior_pos + 1) % ANTIC_PRIOR_BUF_SIZE;
+				if (ANTIC_prior_pos_buf[pnext] < ANTIC_prior_pos_buf[cnext]) {
+					change_pos = ANTIC_prior_pos_buf[pnext];
+					prevline_prior_pos = pnext;
+				}
+				else {
+					change_pos = ANTIC_prior_pos_buf[cnext];
+					curline_prior_pos = cnext;
+				}
+			}
+			else if (prevline_prior_pos != old_curline_prior_pos) {
+				/* only have prevline change */
+				prevline_prior_pos = (prevline_prior_pos + 1) % ANTIC_PRIOR_BUF_SIZE;
+				change_pos = ANTIC_prior_pos_buf[prevline_prior_pos];
+			}
+			else {
+				/* must only have curline change */
+				curline_prior_pos = (curline_prior_pos + 1) % ANTIC_PRIOR_BUF_SIZE;
+				change_pos = ANTIC_prior_pos_buf[curline_prior_pos];
+			}
+
+			if (prev_prior_val >= 0xc0 && cur_prior_val < 0xc0 &&
+				change_pos > LBORDER_START &&
+				change_pos > last_pos && last_pos < RBORDER_END) {
+				int adj_change_pos = (change_pos > RBORDER_END) ? RBORDER_END : change_pos;
+				UWORD *ptr = (scrn_ptr + last_pos);
+				int k = adj_change_pos - last_pos;
+				do {
+					WRITE_VIDEO(ptr, *ptr | *(ptr - Screen_WIDTH / 2));
+					ptr++;
+				} while (--k);
+			}
+			last_pos = (change_pos > last_pos) ? change_pos: last_pos;
+		} while (!stop);
+#endif /* NEW_CYCLE_EXACT */
+#endif /* NO_GTIA11_DELAY */
+#ifndef NEW_CYCLE_EXACT
+		GOEOL;
+#endif /* NEW_CYCLE_EXACT */
+		YPOS_BREAK_FLICKER;
+		scrn_ptr += Screen_WIDTH / 2;
+		dctr++;
+		dctr &= 0xf;
+	} while (ANTIC_ypos < (Screen_HEIGHT + 8));
+
+/* TODO: cycle-exact overscreen lines */
+	POKEY_Scanline();		/* check and generate IRQ */
+	CPU_GO(ANTIC_NMIST_C);
+	ANTIC_NMIST = 0x5f;				/* Set VBLANK */
+	if (ANTIC_NMIEN & 0x40) {
+		CPU_GO(ANTIC_NMI_C);
+		CPU_NMI();
+	}
+	ANTIC_xpos += ANTIC_DMAR;
+	GOEOL;
+
+	do {
+		POKEY_Scanline();		/* check and generate IRQ */
+		OVERSCREEN_LINE;
+	} while (ANTIC_ypos < Atari800_tv_mode);
+	ANTIC_ypos = 0; /* just for monitor.c */
+}
+
+#ifdef NEW_CYCLE_EXACT
+
+/* update the scanline from the last changed position to the current
+position, when a change was made to a display register during drawing */
+void ANTIC_UpdateScanline(void)
+{
+	int actual_xpos = ANTIC_cpu2antic_ptr[ANTIC_xpos];
+	int newpos = actual_xpos * 2 - 37;
+	draw_partial_scanline(ANTIC_cur_screen_pos, newpos);
+	ANTIC_cur_screen_pos = newpos;
+}
+
+/* prior needs a different adjustment and could generate small glitches
+between mode changes */
+/* TODO: support glitches between mode changes (tiny areas that are neither
+the new mode nor the old mode, which occur between mode changes */
+void ANTIC_UpdateScanlinePrior(UBYTE byte)
+{
+	int actual_xpos = ANTIC_cpu2antic_ptr[ANTIC_xpos];
+	int prior_mode_adj = 2;
+	int newpos;
+	newpos = actual_xpos * 2 - 37 + prior_mode_adj;
+	draw_partial_scanline(ANTIC_cur_screen_pos, newpos);
+	ANTIC_cur_screen_pos = newpos;
+}
+
+/* chbase needs a different adjustment */
+void update_scanline_chbase(void)
+{
+	int actual_xpos = ANTIC_cpu2antic_ptr[ANTIC_xpos];
+	int hscrol_adj = (IR & 0x10) ? ANTIC_HSCROL : 0;
+	int hscrollsb_adj = (hscrol_adj & 1);
+	int newpos;
+	int fontfetch_adj;
+	/* antic fetches character font data every 2 or 4 cycles */
+	/* we want to delay the change until the next fetch */
+	/* empirically determined: */
+	if (anticmode >= 2 && anticmode <= 5) {
+		fontfetch_adj = (((hscrol_adj >>1) - actual_xpos + 0) & 1) * 2 + 9;
+	}
+	else if (anticmode == 6 || anticmode == 7) {
+		fontfetch_adj = (((hscrol_adj >> 1) - actual_xpos + 2) & 3) * 2 + 9;
+	}
+	else {
+		fontfetch_adj = 0;
+	}
+	newpos = actual_xpos * 2 - 37 + hscrollsb_adj + fontfetch_adj;
+	draw_partial_scanline(ANTIC_cur_screen_pos, newpos);
+	ANTIC_cur_screen_pos = newpos;
+}
+
+/* chactl invert needs a different adjustment */
+void update_scanline_invert(void)
+{
+	int actual_xpos = ANTIC_cpu2antic_ptr[ANTIC_xpos];
+	int hscrol_adj = (IR & 0x10) ? ANTIC_HSCROL : 0;
+	int hscrollsb_adj = (hscrol_adj & 1);
+	int newpos;
+
+	/* empirically determined: adjustment of 4 */
+	newpos = actual_xpos * 2 - 37 + hscrollsb_adj + 4;
+	draw_partial_scanline(ANTIC_cur_screen_pos, newpos);
+	ANTIC_cur_screen_pos = newpos;
+}
+
+/* chactl blank needs a different adjustment */
+void update_scanline_blank(void)
+{
+	int actual_xpos = ANTIC_cpu2antic_ptr[ANTIC_xpos];
+	int hscrol_adj = (IR & 0x10) ? ANTIC_HSCROL : 0;
+	int hscrollsb_adj = (hscrol_adj & 1);
+	int newpos;
+
+	/* empirically determined: adjustment of 7 */
+	newpos = actual_xpos * 2 - 37 + hscrollsb_adj + 7;
+	draw_partial_scanline(ANTIC_cur_screen_pos, newpos);
+	ANTIC_cur_screen_pos = newpos;
+}
+
+static void set_dmactl_bug(void){
+	need_load = FALSE;
+	saved_draw_antic_ptr = draw_antic_ptr;
+	draw_antic_ptr_changed = 1;
+	if (anticmode == 2 || anticmode == 3 || anticmode == 0xf) {
+		draw_antic_ptr = draw_antic_2_dmactl_bug;
+		dmactl_bug_chdata = (anticmode == 0xf) ? 0 : antic_memory[ANTIC_margin + chars_read[md] - 1];
+	}
+	else {
+		draw_antic_ptr = draw_antic_0_dmactl_bug;
+	}
+}
+
+/* draw a partial scanline between point l and point r */
+/* l is the left hand word, r is the point one past the right-most word to draw */
+void draw_partial_scanline(int l, int r)
+{
+	/* lborder_chars: save left border chars,we restore it after */
+	/*                it is the number of 8pixel 'chars' in the left border */
+	int lborder_chars = left_border_chars;
+
+	/* rborder_start: save right border start, we restore it after */
+	/*                it is the start of the right border, in words */
+	int rborder_start = right_border_start;
+
+	/* lborder_start: start of the left border, in words */
+	int lborder_start = LCHOP * 4;
+	/* end of the left border, in words */
+	int lborder_end = LCHOP * 4 + left_border_chars * 4;
+	/* end of the right border, in words */
+	int rborder_end = (48 - RCHOP) * 4;
+	/* flag: if true, don't show playfield. used if the partial scanline */
+	/*    does not include the playfield */
+	int dont_display_playfield = 0;
+	/* offset of the left most drawable 8 pixel pf block */
+	/* int l_pfchar = (lborder_end - x_min[md]) / 4; */
+	int l_pfchar = 0;
+	/* offset of the right most drawable 8 pixel pf plock, *plus one* */
+	int r_pfchar = 0;
+	/* buffer to save 0,1,2 or 3 words of the left hand portion of an 8pixel */
+	/* 'char' which is going to be erased by the left hand side of the */
+	/* left most 8pixel 'char' in the partial scanline and must be saved */
+	/* and restored later */
+	UWORD sv_buf[4];
+	/* buffer to save 0 or 1 (modes 6,7,a,b,c) ,or , (0,1,2 or 3) (modes 8,9) */
+	/* 8pixel 'chars' of playfield which is going to be erased by the left */
+	/* hand most 8pixel 'char's of the 2(modes 67abc) or 4(modes 89) 8pixel */
+	/* 'char'-sized blocks that these modes must draw. */
+	UWORD sv_buf2[4 * 4]; /* for modes 6,7,8,9,a,b,c */
+	/* start,size of the above buffers */
+	int sv_bufstart = 0;
+	int sv_bufsize = 0;
+	int sv_bufstart2 = 0;
+	int sv_bufsize2 = 0;
+	/* number of 8,16,32pixel chars to draw in the playfield */
+	int nchars = 0;
+	/* adjustment to ch_index , it is the number of 8,16,32pixel chars */
+	/* that we do not draw on the left hand side that would usually be drawn */
+	/* for this mode */
+	int ch_adj = 0;
+	/* adjustment to x_min to skip over the left side */
+	int x_min_adj = 0;
+	/* it's the offset of the left most drawable 8pixel pfblock which is */
+	/* rounded *down* to the nearest factor of (2:mode 67abc,4:mode 89) */
+	/* if it is divided by (2:mode 67abc,4:mode 89) it will give the */
+	/* offset of the left most drawable (16,32)pixel 'char' */
+	int l_pfactual = 0;
+	/* it is the offset of the right most drawable 8pixel pf block which is */
+	/* rounded *up* to the nearest factor of (2,4),  *plus one* */
+	/* so that r_pfactual-l_pfactual / (2,4) = number of 16,32 pixel 'chars' */
+	/* to be drawn */
+	int r_pfactual = 0;
+	/* it is the offset of the 8pixel block aligned with pf which overlaps */
+	/* the left border. We need this for modes 6-c, because in these modes */
+	/* the code will save 8pixel blocks to the left of l_pfchar and */
+	/* >= l_pfactual, which will result in portions of the left border */
+	/* being saved on some occasions which should not be, unless we */
+	/* use this variable to alter the number of chars saved */
+	/* int l_borderpfchar=0; */
+
+	r_pfchar = chars_displayed[md];
+	if (md == NORMAL1 || md == SCROLL1) { /* modes 6,7,a,b,c */
+		r_pfchar *= 2;
+	}
+	else if (md == NORMAL2 || md == SCROLL2) { /* modes 8,9 */
+		r_pfchar *= 4;
+	}
+	if (anticmode < 2 || (ANTIC_DMACTL & 3) == 0) {
+		lborder_end = rborder_end;
+		dont_display_playfield = 1;
+	}
+	if (l > rborder_end)
+		l = rborder_end;
+	if (r > rborder_end)
+		r = rborder_end;
+	if (l < lborder_start)
+		l = lborder_start;
+	if (r < lborder_start)
+		r = lborder_start;
+	if (l >= r)
+		return;
+	if (l < lborder_end) {
+		/* left point is within left border */
+		sv_bufstart = (l & (~3)); /* high order bits give buffer start */
+		sv_bufsize = l - sv_bufstart;
+		left_border_start = sv_bufstart;
+		left_border_chars = lborder_chars - (sv_bufstart - lborder_start) / 4;
+		if (l > x_min[md]) {
+			/* special case for modes 56789abc */
+			/* position buffer within the reference frame */
+			/* of the playfield if that */
+			/* results in more pixels being saved in the buffer */
+			/* needed because for modes 5789abc the overlapping part */
+			/* can be more than 1 8pixel char and we only save the left */
+			/* hand most 8pixel chars in the code in the later section */
+			/* further down, so there is a possibility that the 8pixels */
+			/* which are saved within the reference frame of the border */
+			/* are not enough to ensure that everything gets saved */
+			l_pfchar = (l - x_min[md]) / 4;
+			if (((l - x_min[md]) & 3) > sv_bufsize) {
+				sv_bufsize = ((l - x_min[md]) & 3);
+				sv_bufstart = l - sv_bufsize;
+			}
+		}
+	}
+	else if (l >= rborder_start) {
+		sv_bufstart = (l & (~3)); /* high order bits give buffer start */
+		sv_bufsize = l - sv_bufstart;
+		right_border_start = sv_bufstart;
+		dont_display_playfield = 1; /* don't display the playfield */
+	}
+	else { /*within screen */
+		sv_bufsize = ((l - x_min[md]) & 3); /* low bits have buf size */
+		sv_bufstart = l - sv_bufsize; /* difference gives start */
+		l_pfchar = (sv_bufstart - x_min[md]) / 4;
+		left_border_chars = 0; /* don't display left border */
+	}
+	memcpy(sv_buf, scrn_ptr + sv_bufstart, sv_bufsize * sizeof(UWORD)); /* save part of screen */
+
+	if (r <= lborder_end) {
+		/* right_end_char = (r + 3) / 4; */
+		left_border_chars = (r + 3) / 4 - sv_bufstart / 4;
+		/* everything must be within the left border */
+		dont_display_playfield = 1; /* don't display the playfield */
+	}
+	else { /* right point is past start of playfield */
+		/* now load ANTIC data: needed for ANTIC glitches */
+		if (need_load) {
+			antic_load();
+#ifdef USE_CURSES
+			/* Normally, we would call curses_display_line here,
+			   and not use scanlines_to_curses_display at all.
+			   That would however cause incorrect color of the "MEMORY"
+			   menu item in Self Test - it isn't set properly
+			   in the first scanline. We therefore postpone
+			   curses_display_line call to the next scanline. */
+			scanlines_to_curses_display = 1;
+#endif
+			need_load = FALSE;
+		}
+
+		if (r > rborder_start) {
+			right_border_end = ((r + 3) & (~3)); /* round up to nearest 8pixel */
+		}
+		else {
+			r_pfchar = (r - x_min[md] + 3) / 4; /* round up to nearest 8pixel */
+		}
+	}
+	if (dont_display_playfield) {
+		nchars = 0;
+		x_min_adj = 0;
+		ch_adj = 0;
+	}
+	else if (md == NORMAL1 || md == SCROLL1) { /* modes 6,7,a,b,c */
+		l_pfactual = (l_pfchar & (~1)); /* round down to nearest 16pixel */
+		sv_bufsize2 = (l_pfchar - l_pfactual) * 4;
+		sv_bufstart2 = x_min[md] + l_pfactual * 4;
+		r_pfactual = ((r_pfchar + 1) & (~1)); /* round up to nearest 16pixel */
+		nchars = (r_pfactual - l_pfactual) / 2;
+		x_min_adj = l_pfactual * 4;
+		ch_adj = l_pfactual / 2;
+	}
+	else if (md == NORMAL2 || md == SCROLL2) { /* modes 8,9 */
+		l_pfactual = (l_pfchar & (~3));
+		sv_bufsize2 = (l_pfchar - l_pfactual) * 4;
+		sv_bufstart2 = x_min[md] + l_pfactual * 4;
+		r_pfactual = ((r_pfchar + 3) & (~3));
+		nchars = (r_pfactual - l_pfactual) / 4;
+		x_min_adj = l_pfactual * 4;
+		ch_adj = l_pfactual / 4;
+	}
+	else {
+		nchars = r_pfchar - l_pfchar;
+		x_min_adj = l_pfchar * 4;
+		ch_adj = l_pfchar;
+	}
+	memcpy(sv_buf2, scrn_ptr + sv_bufstart2, sv_bufsize2 * sizeof(UWORD)); /* save part of screen */
+
+	if (dont_display_playfield) {
+/* the idea here is to use draw_antic_0_ptr() to draw just the border only, since */
+/* we can't set nchars=0.  draw_antic_0_ptr will work if left_border_start and */
+/* right_border_end are set correctly */
+		if (anticmode < 2 || (ANTIC_DMACTL & 3) == 0 || r <= lborder_end) {
+			right_border_end = left_border_start + left_border_chars * 4;
+		}
+		else if (l >= rborder_start) {
+			left_border_start = right_border_start;
+		}
+		draw_antic_0_ptr();
+	}
+	else {
+		draw_antic_ptr(nchars, /* chars_displayed[md], */
+			antic_memory + ANTIC_margin + ch_offset[md] + ch_adj,
+			scrn_ptr + x_min[md] + x_min_adj,
+			(ULONG *) &GTIA_pm_scanline[x_min[md] + x_min_adj]);
+	}
+	memcpy(scrn_ptr + sv_bufstart2, sv_buf2, sv_bufsize2 * sizeof(UWORD)); /* restore screen */
+	memcpy(scrn_ptr + sv_bufstart, sv_buf, sv_bufsize * sizeof(UWORD)); /* restore screen */
+
+	/* restore border global variables */
+	left_border_chars=lborder_chars;
+	right_border_start=rborder_start;
+	left_border_start = LCHOP * 4;
+	right_border_end = (48-RCHOP)  *4;
+}
+#endif /* NEW_CYCLE_EXACT */
+
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+/* ANTIC registers --------------------------------------------------------- */
+
+UBYTE ANTIC_GetByte(UWORD addr)
+{
+	switch (addr & 0xf) {
+	case ANTIC_OFFSET_VCOUNT:
+		if (ANTIC_XPOS < ANTIC_LINE_C)
+			return ANTIC_ypos >> 1;
+		if (ANTIC_ypos + 1 < Atari800_tv_mode)
+			return (ANTIC_ypos + 1) >> 1;
+		return 0;
+	case ANTIC_OFFSET_PENH:
+		return PENH;
+	case ANTIC_OFFSET_PENV:
+		return PENV;
+	case ANTIC_OFFSET_NMIST:
+		return ANTIC_NMIST;
+	default:
+		return 0xff;
+	}
+}
+
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+
+/* GTIA calls it on write to PRIOR */
+void ANTIC_SetPrior(UBYTE byte)
+{
+	if ((byte ^ GTIA_PRIOR) & 0x0f) {
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+		UBYTE col = 0;
+		UBYTE col2 = 0;
+		UBYTE hi;
+		UBYTE hi2;
+		if ((byte & 3) == 0) {
+			col = GTIA_COLPF0;
+			col2 = GTIA_COLPF1;
+		}
+		if ((byte & 0xc) == 0) {
+			ANTIC_cl[C_PF0 | C_PM0] = colour_translation_table[col | GTIA_COLPM0];
+			ANTIC_cl[C_PF0 | C_PM1] = colour_translation_table[col | GTIA_COLPM1];
+			ANTIC_cl[C_PF0 | C_PM01] = colour_translation_table[col | GTIA_COLPM0 | GTIA_COLPM1];
+			ANTIC_cl[C_PF1 | C_PM0] = colour_translation_table[col2 | GTIA_COLPM0];
+			ANTIC_cl[C_PF1 | C_PM1] = colour_translation_table[col2 | GTIA_COLPM1];
+			ANTIC_cl[C_PF1 | C_PM01] = colour_translation_table[col2 | GTIA_COLPM0 | GTIA_COLPM1];
+		}
+		else {
+			ANTIC_cl[C_PF0 | C_PM01] = ANTIC_cl[C_PF0 | C_PM1] = ANTIC_cl[C_PF0 | C_PM0] = colour_translation_table[col];
+			ANTIC_cl[C_PF1 | C_PM01] = ANTIC_cl[C_PF1 | C_PM1] = ANTIC_cl[C_PF1 | C_PM0] = colour_translation_table[col2];
+		}
+		if (byte & 4) {
+			ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PF2 | C_PM1] = ANTIC_cl[C_PF2 | C_PM0] = ANTIC_cl[C_PF2];
+			ANTIC_cl[C_PF3 | C_PM01] = ANTIC_cl[C_PF3 | C_PM1] = ANTIC_cl[C_PF3 | C_PM0] = ANTIC_cl[C_PF3];
+			ANTIC_cl[C_HI2 | C_PM01] = ANTIC_cl[C_HI2 | C_PM1] = ANTIC_cl[C_HI2 | C_PM0] = ANTIC_cl[C_HI2];
+		}
+		else {
+			ANTIC_cl[C_PF3 | C_PM0] = ANTIC_cl[C_PF2 | C_PM0] = ANTIC_cl[C_PM0];
+			ANTIC_cl[C_PF3 | C_PM1] = ANTIC_cl[C_PF2 | C_PM1] = ANTIC_cl[C_PM1];
+			ANTIC_cl[C_PF3 | C_PM01] = ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PM01];
+			ANTIC_cl[C_HI2 | C_PM0] = colour_translation_table[(GTIA_COLPM0 & 0xf0) | (GTIA_COLPF1 & 0xf)];
+			ANTIC_cl[C_HI2 | C_PM1] = colour_translation_table[(GTIA_COLPM1 & 0xf0) | (GTIA_COLPF1 & 0xf)];
+			ANTIC_cl[C_HI2 | C_PM01] = colour_translation_table[((GTIA_COLPM0 | GTIA_COLPM1) & 0xf0) | (GTIA_COLPF1 & 0xf)];
+		}
+		col = col2 = 0;
+		hi = hi2 = GTIA_COLPF1 & 0xf;
+		ANTIC_cl[C_BLACK - C_PF2 + C_HI2] = colour_translation_table[hi];
+		if ((byte & 9) == 0) {
+			col = GTIA_COLPF2;
+			col2 = GTIA_COLPF3;
+			hi |= col & 0xf0;
+			hi2 |= col2 & 0xf0;
+		}
+		if ((byte & 6) == 0) {
+			ANTIC_cl[C_PF2 | C_PM2] = colour_translation_table[col | GTIA_COLPM2];
+			ANTIC_cl[C_PF2 | C_PM3] = colour_translation_table[col | GTIA_COLPM3];
+			ANTIC_cl[C_PF2 | C_PM23] = colour_translation_table[col | GTIA_COLPM2 | GTIA_COLPM3];
+			ANTIC_cl[C_PF3 | C_PM2] = colour_translation_table[col2 | GTIA_COLPM2];
+			ANTIC_cl[C_PF3 | C_PM3] = colour_translation_table[col2 | GTIA_COLPM3];
+			ANTIC_cl[C_PF3 | C_PM23] = colour_translation_table[col2 | GTIA_COLPM2 | GTIA_COLPM3];
+			ANTIC_cl[C_HI2 | C_PM2] = colour_translation_table[hi | (GTIA_COLPM2 & 0xf0)];
+			ANTIC_cl[C_HI2 | C_PM3] = colour_translation_table[hi | (GTIA_COLPM3 & 0xf0)];
+			ANTIC_cl[C_HI2 | C_PM23] = colour_translation_table[hi | ((GTIA_COLPM2 | GTIA_COLPM3) & 0xf0)];
+			ANTIC_cl[C_HI2 | C_PM25] = colour_translation_table[hi2 | (GTIA_COLPM2 & 0xf0)];
+			ANTIC_cl[C_HI2 | C_PM35] = colour_translation_table[hi2 | (GTIA_COLPM3 & 0xf0)];
+			ANTIC_cl[C_HI2 | C_PM235] = colour_translation_table[hi2 | ((GTIA_COLPM2 | GTIA_COLPM3) & 0xf0)];
+		}
+		else {
+			ANTIC_cl[C_PF2 | C_PM23] = ANTIC_cl[C_PF2 | C_PM3] = ANTIC_cl[C_PF2 | C_PM2] = colour_translation_table[col];
+			ANTIC_cl[C_PF3 | C_PM23] = ANTIC_cl[C_PF3 | C_PM3] = ANTIC_cl[C_PF3 | C_PM2] = colour_translation_table[col2];
+			ANTIC_cl[C_HI2 | C_PM23] = ANTIC_cl[C_HI2 | C_PM3] = ANTIC_cl[C_HI2 | C_PM2] = colour_translation_table[hi];
+		}
+#else /* USE_COLOUR_TRANSLATION_TABLE */
+		UWORD cword = 0;
+		UWORD cword2 = 0;
+		if ((byte & 3) == 0) {
+			cword = ANTIC_cl[C_PF0];
+			cword2 = ANTIC_cl[C_PF1];
+		}
+		if ((byte & 0xc) == 0) {
+			ANTIC_cl[C_PF0 | C_PM0] = cword | ANTIC_cl[C_PM0];
+			ANTIC_cl[C_PF0 | C_PM1] = cword | ANTIC_cl[C_PM1];
+			ANTIC_cl[C_PF0 | C_PM01] = cword | ANTIC_cl[C_PM01];
+			ANTIC_cl[C_PF1 | C_PM0] = cword2 | ANTIC_cl[C_PM0];
+			ANTIC_cl[C_PF1 | C_PM1] = cword2 | ANTIC_cl[C_PM1];
+			ANTIC_cl[C_PF1 | C_PM01] = cword2 | ANTIC_cl[C_PM01];
+		}
+		else {
+			ANTIC_cl[C_PF0 | C_PM01] = ANTIC_cl[C_PF0 | C_PM1] = ANTIC_cl[C_PF0 | C_PM0] = cword;
+			ANTIC_cl[C_PF1 | C_PM01] = ANTIC_cl[C_PF1 | C_PM1] = ANTIC_cl[C_PF1 | C_PM0] = cword2;
+		}
+		if (byte & 4) {
+			ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PF2 | C_PM1] = ANTIC_cl[C_PF2 | C_PM0] = ANTIC_cl[C_PF2];
+			ANTIC_cl[C_PF3 | C_PM01] = ANTIC_cl[C_PF3 | C_PM1] = ANTIC_cl[C_PF3 | C_PM0] = ANTIC_cl[C_PF3];
+		}
+		else {
+			ANTIC_cl[C_PF3 | C_PM0] = ANTIC_cl[C_PF2 | C_PM0] = ANTIC_cl[C_PM0];
+			ANTIC_cl[C_PF3 | C_PM1] = ANTIC_cl[C_PF2 | C_PM1] = ANTIC_cl[C_PM1];
+			ANTIC_cl[C_PF3 | C_PM01] = ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PM01];
+		}
+		cword = cword2 = 0;
+		if ((byte & 9) == 0) {
+			cword = ANTIC_cl[C_PF2];
+			cword2 = ANTIC_cl[C_PF3];
+		}
+		if ((byte & 6) == 0) {
+			ANTIC_cl[C_PF2 | C_PM2] = cword | ANTIC_cl[C_PM2];
+			ANTIC_cl[C_PF2 | C_PM3] = cword | ANTIC_cl[C_PM3];
+			ANTIC_cl[C_PF2 | C_PM23] = cword | ANTIC_cl[C_PM23];
+			ANTIC_cl[C_PF3 | C_PM2] = cword2 | ANTIC_cl[C_PM2];
+			ANTIC_cl[C_PF3 | C_PM3] = cword2 | ANTIC_cl[C_PM3];
+			ANTIC_cl[C_PF3 | C_PM23] = cword2 | ANTIC_cl[C_PM23];
+		}
+		else {
+			ANTIC_cl[C_PF2 | C_PM23] = ANTIC_cl[C_PF2 | C_PM3] = ANTIC_cl[C_PF2 | C_PM2] = cword;
+			ANTIC_cl[C_PF3 | C_PM23] = ANTIC_cl[C_PF3 | C_PM3] = ANTIC_cl[C_PF3 | C_PM2] = cword2;
+		}
+#endif /* USE_COLOUR_TRANSLATION_TABLE */
+		if (byte & 1) {
+			ANTIC_cl[C_PF1 | C_PM2] = ANTIC_cl[C_PF0 | C_PM2] = ANTIC_cl[C_PM2];
+			ANTIC_cl[C_PF1 | C_PM3] = ANTIC_cl[C_PF0 | C_PM3] = ANTIC_cl[C_PM3];
+			ANTIC_cl[C_PF1 | C_PM23] = ANTIC_cl[C_PF0 | C_PM23] = ANTIC_cl[C_PM23];
+		}
+		else {
+			ANTIC_cl[C_PF0 | C_PM23] = ANTIC_cl[C_PF0 | C_PM3] = ANTIC_cl[C_PF0 | C_PM2] = ANTIC_cl[C_PF0];
+			ANTIC_cl[C_PF1 | C_PM23] = ANTIC_cl[C_PF1 | C_PM3] = ANTIC_cl[C_PF1 | C_PM2] = ANTIC_cl[C_PF1];
+		}
+		if ((byte & 0xf) == 0xc) {
+			ANTIC_cl[C_PF0 | C_PM0123] = ANTIC_cl[C_PF0 | C_PM123] = ANTIC_cl[C_PF0 | C_PM023] = ANTIC_cl[C_PF0];
+			ANTIC_cl[C_PF1 | C_PM0123] = ANTIC_cl[C_PF1 | C_PM123] = ANTIC_cl[C_PF1 | C_PM023] = ANTIC_cl[C_PF1];
+		}
+		else
+			ANTIC_cl[C_PF0 | C_PM0123] = ANTIC_cl[C_PF0 | C_PM123] = ANTIC_cl[C_PF0 | C_PM023] =
+			ANTIC_cl[C_PF1 | C_PM0123] = ANTIC_cl[C_PF1 | C_PM123] = ANTIC_cl[C_PF1 | C_PM023] = GTIA_COLOUR_BLACK;
+		if (byte & 0xf) {
+			ANTIC_cl[C_PF0 | C_PM25] = ANTIC_cl[C_PF0];
+			ANTIC_cl[C_PF1 | C_PM25] = ANTIC_cl[C_PF1];
+			ANTIC_cl[C_PF3 | C_PM25] = ANTIC_cl[C_PF2 | C_PM25] = ANTIC_cl[C_PM25] = GTIA_COLOUR_BLACK;
+		}
+		else {
+			ANTIC_cl[C_PF0 | C_PM235] = ANTIC_cl[C_PF0 | C_PM35] = ANTIC_cl[C_PF0 | C_PM25] =
+			ANTIC_cl[C_PF1 | C_PM235] = ANTIC_cl[C_PF1 | C_PM35] = ANTIC_cl[C_PF1 | C_PM25] = ANTIC_cl[C_PF3];
+			ANTIC_cl[C_PF3 | C_PM25] = ANTIC_cl[C_PF2 | C_PM25] = ANTIC_cl[C_PM25] = ANTIC_cl[C_PF3 | C_PM2];
+			ANTIC_cl[C_PF3 | C_PM35] = ANTIC_cl[C_PF2 | C_PM35] = ANTIC_cl[C_PM35] = ANTIC_cl[C_PF3 | C_PM3];
+			ANTIC_cl[C_PF3 | C_PM235] = ANTIC_cl[C_PF2 | C_PM235] = ANTIC_cl[C_PM235] = ANTIC_cl[C_PF3 | C_PM23];
+		}
+	}
+	pm_lookup_ptr = pm_lookup_table[prior_to_pm_lookup[byte & 0x3f]];
+	draw_antic_0_ptr = byte < 0x80 ? draw_antic_0 : byte < 0xc0 ? draw_antic_0_gtia10 : draw_antic_0_gtia11;
+	if (byte < 0x40 && (GTIA_PRIOR >= 0x40 || gtia_bug_active) && (anticmode == 2 || anticmode == 3 || anticmode == 0xf) && ANTIC_XPOS >= ((ANTIC_DMACTL & 3) == 3 ? 16 : 18)) {
+		/* A GTIA Mode was active, and no longer is.  An ANTIC hi-res mode is being used. GTIA is no longer set in hi-res mode */
+		if (anticmode == 2 || anticmode == 3) draw_antic_ptr = draw_antic_2_gtia_bug;
+		else if (anticmode == 0xf) draw_antic_ptr = draw_antic_f_gtia_bug;
+		gtia_bug_active = TRUE;
+	}
+	else
+		draw_antic_ptr = draw_antic_table[byte >> 6][anticmode];
+}
+
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+void ANTIC_PutByte(UWORD addr, UBYTE byte)
+{
+	switch (addr & 0xf) {
+	case ANTIC_OFFSET_DLISTL:
+		ANTIC_dlist = (ANTIC_dlist & 0xff00) | byte;
+		break;
+	case ANTIC_OFFSET_DLISTH:
+		ANTIC_dlist = (ANTIC_dlist & 0x00ff) | (byte << 8);
+		break;
+	case ANTIC_OFFSET_DMACTL:
+/* TODO: make this truly cycle-exact, update cpu2antic and antic2cpu,
+add support for wider->narrow glitches including the interesting mode 6
+glitch */
+#ifdef NEW_CYCLE_EXACT
+		dmactl_changed=0;
+		/* has DMACTL width changed?  */
+		if ((byte & 3) != (ANTIC_DMACTL & 3) ){
+			/* DMACTL width changed from 0 */
+			if ((ANTIC_DMACTL & 3) == 0) {
+				int glitch_cycle = (3 + 32) - 8*(byte & 3);
+				int x = ANTIC_XPOS;
+				if((IR & 0x10) && ((byte & 3) != 3)){
+					/*adjust for narrow or std HSCROL*/
+				       	glitch_cycle -= 8;
+				}
+				/*ANTIC doesn't fetch and display data if the*/
+				/*DMACTL width changes from zero after this */
+				/*cycle.  Instead, it displays a blank scan */
+				/*line for modes other than 23F and for 23F */
+				/*it displays a glitched line after the change*/
+				if(x >= glitch_cycle){
+					if(ANTIC_DRAWING_SCREEN){
+						ANTIC_UpdateScanline();
+					        set_dmactl_bug();
+					}
+				}
+				else {
+					if (ANTIC_DRAWING_SCREEN) {
+						ANTIC_UpdateScanline();
+					}
+				}
+			}
+			/* DMACTL width changed to 0 */
+			else if ((byte & 3)==0)  {
+				/* TODO: this is not 100% correct */
+				if (ANTIC_DRAWING_SCREEN) {
+					int actual_xpos = ANTIC_cpu2antic_ptr[ANTIC_xpos];
+					int antic_limit = ANTIC_cpu2antic_ptr[ANTIC_xpos_limit];
+					ANTIC_UpdateScanline();
+					/*fix for a minor glitch in fasteddie*/
+					/*don't steal cycles after DMACTL off*/
+					ANTIC_cpu2antic_ptr = &CYCLE_MAP_cpu2antic[0];
+					ANTIC_antic2cpu_ptr = &CYCLE_MAP_antic2cpu[0];
+					ANTIC_xpos = ANTIC_antic2cpu_ptr[actual_xpos];
+					ANTIC_xpos_limit = ANTIC_antic2cpu_ptr[antic_limit];
+				}
+			/* DMACTL width has changed and not to 0 and not from 0 */
+			}
+			else {
+				/* DMACTL width has increased and no HSCROL */
+				if (((byte & 3) > (ANTIC_DMACTL & 3)) && !(IR & 0x10)) {
+					int x; /* the change cycle */
+					int left_glitch_cycle = 0;
+					int right_glitch_cycle = 0;
+					x = ANTIC_XPOS;
+					if (((ANTIC_DMACTL & 3) == 2) && ((byte & 3) == 3)) { /* Normal->Wide */
+						left_glitch_cycle = 11;
+						right_glitch_cycle = 18;
+					}
+					else if (((ANTIC_DMACTL & 3) == 1) && ((byte & 3) == 3)) { /* Narrow->Wide */
+						left_glitch_cycle = 11;
+						right_glitch_cycle = 26;
+					}
+					else if (((ANTIC_DMACTL & 3) == 1) && ((byte & 3) == 2)) { /* Narrow->Normal */
+						left_glitch_cycle = 19;
+						right_glitch_cycle = 27;
+					}
+					/* change occurs during drawing of line */
+					/* delay change till next line */
+					if (x > right_glitch_cycle) {
+						dmactl_changed = 1;
+						delayed_DMACTL = byte;
+						break;
+					/* change occurs during 'glitch' region */
+					}
+					else if (x >= left_glitch_cycle && x <= right_glitch_cycle && anticmode > 1) {
+						set_dmactl_bug();
+					}
+				}
+				else {
+					/* DMACTL width has decreased or HSCROL */
+					/* TODO: this is not 100% correct */
+					if (ANTIC_DRAWING_SCREEN) {
+						ANTIC_UpdateScanline();
+					}
+				}
+			}
+		}
+#endif /* NEW_CYCLE_EXACT */
+		ANTIC_DMACTL = byte;
+#if defined(BASIC) || defined(CURSES_BASIC)
+		break;
+#else
+		switch (byte & 0x03) {
+		case 0x00:
+			/* no antic_load when screen off */
+			/* chars_read[NORMAL0] = 0;
+			chars_read[NORMAL1] = 0;
+			chars_read[NORMAL2] = 0;
+			chars_read[SCROLL0] = 0;
+			chars_read[SCROLL1] = 0;
+			chars_read[SCROLL2] = 0; */
+			/* no draw_antic_* when screen off */
+			/* chars_displayed[NORMAL0] = 0;
+			chars_displayed[NORMAL1] = 0;
+			chars_displayed[NORMAL2] = 0;
+			chars_displayed[SCROLL0] = 0;
+			chars_displayed[SCROLL1] = 0;
+			chars_displayed[SCROLL2] = 0;
+			x_min[NORMAL0] = 0;
+			x_min[NORMAL1] = 0;
+			x_min[NORMAL2] = 0;
+			x_min[SCROLL0] = 0;
+			x_min[SCROLL1] = 0;
+			x_min[SCROLL2] = 0;
+			ch_offset[NORMAL0] = 0;
+			ch_offset[NORMAL1] = 0;
+			ch_offset[NORMAL2] = 0;
+			ch_offset[SCROLL0] = 0;
+			ch_offset[SCROLL1] = 0;
+			ch_offset[SCROLL2] = 0; */
+			/* no borders when screen off, only background */
+			/* left_border_chars = 48 - LCHOP - RCHOP;
+			right_border_start = 0; */
+			break;
+		case 0x01:
+			chars_read[NORMAL0] = 32;
+			chars_read[NORMAL1] = 16;
+			chars_read[NORMAL2] = 8;
+			chars_read[SCROLL0] = 40;
+			chars_read[SCROLL1] = 20;
+			chars_read[SCROLL2] = 10;
+			chars_displayed[NORMAL0] = 32;
+			chars_displayed[NORMAL1] = 16;
+			chars_displayed[NORMAL2] = 8;
+			x_min[NORMAL0] = 32;
+			x_min[NORMAL1] = 32;
+			x_min[NORMAL2] = 32;
+			ch_offset[NORMAL0] = 0;
+			ch_offset[NORMAL1] = 0;
+			ch_offset[NORMAL2] = 0;
+			font_cycles[NORMAL0] = load_cycles[NORMAL0] = 32;
+			font_cycles[NORMAL1] = load_cycles[NORMAL1] = 16;
+			load_cycles[NORMAL2] = 8;
+			before_cycles[NORMAL0] = BEFORE_CYCLES;
+			before_cycles[SCROLL0] = BEFORE_CYCLES + 8;
+			extra_cycles[NORMAL0] = 7 + BEFORE_CYCLES;
+			extra_cycles[SCROLL0] = 8 + BEFORE_CYCLES + 8;
+			left_border_chars = 8 - LCHOP;
+			right_border_start = (Screen_WIDTH - 64) / 2;
+			break;
+		case 0x02:
+			chars_read[NORMAL0] = 40;
+			chars_read[NORMAL1] = 20;
+			chars_read[NORMAL2] = 10;
+			chars_read[SCROLL0] = 48;
+			chars_read[SCROLL1] = 24;
+			chars_read[SCROLL2] = 12;
+			chars_displayed[NORMAL0] = 40;
+			chars_displayed[NORMAL1] = 20;
+			chars_displayed[NORMAL2] = 10;
+			x_min[NORMAL0] = 16;
+			x_min[NORMAL1] = 16;
+			x_min[NORMAL2] = 16;
+			ch_offset[NORMAL0] = 0;
+			ch_offset[NORMAL1] = 0;
+			ch_offset[NORMAL2] = 0;
+			font_cycles[NORMAL0] = load_cycles[NORMAL0] = 40;
+			font_cycles[NORMAL1] = load_cycles[NORMAL1] = 20;
+			load_cycles[NORMAL2] = 10;
+			before_cycles[NORMAL0] = BEFORE_CYCLES + 8;
+			before_cycles[SCROLL0] = BEFORE_CYCLES + 16;
+			extra_cycles[NORMAL0] = 8 + BEFORE_CYCLES + 8;
+			extra_cycles[SCROLL0] = 7 + BEFORE_CYCLES + 16;
+			left_border_chars = 4 - LCHOP;
+			right_border_start = (Screen_WIDTH - 32) / 2;
+			break;
+		case 0x03:
+			chars_read[NORMAL0] = 48;
+			chars_read[NORMAL1] = 24;
+			chars_read[NORMAL2] = 12;
+			chars_read[SCROLL0] = 48;
+			chars_read[SCROLL1] = 24;
+			chars_read[SCROLL2] = 12;
+			chars_displayed[NORMAL0] = 42;
+			chars_displayed[NORMAL1] = 22;
+			chars_displayed[NORMAL2] = 12;
+			x_min[NORMAL0] = 12;
+			x_min[NORMAL1] = 8;
+			x_min[NORMAL2] = 0;
+			ch_offset[NORMAL0] = 3;
+			ch_offset[NORMAL1] = 1;
+			ch_offset[NORMAL2] = 0;
+			font_cycles[NORMAL0] = load_cycles[NORMAL0] = 47;
+			font_cycles[NORMAL1] = load_cycles[NORMAL1] = 24;
+			load_cycles[NORMAL2] = 12;
+			before_cycles[NORMAL0] = BEFORE_CYCLES + 16;
+			before_cycles[SCROLL0] = BEFORE_CYCLES + 16;
+			extra_cycles[NORMAL0] = 7 + BEFORE_CYCLES + 16;
+			extra_cycles[SCROLL0] = 7 + BEFORE_CYCLES + 16;
+			left_border_chars = 3 - LCHOP;
+			right_border_start = (Screen_WIDTH - 8) / 2;
+			break;
+		}
+
+		ANTIC_missile_dma_enabled = (byte & 0x0c);	/* no player dma without missile */
+		ANTIC_player_dma_enabled = (byte & 0x08);
+		singleline = (byte & 0x10);
+		ANTIC_player_flickering = ((ANTIC_player_dma_enabled | ANTIC_player_gra_enabled) == 0x02);
+		ANTIC_missile_flickering = ((ANTIC_missile_dma_enabled | ANTIC_missile_gra_enabled) == 0x01);
+
+		byte = ANTIC_HSCROL;	/* update horizontal scroll data */
+/* ******* FALLTHROUGH ******* */
+	case ANTIC_OFFSET_HSCROL:
+/* TODO: make this truely cycle exact, and update cpu2antic and antic2cpu */
+#ifdef NEW_CYCLE_EXACT
+		if (ANTIC_DRAWING_SCREEN) {
+			ANTIC_UpdateScanline();
+		}
+#endif
+		ANTIC_HSCROL = byte &= 0x0f;
+		if (ANTIC_DMACTL & 3) {
+			chars_displayed[SCROLL0] = chars_displayed[NORMAL0];
+			ch_offset[SCROLL0] = 4 - (byte >> 2);
+			x_min[SCROLL0] = x_min[NORMAL0];
+			if (byte & 3) {
+				x_min[SCROLL0] += (byte & 3) - 4;
+				chars_displayed[SCROLL0]++;
+				ch_offset[SCROLL0]--;
+			}
+			chars_displayed[SCROLL2] = chars_displayed[NORMAL2];
+			if ((ANTIC_DMACTL & 3) == 3) {	/* wide playfield */
+				ch_offset[SCROLL0]--;
+				if (byte == 4 || byte == 12)
+					chars_displayed[SCROLL1] = 21;
+				else
+					chars_displayed[SCROLL1] = 22;
+				if (byte <= 4) {
+					x_min[SCROLL1] = byte + 8;
+					ch_offset[SCROLL1] = 1;
+				}
+				else if (byte <= 12) {
+					x_min[SCROLL1] = byte;
+					ch_offset[SCROLL1] = 0;
+				}
+				else {
+					x_min[SCROLL1] = byte - 8;
+					ch_offset[SCROLL1] = -1;
+				}
+				/* technically, the part below is wrong */
+				/* scrolling in mode 8,9 with HSCROL=13,14,15 */
+				/* will set x_min=13,14,15 > 4*LCHOP = 12 */
+				/* so that nothing is drawn on the far left side */
+				/* of the screen.  We could fix this, but only */
+				/* by setting x_min to be negative. */
+				x_min[SCROLL2] = byte;
+				ch_offset[SCROLL2] = 0;
+			}
+			else {
+				chars_displayed[SCROLL1] = chars_displayed[NORMAL1];
+				ch_offset[SCROLL1] = 2 - (byte >> 3);
+				x_min[SCROLL1] = x_min[NORMAL0];
+				if (byte) {
+					if (byte & 7) {
+						x_min[SCROLL1] += (byte & 7) - 8;
+						chars_displayed[SCROLL1]++;
+						ch_offset[SCROLL1]--;
+					}
+					x_min[SCROLL2] = x_min[NORMAL2] + byte - 16;
+					chars_displayed[SCROLL2]++;
+					ch_offset[SCROLL2] = 0;
+				}
+				else {
+					x_min[SCROLL2] = x_min[NORMAL2];
+					ch_offset[SCROLL2] = 1;
+				}
+			}
+
+			if (ANTIC_DMACTL & 2) {		/* normal & wide playfield */
+				load_cycles[SCROLL0] = 47 - (byte >> 2);
+				font_cycles[SCROLL0] = (47 * 4 + 1 - byte) >> 2;
+				load_cycles[SCROLL1] = (24 * 8 + 3 - byte) >> 3;
+				font_cycles[SCROLL1] = (24 * 8 + 1 - byte) >> 3;
+				load_cycles[SCROLL2] = byte < 0xc ? 12 : 11;
+			}
+			else {					/* narrow playfield */
+				font_cycles[SCROLL0] = load_cycles[SCROLL0] = 40;
+				font_cycles[SCROLL1] = load_cycles[SCROLL1] = 20;
+				load_cycles[SCROLL2] = 16;
+			}
+		}
+		break;
+	case ANTIC_OFFSET_VSCROL:
+		ANTIC_VSCROL = byte & 0x0f;
+		if (vscrol_off) {
+			lastline = ANTIC_VSCROL;
+			if (ANTIC_XPOS < VSCOF_C)
+				need_dl = dctr == lastline;
+		}
+		break;
+	case ANTIC_OFFSET_PMBASE:
+		ANTIC_PMBASE = byte;
+		pmbase_d = (byte & 0xfc) << 8;
+		pmbase_s = pmbase_d & 0xf8ff;
+		break;
+	case ANTIC_OFFSET_CHACTL:
+#ifdef NEW_CYCLE_EXACT
+		if (ANTIC_DRAWING_SCREEN) {
+			update_scanline_invert();
+		}
+#endif
+		invert_mask = byte & 2 ? 0x80 : 0;
+#ifdef NEW_CYCLE_EXACT
+		if (ANTIC_DRAWING_SCREEN) {
+			update_scanline_blank();
+		}
+#endif
+		blank_mask = byte & 1 ? 0xe0 : 0x60;
+		if ((ANTIC_CHACTL ^ byte) & 4) {
+#ifdef NEW_CYCLE_EXACT
+			if (ANTIC_DRAWING_SCREEN) {
+				/* timing for flip is the same as chbase */
+				update_scanline_chbase();
+			}
+#endif
+			chbase_20 ^= 7;
+		}
+		ANTIC_CHACTL = byte;
+		break;
+	case ANTIC_OFFSET_CHBASE:
+#ifdef NEW_CYCLE_EXACT
+		if (ANTIC_DRAWING_SCREEN) {
+			update_scanline_chbase();
+		}
+#endif
+		ANTIC_CHBASE = byte;
+		chbase_20 = (byte & 0xfe) << 8;
+		if (ANTIC_CHACTL & 4)
+			chbase_20 ^= 7;
+		break;
+#endif /* defined(BASIC) || defined(CURSES_BASIC) */
+	case ANTIC_OFFSET_WSYNC:
+#ifdef NEW_CYCLE_EXACT
+		if (ANTIC_DRAWING_SCREEN) {
+			if (ANTIC_xpos <= ANTIC_antic2cpu_ptr[ANTIC_WSYNC_C] && ANTIC_xpos_limit >= ANTIC_antic2cpu_ptr[ANTIC_WSYNC_C])
+				if (ANTIC_cpu2antic_ptr[ANTIC_xpos + 1] == ANTIC_cpu2antic_ptr[ANTIC_xpos] + 1) {
+					/* antic does not steal the current cycle */
+/* note that if ANTIC_WSYNC_C is a stolen cycle, then ANTIC_antic2cpu_ptr[ANTIC_WSYNC_C+1]-1 corresponds
+to the last cpu cycle < ANTIC_WSYNC_C.  Then the cpu will see this cycle if WSYNC
+is not delayed, since it really occurred one cycle after the STA WSYNC.  But if
+WSYNC is "delayed" then ANTIC_xpos is the next cpu cycle after ANTIC_WSYNC_C (which was stolen
+), so it is one greater than the above value.  EG if ANTIC_WSYNC_C=10 and is stolen
+(and let us say cycle 9,11 are also stolen, and 8,12 are not), then in the first
+case we have ANTIC_cpu2antic_ptr[ANTIC_WSYNC_C+1]-1 = 8 and in the 2nd =12  */
+					ANTIC_xpos = ANTIC_antic2cpu_ptr[ANTIC_WSYNC_C + 1] - 1;
+				}
+				else {
+					ANTIC_xpos = ANTIC_antic2cpu_ptr[ANTIC_WSYNC_C + 1];
+				}
+			else {
+				ANTIC_wsync_halt = TRUE;
+				ANTIC_xpos = ANTIC_xpos_limit;
+				if (ANTIC_cpu2antic_ptr[ANTIC_xpos + 1] == ANTIC_cpu2antic_ptr[ANTIC_xpos] + 1) {
+					/* antic does not steal the current cycle */
+					ANTIC_delayed_wsync = 0;
+				}
+				else {
+					ANTIC_delayed_wsync = 1;
+				}
+			}
+		}
+		else {
+			ANTIC_delayed_wsync = 0;
+#endif /* NEW_CYCLE_EXACT */
+			if (ANTIC_xpos <= ANTIC_WSYNC_C && ANTIC_xpos_limit >= ANTIC_WSYNC_C)
+				ANTIC_xpos = ANTIC_WSYNC_C;
+			else {
+				ANTIC_wsync_halt = TRUE;
+				ANTIC_xpos = ANTIC_xpos_limit;
+			}
+#ifdef NEW_CYCLE_EXACT
+		}
+#endif /* NEW_CYCLE_EXACT */
+		break;
+	case ANTIC_OFFSET_NMIEN:
+		ANTIC_NMIEN = byte;
+		break;
+	case ANTIC_OFFSET_NMIRES:
+		ANTIC_NMIST = 0x1f;
+		break;
+	default:
+		break;
+	}
+}
+
+/* State ------------------------------------------------------------------- */
+
+#ifndef BASIC
+
+void ANTIC_StateSave(void)
+{
+	StateSav_SaveUBYTE(&ANTIC_DMACTL, 1);
+	StateSav_SaveUBYTE(&ANTIC_CHACTL, 1);
+	StateSav_SaveUBYTE(&ANTIC_HSCROL, 1);
+	StateSav_SaveUBYTE(&ANTIC_VSCROL, 1);
+	StateSav_SaveUBYTE(&ANTIC_PMBASE, 1);
+	StateSav_SaveUBYTE(&ANTIC_CHBASE, 1);
+	StateSav_SaveUBYTE(&ANTIC_NMIEN, 1);
+	StateSav_SaveUBYTE(&ANTIC_NMIST, 1);
+	StateSav_SaveUBYTE(&IR, 1);
+	StateSav_SaveUBYTE(&anticmode, 1);
+	StateSav_SaveUBYTE(&dctr, 1);
+	StateSav_SaveUBYTE(&lastline, 1);
+	StateSav_SaveUBYTE(&need_dl, 1);
+	StateSav_SaveUBYTE(&vscrol_off, 1);
+
+	StateSav_SaveUWORD(&ANTIC_dlist, 1);
+	StateSav_SaveUWORD(&screenaddr, 1);
+
+	StateSav_SaveINT(&ANTIC_xpos, 1);
+	StateSav_SaveINT(&ANTIC_xpos_limit, 1);
+	StateSav_SaveINT(&ANTIC_ypos, 1);
+}
+
+void ANTIC_StateRead(void)
+{
+	StateSav_ReadUBYTE(&ANTIC_DMACTL, 1);
+	StateSav_ReadUBYTE(&ANTIC_CHACTL, 1);
+	StateSav_ReadUBYTE(&ANTIC_HSCROL, 1);
+	StateSav_ReadUBYTE(&ANTIC_VSCROL, 1);
+	StateSav_ReadUBYTE(&ANTIC_PMBASE, 1);
+	StateSav_ReadUBYTE(&ANTIC_CHBASE, 1);
+	StateSav_ReadUBYTE(&ANTIC_NMIEN, 1);
+	StateSav_ReadUBYTE(&ANTIC_NMIST, 1);
+	StateSav_ReadUBYTE(&IR, 1);
+	StateSav_ReadUBYTE(&anticmode, 1);
+	StateSav_ReadUBYTE(&dctr, 1);
+	StateSav_ReadUBYTE(&lastline, 1);
+	StateSav_ReadUBYTE(&need_dl, 1);
+	StateSav_ReadUBYTE(&vscrol_off, 1);
+
+	StateSav_ReadUWORD(&ANTIC_dlist, 1);
+	StateSav_ReadUWORD(&screenaddr, 1);
+
+	StateSav_ReadINT(&ANTIC_xpos, 1);
+	StateSav_ReadINT(&ANTIC_xpos_limit, 1);
+	StateSav_ReadINT(&ANTIC_ypos, 1);
+
+	ANTIC_PutByte(ANTIC_OFFSET_DMACTL, ANTIC_DMACTL);
+	ANTIC_PutByte(ANTIC_OFFSET_CHACTL, ANTIC_CHACTL);
+	ANTIC_PutByte(ANTIC_OFFSET_PMBASE, ANTIC_PMBASE);
+	ANTIC_PutByte(ANTIC_OFFSET_CHBASE, ANTIC_CHBASE);
+}
+
+#endif /* BASIC */
diff --git a/project/jni/application/atari800/src/antic.h b/project/jni/application/atari800/src/antic.h
new file mode 100644
index 000000000..07e07641e
--- /dev/null
+++ b/project/jni/application/atari800/src/antic.h
@@ -0,0 +1,137 @@
+#ifndef ANTIC_H_
+#define ANTIC_H_
+
+#include "atari.h"
+
+/*
+ * Offset to registers in custom relative to start of antic memory addresses.
+ */
+
+#define ANTIC_OFFSET_DMACTL 0x00
+#define ANTIC_OFFSET_CHACTL 0x01
+#define ANTIC_OFFSET_DLISTL 0x02
+#define ANTIC_OFFSET_DLISTH 0x03
+#define ANTIC_OFFSET_HSCROL 0x04
+#define ANTIC_OFFSET_VSCROL 0x05
+#define ANTIC_OFFSET_PMBASE 0x07
+#define ANTIC_OFFSET_CHBASE 0x09
+#define ANTIC_OFFSET_WSYNC 0x0a
+#define ANTIC_OFFSET_VCOUNT 0x0b
+#define ANTIC_OFFSET_PENH 0x0c
+#define ANTIC_OFFSET_PENV 0x0d
+#define ANTIC_OFFSET_NMIEN 0x0e
+#define ANTIC_OFFSET_NMIRES 0x0f
+#define ANTIC_OFFSET_NMIST 0x0f
+
+extern UBYTE ANTIC_CHACTL;
+extern UBYTE ANTIC_CHBASE;
+extern UWORD ANTIC_dlist;
+extern UBYTE ANTIC_DMACTL;
+extern UBYTE ANTIC_HSCROL;
+extern UBYTE ANTIC_NMIEN;
+extern UBYTE ANTIC_NMIST;
+extern UBYTE ANTIC_PMBASE;
+extern UBYTE ANTIC_VSCROL;
+
+extern int ANTIC_break_ypos;
+extern int ANTIC_ypos;
+extern int ANTIC_wsync_halt;
+
+/* Current clock cycle in a scanline.
+   Normally 0 <= ANTIC_xpos && ANTIC_xpos < ANTIC_LINE_C, but in some cases ANTIC_xpos >= ANTIC_LINE_C,
+   which means that we are already in line (ypos + 1). */
+extern int ANTIC_xpos;
+
+/* ANTIC_xpos limit for the currently running 6502 emulation. */
+extern int ANTIC_xpos_limit;
+
+/* Main clock value at the beginning of the current scanline. */
+extern unsigned int ANTIC_screenline_cpu_clock;
+
+/* Current main clock value. */
+#define ANTIC_CPU_CLOCK (ANTIC_screenline_cpu_clock + ANTIC_xpos)
+
+#define ANTIC_NMIST_C	6
+#define ANTIC_NMI_C	12
+
+/* Number of cycles per scanline. */
+#define ANTIC_LINE_C   114
+
+/* STA WSYNC resumes here. */
+#define ANTIC_WSYNC_C  106
+
+/* Number of memory refresh cycles per scanline.
+   In the first scanline of a font mode there are actually less than ANTIC_DMAR
+   memory refresh cycles. */
+#define ANTIC_DMAR     9
+
+extern int ANTIC_artif_mode;
+extern int ANTIC_artif_new;
+
+extern UBYTE ANTIC_PENH_input;
+extern UBYTE ANTIC_PENV_input;
+
+int ANTIC_Initialise(int *argc, char *argv[]);
+void ANTIC_Reset(void);
+void ANTIC_Frame(int draw_display);
+UBYTE ANTIC_GetByte(UWORD addr);
+void ANTIC_PutByte(UWORD addr, UBYTE byte);
+
+UBYTE ANTIC_GetDLByte(UWORD *paddr);
+UWORD ANTIC_GetDLWord(UWORD *paddr);
+
+/* always call ANTIC_UpdateArtifacting after changing ANTIC_artif_mode */
+void ANTIC_UpdateArtifacting(void);
+
+/* Video memory access */
+void ANTIC_VideoMemset(UBYTE *ptr, UBYTE val, ULONG size);
+void ANTIC_VideoPutByte(UBYTE *ptr, UBYTE val);
+
+/* GTIA calls it on a write to PRIOR */
+void ANTIC_SetPrior(UBYTE prior);
+
+/* Saved states */
+void ANTIC_StateSave(void);
+void ANTIC_StateRead(void);
+
+/* Pointer to 16 KB seen by ANTIC in 0x4000-0x7fff.
+   If it's the same what the CPU sees (and what's in memory[0x4000..0x7fff],
+   then NULL. */
+extern const UBYTE *ANTIC_xe_ptr;
+
+/* PM graphics for GTIA */
+extern int ANTIC_player_dma_enabled;
+extern int ANTIC_missile_dma_enabled;
+extern int ANTIC_player_gra_enabled;
+extern int ANTIC_missile_gra_enabled;
+extern int ANTIC_player_flickering;
+extern int ANTIC_missile_flickering;
+
+/* ANTIC colour lookup tables, used by GTIA */
+extern UWORD ANTIC_cl[128];
+extern ULONG ANTIC_lookup_gtia9[16];
+extern ULONG ANTIC_lookup_gtia11[16];
+extern UWORD ANTIC_hires_lookup_l[128];
+
+#ifdef NEW_CYCLE_EXACT
+#define ANTIC_NOT_DRAWING -999
+#define ANTIC_DRAWING_SCREEN (ANTIC_cur_screen_pos!=ANTIC_NOT_DRAWING)
+extern int ANTIC_delayed_wsync;
+extern int ANTIC_cur_screen_pos;
+extern const int *ANTIC_cpu2antic_ptr;
+extern const int *ANTIC_antic2cpu_ptr;
+void ANTIC_UpdateScanline(void);
+void ANTIC_UpdateScanlinePrior(UBYTE byte);
+#ifndef NO_GTIA11_DELAY
+extern int ANTIC_prior_curpos;
+#define ANTIC_PRIOR_BUF_SIZE 40
+extern UBYTE ANTIC_prior_val_buf[ANTIC_PRIOR_BUF_SIZE];
+extern int ANTIC_prior_pos_buf[ANTIC_PRIOR_BUF_SIZE];
+#endif /* NO_GTIA11_DELAY */
+
+#define ANTIC_XPOS ( ANTIC_DRAWING_SCREEN ? ANTIC_cpu2antic_ptr[ANTIC_xpos] : ANTIC_xpos )
+#else
+#define ANTIC_XPOS ANTIC_xpos
+#endif /* NEW_CYCLE_EXACT */
+
+#endif /* ANTIC_H_ */
diff --git a/project/jni/application/atari800/src/atari.c b/project/jni/application/atari800/src/atari.c
new file mode 100644
index 000000000..116d5b742
--- /dev/null
+++ b/project/jni/application/atari800/src/atari.c
@@ -0,0 +1,1360 @@
+/*
+ * atari.c - main high-level routines
+ *
+ * Copyright (c) 1995-1998 David Firth
+ * Copyright (c) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "afile.h"
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#ifdef HAVE_SIGNAL_H
+#include <signal.h>
+#endif
+#ifdef TIME_WITH_SYS_TIME
+# include <sys/time.h>
+# include <time.h>
+#else
+# ifdef HAVE_SYS_TIME_H
+#  include <sys/time.h>
+# elif defined(HAVE_TIME_H)
+#  include <time.h>
+# endif
+#endif
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+#ifdef WIN32
+#include <windows.h>
+#endif
+#ifdef __EMX__
+#define INCL_DOS
+#include <os2.h>
+#endif
+#ifdef __BEOS__
+#include <OS.h>
+#endif
+#ifdef HAVE_LIBZ
+#include <zlib.h>
+#endif
+#ifdef R_SERIAL
+#include <sys/stat.h>
+#endif
+
+#include "akey.h"
+#include "antic.h"
+#include "atari.h"
+#include "binload.h"
+#include "cartridge.h"
+#include "cassette.h"
+#include "cfg.h"
+#include "cpu.h"
+#include "devices.h"
+#include "esc.h"
+#include "gtia.h"
+#include "input.h"
+#include "log.h"
+#include "memory.h"
+#include "monitor.h"
+#include "pia.h"
+#include "platform.h"
+#include "pokey.h"
+#include "rtime.h"
+#include "pbi.h"
+#include "sio.h"
+#include "util.h"
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+#include "colours.h"
+#include "screen.h"
+#endif
+#ifndef BASIC
+#include "statesav.h"
+#ifndef __PLUS
+#include "ui.h"
+#endif
+#endif /* BASIC */
+#if defined(SOUND) && !defined(__PLUS)
+#include "pokeysnd.h"
+#include "sndsave.h"
+#include "sound.h"
+#endif
+#ifdef R_IO_DEVICE
+#include "rdevice.h"
+#endif
+#ifdef __PLUS
+#ifdef _WX_
+#include "export.h"
+#else /* _WX_ */
+#include "globals.h"
+#include "macros.h"
+#include "display_win.h"
+#include "misc_win.h"
+#include "registry.h"
+#include "timing.h"
+#include "FileService.h"
+#include "Helpers.h"
+#endif /* _WX_ */
+#endif /* __PLUS */
+#ifdef PBI_BB
+#include "pbi_bb.h"
+#endif
+#ifdef PBI_XLD
+#include "pbi_xld.h"
+#endif
+#ifdef XEP80_EMULATION
+#include "xep80.h"
+#endif
+#ifdef NTSC_FILTER
+#include "atari_ntsc.h"
+#endif
+
+int Atari800_machine_type = Atari800_MACHINE_XLXE;
+int Atari800_tv_mode = Atari800_TV_PAL;
+int Atari800_disable_basic = TRUE;
+
+int verbose = FALSE;
+
+int Atari800_display_screen = FALSE;
+int Atari800_nframes = 0;
+int Atari800_refresh_rate = 1;
+int Atari800_collisions_in_skipped_frames = FALSE;
+
+#ifdef BENCHMARK
+static double benchmark_start_time;
+static double Atari_time(void);
+#endif
+
+int emuos_mode = 1;	/* 0 = never use EmuOS, 1 = use EmuOS if real OS not available, 2 = always use EmuOS */
+
+#ifdef HAVE_SIGNAL
+static RETSIGTYPE sigint_handler(int num)
+{
+	int restart;
+
+	restart = Atari800_Exit(TRUE);
+	if (restart) {
+		signal(SIGINT, sigint_handler);
+		return;
+	}
+
+	exit(0);
+}
+#endif
+
+void Atari800_Warmstart(void)
+{
+	if (Atari800_machine_type == Atari800_MACHINE_OSA || Atari800_machine_type == Atari800_MACHINE_OSB) {
+		/* A real Axlon homebanks on reset */
+		/* XXX: what does Mosaic do? */
+		if (MEMORY_axlon_enabled) MEMORY_PutByte(0xcfff, 0);
+		/* RESET key in 400/800 does not reset chips,
+		   but only generates RNMI interrupt */
+		ANTIC_NMIST = 0x3f;
+		CPU_NMI();
+	}
+	else {
+		PBI_Reset();
+		PIA_Reset();
+		ANTIC_Reset();
+		/* CPU_Reset() must be after PIA_Reset(),
+		   because Reset routine vector must be read from OS ROM */
+		CPU_Reset();
+		/* note: POKEY and GTIA have no Reset pin */
+	}
+#ifdef __PLUS
+	HandleResetEvent();
+#endif
+}
+
+void Atari800_Coldstart(void)
+{
+	PBI_Reset();
+	PIA_Reset();
+	ANTIC_Reset();
+	/* CPU_Reset() must be after PIA_Reset(),
+	   because Reset routine vector must be read from OS ROM */
+	CPU_Reset();
+	/* note: POKEY and GTIA have no Reset pin */
+#ifdef __PLUS
+	HandleResetEvent();
+#endif
+	/* reset cartridge to power-up state */
+	CARTRIDGE_Start();
+	/* set Atari OS Coldstart flag */
+	MEMORY_dPutByte(0x244, 1);
+	/* handle Option key (disable BASIC in XL/XE)
+	   and Start key (boot from cassette) */
+	GTIA_consol_index = 2;
+	GTIA_consol_table[2] = 0x0f;
+	if (Atari800_disable_basic && !BINLOAD_loading_basic) {
+		/* hold Option during reboot */
+		GTIA_consol_table[2] &= ~INPUT_CONSOL_OPTION;
+	}
+	if (CASSETTE_hold_start) {
+		/* hold Start during reboot */
+		GTIA_consol_table[2] &= ~INPUT_CONSOL_START;
+	}
+	GTIA_consol_table[1] = GTIA_consol_table[2];
+}
+
+int Atari800_LoadImage(const char *filename, UBYTE *buffer, int nbytes)
+{
+	FILE *f;
+	int len;
+
+	f = fopen(filename, "rb");
+	if (f == NULL) {
+		Log_print("Error loading ROM image: %s", filename);
+		return FALSE;
+	}
+	len = fread(buffer, 1, nbytes, f);
+	fclose(f);
+	if (len != nbytes) {
+		Log_print("Error reading %s", filename);
+		return FALSE;
+	}
+	return TRUE;
+}
+
+#include "emuos.h"
+
+#define COPY_EMUOS(padding) do { \
+		memset(MEMORY_os, 0, padding); \
+		memcpy(MEMORY_os + (padding), emuos_h, 0x2000); \
+	} while (0)
+
+static int load_roms(void)
+{
+	switch (Atari800_machine_type) {
+	case Atari800_MACHINE_OSA:
+		if (emuos_mode == 2)
+			COPY_EMUOS(0x0800);
+		else if (!Atari800_LoadImage(CFG_osa_filename, MEMORY_os, 0x2800)) {
+			if (emuos_mode == 1)
+				COPY_EMUOS(0x0800);
+			else
+				return FALSE;
+		}
+		else
+			MEMORY_have_basic = Atari800_LoadImage(CFG_basic_filename, MEMORY_basic, 0x2000);
+		break;
+	case Atari800_MACHINE_OSB:
+		if (emuos_mode == 2)
+			COPY_EMUOS(0x0800);
+		else if (!Atari800_LoadImage(CFG_osb_filename, MEMORY_os, 0x2800)) {
+			if (emuos_mode == 1)
+				COPY_EMUOS(0x0800);
+			else
+				return FALSE;
+		}
+		else
+			MEMORY_have_basic = Atari800_LoadImage(CFG_basic_filename, MEMORY_basic, 0x2000);
+		break;
+	case Atari800_MACHINE_XLXE:
+		if (emuos_mode == 2)
+			COPY_EMUOS(0x2000);
+		else if (!Atari800_LoadImage(CFG_xlxe_filename, MEMORY_os, 0x4000)) {
+			if (emuos_mode == 1)
+				COPY_EMUOS(0x2000);
+			else
+				return FALSE;
+		}
+		else {
+			/* if you really don't want built-in BASIC */
+			if (!strcmp(CFG_basic_filename,"none"))
+				memset(MEMORY_basic, 0, 0x2000);
+			else if (!Atari800_LoadImage(CFG_basic_filename, MEMORY_basic, 0x2000))
+				return FALSE;
+		}
+		MEMORY_xe_bank = 0;
+		break;
+	case Atari800_MACHINE_5200:
+		if (!Atari800_LoadImage(CFG_5200_filename, MEMORY_os, 0x800))
+			return FALSE;
+		break;
+	}
+	return TRUE;
+}
+
+int Atari800_InitialiseMachine(void)
+{
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+	Colours_InitialiseMachine();
+#endif
+	ESC_ClearAll();
+	if (!load_roms())
+		return FALSE;
+	MEMORY_InitialiseMachine();
+	Devices_UpdatePatches();
+	return TRUE;
+}
+
+
+int Atari800_Initialise(int *argc, char *argv[])
+{
+	int i, j;
+	const char *rom_filename = NULL;
+	const char *run_direct = NULL;
+#ifndef BASIC
+	const char *state_file = NULL;
+#endif
+#ifdef __PLUS
+	/* Atari800Win PLus doesn't use configuration files,
+	   it reads configuration from the Registry */
+#ifndef _WX_
+	int bUpdateRegistry = (*argc > 1);
+#endif
+	int bTapeFile = FALSE;
+	int nCartType = CARTRIDGE_type;
+
+	/* It is necessary because of the CARTRIDGE_Start (there must not be the
+	   registry-read value available at startup) */
+	CARTRIDGE_type = CARTRIDGE_NONE;
+
+#ifndef _WX_
+	/* Print the time info in the "Log file" window */
+	Misc_PrintTime();
+
+	/* Force screen refreshing */
+	g_nTestVal = _GetRefreshRate() - 1;
+
+	g_ulAtariState = ATARI_UNINITIALIZED;
+#endif /* _WX_ */
+
+#else /* __PLUS */
+	const char *rtconfig_filename = NULL;
+	int got_config;
+	int help_only = FALSE;
+
+	if (*argc > 1) {
+		for (i = j = 1; i < *argc; i++) {
+			if (strcmp(argv[i], "-config") == 0) {
+				if (i + 1 < *argc)
+					rtconfig_filename = argv[++i];
+				else {
+					Log_print("Missing argument for '%s'", argv[i]);
+					return FALSE;
+				}
+			}
+			else if (strcmp(argv[i], "-v") == 0 ||
+					 strcmp(argv[i], "-version") == 0 ||
+					 strcmp(argv[i], "--version") == 0) {
+				printf("%s\n", Atari800_TITLE);
+				return FALSE;
+			}
+			else if (strcmp(argv[i], "--usage") == 0 ||
+					 strcmp(argv[i], "--help") == 0) {
+				argv[j++] = "-help";
+			}
+			else if (strcmp(argv[i], "-verbose") == 0) {
+				verbose = TRUE;
+			}
+			else {
+				argv[j++] = argv[i];
+			}
+		}
+		*argc = j;
+	}
+	got_config = CFG_LoadConfig(rtconfig_filename);
+
+	/* try to find ROM images if the configuration file is not found
+	   or it does not specify some ROM paths (blank paths count as specified) */
+	CFG_FindROMImages("", TRUE); /* current directory */
+#if defined(unix) || defined(__unix__) || defined(__linux__)
+	CFG_FindROMImages("/usr/share/atari800", TRUE);
+#endif
+	if (*argc > 0 && argv[0] != NULL) {
+		char atari800_exe_dir[FILENAME_MAX];
+		char atari800_exe_rom_dir[FILENAME_MAX];
+		/* the directory of the Atari800 program */
+		Util_splitpath(argv[0], atari800_exe_dir, NULL);
+		CFG_FindROMImages(atari800_exe_dir, TRUE);
+		/* "rom" and "ROM" subdirectories of this directory */
+		Util_catpath(atari800_exe_rom_dir, atari800_exe_dir, "rom");
+		CFG_FindROMImages(atari800_exe_rom_dir, TRUE);
+/* skip "ROM" on systems that are known to be case-insensitive */
+#if !defined(DJGPP) && !defined(WIN32)
+		Util_catpath(atari800_exe_rom_dir, atari800_exe_dir, "ROM");
+		CFG_FindROMImages(atari800_exe_rom_dir, TRUE);
+#endif
+	}
+	/* finally if nothing is found, set some defaults to make
+	   the configuration file easier to edit */
+	if (Util_filenamenotset(CFG_osa_filename))
+		strcpy(CFG_osa_filename, "atariosa.rom");
+	if (Util_filenamenotset(CFG_osb_filename))
+		strcpy(CFG_osb_filename, "atariosb.rom");
+	if (Util_filenamenotset(CFG_xlxe_filename))
+		strcpy(CFG_xlxe_filename, "atarixl.rom");
+	if (Util_filenamenotset(CFG_5200_filename))
+		strcpy(CFG_5200_filename, "5200.rom");
+	if (Util_filenamenotset(CFG_basic_filename))
+		strcpy(CFG_basic_filename, "ataribas.rom");
+
+	/* if no configuration file read, try to save one with the defaults */
+	if (!got_config)
+		CFG_WriteConfig();
+
+#endif /* __PLUS */
+
+	for (i = j = 1; i < *argc; i++) {
+		if (strcmp(argv[i], "-atari") == 0) {
+			if (Atari800_machine_type != Atari800_MACHINE_OSA) {
+				Atari800_machine_type = Atari800_MACHINE_OSB;
+				MEMORY_ram_size = 48;
+			}
+		}
+		else if (strcmp(argv[i], "-xl") == 0) {
+			Atari800_machine_type = Atari800_MACHINE_XLXE;
+			MEMORY_ram_size = 64;
+		}
+		else if (strcmp(argv[i], "-xe") == 0) {
+			Atari800_machine_type = Atari800_MACHINE_XLXE;
+			MEMORY_ram_size = 128;
+		}
+		else if (strcmp(argv[i], "-320xe") == 0) {
+			Atari800_machine_type = Atari800_MACHINE_XLXE;
+			MEMORY_ram_size = MEMORY_RAM_320_COMPY_SHOP;
+		}
+		else if (strcmp(argv[i], "-rambo") == 0) {
+			Atari800_machine_type = Atari800_MACHINE_XLXE;
+			MEMORY_ram_size = MEMORY_RAM_320_RAMBO;
+		}
+		else if (strcmp(argv[i], "-5200") == 0) {
+			Atari800_machine_type = Atari800_MACHINE_5200;
+			MEMORY_ram_size = 16;
+		}
+		else if (strcmp(argv[i], "-nobasic") == 0)
+			Atari800_disable_basic = TRUE;
+		else if (strcmp(argv[i], "-basic") == 0)
+			Atari800_disable_basic = FALSE;
+		else if (strcmp(argv[i], "-nopatch") == 0)
+			ESC_enable_sio_patch = FALSE;
+		else if (strcmp(argv[i], "-nopatchall") == 0)
+			ESC_enable_sio_patch = Devices_enable_h_patch = Devices_enable_p_patch = Devices_enable_r_patch = FALSE;
+		else if (strcmp(argv[i], "-pal") == 0)
+			Atari800_tv_mode = Atari800_TV_PAL;
+		else if (strcmp(argv[i], "-ntsc") == 0)
+			Atari800_tv_mode = Atari800_TV_NTSC;
+		else if (strcmp(argv[i], "-a") == 0) {
+			Atari800_machine_type = Atari800_MACHINE_OSA;
+			MEMORY_ram_size = 48;
+		}
+		else if (strcmp(argv[i], "-b") == 0) {
+			Atari800_machine_type = Atari800_MACHINE_OSB;
+			MEMORY_ram_size = 48;
+		}
+		else if (strcmp(argv[i], "-emuos") == 0)
+			emuos_mode = 2;
+		else if (strcmp(argv[i], "-c") == 0) {
+			if (MEMORY_ram_size == 48)
+				MEMORY_ram_size = 52;
+		}
+		else if (strcmp(argv[i], "-axlon0f") == 0) {
+			MEMORY_axlon_0f_mirror = TRUE;
+		}
+#ifdef STEREO_SOUND
+		else if (strcmp(argv[i], "-stereo") == 0) {
+			POKEYSND_stereo_enabled = TRUE;
+		}
+		else if (strcmp(argv[i], "-nostereo") == 0) {
+			POKEYSND_stereo_enabled = FALSE;
+		}
+#endif /* STEREO_SOUND */
+		else {
+			/* parameters that take additional argument follow here */
+			int i_a = (i + 1 < *argc);		/* is argument available? */
+			int a_m = FALSE;			/* error, argument missing! */
+
+			if (strcmp(argv[i], "-osa_rom") == 0) {
+				if (i_a) Util_strlcpy(CFG_osa_filename, argv[++i], sizeof(CFG_osa_filename)); else a_m = TRUE;
+			}
+#ifdef R_IO_DEVICE
+			else if (strcmp(argv[i], "-rdevice") == 0) {
+				Devices_enable_r_patch = TRUE;
+#ifdef R_SERIAL
+				if (i_a && i + 2 < *argc && *argv[i + 1] != '-') {  /* optional serial device name */
+					struct stat statbuf;
+					if (! stat(argv[i + 1], &statbuf)) {
+						if (S_ISCHR(statbuf.st_mode)) { /* only accept devices as serial device */
+							Util_strlcpy(RDevice_serial_device, argv[++i], FILENAME_MAX);
+							RDevice_serial_enabled = TRUE;
+						}
+					}
+				}
+#endif /* R_SERIAL */
+			}
+#endif
+			else if (strcmp(argv[i], "-osb_rom") == 0) {
+				if (i_a) Util_strlcpy(CFG_osb_filename, argv[++i], sizeof(CFG_osb_filename)); else a_m = TRUE;
+			}
+			else if (strcmp(argv[i], "-xlxe_rom") == 0) {
+				if (i_a) Util_strlcpy(CFG_xlxe_filename, argv[++i], sizeof(CFG_xlxe_filename)); else a_m = TRUE;
+			}
+			else if (strcmp(argv[i], "-5200_rom") == 0) {
+				if (i_a) Util_strlcpy(CFG_5200_filename, argv[++i], sizeof(CFG_5200_filename)); else a_m = TRUE;
+			}
+			else if (strcmp(argv[i], "-basic_rom") == 0) {
+				if (i_a) Util_strlcpy(CFG_basic_filename, argv[++i], sizeof(CFG_basic_filename)); else a_m = TRUE;
+			}
+			else if (strcmp(argv[i], "-cart") == 0) {
+				if (i_a) rom_filename = argv[++i]; else a_m = TRUE;
+			}
+			else if (strcmp(argv[i], "-run") == 0) {
+				if (i_a) run_direct = argv[++i]; else a_m = TRUE;
+			}
+			else if (strcmp(argv[i], "-mosaic") == 0) {
+				if (i_a) {
+					int total_ram = Util_sscandec(argv[++i]);
+					MEMORY_mosaic_enabled = TRUE;
+					MEMORY_mosaic_maxbank = (total_ram - 48)/4 - 1;
+					if (((total_ram - 48) % 4 != 0) || (MEMORY_mosaic_maxbank > 0x3e) || (MEMORY_mosaic_maxbank < 0)) {
+						Log_print("Invalid Mosaic total RAM size");
+						return FALSE;
+					}
+					if (MEMORY_axlon_enabled) {
+						Log_print("Axlon and Mosaic can not both be enabled, because they are incompatible");
+						return FALSE;
+					}
+				}
+				else a_m = TRUE;
+			}
+			else if (strcmp(argv[i], "-axlon") == 0) {
+				if (i_a) {
+					int total_ram = Util_sscandec(argv[++i]);
+					int banks = ((total_ram) - 32) / 16;
+					MEMORY_axlon_enabled = TRUE;
+					if (((total_ram - 32) % 16 != 0) || ((banks != 8) && (banks != 16) && (banks != 32) && (banks != 64) && (banks != 128) && (banks != 256))) {
+						Log_print("Invalid Axlon total RAM size");
+						return FALSE;
+					}
+					if (MEMORY_mosaic_enabled) {
+						Log_print("Axlon and Mosaic can not both be enabled, because they are incompatible");
+						return FALSE;
+					}
+					MEMORY_axlon_bankmask = banks - 1;
+				}
+				else a_m = TRUE;
+			}
+#ifndef BASIC
+			/* The BASIC version does not support state files, because:
+			   1. It has no ability to save state files, because of lack of UI.
+			   2. It uses a simplified emulation, so the state files would be
+			      incompatible with other versions.
+			   3. statesav is not compiled in to make the executable smaller. */
+			else if (strcmp(argv[i], "-state") == 0) {
+				if (i_a) state_file = argv[++i]; else a_m = TRUE;
+			}
+			else if (strcmp(argv[i], "-refresh") == 0) {
+				if (i_a) {
+					Atari800_refresh_rate = Util_sscandec(argv[++i]);
+					if (Atari800_refresh_rate < 1) {
+						Log_print("Invalid refresh rate, using 1");
+						Atari800_refresh_rate = 1;
+					}
+				}
+				else
+					a_m = TRUE;
+			}
+#endif /* BASIC */
+			else {
+				/* all options known to main module tried but none matched */
+
+				if (strcmp(argv[i], "-help") == 0) {
+#ifndef __PLUS
+					help_only = TRUE;
+					Log_print("\t-config <file>   Specify Alternate Configuration File");
+#endif
+					Log_print("\t-atari           Emulate Atari 800");
+					Log_print("\t-xl              Emulate Atari 800XL");
+					Log_print("\t-xe              Emulate Atari 130XE");
+					Log_print("\t-320xe           Emulate Atari 320XE (COMPY SHOP)");
+					Log_print("\t-rambo           Emulate Atari 320XE (RAMBO)");
+					Log_print("\t-5200            Emulate Atari 5200 Games System");
+					Log_print("\t-nobasic         Turn off Atari BASIC ROM");
+					Log_print("\t-basic           Turn on Atari BASIC ROM");
+					Log_print("\t-pal             Enable PAL TV mode");
+					Log_print("\t-ntsc            Enable NTSC TV mode");
+					Log_print("\t-osa_rom <file>  Load OS A ROM from file");
+					Log_print("\t-osb_rom <file>  Load OS B ROM from file");
+					Log_print("\t-xlxe_rom <file> Load XL/XE ROM from file");
+					Log_print("\t-5200_rom <file> Load 5200 ROM from file");
+					Log_print("\t-basic_rom <fil> Load BASIC ROM from file");
+					Log_print("\t-cart <file>     Install cartridge (raw or CART format)");
+					Log_print("\t-run <file>      Run Atari program (COM, EXE, XEX, BAS, LST)");
+#ifndef BASIC
+					Log_print("\t-state <file>    Load saved-state file");
+					Log_print("\t-refresh <rate>  Specify screen refresh rate");
+#endif
+					Log_print("\t-nopatch         Don't patch SIO routine in OS");
+					Log_print("\t-nopatchall      Don't patch OS at all, H: device won't work");
+					Log_print("\t-a               Use OS A");
+					Log_print("\t-b               Use OS B");
+					Log_print("\t-c               Enable RAM between 0xc000 and 0xcfff in Atari 800");
+					Log_print("\t-axlon <n>       Use Atari 800 Axlon memory expansion: <n> k total RAM");
+					Log_print("\t-axlon0f         Use Axlon shadow at 0x0fc0-0x0fff");
+					Log_print("\t-mosaic <n>      Use 400/800 Mosaic memory expansion: <n> k total RAM");
+#ifdef R_IO_DEVICE
+					Log_print("\t-rdevice [<dev>] Enable R: emulation (using serial device <dev>)");
+#endif
+					Log_print("\t-v               Show version/release number");
+				}
+
+				/* copy this option for platform/module specific evaluation */
+				argv[j++] = argv[i];
+			}
+
+			/* this is the end of the additional argument check */
+			if (a_m) {
+				printf("Missing argument for '%s'\n", argv[i]);
+				return FALSE;
+			}
+		}
+	}
+
+	*argc = j;
+	if (
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+		!Colours_Initialise(argc, argv) ||
+#endif
+		!Devices_Initialise(argc, argv)
+		|| !RTIME_Initialise(argc, argv)
+		|| !SIO_Initialise (argc, argv)
+		|| !CASSETTE_Initialise(argc, argv)
+		|| !PBI_Initialise(argc,argv)
+#ifndef BASIC
+		|| !INPUT_Initialise(argc, argv)
+#endif
+#ifdef XEP80_EMULATION
+		|| !XEP80_Initialise(argc, argv)
+#endif
+#ifdef NTSC_FILTER
+		|| !atari_ntsc_Initialise(argc, argv)
+#endif
+#ifndef DONT_DISPLAY
+		/* Platform Specific Initialisation */
+		|| !PLATFORM_Initialise(argc, argv)
+#endif
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+		|| !Screen_Initialise(argc, argv)
+#endif
+		/* Initialise Custom Chips */
+		|| !ANTIC_Initialise(argc, argv)
+		|| !GTIA_Initialise(argc, argv)
+		|| !PIA_Initialise(argc, argv)
+		|| !POKEY_Initialise(argc, argv)
+	)
+		return FALSE;
+
+#ifndef __PLUS
+
+	if (help_only) {
+		Atari800_Exit(FALSE);
+		return FALSE;
+	}
+
+	/* Configure Atari System */
+	Atari800_InitialiseMachine();
+#else /* __PLUS */
+
+	if (!InitialiseMachine()) {
+#ifndef _WX_
+		if (bUpdateRegistry)
+			WriteAtari800Registry();
+#endif
+		return FALSE;
+	}
+
+#endif /* __PLUS */
+
+	/* Auto-start files left on the command line */
+	j = 1; /* diskno */
+	for (i = 1; i < *argc; i++) {
+		if (j > 8) {
+			/* The remaining arguments are not necessary disk images, but ignore them... */
+			Log_print("Too many disk image filenames on the command line (max. 8).");
+			break;
+		}
+		switch (AFILE_OpenFile(argv[i], i == 1, j, FALSE)) {
+			case AFILE_ERROR:
+				Log_print("Error opening \"%s\"", argv[i]);
+				break;
+			case AFILE_ATR:
+			case AFILE_XFD:
+			case AFILE_ATR_GZ:
+			case AFILE_XFD_GZ:
+			case AFILE_DCM:
+			case AFILE_PRO:
+				j++;
+				break;
+			default:
+				break;
+		}
+	}
+
+	/* Install requested ROM cartridge */
+	if (rom_filename) {
+		int r = CARTRIDGE_Insert(rom_filename);
+		if (r < 0) {
+			Log_print("Error inserting cartridge \"%s\": %s", rom_filename,
+			r == CARTRIDGE_CANT_OPEN ? "Can't open file" :
+			r == CARTRIDGE_BAD_FORMAT ? "Bad format" :
+			r == CARTRIDGE_BAD_CHECKSUM ? "Bad checksum" :
+			"Unknown error");
+		}
+		if (r > 0) {
+#ifdef BASIC
+			Log_print("Raw cartridge images not supported in BASIC version!");
+#else /* BASIC */
+
+#ifndef __PLUS
+			UI_is_active = TRUE;
+			CARTRIDGE_type = UI_SelectCartType(r);
+			UI_is_active = FALSE;
+#else /* __PLUS */
+			CARTRIDGE_type = (CARTRIDGE_NONE == nCartType ? UI_SelectCartType(r) : nCartType);
+#endif /* __PLUS */
+			CARTRIDGE_Start();
+
+#endif /* BASIC */
+		}
+#ifndef __PLUS
+		if (CARTRIDGE_type != CARTRIDGE_NONE) {
+			int for5200 = CARTRIDGE_IsFor5200(CARTRIDGE_type);
+			if (for5200 && Atari800_machine_type != Atari800_MACHINE_5200) {
+				Atari800_machine_type = Atari800_MACHINE_5200;
+				MEMORY_ram_size = 16;
+				Atari800_InitialiseMachine();
+			}
+			else if (!for5200 && Atari800_machine_type == Atari800_MACHINE_5200) {
+				Atari800_machine_type = Atari800_MACHINE_XLXE;
+				MEMORY_ram_size = 64;
+				Atari800_InitialiseMachine();
+			}
+		}
+#endif /* __PLUS */
+	}
+
+	/* Load Atari executable, if any */
+	if (run_direct != NULL)
+		BINLOAD_Loader(run_direct);
+
+#ifndef BASIC
+	/* Load state file */
+	if (state_file != NULL) {
+		if (StateSav_ReadAtariState(state_file, "rb"))
+			/* Don't press Option */
+			GTIA_consol_table[1] = GTIA_consol_table[2] = 0x0f;
+	}
+#endif
+
+#ifdef HAVE_SIGNAL
+	/* Install CTRL-C Handler */
+	signal(SIGINT, sigint_handler);
+#endif
+
+#ifdef __PLUS
+#ifndef _WX_
+	/* Update the Registry if any parameters were specified */
+	if (bUpdateRegistry)
+		WriteAtari800Registry();
+	Timer_Start(FALSE);
+#endif /* _WX_ */
+	g_ulAtariState &= ~ATARI_UNINITIALIZED;
+#endif /* __PLUS */
+
+#ifdef BENCHMARK
+	benchmark_start_time = Atari_time();
+#endif
+	return TRUE;
+}
+
+UNALIGNED_STAT_DEF(Screen_atari_write_long_stat)
+UNALIGNED_STAT_DEF(pm_scanline_read_long_stat)
+UNALIGNED_STAT_DEF(memory_read_word_stat)
+UNALIGNED_STAT_DEF(memory_write_word_stat)
+UNALIGNED_STAT_DEF(memory_read_aligned_word_stat)
+UNALIGNED_STAT_DEF(memory_write_aligned_word_stat)
+
+int Atari800_Exit(int run_monitor)
+{
+	int restart;
+
+#ifdef __PLUS
+	if (CPU_cim_encountered)
+		g_ulAtariState |= ATARI_CRASHED;
+#endif
+
+#ifdef STAT_UNALIGNED_WORDS
+	printf("(ptr&7) Screen_atari  pm_scanline  _____ memory ______  memory (aligned addr)\n");
+	printf("          32-bit W      32-bit R   16-bit R   16-bit W   16-bit R   16-bit W\n");
+	{
+		unsigned int sums[6] = {0, 0, 0, 0, 0, 0};
+		int i;
+		for (i = 0; i < 8; i++) {
+			printf("%6d%12u%14u%11u%11u%11u%11u\n", i,
+				Screen_atari_write_long_stat[i], pm_scanline_read_long_stat[i],
+				memory_read_word_stat[i], memory_write_word_stat[i],
+				memory_read_aligned_word_stat[i], memory_write_aligned_word_stat[i]);
+			sums[0] += Screen_atari_write_long_stat[i];
+			sums[1] += pm_scanline_read_long_stat[i];
+			sums[2] += memory_read_word_stat[i];
+			sums[3] += memory_write_word_stat[i];
+			sums[4] += memory_read_aligned_word_stat[i];
+			sums[5] += memory_write_aligned_word_stat[i];
+		}
+		printf("total:%12u%14u%11u%11u%11u%11u\n",
+			sums[0], sums[1], sums[2], sums[3], sums[4], sums[5]);
+	}
+#endif /* STAT_UNALIGNED_WORDS */
+	restart = PLATFORM_Exit(run_monitor);
+#ifndef __PLUS
+	if (!restart) {
+		SIO_Exit();	/* umount disks, so temporary files are deleted */
+#ifndef BASIC
+		INPUT_Exit();	/* finish event recording */
+#endif
+#ifdef R_IO_DEVICE
+		RDevice_Exit(); /* R: Device cleanup */
+#endif
+#ifdef SOUND
+		SndSave_CloseSoundFile();
+#endif
+	}
+#endif /* __PLUS */
+	return restart;
+}
+
+#ifndef __PLUS
+
+#ifdef PS2
+
+double Atari_time(void);
+void Atari_sleep(double s);
+
+#else /* PS2 */
+
+static double Atari_time(void)
+{
+#ifdef WIN32
+	return GetTickCount() * 1e-3;
+#elif defined(DJGPP)
+	/* DJGPP has gettimeofday, but it's not more accurate than uclock */
+	return uclock() * (1.0 / UCLOCKS_PER_SEC);
+#elif defined(HAVE_GETTIMEOFDAY)
+	struct timeval tp;
+	gettimeofday(&tp, NULL);
+	return tp.tv_sec + 1e-6 * tp.tv_usec;
+#elif defined(HAVE_UCLOCK)
+	return uclock() * (1.0 / UCLOCKS_PER_SEC);
+#elif defined(HAVE_CLOCK)
+	return clock() * (1.0 / CLK_TCK);
+#else
+#error No function found for Atari_time()
+#endif
+}
+
+/* FIXME: Ports should use SUPPORTS_PLATFORM_SLEEP and SUPPORTS_PLATFORM_TIME */
+/* and not this mess */
+#ifndef SUPPORTS_PLATFORM_SLEEP
+
+static void Atari_sleep(double s)
+{
+	if (s > 0) {
+#ifdef WIN32
+		Sleep((DWORD) (s * 1e3));
+#elif defined(DJGPP)
+		/* DJGPP has usleep and select, but they don't work that good */
+		/* XXX: find out why */
+		double curtime = Atari_time();
+		while ((curtime + s) > Atari_time());
+#elif defined(HAVE_NANOSLEEP)
+		struct timespec ts;
+		ts.tv_sec = 0;
+		ts.tv_nsec = s * 1e9;
+		nanosleep(&ts, NULL);
+#elif defined(HAVE_USLEEP)
+		usleep(s * 1e6);
+#elif defined(__BEOS__)
+		/* added by Walter Las for BeOS */
+		snooze(s * 1e6);
+#elif defined(__EMX__)
+		/* added by Brian Smith for os/2 */
+		DosSleep(s);
+#elif defined(HAVE_SELECT)
+		/* linux */
+		struct timeval tp;
+		tp.tv_sec = 0;
+		tp.tv_usec = s * 1e6;
+		select(1, NULL, NULL, NULL, &tp);
+#else
+		double curtime = Atari_time();
+		while ((curtime + s) > Atari_time());
+#endif
+	}
+}
+
+#endif /* SUPPORTS_PLATFORM_SLEEP */
+
+#endif /* PS2 */
+
+void Atari800_Sync(void)
+{
+	static double lasttime = 0;
+	double deltatime = 1.0 / ((Atari800_tv_mode == Atari800_TV_PAL) ? 50 : 60);
+	double curtime;
+#ifdef ALTERNATE_SYNC_WITH_HOST
+	if (! UI_is_active)
+		deltatime *= Atari800_refresh_rate;
+#endif
+	lasttime += deltatime;
+#ifdef SUPPORTS_PLATFORM_SLEEP
+	PLATFORM_Sleep(lasttime - Atari_time());
+#else
+	Atari_sleep(lasttime - Atari_time());
+#endif
+	curtime = Atari_time();
+
+	if ((lasttime + deltatime) < curtime)
+		lasttime = curtime;
+}
+
+#ifdef USE_CURSES
+void curses_clear_screen(void);
+#endif
+
+#if defined(BASIC) || defined(VERY_SLOW) || defined(CURSES_BASIC)
+
+#ifdef CURSES_BASIC
+void curses_display_line(int anticmode, const UBYTE *screendata);
+#endif
+
+static int scanlines_to_dl;
+
+/* steal cycles and generate DLI */
+static void basic_antic_scanline(void)
+{
+	static UBYTE IR = 0;
+	static const UBYTE mode_scanlines[16] =
+		{ 0, 0, 8, 10, 8, 16, 8, 16, 8, 4, 4, 2, 1, 2, 1, 1 };
+	static const UBYTE mode_bytes[16] =
+		{ 0, 0, 40, 40, 40, 40, 20, 20, 10, 10, 20, 20, 20, 40, 40, 40 };
+	static const UBYTE font40_cycles[4] = { 0, 32, 40, 47 };
+	static const UBYTE font20_cycles[4] = { 0, 16, 20, 24 };
+#ifdef CURSES_BASIC
+	static int scanlines_to_curses_display = 0;
+	static UWORD screenaddr = 0;
+	static UWORD newscreenaddr = 0;
+#endif
+
+	int bytes = 0;
+	if (--scanlines_to_dl <= 0) {
+		if (ANTIC_DMACTL & 0x20) {
+			IR = ANTIC_GetDLByte(&ANTIC_dlist);
+			ANTIC_xpos++;
+		}
+		else
+			IR &= 0x7f;	/* repeat last instruction, but don't generate DLI */
+		switch (IR & 0xf) {
+		case 0:
+			scanlines_to_dl = ((IR >> 4) & 7) + 1;
+			break;
+		case 1:
+			if (ANTIC_DMACTL & 0x20) {
+				ANTIC_dlist = ANTIC_GetDLWord(&ANTIC_dlist);
+				ANTIC_xpos += 2;
+			}
+			scanlines_to_dl = (IR & 0x40) ? 1024 /* no more DL in this frame */ : 1;
+			break;
+		default:
+			if (IR & 0x40 && ANTIC_DMACTL & 0x20) {
+#ifdef CURSES_BASIC
+				screenaddr =
+#endif
+					ANTIC_GetDLWord(&ANTIC_dlist);
+				ANTIC_xpos += 2;
+			}
+			/* can't steal cycles now, because DLI must come first */
+			/* just an approximation: doesn't check HSCROL */
+			switch (ANTIC_DMACTL & 3) {
+			case 1:
+				bytes = mode_bytes[IR & 0xf] * 8 / 10;
+				break;
+			case 2:
+				bytes = mode_bytes[IR & 0xf];
+				break;
+			case 3:
+				bytes = mode_bytes[IR & 0xf] * 12 / 10;
+				break;
+			default:
+				break;
+			}
+#ifdef CURSES_BASIC
+			/* Normally, we would call curses_display_line here,
+			   and not use scanlines_to_curses_display at all.
+			   That would however cause incorrect color of the "MEMORY"
+			   menu item in Self Test - it isn't set properly
+			   in the first scanline. We therefore postpone
+			   curses_display_line call to the next scanline. */
+			scanlines_to_curses_display = 2;
+			newscreenaddr = screenaddr + bytes;
+#endif
+			/* just an approximation: doesn't check VSCROL */
+			scanlines_to_dl = mode_scanlines[IR & 0xf];
+			break;
+		}
+	}
+	if (scanlines_to_dl == 1 && (IR & 0x80)) {
+		CPU_GO(ANTIC_NMIST_C);
+		ANTIC_NMIST = 0x9f;
+		if (ANTIC_NMIEN & 0x80) {
+			CPU_GO(ANTIC_NMI_C);
+			CPU_NMI();
+		}
+	}
+#ifdef CURSES_BASIC
+	if (--scanlines_to_curses_display == 0) {
+		curses_display_line(IR & 0xf, MEMORY_mem + screenaddr);
+		/* 4k wrap */
+		if (((screenaddr ^ newscreenaddr) & 0x1000) != 0)
+			screenaddr = newscreenaddr - 0x1000;
+		else
+			screenaddr = newscreenaddr;
+	}
+#endif
+	ANTIC_xpos += bytes;
+	/* steal cycles in font modes */
+	switch (IR & 0xf) {
+	case 2:
+	case 3:
+	case 4:
+	case 5:
+		ANTIC_xpos += font40_cycles[ANTIC_DMACTL & 3];
+		break;
+	case 6:
+	case 7:
+		ANTIC_xpos += font20_cycles[ANTIC_DMACTL & 3];
+		break;
+	default:
+		break;
+	}
+}
+
+#define BASIC_LINE CPU_GO(ANTIC_LINE_C); ANTIC_xpos -= ANTIC_LINE_C - ANTIC_DMAR; ANTIC_screenline_cpu_clock += ANTIC_LINE_C; ANTIC_ypos++
+
+static void basic_frame(void)
+{
+	/* scanlines 0 - 7 */
+	ANTIC_ypos = 0;
+	do {
+		POKEY_Scanline();		/* check and generate IRQ */
+		BASIC_LINE;
+	} while (ANTIC_ypos < 8);
+
+	scanlines_to_dl = 1;
+	/* scanlines 8 - 247 */
+	do {
+		POKEY_Scanline();		/* check and generate IRQ */
+		basic_antic_scanline();
+		BASIC_LINE;
+	} while (ANTIC_ypos < 248);
+
+	/* scanline 248 */
+	POKEY_Scanline();			/* check and generate IRQ */
+	CPU_GO(ANTIC_NMIST_C);
+	ANTIC_NMIST = 0x5f;				/* Set VBLANK */
+	if (ANTIC_NMIEN & 0x40) {
+		CPU_GO(ANTIC_NMI_C);
+		CPU_NMI();
+	}
+	BASIC_LINE;
+
+	/* scanlines 249 - 261(311) */
+	do {
+		POKEY_Scanline();		/* check and generate IRQ */
+		BASIC_LINE;
+	} while (ANTIC_ypos < Atari800_tv_mode);
+}
+
+#endif /* defined(BASIC) || defined(VERY_SLOW) || defined(CURSES_BASIC) */
+
+void Atari800_Frame(void)
+{
+#ifndef BASIC
+	static int refresh_counter = 0;
+	switch (INPUT_key_code) {
+	case AKEY_COLDSTART:
+		Atari800_Coldstart();
+		break;
+	case AKEY_WARMSTART:
+		Atari800_Warmstart();
+		break;
+	case AKEY_EXIT:
+		Atari800_Exit(FALSE);
+		exit(0);
+	case AKEY_UI:
+#ifdef SOUND
+		Sound_Pause();
+#endif
+		UI_Run();
+#ifdef SOUND
+		Sound_Continue();
+#endif
+		break;
+#ifndef CURSES_BASIC
+	case AKEY_SCREENSHOT:
+		Screen_SaveNextScreenshot(FALSE);
+		break;
+	case AKEY_SCREENSHOT_INTERLACE:
+		Screen_SaveNextScreenshot(TRUE);
+		break;
+#endif /* CURSES_BASIC */
+	case AKEY_PBI_BB_MENU:
+#ifdef PBI_BB
+		PBI_BB_Menu();
+#endif
+		break;
+	default:
+		break;
+	}
+#endif /* BASIC */
+
+#ifdef PBI_BB
+	PBI_BB_Frame(); /* just to make the menu key go up automatically */
+#endif
+#ifdef PBI_XLD
+	PBI_XLD_VFrame(); /* for the Votrax */
+#endif
+	Devices_Frame();
+#ifndef BASIC
+	INPUT_Frame();
+#endif
+	GTIA_Frame();
+#ifdef SOUND
+	Sound_Update();
+#endif
+
+#ifdef BASIC
+	basic_frame();
+#else /* BASIC */
+	if (++refresh_counter >= Atari800_refresh_rate) {
+		refresh_counter = 0;
+#ifdef USE_CURSES
+		curses_clear_screen();
+#endif
+#ifdef CURSES_BASIC
+		basic_frame();
+#else
+		ANTIC_Frame(TRUE);
+		INPUT_DrawMousePointer();
+		Screen_DrawAtariSpeed(Atari_time());
+		Screen_DrawDiskLED();
+#endif /* CURSES_BASIC */
+#ifdef DONT_DISPLAY
+		Atari800_display_screen = FALSE;
+#else
+		Atari800_display_screen = TRUE;
+#endif /* DONT_DISPLAY */
+	}
+	else {
+#if defined(VERY_SLOW) || defined(CURSES_BASIC)
+		basic_frame();
+#else
+		ANTIC_Frame(Atari800_collisions_in_skipped_frames);
+#endif
+		Atari800_display_screen = FALSE;
+	}
+#endif /* BASIC */
+	POKEY_Frame();
+	Atari800_nframes++;
+#ifdef BENCHMARK
+	if (Atari800_nframes >= BENCHMARK) {
+		double benchmark_time = Atari_time() - benchmark_start_time;
+		Atari800_Exit(FALSE);
+		printf("%d frames emulated in %.2f seconds\n", BENCHMARK, benchmark_time);
+		exit(0);
+	}
+#else
+
+#ifdef ALTERNATE_SYNC_WITH_HOST
+	if (refresh_counter == 0)
+#endif
+		Atari800_Sync();
+#endif /* BENCHMARK */
+}
+
+#endif /* __PLUS */
+
+#ifndef BASIC
+
+void Atari800_StateSave(void)
+{
+	UBYTE temp;
+	int default_tv_mode;
+	int os = 0;
+	int default_system = 3;
+	int pil_on = FALSE;
+
+	if (Atari800_tv_mode == Atari800_TV_PAL) {
+		temp = 0;
+		default_tv_mode = 1;
+	}
+	else {
+		temp = 1;
+		default_tv_mode = 2;
+	}
+	StateSav_SaveUBYTE(&temp, 1);
+
+	switch (Atari800_machine_type) {
+	case Atari800_MACHINE_OSA:
+		temp = MEMORY_ram_size == 16 ? 5 : 0;
+		os = 1;
+		default_system = 1;
+		break;
+	case Atari800_MACHINE_OSB:
+		temp = MEMORY_ram_size == 16 ? 5 : 0;
+		os = 2;
+		default_system = 2;
+		break;
+	case Atari800_MACHINE_XLXE:
+		switch (MEMORY_ram_size) {
+		case 16:
+			temp = 6;
+			default_system = 3;
+			break;
+		case 64:
+			temp = 1;
+			default_system = 3;
+			break;
+		case 128:
+			temp = 2;
+			default_system = 4;
+			break;
+		case 192:
+			temp = 9;
+			default_system = 8;
+			break;
+		case MEMORY_RAM_320_RAMBO:
+		case MEMORY_RAM_320_COMPY_SHOP:
+			temp = 3;
+			default_system = 5;
+			break;
+		case 576:
+			temp = 7;
+			default_system = 6;
+			break;
+		case 1088:
+			temp = 8;
+			default_system = 7;
+			break;
+		}
+		break;
+	case Atari800_MACHINE_5200:
+		temp = 4;
+		default_system = 6;
+		break;
+	}
+	StateSav_SaveUBYTE(&temp, 1);
+
+	StateSav_SaveINT(&os, 1);
+	StateSav_SaveINT(&pil_on, 1);
+	StateSav_SaveINT(&default_tv_mode, 1);
+	StateSav_SaveINT(&default_system, 1);
+}
+
+void Atari800_StateRead(void)
+{
+	int new_tv_mode;
+	/* these are all for compatibility with previous versions */
+	UBYTE temp;
+	int default_tv_mode;
+	int os;
+	int default_system;
+	int pil_on;
+
+	StateSav_ReadUBYTE(&temp, 1);
+	new_tv_mode = (temp == 0) ? Atari800_TV_PAL : Atari800_TV_NTSC;
+	if (new_tv_mode != Atari800_tv_mode) {
+		Atari800_tv_mode = new_tv_mode;
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+		Colours_InitialiseMachine();
+#endif
+	}
+
+	StateSav_ReadUBYTE(&temp, 1);
+	StateSav_ReadINT(&os, 1);
+	switch (temp) {
+	case 0:
+		Atari800_machine_type = os == 1 ? Atari800_MACHINE_OSA : Atari800_MACHINE_OSB;
+		MEMORY_ram_size = 48;
+		break;
+	case 1:
+		Atari800_machine_type = Atari800_MACHINE_XLXE;
+		MEMORY_ram_size = 64;
+		break;
+	case 2:
+		Atari800_machine_type = Atari800_MACHINE_XLXE;
+		MEMORY_ram_size = 128;
+		break;
+	case 3:
+		Atari800_machine_type = Atari800_MACHINE_XLXE;
+		MEMORY_ram_size = MEMORY_RAM_320_COMPY_SHOP;
+		break;
+	case 4:
+		Atari800_machine_type = Atari800_MACHINE_5200;
+		MEMORY_ram_size = 16;
+		break;
+	case 5:
+		Atari800_machine_type = os == 1 ? Atari800_MACHINE_OSA : Atari800_MACHINE_OSB;
+		MEMORY_ram_size = 16;
+		break;
+	case 6:
+		Atari800_machine_type = Atari800_MACHINE_XLXE;
+		MEMORY_ram_size = 16;
+		break;
+	case 7:
+		Atari800_machine_type = Atari800_MACHINE_XLXE;
+		MEMORY_ram_size = 576;
+		break;
+	case 8:
+		Atari800_machine_type = Atari800_MACHINE_XLXE;
+		MEMORY_ram_size = 1088;
+		break;
+	case 9:
+		Atari800_machine_type = Atari800_MACHINE_XLXE;
+		MEMORY_ram_size = 192;
+		break;
+	default:
+		Atari800_machine_type = Atari800_MACHINE_XLXE;
+		MEMORY_ram_size = 64;
+		Log_print("Warning: Bad machine type read in from state save, defaulting to 800 XL");
+		break;
+	}
+
+	StateSav_ReadINT(&pil_on, 1);
+	StateSav_ReadINT(&default_tv_mode, 1);
+	StateSav_ReadINT(&default_system, 1);
+	load_roms();
+	/* XXX: what about patches? */
+}
+
+#endif
diff --git a/project/jni/application/atari800/src/atari.h b/project/jni/application/atari800/src/atari.h
new file mode 100644
index 000000000..459555f68
--- /dev/null
+++ b/project/jni/application/atari800/src/atari.h
@@ -0,0 +1,135 @@
+#ifndef ATARI_H_
+#define ATARI_H_
+
+#include "config.h"
+#include <stdio.h> /* FILENAME_MAX */
+#ifdef WIN32
+#include <windows.h>
+#endif
+
+/* Fundamental declarations ---------------------------------------------- */
+
+#define Atari800_TITLE  "Atari 800 Emulator, Version 2.1.0"
+
+#ifndef FALSE
+#define FALSE  0
+#endif
+#ifndef TRUE
+#define TRUE   1
+#endif
+
+/* SBYTE and UBYTE must be exactly 1 byte long. */
+/* SWORD and UWORD must be exactly 2 bytes long. */
+/* SLONG and ULONG must be exactly 4 bytes long. */
+#define SBYTE signed char
+#define SWORD signed short
+#define SLONG signed int
+#define UBYTE unsigned char
+#define UWORD unsigned short
+#ifndef WIN32
+/* Windows headers typedef ULONG */
+#define ULONG unsigned int
+#endif
+/* Note: in various parts of the emulator we assume that char is 1 byte
+   and int is 4 bytes. */
+
+
+/* Public interface ------------------------------------------------------ */
+
+/* Machine type. */
+#define Atari800_MACHINE_OSA   0
+#define Atari800_MACHINE_OSB   1
+#define Atari800_MACHINE_XLXE  2
+#define Atari800_MACHINE_5200  3
+extern int Atari800_machine_type;
+
+/* Always call Atari800_InitialiseMachine() after changing Atari800_machine_type
+   or MEMORY_ram_size! */
+
+/* Video system. */
+#define Atari800_TV_UNSET 0
+#define Atari800_TV_PAL 312
+#define Atari800_TV_NTSC 262
+
+/* Video system / Number of scanlines per frame. */
+extern int Atari800_tv_mode;
+
+/* TRUE to disable Atari BASIC when booting Atari (hold Option in XL/XE). */
+extern int Atari800_disable_basic;
+
+/* If Atari800_Frame() sets it to TRUE, then the current contents
+   of Screen_atari should be displayed. */
+extern int Atari800_display_screen;
+
+/* Simply incremented by Atari800_Frame(). */
+extern int Atari800_nframes;
+
+/* How often the screen is updated (1 = every Atari frame). */
+extern int Atari800_refresh_rate;
+
+/* Set to TRUE for faster emulation with Atari800_refresh_rate > 1.
+   Set to FALSE for accurate emulation with Atari800_refresh_rate > 1. */
+extern int Atari800_collisions_in_skipped_frames;
+
+/* Initializes Atari800 emulation core. */
+int Atari800_Initialise(int *argc, char *argv[]);
+
+/* Emulates one frame (1/50sec for PAL, 1/60sec for NTSC). */
+void Atari800_Frame(void);
+
+/* Reboots the emulated Atari. */
+void Atari800_Coldstart(void);
+
+/* Presses the Reset key in the emulated Atari. */
+void Atari800_Warmstart(void);
+
+/* Reinitializes after Atari800_machine_type or ram_size change.
+   You should call Atari800_Coldstart() after it. */
+int Atari800_InitialiseMachine(void);
+
+/* Shuts down Atari800 emulation core. */
+int Atari800_Exit(int run_monitor);
+
+
+/* Private interface ----------------------------------------------------- */
+/* Don't use outside the emulation core! */
+
+/* STAT_UNALIGNED_WORDS is solely for benchmarking purposes.
+   8-element arrays (stat_arr) represent number of accesses with the given
+   value of 3 least significant bits of address. This gives us information
+   about the ratio of aligned vs unaligned accesses. */
+#ifdef STAT_UNALIGNED_WORDS
+#define UNALIGNED_STAT_DEF(stat_arr)             unsigned int stat_arr[8];
+#define UNALIGNED_STAT_DECL(stat_arr)            extern unsigned int stat_arr[8];
+#define UNALIGNED_GET_WORD(ptr, stat_arr)        (stat_arr[(unsigned int) (ptr) & 7]++, *(const UWORD *) (ptr))
+#define UNALIGNED_PUT_WORD(ptr, value, stat_arr) (stat_arr[(unsigned int) (ptr) & 7]++, *(UWORD *) (ptr) = (value))
+#define UNALIGNED_GET_LONG(ptr, stat_arr)        (stat_arr[(unsigned int) (ptr) & 7]++, *(const ULONG *) (ptr))
+#define UNALIGNED_PUT_LONG(ptr, value, stat_arr) (stat_arr[(unsigned int) (ptr) & 7]++, *(ULONG *) (ptr) = (value))
+UNALIGNED_STAT_DECL(Screen_atari_write_long_stat)
+UNALIGNED_STAT_DECL(pm_scanline_read_long_stat)
+UNALIGNED_STAT_DECL(memory_read_word_stat)
+UNALIGNED_STAT_DECL(memory_write_word_stat)
+UNALIGNED_STAT_DECL(memory_read_aligned_word_stat)
+UNALIGNED_STAT_DECL(memory_write_aligned_word_stat)
+#else
+#define UNALIGNED_STAT_DEF(stat_arr)
+#define UNALIGNED_STAT_DECL(stat_arr)
+#define UNALIGNED_GET_WORD(ptr, stat_arr)        (*(const UWORD *) (ptr))
+#define UNALIGNED_PUT_WORD(ptr, value, stat_arr) (*(UWORD *) (ptr) = (value))
+#define UNALIGNED_GET_LONG(ptr, stat_arr)        (*(const ULONG *) (ptr))
+#define UNALIGNED_PUT_LONG(ptr, value, stat_arr) (*(ULONG *) (ptr) = (value))
+#endif
+
+/* Sleeps until it's time to emulate next Atari frame. */
+void Atari800_Sync(void);
+
+/* Load a ROM image filename of size nbytes into buffer */
+int Atari800_LoadImage(const char *filename, UBYTE *buffer, int nbytes);
+
+/* Save State */
+void Atari800_StateSave(void);
+
+/* Read State */
+void Atari800_StateRead(void);
+
+#endif /* ATARI_H_ */
diff --git a/project/jni/application/atari800/src/atari_ntsc.c b/project/jni/application/atari800/src/atari_ntsc.c
new file mode 100644
index 000000000..e39987fa8
--- /dev/null
+++ b/project/jni/application/atari800/src/atari_ntsc.c
@@ -0,0 +1,487 @@
+
+/* http://www.slack.net/~ant/ */
+
+/* compilable in C or C++; just change the file extension */
+
+#include "atari_ntsc.h"
+#include "log.h"
+
+#include <string.h>
+#include <math.h>
+#include <stdlib.h>
+/* Based on algorithm by NewRisingSun */
+/* License note by Perry: Expat License. 
+ * http://www.gnu.org/licenses/license-list.html#GPLCompatibleLicenses
+ * "This is a simple, permissive non-copyleft free software license, compatible with the GNU GPL."*/
+/* Copyright (C) 2006 Shay Green. Permission is hereby granted, free of
+charge, to any person obtaining a copy of this software module and associated
+documentation files (the "Software"), to deal in the Software without
+restriction, including without limitation the rights to use, copy, modify,
+merge, publish, distribute, sublicense, and/or sell copies of the Software, and
+to permit persons to whom the Software is furnished to do so, subject to the
+following conditions: The above copyright notice and this permission notice
+shall be included in all copies or substantial portions of the Software. THE
+SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,
+INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
+PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR
+COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
+IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
+
+enum { composite_border = 6 };
+enum { center_offset = 1 };
+enum { alignment_count = 4 }; /* different pixel alignments with respect to yiq quads */
+enum { rgb_kernel_size = atari_ntsc_entry_size / alignment_count };
+
+/* important to use + and not | since values are signed */
+#define MAKE_KRGB( r, g, b ) \
+	( ((r + 16) >> 5 << 20) + ((g + 16) >> 5 << 10) + ((b + 16) >> 5) )
+static float const rgb_unit = 0x1000;
+
+#define MAKE_KMASK( x ) (((x) << 20) | ((x) << 10) | (x))
+
+/* clamp each RGB component to 0 to 0x7F range (low two bits are trashed) */
+#define CLAMP_RGB( io, adj ) {\
+	ntsc_rgb_t sub = (io) >> (7 + adj) & MAKE_KMASK( 3 );\
+	ntsc_rgb_t clamp = MAKE_KMASK( 0x202 ) - sub;\
+	io = ((io) | clamp) & (clamp - sub);\
+}
+
+enum { composite_size = composite_border + 8 + composite_border };
+enum { rgb_pad = (center_offset + composite_border + 7) / 8 * 8 - center_offset - composite_border };
+enum { rgb_size = (rgb_pad + composite_size + 7) / 8 * 8 };
+enum { rescaled_size = rgb_size / 8 * 7 };
+enum { ntsc_kernel_size = composite_size * 2 };
+
+typedef struct ntsc_to_rgb_t
+{
+	float composite [composite_size];
+	float to_rgb [6];
+	float brightness;
+	float contrast;
+	float sharpness;
+	short rgb [rgb_size] [3];
+	short rescaled [rescaled_size + 1] [3]; /* extra space for sharpen */
+	float kernel [ntsc_kernel_size];
+} ntsc_to_rgb_t;
+
+static float const pi = 3.14159265358979323846f;
+
+static void rotate_matrix( float const* in, float s, float c, float* out )
+{
+	int n = 3;
+	while ( n-- )
+	{
+		float i = *in++;
+		float q = *in++;
+		*out++ = i * c - q * s;
+		*out++ = i * s + q * c;
+	}
+}
+
+static void ntsc_to_rgb_init( ntsc_to_rgb_t* ntsc, atari_ntsc_setup_t const* setup, float hue )
+{
+	static float const to_rgb [6] = { 0.956, 0.621, -0.272, -0.647, -1.105, 1.702 };
+	float gaussian_factor = 1+setup->gaussian_factor; /* 1 = normal, > 1 reduces echoes of bright objects (was 2.1)*/
+	float const brightness_bias = rgb_unit / 128; /* reduces vert bands on artifact colored areas */
+	int i;
+	/* ranges need to be scaled a bit to avoid pixels overflowing at extremes */
+	ntsc->brightness = (setup->brightness-0.0f) * (0.4f * rgb_unit) + brightness_bias;
+	ntsc->contrast = (setup->contrast-0.0f) * 0.4f + 1;
+	ntsc->sharpness = 1 + (setup->sharpness < 0 ? setup->sharpness * 0.5f : setup->sharpness);
+	
+	for ( i = 0; i < composite_size; i++ )
+		ntsc->composite [i] = 0;
+	
+	/* Generate gaussian kernel, padded with zero */
+	for ( i = 0; i < ntsc_kernel_size; i++ )
+		ntsc->kernel [i] = 0;
+	for ( i = -composite_border; i <= composite_border; i++ )
+		ntsc->kernel [ntsc_kernel_size / 2 + i] = exp( i * i * (-0.03125f * gaussian_factor) );
+	
+	/* normalize kernel totals of every fourth sample (at all four phases) to 0.5, otherwise */
+	/* i/q low-pass will favor one of the four alignments and cause repeating spots */
+	for ( i = 0; i < 4; i++ )
+	{
+		double sum = 0;
+		float scale;
+		int x;
+		for ( x = i; x < ntsc_kernel_size; x += 4 )
+			sum += ntsc->kernel [x];
+		scale = 0.5 / sum;
+		for ( x = i; x < ntsc_kernel_size; x += 4 )
+			ntsc->kernel [x] *= scale;
+	}
+	
+	/* adjust decoder matrix */
+	{
+		float sat = setup->saturation + 1;
+		rotate_matrix( to_rgb, sin( hue ) * sat, cos( hue ) * sat, ntsc->to_rgb );
+	}
+	
+	memset( ntsc->rgb, 0, sizeof ntsc->rgb );
+}
+
+/* Convert NTSC composite signal to RGB, where composite signal contains only four
+   non-zero samples beginning at offset */
+static void ntsc_to_rgb( ntsc_to_rgb_t const* ntsc, int offset, short* out )
+{
+	float const* kernel = &ntsc->kernel [ntsc_kernel_size / 2 - offset];
+	float f0 = ntsc->composite [offset];
+	float f1 = ntsc->composite [offset + 1];
+	float f2 = ntsc->composite [offset + 2];
+	float f3 = ntsc->composite [offset + 3];
+	int x = 0;
+	while ( x < composite_size )
+	{
+		#define PIXEL( get_y ) \
+		{\
+			float i = kernel [ 0] * f0 + kernel [-2] * f2;\
+			float q = kernel [-1] * f1 + kernel [-3] * f3;\
+			float y = get_y;\
+			float r = y + i * ntsc->to_rgb [0] + q * ntsc->to_rgb [1];\
+			float g = y + i * ntsc->to_rgb [2] + q * ntsc->to_rgb [3];\
+			float b = y + i * ntsc->to_rgb [4] + q * ntsc->to_rgb [5];\
+			kernel++;\
+			out [0] = (int) r;\
+			out [1] = (int) g;\
+			out [2] = (int) b;\
+			out += 3;\
+		}
+		
+		PIXEL( i - ntsc->composite [x + 0] )
+		PIXEL( q - ntsc->composite [x + 1] )
+		PIXEL( ntsc->composite [x + 2] - i )
+		PIXEL( ntsc->composite [x + 3] - q )
+		x += 4;
+		
+		#undef PIXEL
+	}
+}
+
+/* Rescale pixels to NTSC aspect ratio using linear interpolation,
+   with 7 output pixels for every 8 input pixels, linear interpolation */
+static void rescale( short const* in, int count, short* out )
+{
+	do
+	{
+		int const accuracy = 16;
+		int const unit = 1 << accuracy;
+		int const step = unit / 8;
+		int left = unit - step;
+		int right = step;
+		int n = 7;
+		while ( n-- )
+		{
+			int r = (in [0] * left + in [3] * right) >> accuracy;
+			int g = (in [1] * left + in [4] * right) >> accuracy;
+			int b = (in [2] * left + in [5] * right) >> accuracy;
+			*out++ = r;
+			*out++ = g;
+			*out++ = b;
+			left  -= step;
+			right += step;
+			in += 3;
+		}
+		in += 3;
+	}
+	while ( (count -= 7) > 0 );
+}
+
+/* sharpen image using (level-1)/2, level, (level-1)/2 convolution kernel */
+static void sharpen( short const* in, float level, int count, short* out )
+{
+	/* to do: sharpen luma only? */
+	int const accuracy = 16;
+	int const middle = (int) (level * (1 << accuracy));
+	int const side   = (middle - (1 << accuracy)) >> 1;
+	
+	*out++ = *in++;
+	*out++ = *in++;
+	*out++ = *in++;
+	
+	for ( count = (count - 2) * 3; count--; in++ )
+		*out++ = (in [0] * middle - in [-3] * side - in [3] * side) >> accuracy;
+	*out++ = *in++;
+	*out++ = *in++;
+	*out++ = *in++;
+}
+
+/* Generate pixel and capture into table */
+static ntsc_rgb_t* gen_pixel( ntsc_to_rgb_t* ntsc, int ntsc_pos, int rescaled_pos, ntsc_rgb_t* out )
+{
+	ntsc_to_rgb( ntsc, composite_border + ntsc_pos, ntsc->rgb [rgb_pad] );
+	rescale( ntsc->rgb [0], rescaled_size, ntsc->rescaled [1] );
+	sharpen( ntsc->rescaled [1], ntsc->sharpness, rescaled_size, ntsc->rescaled [0] );
+	
+	{
+		short const* in = ntsc->rescaled [rescaled_pos];
+		int n = rgb_kernel_size;
+		while ( n-- )
+		{
+			*out++ = MAKE_KRGB( in [0], in [1], in [2] );
+			in += 3;
+		}
+	}
+	return out;
+}
+void atari_ntsc_init( atari_ntsc_t* emu, atari_ntsc_setup_t const* setup )
+{
+
+	/* init pixel renderer */
+	int entry;
+	float burst_phase = (setup->burst_phase) * pi;
+	ntsc_to_rgb_t ntsc;
+	ntsc_to_rgb_init( &ntsc, setup, setup->hue * pi - burst_phase );
+	
+	for ( entry = 0; entry < atari_ntsc_color_count; entry++ )
+	{
+		/*NTSC PHASE CONSTANTS.*/
+		float ntsc_phase_constant[16]={0,2.27,1.87,1.62,
+				1.22,0.62,-0.31,-0.855,
+				-1.18,-1.43,-1.63,-1.93,
+       				-2.38,-3.43,2.52,2.07};
+		/*NTSC luma multipliers from gtia.pdf*/
+				float luma_mult[16]={
+				0.6941, 0.7091, 0.7241, 0.7401, 
+				0.7560, 0.7741, 0.7931, 0.8121,
+			       	0.8260, 0.8470, 0.8700, 0.8930,
+			       	0.9160, 0.9420, 0.9690, 1.0000};
+		/* calculate yiq for color entry */
+		int color = entry >> 4;
+		float angle = burst_phase + ntsc_phase_constant[color];
+		float lumafactor = ( luma_mult[ entry & 0x0f] - luma_mult[0] )/( luma_mult[15] - luma_mult[0] );
+		float adj_lumafactor = pow(lumafactor, 1 +setup->gamma_adj);
+		float y = adj_lumafactor  * rgb_unit;
+		float base_saturation = (color ? rgb_unit * 0.35f: 0.0f);
+		float saturation_ramp = setup->saturation_ramp;
+		float saturation = base_saturation * ( 1 - saturation_ramp*lumafactor );
+		float i = sin( angle ) * saturation;
+		float q = cos( angle ) * saturation;
+		ntsc_rgb_t* out = emu->table [entry];
+		y = y * ntsc.contrast + ntsc.brightness;
+		
+		/* generate at four alignments with respect to output */
+		ntsc.composite [composite_border + 0] = i + y;
+		ntsc.composite [composite_border + 1] = q + y;
+		out = gen_pixel( &ntsc, 0, 0, out );
+		
+		ntsc.composite [composite_border + 0] = 0;
+		ntsc.composite [composite_border + 1] = 0;
+		ntsc.composite [composite_border + 2] = i - y;
+		ntsc.composite [composite_border + 3] = q - y;
+		out = gen_pixel( &ntsc, 2, 2, out );
+		
+		ntsc.composite [composite_border + 2] = 0;
+		ntsc.composite [composite_border + 3] = 0;
+		ntsc.composite [composite_border + 4] = i + y;
+		ntsc.composite [composite_border + 5] = q + y;
+		out = gen_pixel( &ntsc, 4, 4, out );
+		
+		ntsc.composite [composite_border + 4] = 0;
+		ntsc.composite [composite_border + 5] = 0;
+		ntsc.composite [composite_border + 6] = i - y;
+		ntsc.composite [composite_border + 7] = q - y;
+		out = gen_pixel( &ntsc, 6, 6, out );
+		
+		ntsc.composite [composite_border + 6] = 0;
+		ntsc.composite [composite_border + 7] = 0;
+		
+		/* correct roundoff errors that would cause vertical bands in solid areas */
+		{
+			float r = y + i * ntsc.to_rgb [0] + q * ntsc.to_rgb [1];
+			float g = y + i * ntsc.to_rgb [2] + q * ntsc.to_rgb [3];
+			float b = y + i * ntsc.to_rgb [4] + q * ntsc.to_rgb [5];
+			ntsc_rgb_t correct = MAKE_KRGB( (int) r, (int) g, (int) b ) + MAKE_KMASK( 0x100 );
+			int i;
+			out = emu->table [entry];
+			for ( i = 0; i < rgb_kernel_size / 2; i++ )
+			{
+				/* sum as would occur when outputting run of pixels using same color,
+				but don't sum first kernel; the difference between this and the correct
+				color is what the first kernel's entry should be */
+				ntsc_rgb_t sum = out [(i+12)%14+14]+out[(i+10)%14+28]+out[(i+8)%14+42]+
+						out[i+7]+out [ i+ 5    +14]+out[ i+ 3    +28]+out[ i+1    +42];
+				out [i] = correct - sum;
+			}
+		}
+	}
+	Log_print("atari_ntsc_init(): sharpness:%f saturation:%f brightness:%f contrast:%f gaussian_factor:%f burst_phase:%f, hue:%f gamma_adj:%f saturation_ramp:%f\n",setup->sharpness,setup->saturation,setup->brightness,setup->contrast,setup->gaussian_factor,setup->burst_phase,setup->hue,setup->gamma_adj,setup->saturation_ramp);
+}
+
+void atari_ntsc_blit( atari_ntsc_t const* emu, unsigned char const* in, long in_pitch,
+		int width, int height, unsigned short* out, long out_pitch )
+{
+	int const chunk_count = (width - 10) / 7;
+	long next_in_line = in_pitch - chunk_count * 4;
+	long next_out_line = out_pitch - (chunk_count + 1) * (7 * sizeof *out);
+	while ( height-- )
+	{
+		#define ENTRY( n ) emu->table [n]
+		ntsc_rgb_t const* k1 = ENTRY( 0 );
+		ntsc_rgb_t const* k2 = k1;
+		ntsc_rgb_t const* k3 = k1;
+		ntsc_rgb_t const* k4 = k1;
+		ntsc_rgb_t const* k5 = k4;
+		ntsc_rgb_t const* k6 = k4;
+		ntsc_rgb_t const* k7 = k4;
+		int n;
+		
+		#if ATARI_NTSC_RGB_BITS == 16
+			#define TO_RGB( in ) ((in >> 11 & 0xF800) | (in >> 6 & 0x07C0) | (in >> 2 & 0x001F))
+		#elif ATARI_NTSC_RGB_BITS == 15
+			#define TO_RGB( in ) ((in >> 12 & 0x7C00) | (in >> 7 & 0x03E0) | (in >> 2 & 0x001F))
+		#endif
+		
+		#define PIXEL( a ) {\
+			ntsc_rgb_t temp =\
+					k0 [a  ] + k1 [(a+5)%7+14] + k2 [(a+3)%7+28] + k3 [(a+1)%7+42] +\
+					k4 [a+7] + k5 [(a+5)%7+21] + k6 [(a+3)%7+35] + k7 [(a+1)%7+49];\
+			if ( a ) out [a-1] = rgb;\
+			CLAMP_RGB( temp, 0 );\
+			rgb = TO_RGB( temp );\
+		}
+		
+		for ( n = chunk_count; n; --n )
+		{
+			ntsc_rgb_t const* k0 = ENTRY( in [0] );
+			int rgb;
+			PIXEL( 0 );
+			PIXEL( 1 );
+			k5 = k1;
+			k1 = ENTRY( in [1] );
+			PIXEL( 2 );
+			PIXEL( 3 );
+			k6 = k2;
+			k2 = ENTRY( in [2] );
+			PIXEL( 4 );
+			PIXEL( 5 );
+			k7 = k3;
+			k3 = ENTRY( in [3] );
+			PIXEL( 6 );
+			out [6] = rgb;
+			k4 = k0;
+			in += 4;
+			out += 7;
+		}
+		{
+			ntsc_rgb_t const* k0 = ENTRY( 0 );
+			int rgb;
+			PIXEL( 0 );
+			PIXEL( 1 );
+			k5 = k1;
+			k1 = k0;
+			PIXEL( 2 );
+			PIXEL( 3 );
+			k6 = k2;
+			k2 = k0;
+			PIXEL( 4 );
+			PIXEL( 5 );
+			k7 = k3;
+			k3 = k0;
+			PIXEL( 6 );
+			k4 = k0;
+			out [6] = rgb;
+			out += 7;
+			PIXEL( 0 );
+			PIXEL( 1 );
+			k5 = k0;
+			PIXEL( 2 );
+			out [2] = rgb;
+		}
+		#undef PIXEL
+		
+		in += next_in_line;
+		out = (unsigned short*) ((char*) out + next_out_line);
+	}
+}
+
+/* Atari800-specific: */
+
+/* Adjust default values here */
+atari_ntsc_setup_t atari_ntsc_setup = {
+	0.f, /* hue */
+	-0.1f, /* saturation */
+	0.f, /* contrast */
+	-0.1f, /* brightness */
+	-0.5f, /* sharpness */
+	-0.6f, /* burst phase */
+	0.f, /* gaussian factor */
+	-0.15, /* gamma adjustment */
+	0.25 /* satutration ramp */
+};
+
+int atari_ntsc_Initialise(int *argc, char *argv[])
+{
+	int i, j;
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = 0;			/* error, argument missing! */
+		
+		if (strcmp(argv[i], "-ntsc_hue") == 0) {
+			if (i_a)
+				atari_ntsc_setup.hue = atof(argv[++i]);
+			else a_m = 1;
+		} else if (strcmp(argv[i], "-ntsc_sat") == 0) {
+			if (i_a)
+				atari_ntsc_setup.saturation = atof(argv[++i]);
+			else a_m = 1;
+		} else if (strcmp(argv[i], "-ntsc_cont") == 0) {
+			if (i_a)
+				atari_ntsc_setup.contrast = atof(argv[++i]);
+			else a_m = 1;
+		} else if (strcmp(argv[i], "-ntsc_bright") == 0) {
+			if (i_a)
+				atari_ntsc_setup.brightness = atof(argv[++i]);
+			else a_m = 1;
+		} else if (strcmp(argv[i], "-ntsc_sharp") == 0) {
+			if (i_a)
+				atari_ntsc_setup.sharpness = atof(argv[++i]);
+			else a_m = 1;
+		} else if (strcmp(argv[i], "-ntsc_burst") == 0) {
+			if (i_a)
+				atari_ntsc_setup.burst_phase = atof(argv[++i]);
+			else a_m = 1;
+		} else if (strcmp(argv[i], "-ntsc_gauss") == 0) {
+			if (i_a)
+				atari_ntsc_setup.gaussian_factor = atof(argv[++i]);
+			else a_m = 1;
+		} else if (strcmp(argv[i], "-ntsc_gamma") == 0) {
+			if (i_a)
+				atari_ntsc_setup.gamma_adj = atof(argv[++i]);
+			else a_m = 1;
+		} else if (strcmp(argv[i], "-ntsc_ramp") == 0) {
+			if (i_a)
+				atari_ntsc_setup.saturation_ramp = atof(argv[++i]);
+			else a_m = 1;
+		}
+		else {
+		 	if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-ntsc_hue <n>    Set NTSC hue -1..1 (default %.2g) (-ntsc_emu only)", atari_ntsc_setup.hue);
+				Log_print("\t-ntsc_sat <n>    Set NTSC saturation (default %.2g) (-ntsc_emu only)", atari_ntsc_setup.saturation);
+				Log_print("\t-ntsc_cont <n>   Set NTSC contrast (default %.2g) (-ntsc_emu only)", atari_ntsc_setup.contrast);
+				Log_print("\t-ntsc_bright <n> Set NTSC brightness (default %.2g) (-ntsc_emu only)", atari_ntsc_setup.brightness);
+				Log_print("\t-ntsc_sharp <n>  Set NTSC sharpness (default %.2g) (-ntsc_emu only)", atari_ntsc_setup.sharpness);
+				Log_print("\t-ntsc_burst <n>  Set NTSC burst phase -1..1 (artif colours)(def: %.2g)", atari_ntsc_setup.burst_phase);
+				Log_print("\t                 (-ntsc_emu only)");
+				Log_print("\t-ntsc_gauss <n>  Set NTSC Gaussian factor (default %.2g)", atari_ntsc_setup.gaussian_factor);
+				Log_print("\t                 (-ntsc_emu only)");
+				Log_print("\t-ntsc_gamma <n>  Set NTSC gamma adjustment (default %.2g)", atari_ntsc_setup.gamma_adj);
+				Log_print("\t                 (-ntsc_emu only)");
+				Log_print("\t-ntsc_ramp <n>   Set NTSC saturation ramp factor (default %.2g)", atari_ntsc_setup.saturation_ramp);
+				Log_print("\t                 (-ntsc_emu only)");
+			}
+
+			argv[j++] = argv[i];
+		}
+
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return 0;
+		}
+	}
+	*argc = j;
+
+	return 1;
+}
+
diff --git a/project/jni/application/atari800/src/atari_ntsc.h b/project/jni/application/atari800/src/atari_ntsc.h
new file mode 100644
index 000000000..8e4458a32
--- /dev/null
+++ b/project/jni/application/atari800/src/atari_ntsc.h
@@ -0,0 +1,71 @@
+
+/* Atari GTIA NTSC composite video to RGB emulator/blitter */
+
+#ifndef ATARI_NTSC_H
+#define ATARI_NTSC_H
+
+/* Picture parameters, ranging from -1.0 to 1.0 where 0.0 is normal. To easily
+clear all fields, make it a static object then set whatever fields you want:
+	static snes_ntsc_setup_t setup;
+	setup.hue = ... */
+typedef struct atari_ntsc_setup_t
+{
+	float hue;
+	float saturation;
+	float contrast;
+	float brightness;
+	float sharpness;
+	float burst_phase; /* not in radians; -1.0 = -180 degrees, 1.0 = +180 degrees */
+	float gaussian_factor;
+	/* gamma adjustment */
+	float gamma_adj;
+	/* lower saturation for higher luma values */
+	float saturation_ramp;
+} atari_ntsc_setup_t;
+
+/* private */
+enum { atari_ntsc_entry_size = 56 };
+enum { atari_ntsc_color_count = 256 };
+typedef unsigned long ntsc_rgb_t;
+/*end private*/
+
+/* Caller must allocate space for blitter data, which uses 56 KB of memory. */
+typedef struct atari_ntsc_t
+{
+	ntsc_rgb_t table [atari_ntsc_color_count] [atari_ntsc_entry_size];
+} atari_ntsc_t;
+
+/* Initialize and adjust parameters. Can be called multiple times on the same
+atari_ntsc_t object. */
+void atari_ntsc_init( struct atari_ntsc_t*, atari_ntsc_setup_t const* setup );
+
+/* Blit one or more scanlines of Atari 8-bit palette values to 16-bit 5-6-5 RGB output.
+For every 7 output pixels, reads approximately 4 source pixels. Use constants below for
+definite input and output pixel counts. */
+void atari_ntsc_blit( struct atari_ntsc_t const*, unsigned char const* atari_in, long in_pitch,
+		int out_width, int out_height, unsigned short* rgb_out, long out_pitch );
+
+/* Useful values to use for output width and number of input pixels read */
+enum {
+	atari_ntsc_min_out_width  = 570, /* minimum width that doesn't cut off active area */
+	atari_ntsc_min_in_width   = 320,
+	
+	atari_ntsc_full_out_width = 598, /* room for 8-pixel left & right overscan borders */
+	atari_ntsc_full_in_width  = 336
+};
+
+/* supports 16-bit and 15-bit RGB output */
+#ifndef ATARI_NTSC_RGB_BITS
+	#define ATARI_NTSC_RGB_BITS 16
+#endif
+
+
+/* Atari800-specific: */
+
+extern atari_ntsc_setup_t atari_ntsc_setup;
+
+int atari_ntsc_Initialise(int *argc, char *argv[]);
+
+
+#endif
+
diff --git a/project/jni/application/atari800/src/atari_sdl.c b/project/jni/application/atari800/src/atari_sdl.c
new file mode 100644
index 000000000..73004c802
--- /dev/null
+++ b/project/jni/application/atari800/src/atari_sdl.c
@@ -0,0 +1,2456 @@
+/*
+ * atari_sdl.c - SDL library specific port code
+ *
+ * Copyright (c) 2001-2002 Jacek Poplawski
+ * Copyright (C) 2001-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+/*
+   Thanks to David Olofson for scaling tips!
+
+   TODO:
+   - implement all Atari800 parameters
+   - turn off fullscreen when error happen
+*/
+
+#include "config.h"
+#include <SDL.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#ifdef linux
+#define LPTJOY	1
+#endif
+
+#ifdef LPTJOY
+#include <fcntl.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/ioctl.h>
+#include <linux/lp.h>
+#endif /* LPTJOY */
+
+/* Atari800 includes */
+#include "input.h"
+#include "akey.h"
+#include "colours.h"
+#include "monitor.h"
+#include "platform.h"
+#include "ui.h"
+#include "screen.h"
+#include "pokeysnd.h"
+#include "gtia.h"
+#include "antic.h"
+#include "devices.h"
+#include "cpu.h"
+#include "memory.h"
+#include "pia.h"
+#include "log.h"
+#include "util.h"
+#include "atari_ntsc.h"
+#include "pbi_proto80.h"
+#include "xep80.h"
+#include "xep80_fonts.h"
+
+/* you can set that variables in code, or change it when emulator is running
+   I am not sure what to do with sound_enabled (can't turn it on inside
+   emulator, probably we need two variables or command line argument) */
+#ifdef SOUND
+#include "sound.h"
+static int sound_enabled = TRUE;
+static int sound_flags = 0;
+#ifdef ANDROID
+static int sound_bits = 16;
+#else
+static int sound_bits = 8;
+#endif
+#endif
+static int fullscreen = 1;
+static int grab_mouse = 0;
+static int bw = 0;
+static int swap_joysticks = 0;
+static int width_mode = 1;
+static int scanlines_percentage = 5;
+static int scanlinesnoint = FALSE;
+static atari_ntsc_t *the_ntscemu = NULL;
+#define SHORT_WIDTH_MODE 0
+#define DEFAULT_WIDTH_MODE 1
+#define FULL_WIDTH_MODE 2
+
+/* joystick emulation
+   keys are loaded from config file
+   Here the defaults if there is no keymap in the config file... */
+
+/* a runtime switch for the kbd_joy_X_enabled vars is in the UI */
+int PLATFORM_kbd_joy_0_enabled = TRUE;	/* enabled by default, doesn't hurt */
+int PLATFORM_kbd_joy_1_enabled = FALSE;	/* disabled, would steal normal keys */
+
+static int KBD_TRIG_0 = SDLK_RCTRL;
+static int KBD_STICK_0_LEFT = SDLK_KP4;
+static int KBD_STICK_0_RIGHT = SDLK_KP6;
+static int KBD_STICK_0_DOWN = SDLK_KP5;
+static int KBD_STICK_0_UP = SDLK_KP8;
+static int KBD_TRIG_1 = SDLK_LCTRL;
+static int KBD_STICK_1_LEFT = SDLK_a;
+static int KBD_STICK_1_RIGHT = SDLK_d;
+static int KBD_STICK_1_DOWN = SDLK_s;
+static int KBD_STICK_1_UP = SDLK_w;
+
+/* real joysticks */
+
+static int fd_joystick0 = -1;
+static int fd_joystick1 = -1;
+
+static SDL_Joystick *joystick0 = NULL;
+static SDL_Joystick *joystick1 = NULL;
+static int joystick0_nbuttons;
+static int joystick1_nbuttons;
+
+#define minjoy 10000			/* real joystick tolerancy */
+
+#ifdef SOUND
+/* sound */
+#define FRAGSIZE        10		/* 1<<FRAGSIZE is size of sound buffer in samples */
+static int dsp_buffer_samps = (1 << FRAGSIZE);
+static int dsp_buffer_bytes;
+static Uint8 *dsp_buffer = NULL;
+static int dsprate = 44100;
+#endif
+
+/* video */
+static SDL_Surface *MainScreen = NULL;
+static SDL_Color colors[256];			/* palette */
+static Uint16 Palette16[256];			/* 16-bit palette */
+static Uint32 Palette32[256];			/* 32-bit palette */
+int PLATFORM_xep80 = FALSE; 	/* is the XEP80 screen displayed? */
+enum PLATFORM_filter_t PLATFORM_filter = PLATFORM_FILTER_NONE;
+
+/* SDL port supports 5 "display modes":
+   - normal,
+   - rotated 9 degrees,
+   - ntscemu - emulation of NTSC composite video,
+   - xep80 emulation,
+   - proto80 - emulation of 80 column board for 1090XL.
+   The structure below is used to hold settings and functions used by a single
+   display mode. */
+struct display_mode_data_t {
+	int w;
+	int h;
+	int bpp;
+	void (*set_video_mode_func)(int, int); /* see below */
+	void (*display_screen_func)(Uint8 *); /* see below */
+};
+
+/* set_video_mode_func - these functions reset the SDL screen to the given
+   width and height. SetNewVideoModeNormal remembers the given W and H
+   parameters and sets the screen accordingly, while SetNewVideoModeIgnore
+   ignores W and H and sets the screen according to default parameters defined
+   in the DISPLAY_MODES table below. */
+static void SetNewVideoModeNormal(int w, int h);
+static void SetNewVideoModeIgnore(int w, int h);
+
+/* display_screen_func - these functions fill the given SCREEN buffer with
+   screen data, differently for each display mode. */
+static void DisplayNormal(Uint8 *screen);
+static void DisplayRotated240x320(Uint8 *screen);
+static void DisplayNTSCEmu640x480(Uint8 *screen);
+static void DisplayXEP80(Uint8 *screen);
+static void DisplayProto80640x400(Uint8 *screen);
+
+/* This table holds default settings for all display modes. */
+static struct display_mode_data_t display_modes[] = {
+	/* Normal */
+	{ Screen_WIDTH, Screen_HEIGHT, 0, /* bpp = 0 - autodetect */
+	  &SetNewVideoModeNormal, &DisplayNormal },
+	/* Rotated */
+	{ 240, 320, 16,
+	  &SetNewVideoModeIgnore, &DisplayRotated240x320 },
+	/* NTSCEmu */
+	{ 640, 480, 16,
+	  &SetNewVideoModeIgnore, &DisplayNTSCEmu640x480 },
+	/* XEP80 */
+	{ XEP80_SCRN_WIDTH, XEP80_SCRN_HEIGHT, 8,
+	  &SetNewVideoModeIgnore, &DisplayXEP80 },
+	/* Proto80 */
+	{ 640, 400, 16,
+	  &SetNewVideoModeIgnore, &DisplayProto80640x400 }
+};
+
+/* An enumerator to switch display modes comfortably. */
+enum display_mode_t {
+	display_normal,
+	display_rotated,
+	display_ntscemu,
+	display_xep80,
+	display_proto80
+};
+/* Indicates current display mode */
+static enum display_mode_t current_display_mode = display_normal;
+/* Display mode which should be reverted to, when XEP80 mode is turned off */
+static enum display_mode_t xep80_return_display_mode = display_normal;
+
+/* keyboard */
+/* static Uint8 *kbhits = NULL; */
+#define kbhits SDL_GetKeyState(NULL)
+
+/* For better handling of the PLATFORM_Configure-recognition...
+   Takes a keySym as integer-string and fills the value
+   into the retval referentially.
+   Authors: B.Schreiber, A.Martinez
+   fixed and cleaned up by joy */
+static int SDLKeyBind(int *retval, char *sdlKeySymIntStr)
+{
+	int ksym;
+
+	if (retval == NULL || sdlKeySymIntStr == NULL) {
+		return FALSE;
+	}
+
+	/* make an int out of the keySymIntStr... */
+	ksym = Util_sscandec(sdlKeySymIntStr);
+
+	if (ksym > SDLK_FIRST && ksym < SDLK_LAST) {
+		*retval = ksym;
+		return TRUE;
+	}
+	else {
+		return FALSE;
+	}
+}
+
+/* For getting sdl key map out of the config...
+   Authors: B.Schreiber, A.Martinez
+   cleaned up by joy */
+int PLATFORM_Configure(char *option, char *parameters)
+{
+	if (strcmp(option, "SDL_JOY_0_ENABLED") == 0) {
+		PLATFORM_kbd_joy_0_enabled = (parameters != NULL && parameters[0] != '0');
+		return TRUE;
+	}
+	else if (strcmp(option, "SDL_JOY_1_ENABLED") == 0) {
+		PLATFORM_kbd_joy_1_enabled = (parameters != NULL && parameters[0] != '0');
+		return TRUE;
+	}
+	else if (strcmp(option, "SDL_JOY_0_LEFT") == 0)
+		return SDLKeyBind(&KBD_STICK_0_LEFT, parameters);
+	else if (strcmp(option, "SDL_JOY_0_RIGHT") == 0)
+		return SDLKeyBind(&KBD_STICK_0_RIGHT, parameters);
+	else if (strcmp(option, "SDL_JOY_0_DOWN") == 0)
+		return SDLKeyBind(&KBD_STICK_0_DOWN, parameters);
+	else if (strcmp(option, "SDL_JOY_0_UP") == 0)
+		return SDLKeyBind(&KBD_STICK_0_UP, parameters);
+	else if (strcmp(option, "SDL_JOY_0_TRIGGER") == 0)
+		return SDLKeyBind(&KBD_TRIG_0, parameters);
+	else if (strcmp(option, "SDL_JOY_1_LEFT") == 0)
+		return SDLKeyBind(&KBD_STICK_1_LEFT, parameters);
+	else if (strcmp(option, "SDL_JOY_1_RIGHT") == 0)
+		return SDLKeyBind(&KBD_STICK_1_RIGHT, parameters);
+	else if (strcmp(option, "SDL_JOY_1_DOWN") == 0)
+		return SDLKeyBind(&KBD_STICK_1_DOWN, parameters);
+	else if (strcmp(option, "SDL_JOY_1_UP") == 0)
+		return SDLKeyBind(&KBD_STICK_1_UP, parameters);
+	else if (strcmp(option, "SDL_JOY_1_TRIGGER") == 0)
+		return SDLKeyBind(&KBD_TRIG_1, parameters);
+	else
+		return FALSE;
+}
+
+/* Save the keybindings and the keybindapp options to the config file...
+   Authors: B.Schreiber, A.Martinez
+   cleaned up by joy */
+void PLATFORM_ConfigSave(FILE *fp)
+{
+	fprintf(fp, "SDL_JOY_0_ENABLED=%d\n", PLATFORM_kbd_joy_0_enabled);
+	fprintf(fp, "SDL_JOY_0_LEFT=%d\n", KBD_STICK_0_LEFT);
+	fprintf(fp, "SDL_JOY_0_RIGHT=%d\n", KBD_STICK_0_RIGHT);
+	fprintf(fp, "SDL_JOY_0_UP=%d\n", KBD_STICK_0_UP);
+	fprintf(fp, "SDL_JOY_0_DOWN=%d\n", KBD_STICK_0_DOWN);
+	fprintf(fp, "SDL_JOY_0_TRIGGER=%d\n", KBD_TRIG_0);
+
+	fprintf(fp, "SDL_JOY_1_ENABLED=%d\n", PLATFORM_kbd_joy_1_enabled);
+	fprintf(fp, "SDL_JOY_1_LEFT=%d\n", KBD_STICK_1_LEFT);
+	fprintf(fp, "SDL_JOY_1_RIGHT=%d\n", KBD_STICK_1_RIGHT);
+	fprintf(fp, "SDL_JOY_1_UP=%d\n", KBD_STICK_1_UP);
+	fprintf(fp, "SDL_JOY_1_DOWN=%d\n", KBD_STICK_1_DOWN);
+	fprintf(fp, "SDL_JOY_1_TRIGGER=%d\n", KBD_TRIG_1);
+}
+
+void PLATFORM_SetJoystickKey(int joystick, int direction, int value)
+{
+	if (joystick == 0) {
+		switch(direction) {
+			case 0: KBD_STICK_0_LEFT = value; break;
+			case 1: KBD_STICK_0_UP = value; break;
+			case 2: KBD_STICK_0_RIGHT = value; break;
+			case 3: KBD_STICK_0_DOWN = value; break;
+			case 4: KBD_TRIG_0 = value; break;
+		}
+	}
+	else {
+		switch(direction) {
+			case 0: KBD_STICK_1_LEFT = value; break;
+			case 1: KBD_STICK_1_UP = value; break;
+			case 2: KBD_STICK_1_RIGHT = value; break;
+			case 3: KBD_STICK_1_DOWN = value; break;
+			case 4: KBD_TRIG_1 = value; break;
+		}
+	}
+}
+
+void PLATFORM_GetJoystickKeyName(int joystick, int direction, char *buffer, int bufsize)
+{
+	char *key = "";
+	switch(direction) {
+		case 0: key = SDL_GetKeyName((SDLKey)(joystick == 0 ? KBD_STICK_0_LEFT : KBD_STICK_1_LEFT));
+			break;
+		case 1: key = SDL_GetKeyName((SDLKey)(joystick == 0 ? KBD_STICK_0_UP : KBD_STICK_1_UP));
+			break;
+		case 2: key = SDL_GetKeyName((SDLKey)(joystick == 0 ? KBD_STICK_0_RIGHT : KBD_STICK_1_RIGHT));
+			break;
+		case 3: key = SDL_GetKeyName((SDLKey)(joystick == 0 ? KBD_STICK_0_DOWN : KBD_STICK_1_DOWN));
+			break;
+		case 4: key = SDL_GetKeyName((SDLKey)(joystick == 0 ? KBD_TRIG_0 : KBD_TRIG_1));
+			break;
+	}
+	snprintf(buffer, bufsize, "%11s", key);
+	buffer[bufsize-1] = '\0';
+}
+
+#ifdef SOUND
+
+void Sound_Pause(void)
+{
+	if (sound_enabled) {
+		/* stop audio output */
+		SDL_PauseAudio(1);
+	}
+}
+
+void Sound_Continue(void)
+{
+	if (sound_enabled) {
+		/* start audio output */
+		SDL_PauseAudio(0);
+	}
+}
+
+void Sound_Update(void)
+{
+	/* fake function */
+}
+
+#endif /* SOUND */
+
+static void SetPalette(void)
+{
+	SDL_SetPalette(MainScreen, SDL_LOGPAL | SDL_PHYSPAL, colors, 0, 256);
+}
+
+static void CalcPalette(void)
+{
+	int i, rgb;
+	float y;
+	Uint32 c;
+	if (bw == 0)
+		for (i = 0; i < 256; i++) {
+			rgb = Colours_table[i];
+			colors[i].r = (rgb & 0x00ff0000) >> 16;
+			colors[i].g = (rgb & 0x0000ff00) >> 8;
+			colors[i].b = (rgb & 0x000000ff) >> 0;
+		}
+	else
+		for (i = 0; i < 256; i++) {
+			rgb = Colours_table[i];
+			y = 0.299 * ((rgb & 0x00ff0000) >> 16) +
+				0.587 * ((rgb & 0x0000ff00) >> 8) +
+				0.114 * ((rgb & 0x000000ff) >> 0);
+			colors[i].r = (Uint8)y;
+			colors[i].g = (Uint8)y;
+			colors[i].b = (Uint8)y;
+		}
+	for (i = 0; i < 256; i++) {
+		c =
+			SDL_MapRGB(MainScreen->format, colors[i].r, colors[i].g,
+					   colors[i].b);
+		switch (MainScreen->format->BitsPerPixel) {
+		case 16:
+			Palette16[i] = (Uint16) c;
+			break;
+		case 32:
+			Palette32[i] = (Uint32) c;
+			break;
+		}
+	}
+
+}
+
+void PLATFORM_PaletteUpdate(void)
+{
+	CalcPalette();
+}
+
+static void ModeInfo(void)
+{
+	char bwflag, fullflag, width, joyflag;
+	if (bw)
+		bwflag = '*';
+	else
+		bwflag = ' ';
+	if (fullscreen)
+		fullflag = '*';
+	else
+		fullflag = ' ';
+	switch (width_mode) {
+	case FULL_WIDTH_MODE:
+		width = 'f';
+		break;
+	case DEFAULT_WIDTH_MODE:
+		width = 'd';
+		break;
+	case SHORT_WIDTH_MODE:
+		width = 's';
+		break;
+	default:
+		width = '?';
+		break;
+	}
+	if (swap_joysticks)
+		joyflag = '*';
+	else
+		joyflag = ' ';
+	Log_print("Video Mode: %dx%dx%d", MainScreen->w, MainScreen->h,
+		   MainScreen->format->BitsPerPixel);
+	Log_print("[%c] Full screen  [%c] BW  [%c] Width Mode  [%c] Joysticks Swapped",
+		 fullflag, bwflag, width, joyflag);
+}
+
+static void SetVideoMode(int w, int h, int bpp)
+{
+	if (fullscreen)
+		MainScreen = SDL_SetVideoMode(w, h, bpp, SDL_FULLSCREEN);
+	else
+		MainScreen = SDL_SetVideoMode(w, h, bpp, SDL_RESIZABLE);
+	if (MainScreen == NULL) {
+		Log_print("Setting Video Mode: %dx%dx%d FAILED", w, h, bpp);
+		Log_flushlog();
+		exit(-1);
+	}
+}
+
+static void SetNewVideoModeNormal(int w, int h)
+{
+	int bpp = display_modes[current_display_mode].bpp;
+	float ww, hh;
+
+	if ((h < Screen_HEIGHT) || (w < Screen_WIDTH)) {
+		h = Screen_HEIGHT;
+		w = Screen_WIDTH;
+	}
+
+	/* aspect ratio, floats needed */
+	ww = w;
+	hh = h;
+	switch (width_mode) {
+	case SHORT_WIDTH_MODE:
+		if (ww * 0.75 < hh)
+			hh = ww * 0.75;
+		else
+			ww = hh / 0.75;
+		break;
+	case DEFAULT_WIDTH_MODE:
+		if (ww / 1.4 < hh)
+			hh = ww / 1.4;
+		else
+			ww = hh * 1.4;
+		break;
+	case FULL_WIDTH_MODE:
+		if (ww / 1.6 < hh)
+			hh = ww / 1.6;
+		else
+			ww = hh * 1.6;
+		break;
+	}
+	w = (int)ww;
+	h = (int)hh;
+	w /= 8;
+	w *= 8;
+	h /= 8;
+	h *= 8;
+
+	display_modes[current_display_mode].w = w;
+	display_modes[current_display_mode].h = h;
+
+	/* Only the BPPs below are supported. Default to 8 bits otherwise. */
+	if (bpp != 0 && bpp != 8 && bpp != 16 && bpp != 32) {
+		Log_print("BPP %d unsupported, so setting 8bit mode (slow conversion)", bpp);
+		bpp = 8;
+	}
+	SetVideoMode(w, h, bpp);
+	if (bpp == 0) {
+		bpp = MainScreen->format->BitsPerPixel;
+		Log_print("detected %dbpp", bpp);
+		if ((bpp != 8) && (bpp != 16)
+			&& (bpp != 32)) {
+			Log_print("it's unsupported, so setting 8bit mode (slow conversion)");
+			bpp = 8;
+			SetVideoMode(w, h, 8);
+		}
+	}
+
+	/* Save bpp in case it changed above */
+	display_modes[current_display_mode].bpp = bpp;
+}
+
+static void SetNewVideoModeIgnore(int w, int h)
+{
+	SetVideoMode(display_modes[current_display_mode].w,
+	             display_modes[current_display_mode].h,
+	             display_modes[current_display_mode].bpp);
+}
+
+/* Reinitialises the SDL screen using current_display_mode and its parameters.
+ */
+static void ResetDisplay(void)
+{
+	(*display_modes[current_display_mode].set_video_mode_func)(display_modes[current_display_mode].w,
+	                                                           display_modes[current_display_mode].h);
+	CalcPalette();
+	SetPalette();
+
+	SDL_ShowCursor(SDL_DISABLE);	/* hide mouse cursor */
+
+	ModeInfo();
+}
+
+/* Resizes the SDL screen using current_display_mode and the given Width and
+   Height. */
+static void ResizeDisplay(int w, int h)
+{
+	(*display_modes[current_display_mode].set_video_mode_func)(w, h);
+	SetPalette();
+
+	SDL_ShowCursor(SDL_DISABLE);	/* hide mouse cursor */
+
+	ModeInfo();
+}
+
+static void SwitchFullscreen(void)
+{
+	fullscreen = 1 - fullscreen;
+	ResetDisplay();
+	PLATFORM_DisplayScreen();
+}
+
+void PLATFORM_SetFilter(const enum PLATFORM_filter_t filter)
+{
+	/* Mode to return when filter is turned off */
+	static enum display_mode_t saved_display_mode;
+
+	/* When the display is in XEP80 mode, the filter should not be
+	   switched on/off immediately. It should be switched only when
+	   XEP80 mode is turned off. The variable below indicates which is
+	   the case. */
+	int change_later = (current_display_mode == display_xep80);
+
+	/* Currently switching filter makes no sense when the emulator
+	   is running in PROTO80 mode. */
+	if (current_display_mode == display_proto80)
+		return;
+
+	PLATFORM_filter = filter;
+
+	if (filter == PLATFORM_FILTER_NONE && the_ntscemu != NULL) {
+		/* Turning filter off */
+		free(the_ntscemu);
+		the_ntscemu = NULL;
+		if (change_later)
+			xep80_return_display_mode = saved_display_mode;
+		else {
+			current_display_mode = saved_display_mode;
+			ResetDisplay();
+		}
+	}
+	else if (filter == PLATFORM_FILTER_NTSC && the_ntscemu == NULL) {
+		/* Turning filter on */
+		the_ntscemu = (atari_ntsc_t*) Util_malloc(sizeof(atari_ntsc_t));
+		atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+		if (change_later) {
+			saved_display_mode = xep80_return_display_mode;
+			xep80_return_display_mode = display_ntscemu;
+		} else {
+			saved_display_mode = current_display_mode;
+			current_display_mode = display_ntscemu;
+			ResetDisplay();
+		}
+	}
+}
+
+void PLATFORM_SwitchXep80(void)
+{
+	PLATFORM_xep80 = 1 - PLATFORM_xep80;
+	if (PLATFORM_xep80) {
+		xep80_return_display_mode = current_display_mode;
+		current_display_mode = display_xep80;
+	}
+	else
+		current_display_mode = xep80_return_display_mode;
+	ResetDisplay();
+	PLATFORM_DisplayScreen();
+}
+
+static void SwitchWidth(void)
+{
+	width_mode++;
+	if (width_mode > FULL_WIDTH_MODE)
+		width_mode = SHORT_WIDTH_MODE;
+
+	ResetDisplay();
+	PLATFORM_DisplayScreen();
+}
+
+static void SwitchBW(void)
+{
+	bw = 1 - bw;
+	CalcPalette();
+	SetPalette();
+	ModeInfo();
+}
+
+static void SwapJoysticks(void)
+{
+	swap_joysticks = 1 - swap_joysticks;
+	ModeInfo();
+}
+
+#ifdef SOUND
+static void SoundCallback(void *userdata, Uint8 *stream, int len)
+{
+	int sndn = (sound_bits == 8 ? len : len/2);
+	/* in mono, sndn is the number of samples (8 or 16 bit) */
+	/* in stereo, 2*sndn is the number of sample pairs */
+	POKEYSND_Process(dsp_buffer, sndn);
+	memcpy(stream, dsp_buffer, len);
+}
+
+static void SoundSetup(void)
+{
+	SDL_AudioSpec desired, obtained;
+	if (sound_enabled) {
+		desired.freq = dsprate;
+		if (sound_bits == 8)
+			desired.format = AUDIO_U8;
+		else if (sound_bits == 16)
+			desired.format = AUDIO_S16;
+		else {
+			Log_print("unknown sound_bits");
+			Atari800_Exit(FALSE);
+			Log_flushlog();
+		}
+
+		desired.samples = dsp_buffer_samps;
+		desired.callback = SoundCallback;
+		desired.userdata = NULL;
+#ifdef STEREO_SOUND
+		desired.channels = POKEYSND_stereo_enabled ? 2 : 1;
+#else
+		desired.channels = 1;
+#endif /* STEREO_SOUND*/
+
+		if (SDL_OpenAudio(&desired, &obtained) < 0) {
+			Log_print("Problem with audio: %s", SDL_GetError());
+			Log_print("Sound is disabled.");
+			sound_enabled = FALSE;
+			return;
+		}
+
+		free(dsp_buffer);
+		dsp_buffer_samps = obtained.samples;
+		dsp_buffer_bytes = desired.channels*dsp_buffer_samps*(sound_bits == 8 ? 1 : 2);
+		dsp_buffer = (Uint8 *)Util_malloc(dsp_buffer_bytes);
+		POKEYSND_Init(POKEYSND_FREQ_17_EXACT, dsprate, desired.channels, sound_flags);
+		SDL_PauseAudio(0);
+	}
+}
+
+void Sound_Reinit(void)
+{
+	SDL_CloseAudio();
+	SoundSetup();
+}
+
+static void SoundInitialise(int *argc, char *argv[])
+{
+	int i, j;
+
+	for (i = j = 1; i < *argc; i++) {
+		if (strcmp(argv[i], "-sound") == 0)
+			sound_enabled = TRUE;
+		else if (strcmp(argv[i], "-nosound") == 0)
+			sound_enabled = FALSE;
+		else if (strcmp(argv[i], "-audio16") == 0) {
+			Log_print("audio 16bit enabled");
+			sound_flags |= POKEYSND_BIT16;
+			sound_bits = 16;
+		}
+		else if (strcmp(argv[i], "-dsprate") == 0)
+			dsprate = Util_sscandec(argv[++i]);
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-sound           Enable sound");
+				Log_print("\t-nosound         Disable sound");
+				Log_print("\t-audio16         Enable 16-bit sound output");
+				Log_print("\t-dsprate <rate>  Set DSP rate in Hz");
+				sound_enabled = FALSE;
+			}
+			argv[j++] = argv[i];
+		}
+	}
+	*argc = j;
+
+	SoundSetup();
+}
+#endif /* SOUND */
+
+int PLATFORM_GetRawKey(void)
+{
+	while(TRUE)
+	{
+		SDL_Event event;
+		if (SDL_PollEvent(&event)) {
+			switch (event.type) {
+			case SDL_KEYDOWN:
+				return event.key.keysym.sym;
+			}
+		}
+	}
+}
+
+int PLATFORM_Keyboard(void)
+{
+	static int lastkey = SDLK_UNKNOWN, key_pressed = 0, key_control = 0;
+ 	static int lastuni = 0;
+	int shiftctrl = 0;
+	SDL_Event event;
+
+	/* Very ugly fix for SDL CAPSLOCK brokenness.  This will let the user
+	 * press CAPSLOCK and get a brief keypress on the Atari but it is not
+	 * possible to emulate holding down CAPSLOCK for longer periods with
+	 * the broken SDL*/
+	if (lastkey == SDLK_CAPSLOCK) {
+		lastkey = SDLK_UNKNOWN;
+	   	key_pressed = 0;
+ 		lastuni = 0;
+	}
+	if (SDL_PollEvent(&event)) {
+		switch (event.type) {
+		case SDL_KEYDOWN:
+			lastkey = event.key.keysym.sym;
+ 			lastuni = event.key.keysym.unicode;
+			key_pressed = 1;
+			break;
+		case SDL_KEYUP:
+			lastkey = event.key.keysym.sym;
+ 			lastuni = 0; /* event.key.keysym.unicode is not defined for KEYUP */
+			key_pressed = 0;
+			/* ugly hack to fix broken SDL CAPSLOCK*/
+			/* Because SDL is only sending Keydown and keyup for every change
+			 * of state of the CAPSLOCK status, rather than the actual key.*/
+			if(lastkey == SDLK_CAPSLOCK) {
+				key_pressed = 1;
+			}
+			break;
+		case SDL_VIDEORESIZE:
+			ResizeDisplay(event.resize.w, event.resize.h);
+			break;
+		case SDL_QUIT:
+			return AKEY_EXIT;
+			break;
+		}
+	}
+	else if (!key_pressed)
+		return AKEY_NONE;
+
+	/* kbhits = SDL_GetKeyState(NULL); */
+
+	if (kbhits == NULL) {
+		Log_print("oops, kbhits is NULL!");
+		Log_flushlog();
+		exit(-1);
+	}
+
+	UI_alt_function = -1;
+	if (kbhits[SDLK_LALT]) {
+		if (key_pressed) {
+			switch (lastkey) {
+			case SDLK_f:
+				key_pressed = 0;
+				SwitchFullscreen();
+				break;
+			case SDLK_x:
+				if (INPUT_key_shift && XEP80_enabled) {
+					key_pressed = 0;
+					PLATFORM_SwitchXep80();
+				}
+				break;
+			case SDLK_g:
+				key_pressed = 0;
+				SwitchWidth();
+				break;
+			case SDLK_b:
+				key_pressed = 0;
+				SwitchBW();
+				break;
+			case SDLK_j:
+				key_pressed = 0;
+				SwapJoysticks();
+				break;
+			case SDLK_r:
+				UI_alt_function = UI_MENU_RUN;
+				break;
+			case SDLK_y:
+				UI_alt_function = UI_MENU_SYSTEM;
+				break;
+			case SDLK_o:
+				UI_alt_function = UI_MENU_SOUND;
+				break;
+			case SDLK_w:
+				UI_alt_function = UI_MENU_SOUND_RECORDING;
+				break;
+			case SDLK_a:
+				UI_alt_function = UI_MENU_ABOUT;
+				break;
+			case SDLK_s:
+				UI_alt_function = UI_MENU_SAVESTATE;
+				break;
+			case SDLK_d:
+				UI_alt_function = UI_MENU_DISK;
+				break;
+			case SDLK_l:
+				UI_alt_function = UI_MENU_LOADSTATE;
+				break;
+			case SDLK_c:
+				UI_alt_function = UI_MENU_CARTRIDGE;
+				break;
+			case SDLK_BACKSLASH:
+				return AKEY_PBI_BB_MENU;
+			case SDLK_m:
+				grab_mouse = !grab_mouse;
+				SDL_WM_GrabInput(grab_mouse ? SDL_GRAB_ON : SDL_GRAB_OFF);
+				key_pressed = 0;
+				break;
+			default:
+				if(current_display_mode == display_ntscemu){
+					switch(lastkey){
+					case SDLK_1:
+						key_pressed = 0;
+						atari_ntsc_setup.sharpness-=0.1;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_2:
+						key_pressed = 0;
+						atari_ntsc_setup.sharpness+=0.1;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_3:
+						key_pressed = 0;
+						atari_ntsc_setup.saturation-=0.1;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_4:
+						key_pressed = 0;
+						atari_ntsc_setup.saturation+=0.1;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_5:
+						key_pressed = 0;
+						atari_ntsc_setup.brightness-=0.1;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_6:
+						key_pressed = 0;
+						atari_ntsc_setup.brightness+=0.1;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_7:
+						key_pressed = 0;
+						atari_ntsc_setup.contrast-=0.1;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_8:
+						key_pressed = 0;
+						atari_ntsc_setup.contrast+=0.1;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_9:
+						key_pressed = 0;
+						atari_ntsc_setup.burst_phase-=.05;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_0:
+						key_pressed = 0;
+						atari_ntsc_setup.burst_phase+=.05;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_MINUS:
+						key_pressed = 0;
+						atari_ntsc_setup.gaussian_factor-=.2;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_EQUALS:
+						key_pressed = 0;
+						atari_ntsc_setup.gaussian_factor+=.2;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_LEFTBRACKET:
+						key_pressed = 0;
+						scanlines_percentage -= 5*(scanlines_percentage>=5);
+						Log_print("scanlines percentage:%d",scanlines_percentage);
+						break;
+					case SDLK_RIGHTBRACKET:
+						key_pressed = 0;
+						scanlines_percentage += 5*(scanlines_percentage<=100-5);
+						Log_print("scanlines percentage:%d",scanlines_percentage);
+						break;
+					case SDLK_SEMICOLON:
+						key_pressed = 0;
+						atari_ntsc_setup.hue-=.01;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_QUOTE:
+						key_pressed = 0;
+						atari_ntsc_setup.hue+=.01;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_COMMA:
+						key_pressed = 0;
+						atari_ntsc_setup.gamma_adj-=.05;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_PERIOD:
+						key_pressed = 0;
+						atari_ntsc_setup.gamma_adj+=.05;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_INSERT:
+						key_pressed = 0;
+						atari_ntsc_setup.saturation_ramp-=.05;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					case SDLK_DELETE:
+						key_pressed = 0;
+						atari_ntsc_setup.saturation_ramp+=.05;
+						atari_ntsc_init( the_ntscemu, &atari_ntsc_setup );
+						break;
+					}
+				}
+			break;
+			}
+		}
+		if (UI_alt_function != -1) {
+			key_pressed = 0;
+			return AKEY_UI;
+		}
+	}
+
+	/* SHIFT STATE */
+	if ((kbhits[SDLK_LSHIFT]) || (kbhits[SDLK_RSHIFT]))
+		INPUT_key_shift = 1;
+	else
+		INPUT_key_shift = 0;
+
+    /* CONTROL STATE */
+	if ((kbhits[SDLK_LCTRL]) || (kbhits[SDLK_RCTRL]))
+		key_control = 1;
+	else
+		key_control = 0;
+
+	/*
+	if (event.type == 2 || event.type == 3) {
+		Log_print("E:%x S:%x C:%x K:%x U:%x M:%x",event.type,INPUT_key_shift,key_control,lastkey,event.key.keysym.unicode,event.key.keysym.mod);
+	}
+	*/
+
+	/* OPTION / SELECT / START keys */
+	INPUT_key_consol = INPUT_CONSOL_NONE;
+	if (kbhits[SDLK_F2])
+		INPUT_key_consol &= (~INPUT_CONSOL_OPTION);
+	if (kbhits[SDLK_F3])
+		INPUT_key_consol &= (~INPUT_CONSOL_SELECT);
+	if (kbhits[SDLK_F4])
+		INPUT_key_consol &= (~INPUT_CONSOL_START);
+
+	if (key_pressed == 0)
+		return AKEY_NONE;
+
+	/* Handle movement and special keys. */
+	switch (lastkey) {
+	case SDLK_F1:
+		key_pressed = 0;
+		return AKEY_UI;
+	case SDLK_F5:
+		key_pressed = 0;
+		return INPUT_key_shift ? AKEY_COLDSTART : AKEY_WARMSTART;
+	case SDLK_F8:
+		key_pressed = 0;
+		return (PLATFORM_Exit(1) ? AKEY_NONE : AKEY_EXIT);
+	case SDLK_F9:
+		return AKEY_EXIT;
+	case SDLK_F10:
+		key_pressed = 0;
+		return INPUT_key_shift ? AKEY_SCREENSHOT_INTERLACE : AKEY_SCREENSHOT_INTERLACE;
+	}
+
+	/* keyboard joysticks: don't pass the keypresses to emulation
+	 * as some games pause on a keypress (River Raid, Bruce Lee)
+	 */
+	if (!UI_is_active && PLATFORM_kbd_joy_0_enabled) {
+		if (lastkey == KBD_STICK_0_LEFT || lastkey == KBD_STICK_0_RIGHT ||
+			lastkey == KBD_STICK_0_UP || lastkey == KBD_STICK_0_DOWN || lastkey == KBD_TRIG_0) {
+			key_pressed = 0;
+			return AKEY_NONE;
+		}
+	}
+
+	if (!UI_is_active && PLATFORM_kbd_joy_1_enabled) {
+		if (lastkey == KBD_STICK_1_LEFT || lastkey == KBD_STICK_1_RIGHT ||
+			lastkey == KBD_STICK_1_UP || lastkey == KBD_STICK_1_DOWN || lastkey == KBD_TRIG_1) {
+			key_pressed = 0;
+			return AKEY_NONE;
+		}
+	}
+
+	if (INPUT_key_shift)
+		shiftctrl ^= AKEY_SHFT;
+
+	if (Atari800_machine_type == Atari800_MACHINE_5200 && !UI_is_active) {
+		if (lastkey == SDLK_F4)
+			return AKEY_5200_START ^ shiftctrl;
+		switch (lastuni) {
+		case 'p':
+			return AKEY_5200_PAUSE ^ shiftctrl;
+		case 'r':
+			return AKEY_5200_RESET ^ shiftctrl;
+		case '0':
+			return AKEY_5200_0 ^ shiftctrl;
+		case '1':
+			return AKEY_5200_1 ^ shiftctrl;
+		case '2':
+			return AKEY_5200_2 ^ shiftctrl;
+		case '3':
+			return AKEY_5200_3 ^ shiftctrl;
+		case '4':
+			return AKEY_5200_4 ^ shiftctrl;
+		case '5':
+			return AKEY_5200_5 ^ shiftctrl;
+		case '6':
+			return AKEY_5200_6 ^ shiftctrl;
+		case '7':
+			return AKEY_5200_7 ^ shiftctrl;
+		case '8':
+			return AKEY_5200_8 ^ shiftctrl;
+		case '9':
+			return AKEY_5200_9 ^ shiftctrl;
+		case '#':
+		case '=':
+			return AKEY_5200_HASH ^ shiftctrl;
+		case '*':
+			return AKEY_5200_ASTERISK ^ shiftctrl;
+		}
+		return AKEY_NONE;
+	}
+
+	if (key_control)
+		shiftctrl ^= AKEY_CTRL;
+
+	switch (lastkey) {
+	case SDLK_BACKQUOTE: /* fallthrough */
+		/* These are the "Windows" keys, but they don't work on Windows*/
+	case SDLK_LSUPER:
+		return AKEY_ATARI ^ shiftctrl;
+	case SDLK_RSUPER:
+		if (INPUT_key_shift)
+			return AKEY_CAPSLOCK;
+		else
+			return AKEY_CAPSTOGGLE;
+	case SDLK_END:
+	case SDLK_F6:
+		return AKEY_HELP ^ shiftctrl;
+	case SDLK_PAGEDOWN:
+		return AKEY_F2 | AKEY_SHFT;
+	case SDLK_PAGEUP:
+		return AKEY_F1 | AKEY_SHFT;
+	case SDLK_HOME:
+		return key_control ? AKEY_LESS|shiftctrl : AKEY_CLEAR;
+	case SDLK_PAUSE:
+	case SDLK_F7:
+		return AKEY_BREAK;
+	case SDLK_CAPSLOCK:
+		if (INPUT_key_shift)
+			return AKEY_CAPSLOCK|shiftctrl;
+		else
+			return AKEY_CAPSTOGGLE|shiftctrl;
+	case SDLK_SPACE:
+		return AKEY_SPACE ^ shiftctrl;
+	case SDLK_BACKSPACE:
+		return AKEY_BACKSPACE|shiftctrl;
+	case SDLK_RETURN:
+		return AKEY_RETURN ^ shiftctrl;
+	case SDLK_LEFT:
+		return (INPUT_key_shift ? AKEY_PLUS : AKEY_LEFT) ^ shiftctrl;
+	case SDLK_RIGHT:
+		return (INPUT_key_shift ? AKEY_ASTERISK : AKEY_RIGHT) ^ shiftctrl;
+	case SDLK_UP:
+		return (INPUT_key_shift ? AKEY_MINUS : AKEY_UP) ^ shiftctrl;
+	case SDLK_DOWN:
+		return (INPUT_key_shift ? AKEY_EQUAL : AKEY_DOWN) ^ shiftctrl;
+	case SDLK_ESCAPE:
+		/* Windows takes ctrl+esc and ctrl+shift+esc */
+		return AKEY_ESCAPE ^ shiftctrl;
+	case SDLK_TAB:
+		return AKEY_TAB ^ shiftctrl;
+	case SDLK_DELETE:
+		if (INPUT_key_shift)
+			return AKEY_DELETE_LINE|shiftctrl;
+		else
+			return AKEY_DELETE_CHAR;
+	case SDLK_INSERT:
+		if (INPUT_key_shift)
+			return AKEY_INSERT_LINE|shiftctrl;
+		else
+			return AKEY_INSERT_CHAR;
+	}
+	if (INPUT_cx85) switch (lastkey) {
+	case SDLK_KP1:
+		return AKEY_CX85_1;
+	case SDLK_KP2:
+		return AKEY_CX85_2;
+	case SDLK_KP3:
+		return AKEY_CX85_3;
+	case SDLK_KP4:
+		return AKEY_CX85_4;
+	case SDLK_KP5:
+		return AKEY_CX85_5;
+	case SDLK_KP6:
+		return AKEY_CX85_6;
+	case SDLK_KP7:
+		return AKEY_CX85_7;
+	case SDLK_KP8:
+		return AKEY_CX85_8;
+	case SDLK_KP9:
+		return AKEY_CX85_9;
+	case SDLK_KP0:
+		return AKEY_CX85_0;
+	case SDLK_KP_PERIOD:
+		return AKEY_CX85_PERIOD;
+	case SDLK_KP_MINUS:
+		return AKEY_CX85_MINUS;
+	case SDLK_KP_ENTER:
+		return AKEY_CX85_PLUS_ENTER;
+	case SDLK_KP_DIVIDE:
+		return (key_control ? AKEY_CX85_ESCAPE : AKEY_CX85_NO);
+	case SDLK_KP_MULTIPLY:
+		return AKEY_CX85_DELETE;
+	case SDLK_KP_PLUS:
+		return AKEY_CX85_YES;
+	}
+
+	/* Handle CTRL-0 to CTRL-9 and other control characters */
+	if (key_control) {
+		switch(lastuni) {
+		case '.':
+			return AKEY_FULLSTOP|shiftctrl;
+		case ',':
+			return AKEY_COMMA|shiftctrl;
+		case ';':
+			return AKEY_SEMICOLON|shiftctrl;
+		}
+		switch (lastkey) {
+		case SDLK_PERIOD:
+			return AKEY_FULLSTOP|shiftctrl;
+		case SDLK_COMMA:
+			return AKEY_COMMA|shiftctrl;
+		case SDLK_SEMICOLON:
+			return AKEY_SEMICOLON|shiftctrl;
+		case SDLK_SLASH:
+			return AKEY_SLASH|shiftctrl;
+		case SDLK_BACKSLASH:
+			/* work-around for Windows */
+			return AKEY_ESCAPE|shiftctrl;
+		case SDLK_0:
+			return AKEY_CTRL_0|shiftctrl;
+		case SDLK_1:
+			return AKEY_CTRL_1|shiftctrl;
+		case SDLK_2:
+			return AKEY_CTRL_2|shiftctrl;
+		case SDLK_3:
+			return AKEY_CTRL_3|shiftctrl;
+		case SDLK_4:
+			return AKEY_CTRL_4|shiftctrl;
+		case SDLK_5:
+			return AKEY_CTRL_5|shiftctrl;
+		case SDLK_6:
+			return AKEY_CTRL_6|shiftctrl;
+		case SDLK_7:
+			return AKEY_CTRL_7|shiftctrl;
+		case SDLK_8:
+			return AKEY_CTRL_8|shiftctrl;
+		case SDLK_9:
+			return AKEY_CTRL_9|shiftctrl;
+		}
+	}
+
+	/* Host Caps Lock will make lastuni switch case, so prevent this*/
+    if(lastuni>='A' && lastuni <= 'Z' && !INPUT_key_shift) lastuni += 0x20;
+    if(lastuni>='a' && lastuni <= 'z' && INPUT_key_shift) lastuni -= 0x20;
+	/* Uses only UNICODE translation, no shift states (this was added to
+	 * support non-US keyboard layouts)*/
+	/* input.c takes care of removing invalid shift+control keys */
+	switch (lastuni) {
+	case 1:
+		return AKEY_CTRL_a|shiftctrl;
+	case 2:
+		return AKEY_CTRL_b|shiftctrl;
+	case 3:
+		return AKEY_CTRL_c|shiftctrl;
+	case 4:
+		return AKEY_CTRL_d|shiftctrl;
+	case 5:
+		return AKEY_CTRL_e|shiftctrl;
+	case 6:
+		return AKEY_CTRL_f|shiftctrl;
+	case 7:
+		return AKEY_CTRL_g|shiftctrl;
+	case 8:
+		return AKEY_CTRL_h|shiftctrl;
+	case 9:
+		return AKEY_CTRL_i|shiftctrl;
+	case 10:
+		return AKEY_CTRL_j|shiftctrl;
+	case 11:
+		return AKEY_CTRL_k|shiftctrl;
+	case 12:
+		return AKEY_CTRL_l|shiftctrl;
+	case 13:
+		return AKEY_CTRL_m|shiftctrl;
+	case 14:
+		return AKEY_CTRL_n|shiftctrl;
+	case 15:
+		return AKEY_CTRL_o|shiftctrl;
+	case 16:
+		return AKEY_CTRL_p|shiftctrl;
+	case 17:
+		return AKEY_CTRL_q|shiftctrl;
+	case 18:
+		return AKEY_CTRL_r|shiftctrl;
+	case 19:
+		return AKEY_CTRL_s|shiftctrl;
+	case 20:
+		return AKEY_CTRL_t|shiftctrl;
+	case 21:
+		return AKEY_CTRL_u|shiftctrl;
+	case 22:
+		return AKEY_CTRL_v|shiftctrl;
+	case 23:
+		return AKEY_CTRL_w|shiftctrl;
+	case 24:
+		return AKEY_CTRL_x|shiftctrl;
+	case 25:
+		return AKEY_CTRL_y|shiftctrl;
+	case 26:
+		return AKEY_CTRL_z|shiftctrl;
+	case 'A':
+		return AKEY_A;
+	case 'B':
+		return AKEY_B;
+	case 'C':
+		return AKEY_C;
+	case 'D':
+		return AKEY_D;
+	case 'E':
+		return AKEY_E;
+	case 'F':
+		return AKEY_F;
+	case 'G':
+		return AKEY_G;
+	case 'H':
+		return AKEY_H;
+	case 'I':
+		return AKEY_I;
+	case 'J':
+		return AKEY_J;
+	case 'K':
+		return AKEY_K;
+	case 'L':
+		return AKEY_L;
+	case 'M':
+		return AKEY_M;
+	case 'N':
+		return AKEY_N;
+	case 'O':
+		return AKEY_O;
+	case 'P':
+		return AKEY_P;
+	case 'Q':
+		return AKEY_Q;
+	case 'R':
+		return AKEY_R;
+	case 'S':
+		return AKEY_S;
+	case 'T':
+		return AKEY_T;
+	case 'U':
+		return AKEY_U;
+	case 'V':
+		return AKEY_V;
+	case 'W':
+		return AKEY_W;
+	case 'X':
+		return AKEY_X;
+	case 'Y':
+		return AKEY_Y;
+	case 'Z':
+		return AKEY_Z;
+	case ':':
+		return AKEY_COLON;
+	case '!':
+		return AKEY_EXCLAMATION;
+	case '@':
+		return AKEY_AT;
+	case '#':
+		return AKEY_HASH;
+	case '$':
+		return AKEY_DOLLAR;
+	case '%':
+		return AKEY_PERCENT;
+	case '^':
+		return AKEY_CARET;
+	case '&':
+		return AKEY_AMPERSAND;
+	case '*':
+		return AKEY_ASTERISK;
+	case '(':
+		return AKEY_PARENLEFT;
+	case ')':
+		return AKEY_PARENRIGHT;
+	case '+':
+		return AKEY_PLUS;
+	case '_':
+		return AKEY_UNDERSCORE;
+	case '"':
+		return AKEY_DBLQUOTE;
+	case '?':
+		return AKEY_QUESTION;
+	case '<':
+		return AKEY_LESS;
+	case '>':
+		return AKEY_GREATER;
+	case 'a':
+		return AKEY_a;
+	case 'b':
+		return AKEY_b;
+	case 'c':
+		return AKEY_c;
+	case 'd':
+		return AKEY_d;
+	case 'e':
+		return AKEY_e;
+	case 'f':
+		return AKEY_f;
+	case 'g':
+		return AKEY_g;
+	case 'h':
+		return AKEY_h;
+	case 'i':
+		return AKEY_i;
+	case 'j':
+		return AKEY_j;
+	case 'k':
+		return AKEY_k;
+	case 'l':
+		return AKEY_l;
+	case 'm':
+		return AKEY_m;
+	case 'n':
+		return AKEY_n;
+	case 'o':
+		return AKEY_o;
+	case 'p':
+		return AKEY_p;
+	case 'q':
+		return AKEY_q;
+	case 'r':
+		return AKEY_r;
+	case 's':
+		return AKEY_s;
+	case 't':
+		return AKEY_t;
+	case 'u':
+		return AKEY_u;
+	case 'v':
+		return AKEY_v;
+	case 'w':
+		return AKEY_w;
+	case 'x':
+		return AKEY_x;
+	case 'y':
+		return AKEY_y;
+	case 'z':
+		return AKEY_z;
+	case ';':
+		return AKEY_SEMICOLON;
+	case '0':
+		return AKEY_0;
+	case '1':
+		return AKEY_1;
+	case '2':
+		return AKEY_2;
+	case '3':
+		return AKEY_3;
+	case '4':
+		return AKEY_4;
+	case '5':
+		return AKEY_5;
+	case '6':
+		return AKEY_6;
+	case '7':
+		return AKEY_7;
+	case '8':
+		return AKEY_8;
+	case '9':
+		return AKEY_9;
+	case ',':
+		return AKEY_COMMA;
+	case '.':
+		return AKEY_FULLSTOP;
+	case '=':
+		return AKEY_EQUAL;
+	case '-':
+		return AKEY_MINUS;
+	case '\'':
+		return AKEY_QUOTE;
+	case '/':
+		return AKEY_SLASH;
+	case '\\':
+		return AKEY_BACKSLASH;
+	case '[':
+		return AKEY_BRACKETLEFT;
+	case ']':
+		return AKEY_BRACKETRIGHT;
+	case '|':
+		return AKEY_BAR;
+	}
+
+	return AKEY_NONE;
+}
+
+static void PLATFORM_Mouse(void)
+{
+	Uint8 buttons;
+
+	if(INPUT_direct_mouse) {
+		int potx, poty;
+
+		buttons = SDL_GetMouseState(&potx, &poty);
+		if(potx < 0) potx = 0;
+		if(poty < 0) poty = 0;
+		potx = (double)potx * (228.0 / (double)MainScreen->w);
+		poty = (double)poty * (228.0 / (double)MainScreen->h);
+		if(potx > 227) potx = 227;
+		if(poty > 227) poty = 227;
+		POKEY_POT_input[INPUT_mouse_port << 1] = 227 - potx;
+		POKEY_POT_input[(INPUT_mouse_port << 1) + 1] = 227 - poty;
+	} else {
+		buttons = SDL_GetRelativeMouseState(&INPUT_mouse_delta_x, &INPUT_mouse_delta_y);
+	}
+
+	INPUT_mouse_buttons =
+		((buttons & SDL_BUTTON(1)) ? 1 : 0) |
+		((buttons & SDL_BUTTON(2)) ? 2 : 0) |
+		((buttons & SDL_BUTTON(3)) ? 4 : 0);
+}
+
+static void Init_SDL_Joysticks(int first, int second)
+{
+	if (first) {
+		joystick0 = SDL_JoystickOpen(0);
+		if (joystick0 == NULL)
+			Log_print("joystick 0 not found");
+		else {
+			Log_print("joystick 0 found!");
+			joystick0_nbuttons = SDL_JoystickNumButtons(joystick0);
+			swap_joysticks = 1;
+		}
+	}
+
+	if (second) {
+		joystick1 = SDL_JoystickOpen(1);
+		if (joystick1 == NULL)
+			Log_print("joystick 1 not found");
+		else {
+			Log_print("joystick 1 found!");
+			joystick1_nbuttons = SDL_JoystickNumButtons(joystick1);
+		}
+	}
+}
+
+static void Init_Joysticks(int *argc, char *argv[])
+{
+#ifdef LPTJOY
+	char *lpt_joy0 = NULL;
+	char *lpt_joy1 = NULL;
+	int i;
+	int j;
+
+	for (i = j = 1; i < *argc; i++) {
+		if (!strcmp(argv[i], "-joy0")) {
+			if (i == *argc - 1) {
+				Log_print("joystick device path missing!");
+				break;
+			}
+			lpt_joy0 = argv[++i];
+		}
+		else if (!strcmp(argv[i], "-joy1")) {
+			if (i == *argc - 1) {
+				Log_print("joystick device path missing!");
+				break;
+			}
+			lpt_joy1 = argv[++i];
+		}
+		else {
+			argv[j++] = argv[i];
+		}
+	}
+	*argc = j;
+
+	if (lpt_joy0 != NULL) {				/* LPT1 joystick */
+		fd_joystick0 = open(lpt_joy0, O_RDONLY);
+		if (fd_joystick0 == -1)
+			perror(lpt_joy0);
+	}
+	if (lpt_joy1 != NULL) {				/* LPT2 joystick */
+		fd_joystick1 = open(lpt_joy1, O_RDONLY);
+		if (fd_joystick1 == -1)
+			perror(lpt_joy1);
+	}
+#endif /* LPTJOY */
+	Init_SDL_Joysticks(fd_joystick0 == -1, fd_joystick1 == -1);
+	if (INPUT_cx85) { /* disable keyboard joystick if using CX85 numpad */
+		PLATFORM_kbd_joy_0_enabled = 0;
+	}
+}
+
+
+int PLATFORM_Initialise(int *argc, char *argv[])
+{
+	int i, j;
+	int no_joystick;
+	int help_only = FALSE;
+
+	no_joystick = 0;
+
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = FALSE;			/* error, argument missing! */
+		
+		if (strcmp(argv[i], "-ntscemu") == 0) {
+			PLATFORM_filter = PLATFORM_FILTER_NTSC;
+		}
+		else if (strcmp(argv[i], "-scanlines") == 0) {
+			if (i_a) {
+				scanlines_percentage  = Util_sscandec(argv[++i]);
+				Log_print("scanlines percentage set");
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-scanlinesnoint") == 0) {
+			scanlinesnoint = TRUE;
+			Log_print("scanlines interpolation disabled");
+		}
+		else if (strcmp(argv[i], "-rotate90") == 0) {
+			current_display_mode = display_rotated;
+			no_joystick = 1;
+			Log_print("rotate90 mode");
+		}
+		else if (strcmp(argv[i], "-nojoystick") == 0) {
+			no_joystick = 1;
+			Log_print("no joystick");
+		}
+		else if (strcmp(argv[i], "-width") == 0) {
+			if (i_a) {
+				display_modes[display_normal].w = Util_sscandec(argv[++i]);
+				Log_print("width set");
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-height") == 0) {
+			if (i_a) {
+				display_modes[display_normal].h = Util_sscandec(argv[++i]);
+				Log_print("height set");
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-bpp") == 0) {
+			if (i_a) {
+				display_modes[display_normal].bpp = Util_sscandec(argv[++i]);
+				Log_print("bpp set");
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-fullscreen") == 0) {
+			fullscreen = 1;
+		}
+		else if (strcmp(argv[i], "-windowed") == 0) {
+			fullscreen = 0;
+		}
+		else if (strcmp(argv[i], "-grabmouse") == 0) {
+			grab_mouse = 1;
+		}
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				help_only = TRUE;
+				Log_print("\t-ntscemu         Emulate NTSC composite video (640x480x16)");
+				Log_print("\t-scanlines       Specify scanlines percentage (ntscemu only)");
+				Log_print("\t-scanlinesnoint  Disable scanlines interpolation (ntscemu only)");
+				Log_print("\t-rotate90        Display 240x320 screen");
+				Log_print("\t-nojoystick      Disable joystick");
+#ifdef LPTJOY
+				Log_print("\t-joy0 <pathname> Select LPTjoy0 device");
+				Log_print("\t-joy1 <pathname> Select LPTjoy0 device");
+#endif /* LPTJOY */
+				Log_print("\t-width <num>     Host screen width");
+				Log_print("\t-height <num>    Host screen height");
+				Log_print("\t-bpp <num>       Host color depth");
+				Log_print("\t-fullscreen      Run fullscreen");
+				Log_print("\t-windowed        Run in window");
+				Log_print("\t-grabmouse       Prevent mouse pointer from leaving window");
+			}
+			argv[j++] = argv[i];
+		}
+
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return FALSE;
+		}
+	}
+	*argc = j;
+
+	i = SDL_INIT_VIDEO | SDL_INIT_JOYSTICK;
+#ifdef SOUND
+	if (!help_only)
+		i |= SDL_INIT_AUDIO;
+#endif
+#ifdef WIN32
+	/*Windows SDL version 1.2.10+ uses windib as the default, but it is slower*/
+	if (getenv("SDL_VIDEODRIVER")==NULL) {
+#ifdef __STRICT_ANSI__
+		extern int putenv(char *string); /* suppress -ansi -pedantic warning */
+#endif
+		putenv("SDL_VIDEODRIVER=directx");
+	}
+#endif
+	if (SDL_Init(i) != 0) {
+		Log_print("SDL_Init FAILED");
+		Log_print(SDL_GetError());
+		Log_flushlog();
+		exit(-1);
+	}
+	atexit(SDL_Quit);
+
+	/* SDL_WM_SetIcon("/usr/local/atari800/atarixe.ICO"), NULL); */
+	SDL_WM_SetCaption(Atari800_TITLE, "Atari800");
+
+	PLATFORM_Keyboard();
+
+#ifdef SOUND
+	SoundInitialise(argc, argv);
+#endif
+
+	if (help_only)
+		return TRUE;		/* return before changing the gfx mode */
+
+	/* Prototype 80 column adaptor */
+	if (PBI_PROTO80_enabled) {
+		current_display_mode = display_proto80;
+		Log_print("proto80 mode");
+	}
+
+	if (PLATFORM_filter != PLATFORM_FILTER_NONE)
+		PLATFORM_SetFilter(PLATFORM_filter);
+	ResetDisplay();
+
+	Log_print("video initialized");
+
+	if (no_joystick == 0)
+		Init_Joysticks(argc, argv);
+
+	SDL_EnableUNICODE(1);
+
+	if(grab_mouse)
+		SDL_WM_GrabInput(SDL_GRAB_ON);
+
+	return TRUE;
+}
+
+int PLATFORM_Exit(int run_monitor)
+{
+	int restart;
+	int original_fullscreen = fullscreen;
+
+	SDL_WM_GrabInput(SDL_GRAB_OFF);
+	if (run_monitor) {
+		/* disable graphics, set alpha mode */
+		if (fullscreen) {
+			SwitchFullscreen();
+		}
+#ifdef SOUND
+		Sound_Pause();
+#endif
+		restart = MONITOR_Run();
+#ifdef SOUND
+		Sound_Continue();
+#endif
+	}
+	else {
+		restart = FALSE;
+	}
+
+	if (restart) {
+		/* set up graphics and all the stuff */
+		if (original_fullscreen != fullscreen) {
+			SwitchFullscreen();
+		}
+		if(grab_mouse) SDL_WM_GrabInput(SDL_GRAB_ON);
+		return 1;
+	}
+
+	SDL_Quit();
+
+	Log_flushlog();
+
+	return restart;
+}
+/* License of scanLines_16():*/
+/* This function has been altered from its original version */
+/* This license is a verbatim copy of the license of ZLib 
+ * http://www.gnu.org/licenses/license-list.html#GPLCompatibleLicenses
+ * This is a free software license, and compatible with the GPL. */
+/*****************************************************************************
+ ** Original Source: /cvsroot/bluemsx/blueMSX/Src/VideoRender/VideoRender.c,v 
+ **
+ ** Original Revision: 1.25 
+ **
+ ** Original Date: 2006/01/17 08:49:34 
+ **
+ ** More info: http://www.bluemsx.com
+ **
+ ** Copyright (C) 2003-2004 Daniel Vik
+ **
+ **  This software is provided 'as-is', without any express or implied
+ **  warranty.  In no event will the authors be held liable for any damages
+ **  arising from the use of this software.
+ **
+ **  Permission is granted to anyone to use this software for any purpose,
+ **  including commercial applications, and to alter it and redistribute it
+ **  freely, subject to the following restrictions:
+ **
+ **  1. The origin of this software must not be misrepresented; you must not
+ **     claim that you wrote the original software. If you use this software
+ **     in a product, an acknowledgment in the product documentation would be
+ **     appreciated but is not required.
+ **  2. Altered source versions must be plainly marked as such, and must not be
+ **     misrepresented as being the original software.
+ **  3. This notice may not be removed or altered from any source distribution.
+ **
+ ******************************************************************************
+ */
+
+static void scanLines_16(void* pBuffer, int width, int height, int pitch, int scanLinesPct)
+{
+    Uint32* pBuf = (Uint32*)(pBuffer)+pitch/sizeof(Uint32);
+	Uint32* sBuf = (Uint32*)(pBuffer);
+    int w, h;
+	static int prev_scanLinesPct;
+
+    pitch = pitch * 2 / (int)sizeof(Uint32);
+    height /= 2;
+    width /= 2;
+
+	if (scanLinesPct < 0) scanLinesPct = 0;
+	if (scanLinesPct > 100) scanLinesPct = 100;
+
+    if (scanLinesPct == 100) {
+        if (prev_scanLinesPct != 100) {
+			/*clean dirty blank scanlines*/
+			prev_scanLinesPct = 100;
+			for (h = 0; h < height; h++) {
+				memset(pBuf, 0, width * sizeof(Uint32));
+				pBuf += pitch;
+			}
+		}
+		return;
+    }
+	prev_scanLinesPct = scanLinesPct;
+
+
+    if (scanLinesPct == 0) {
+	/* fill in blank scanlines */
+		for (h = 0; h < height; h++) {
+			memcpy(pBuf, sBuf, width * sizeof(Uint32));
+			sBuf += pitch;
+			pBuf += pitch;
+		}
+		return;
+    }
+    scanLinesPct = (100-scanLinesPct) * 32 / 100;
+
+    for (h = 0; h < height; h++) {
+		for (w = 0; w < width; w++) {
+			Uint32 pixel = sBuf[w];
+			Uint32 a = (((pixel & 0x07e0f81f) * scanLinesPct) & 0xfc1f03e0) >> 5;
+			Uint32 b = (((pixel >> 5) & 0x07c0f83f) * scanLinesPct) & 0xf81f07e0;
+			pBuf[w] = a | b;
+		}
+		sBuf += pitch;
+		pBuf += pitch;
+	}
+}
+
+/* Modified version of the above, which uses interpolation (slower but better)*/
+static void scanLines_16_interp(void* pBuffer, int width, int height, int pitch, int scanLinesPct)
+{
+    Uint32* pBuf = (Uint32*)(pBuffer)+pitch/sizeof(Uint32);
+	Uint32* sBuf = (Uint32*)(pBuffer);
+	Uint32* tBuf = (Uint32*)(pBuffer)+pitch*2/sizeof(Uint32);
+    int w, h;
+	static int prev_scanLinesPct;
+
+    pitch = pitch * 2 / (int)sizeof(Uint32);
+    height /= 2;
+    width /= 2;
+
+	if (scanLinesPct < 0) scanLinesPct = 0;
+	if (scanLinesPct > 100) scanLinesPct = 100;
+
+    if (scanLinesPct == 100) {
+        if (prev_scanLinesPct != 100) {
+			/*clean dirty blank scanlines*/
+			prev_scanLinesPct = 100;
+			for (h = 0; h < height; h++) {
+				memset(pBuf, 0, width * sizeof(Uint32));
+				pBuf += pitch;
+			}
+		}
+		return;
+    }
+	prev_scanLinesPct = scanLinesPct;
+
+
+    if (scanLinesPct == 0) {
+	/* fill in blank scanlines */
+		for (h = 0; h < height; h++) {
+			memcpy(pBuf, sBuf, width * sizeof(Uint32));
+			sBuf += pitch;
+			pBuf += pitch;
+		}
+		return;
+    }
+    scanLinesPct = (100-scanLinesPct) * 32 / 200;
+
+    for (h = 0; h < height-1; h++) {
+		for (w = 0; w < width; w++) {
+			Uint32 pixel = sBuf[w];
+			Uint32 pixel2 = tBuf[w];
+			Uint32 a = ((((pixel & 0x07e0f81f)+(pixel2 & 0x07e0f81f)) * scanLinesPct) & 0xfc1f03e0) >> 5;
+			Uint32 b = ((((pixel >> 5) & 0x07c0f83f)+((pixel2 >> 5) & 0x07c0f83f)) * scanLinesPct) & 0xf81f07e0;
+			pBuf[w] = a | b;
+		}
+		sBuf += pitch;
+		tBuf += pitch;
+		pBuf += pitch;
+	}
+}
+
+static void DisplayXEP80(UBYTE *screen)
+{
+	static int xep80Frame = 0;
+	Uint32 *start32;
+	int pitch4;
+	int i;
+	xep80Frame++;
+	if (xep80Frame == 60) xep80Frame = 0;
+	if (xep80Frame > 29) {
+		screen = XEP80_screen_1;
+	}
+	else {
+		screen = XEP80_screen_2;
+	}
+
+	pitch4 = MainScreen->pitch / 4;
+	start32 = (Uint32 *) MainScreen->pixels;
+
+	i = MainScreen->h;
+	while (i > 0) {
+		memcpy(start32, screen, XEP80_SCRN_WIDTH);
+		screen += XEP80_SCRN_WIDTH;
+		start32 += pitch4;
+		i--;
+	}
+}
+
+static void DisplayNTSCEmu640x480(UBYTE *screen)
+{
+	/* Number of overscan lines not shown */
+	enum { overscan_lines = 24 };
+	/* Change to 0 to clip the 8-pixel overscan borders off */
+	enum { overscan = 1 };
+
+	/* Atari active pixel area */
+	enum { atari_width = overscan ? atari_ntsc_full_in_width : atari_ntsc_min_in_width };
+	enum { atari_height = 240 -overscan_lines };
+
+	/* Output size */
+	enum { width = overscan ? atari_ntsc_full_out_width : atari_ntsc_min_out_width };
+	enum { height = atari_height * 2 };
+	enum { left_border_adj = ((640 - width)/2) & 0xfffffffc };
+	int const raw_width = Screen_WIDTH; /* raw image has extra data */
+
+	int jumped = 24;
+	unsigned short *pixels = (unsigned short*)MainScreen->pixels + overscan_lines / 2 * MainScreen->pitch + left_border_adj;
+	/* blit atari image, doubled vertically */
+	atari_ntsc_blit( the_ntscemu, screen + jumped + overscan_lines / 2 * Screen_WIDTH, raw_width, width, height / 2, pixels, MainScreen->pitch * 2 );
+	
+	if (!scanlinesnoint) {
+		scanLines_16_interp((void *)pixels, width, height, MainScreen->pitch, scanlines_percentage);
+	} else {
+		scanLines_16((void *)pixels, width, height, MainScreen->pitch, scanlines_percentage);
+	}
+}
+
+static void DisplayProto80640x400(UBYTE *screen)
+{
+	UWORD white = 0xffff;
+	UWORD black = 0x0000;
+	int skip = MainScreen->pitch - 80*8;
+	Uint16 *start16 = (Uint16 *) MainScreen->pixels;
+
+	int scanline, column;
+	UBYTE pixels;
+	for (scanline = 0; scanline < 8*24; scanline++) {
+		for (column = 0; column < 80; column++) {
+			int i;
+			pixels = PBI_PROTO80_GetPixels(scanline,column);
+			for (i = 0; i < 8; i++) {
+				if (pixels & 0x80) {
+					*start16++ = white;
+				}
+				else {
+					*start16++ = black;
+				}
+				pixels <<= 1;
+			}
+		}
+		start16 += skip;
+	}
+	scanLines_16_interp((void *)MainScreen->pixels, 640, 400, MainScreen->pitch, scanlines_percentage);
+}
+
+static void DisplayRotated240x320(Uint8 *screen)
+{
+	int i, j;
+	register Uint32 *start32;
+	if (MainScreen->format->BitsPerPixel != 16) {
+		Log_print("rotated display works only for bpp=16 right now");
+		Log_flushlog();
+		exit(-1);
+	}
+	start32 = (Uint32 *) MainScreen->pixels;
+	for (j = 0; j < MainScreen->h; j++)
+		for (i = 0; i < MainScreen->w / 2; i++) {
+			Uint8 left = screen[Screen_WIDTH * (i * 2) + 32 + 320 - j];
+			Uint8 right = screen[Screen_WIDTH * (i * 2 + 1) + 32 + 320 - j];
+#ifdef WORDS_BIGENDIAN
+			*start32++ = (Palette16[left] << 16) + Palette16[right];
+#else
+			*start32++ = (Palette16[right] << 16) + Palette16[left];
+#endif
+		}
+}
+
+static void DisplayWithoutScaling(Uint8 *screen, int jumped, int width)
+{
+	register Uint32 quad;
+	register Uint32 *start32;
+	register Uint8 c;
+	register int pos;
+	register int pitch4;
+	int i;
+
+	pitch4 = MainScreen->pitch / 4;
+	start32 = (Uint32 *) MainScreen->pixels;
+
+	screen = screen + jumped;
+	i = MainScreen->h;
+	switch (MainScreen->format->BitsPerPixel) {
+	/* Possible values are 8, 16 and 32, as checked earlier in the
+	 * SetNewVideoModeNormal() function. */
+	case 8:
+		while (i > 0) {
+			memcpy(start32, screen, width);
+			screen += Screen_WIDTH;
+			start32 += pitch4;
+			i--;
+		}
+		break;
+	case 16:
+		while (i > 0) {
+			pos = width - 1;
+			while (pos > 0) {
+				c = screen[pos];
+				quad = Palette16[c] << 16;
+				pos--;
+				c = screen[pos];
+				quad += Palette16[c];
+				start32[pos >> 1] = quad;
+				pos--;
+			}
+			screen += Screen_WIDTH;
+			start32 += pitch4;
+			i--;
+		}
+		break;
+	default:
+		/* MainScreen->format->BitsPerPixel = 32 */
+		while (i > 0) {
+			pos = width - 1;
+			while (pos > 0) {
+				c = screen[pos];
+				quad = Palette32[c];
+				start32[pos] = quad;
+				pos--;
+			}
+			screen += Screen_WIDTH;
+			start32 += pitch4;
+			i--;
+		}
+	}
+}
+
+static void DisplayWithScaling(Uint8 *screen, int jumped, int width)
+{
+	register Uint32 quad;
+	register int x;
+	register int dx;
+	register int yy;
+	register Uint8 *ss;
+	register Uint32 *start32;
+	int i;
+	int y;
+	int w1, w2, w4;
+	int w, h;
+	int pos;
+	int pitch4;
+	int dy;
+	Uint8 c;
+	pitch4 = MainScreen->pitch / 4;
+	start32 = (Uint32 *) MainScreen->pixels;
+
+	w = (width) << 16;
+	h = (Screen_HEIGHT) << 16;
+	dx = w / MainScreen->w;
+	dy = h / MainScreen->h;
+	w1 = MainScreen->w - 1;
+	w2 = MainScreen->w / 2 - 1;
+	w4 = MainScreen->w / 4 - 1;
+	ss = screen;
+	y = (0) << 16;
+	i = MainScreen->h;
+
+	switch (MainScreen->format->BitsPerPixel) {
+	/* Possible values are 8, 16 and 32, as checked earlier in the
+	 * SetNewVideoModeNormal() function. */
+	case 8:
+		while (i > 0) {
+			x = (width + jumped) << 16;
+			pos = w4;
+			yy = Screen_WIDTH * (y >> 16);
+			while (pos >= 0) {
+				quad = (ss[yy + (x >> 16)] << 24);
+				x = x - dx;
+				quad += (ss[yy + (x >> 16)] << 16);
+				x = x - dx;
+				quad += (ss[yy + (x >> 16)] << 8);
+				x = x - dx;
+				quad += (ss[yy + (x >> 16)] << 0);
+				x = x - dx;
+
+				start32[pos] = quad;
+				pos--;
+
+			}
+			start32 += pitch4;
+			y = y + dy;
+			i--;
+		}
+		break;
+	case 16:
+		while (i > 0) {
+			x = (width + jumped) << 16;
+			pos = w2;
+			yy = Screen_WIDTH * (y >> 16);
+			while (pos >= 0) {
+
+				c = ss[yy + (x >> 16)];
+				quad = Palette16[c] << 16;
+				x = x - dx;
+				c = ss[yy + (x >> 16)];
+				quad += Palette16[c];
+				x = x - dx;
+				start32[pos] = quad;
+				pos--;
+
+			}
+			start32 += pitch4;
+			y = y + dy;
+			i--;
+		}
+		break;
+	default:
+		/* MainScreen->format->BitsPerPixel = 32 */
+		while (i > 0) {
+			x = (width + jumped) << 16;
+			pos = w1;
+			yy = Screen_WIDTH * (y >> 16);
+			while (pos >= 0) {
+
+				c = ss[yy + (x >> 16)];
+				quad = Palette32[c];
+				x = x - dx;
+				start32[pos] = quad;
+				pos--;
+
+			}
+			start32 += pitch4;
+			y = y + dy;
+			i--;
+		}
+	}
+}
+
+void DisplayNormal(Uint8 *screen)
+{
+	int width, jumped;
+
+	switch (width_mode) {
+	case SHORT_WIDTH_MODE:
+		width = Screen_WIDTH - 2 * 24 - 2 * 8;
+		jumped = 24 + 8;
+		break;
+	case DEFAULT_WIDTH_MODE:
+		width = Screen_WIDTH - 2 * 24;
+		jumped = 24;
+		break;
+	case FULL_WIDTH_MODE:
+		width = Screen_WIDTH;
+		jumped = 0;
+		break;
+	default:
+		Log_print("unsupported width_mode");
+		Log_flushlog();
+		exit(-1);
+		break;
+	}
+	if (MainScreen->w == width && MainScreen->h == Screen_HEIGHT) {
+		DisplayWithoutScaling(screen, jumped, width);
+	}
+	else {
+		DisplayWithScaling(screen, jumped, width);
+	}
+}
+
+void PLATFORM_DisplayScreen(void)
+{
+	/* Use function corresponding to the current_display_mode. */
+	(*display_modes[current_display_mode].display_screen_func)((UBYTE *)Screen_atari);
+	SDL_Flip(MainScreen);
+}
+
+static int get_SDL_joystick_state(SDL_Joystick *joystick)
+{
+	int x;
+	int y;
+
+	x = SDL_JoystickGetAxis(joystick, 0);
+	y = SDL_JoystickGetAxis(joystick, 1);
+
+	if (x > minjoy) {
+		if (y < -minjoy)
+			return INPUT_STICK_UR;
+		else if (y > minjoy)
+			return INPUT_STICK_LR;
+		else
+			return INPUT_STICK_RIGHT;
+	}
+	else if (x < -minjoy) {
+		if (y < -minjoy)
+			return INPUT_STICK_UL;
+		else if (y > minjoy)
+			return INPUT_STICK_LL;
+		else
+			return INPUT_STICK_LEFT;
+	}
+	else {
+		if (y < -minjoy)
+			return INPUT_STICK_FORWARD;
+		else if (y > minjoy)
+			return INPUT_STICK_BACK;
+		else
+			return INPUT_STICK_CENTRE;
+	}
+}
+
+static int get_LPT_joystick_state(int fd)
+{
+#ifdef LPTJOY
+	int status;
+
+	ioctl(fd, LPGETSTATUS, &status);
+	status ^= 0x78;
+
+	if (status & 0x40) {			/* right */
+		if (status & 0x10) {		/* up */
+			return INPUT_STICK_UR;
+		}
+		else if (status & 0x20) {	/* down */
+			return INPUT_STICK_LR;
+		}
+		else {
+			return INPUT_STICK_RIGHT;
+		}
+	}
+	else if (status & 0x80) {		/* left */
+		if (status & 0x10) {		/* up */
+			return INPUT_STICK_UL;
+		}
+		else if (status & 0x20) {	/* down */
+			return INPUT_STICK_LL;
+		}
+		else {
+			return INPUT_STICK_LEFT;
+		}
+	}
+	else {
+		if (status & 0x10) {		/* up */
+			return INPUT_STICK_FORWARD;
+		}
+		else if (status & 0x20) {	/* down */
+			return INPUT_STICK_BACK;
+		}
+		else {
+			return INPUT_STICK_CENTRE;
+		}
+	}
+#else
+	return 0;
+#endif /* LPTJOY */
+}
+
+static void get_platform_PORT(Uint8 *s0, Uint8 *s1)
+{
+	int stick0, stick1;
+	stick0 = stick1 = INPUT_STICK_CENTRE;
+	if( !kbhits )
+		return;
+
+	if (PLATFORM_kbd_joy_0_enabled) {
+		if (kbhits[KBD_STICK_0_LEFT])
+			stick0 = INPUT_STICK_LEFT;
+		if (kbhits[KBD_STICK_0_RIGHT])
+			stick0 = INPUT_STICK_RIGHT;
+		if (kbhits[KBD_STICK_0_UP])
+			stick0 = INPUT_STICK_FORWARD;
+		if (kbhits[KBD_STICK_0_DOWN])
+			stick0 = INPUT_STICK_BACK;
+		if ((kbhits[KBD_STICK_0_LEFT]) && (kbhits[KBD_STICK_0_UP]))
+			stick0 = INPUT_STICK_UL;
+		if ((kbhits[KBD_STICK_0_LEFT]) && (kbhits[KBD_STICK_0_DOWN]))
+			stick0 = INPUT_STICK_LL;
+		if ((kbhits[KBD_STICK_0_RIGHT]) && (kbhits[KBD_STICK_0_UP]))
+			stick0 = INPUT_STICK_UR;
+		if ((kbhits[KBD_STICK_0_RIGHT]) && (kbhits[KBD_STICK_0_DOWN]))
+			stick0 = INPUT_STICK_LR;
+	}
+	if (PLATFORM_kbd_joy_1_enabled) {
+		if (kbhits[KBD_STICK_1_LEFT])
+			stick1 = INPUT_STICK_LEFT;
+		if (kbhits[KBD_STICK_1_RIGHT])
+			stick1 = INPUT_STICK_RIGHT;
+		if (kbhits[KBD_STICK_1_UP])
+			stick1 = INPUT_STICK_FORWARD;
+		if (kbhits[KBD_STICK_1_DOWN])
+			stick1 = INPUT_STICK_BACK;
+		if ((kbhits[KBD_STICK_1_LEFT]) && (kbhits[KBD_STICK_1_UP]))
+			stick1 = INPUT_STICK_UL;
+		if ((kbhits[KBD_STICK_1_LEFT]) && (kbhits[KBD_STICK_1_DOWN]))
+			stick1 = INPUT_STICK_LL;
+		if ((kbhits[KBD_STICK_1_RIGHT]) && (kbhits[KBD_STICK_1_UP]))
+			stick1 = INPUT_STICK_UR;
+		if ((kbhits[KBD_STICK_1_RIGHT]) && (kbhits[KBD_STICK_1_DOWN]))
+			stick1 = INPUT_STICK_LR;
+	}
+
+	if (swap_joysticks) {
+		*s1 = stick0;
+		*s0 = stick1;
+	}
+	else {
+		*s0 = stick0;
+		*s1 = stick1;
+	}
+
+	if ((joystick0 != NULL) || (joystick1 != NULL))	/* can only joystick1!=NULL ? */
+	{
+		SDL_JoystickUpdate();
+	}
+
+	if (fd_joystick0 != -1)
+		*s0 = get_LPT_joystick_state(fd_joystick0);
+	else if (joystick0 != NULL)
+		*s0 = get_SDL_joystick_state(joystick0);
+
+	if (fd_joystick1 != -1)
+		*s1 = get_LPT_joystick_state(fd_joystick1);
+	else if (joystick1 != NULL)
+		*s1 = get_SDL_joystick_state(joystick1);
+}
+
+static void get_platform_TRIG(Uint8 *t0, Uint8 *t1)
+{
+	int trig0, trig1, i;
+	trig0 = trig1 = 1;
+
+	if (PLATFORM_kbd_joy_0_enabled) {
+		trig0 = kbhits[KBD_TRIG_0] ? 0 : 1;
+	}
+
+	if (PLATFORM_kbd_joy_1_enabled) {
+		trig1 = kbhits[KBD_TRIG_1] ? 0 : 1;
+	}
+
+	if (swap_joysticks) {
+		*t1 = trig0;
+		*t0 = trig1;
+	}
+	else {
+		*t0 = trig0;
+		*t1 = trig1;
+	}
+
+	if (fd_joystick0 != -1) {
+#ifdef LPTJOY
+		int status;
+		ioctl(fd_joystick0, LPGETSTATUS, &status);
+		if (status & 8)
+			*t0 = 1;
+		else
+			*t0 = 0;
+#endif /* LPTJOY */
+	}
+	else if (joystick0 != NULL) {
+		trig0 = 1;
+		for (i = 0; i < joystick0_nbuttons; i++) {
+			if (SDL_JoystickGetButton(joystick0, i)) {
+				trig0 = 0;
+				break;
+			}
+		}
+		*t0 = trig0;
+	}
+
+	if (fd_joystick1 != -1) {
+#ifdef LPTJOY
+		int status;
+		ioctl(fd_joystick1, LPGETSTATUS, &status);
+		if (status & 8)
+			*t1 = 1;
+		else
+			*t1 = 0;
+#endif /* LPTJOY */
+	}
+	else if (joystick1 != NULL) {
+		trig1 = 1;
+		for (i = 0; i < joystick1_nbuttons; i++) {
+			if (SDL_JoystickGetButton(joystick1, i)) {
+				trig1 = 0;
+				break;
+			}
+		}
+		*t1 = trig1;
+	}
+}
+
+int PLATFORM_PORT(int num)
+{
+#ifndef DONT_DISPLAY
+	if (num == 0) {
+		UBYTE a, b;
+		get_platform_PORT(&a, &b);
+		return (b << 4) | (a & 0x0f);
+	}
+#endif
+	return 0xff;
+}
+
+int PLATFORM_TRIG(int num)
+{
+#ifndef DONT_DISPLAY
+	UBYTE a, b;
+	get_platform_TRIG(&a, &b);
+	switch (num) {
+	case 0:
+		return a;
+	case 1:
+		return b;
+	default:
+		break;
+	}
+#endif
+	return 1;
+}
+
+int main(int argc, char **argv)
+{
+	/* initialise Atari800 core */
+	if (!Atari800_Initialise(&argc, argv))
+		return 3;
+
+	/* main loop */
+	for (;;) {
+		INPUT_key_code = PLATFORM_Keyboard();
+		PLATFORM_Mouse();
+		Atari800_Frame();
+		if (Atari800_display_screen)
+			PLATFORM_DisplayScreen();
+	}
+}
+
+/*
+vim:ts=4:sw=4:
+*/
diff --git a/project/jni/application/atari800/src/binload.c b/project/jni/application/atari800/src/binload.c
new file mode 100644
index 000000000..fe33515d6
--- /dev/null
+++ b/project/jni/application/atari800/src/binload.c
@@ -0,0 +1,185 @@
+/*
+ * binload.c - load a binary executable file
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+
+#include "atari.h"
+#include "binload.h"
+#include "cpu.h"
+#include "devices.h"
+#include "esc.h"
+#include "log.h"
+#include "memory.h"
+#include "sio.h"
+
+int BINLOAD_start_binloading = FALSE;
+int BINLOAD_loading_basic = 0;
+FILE *BINLOAD_bin_file = NULL;
+
+/* Read a word from file */
+static int read_word(void)
+{
+	UBYTE buf[2];
+	if (fread(buf, 1, 2, BINLOAD_bin_file) != 2) {
+		fclose(BINLOAD_bin_file);
+		BINLOAD_bin_file = NULL;
+		if (BINLOAD_start_binloading) {
+			BINLOAD_start_binloading = FALSE;
+			Log_print("binload: not valid BIN file");
+			return -1;
+		}
+		CPU_regPC = MEMORY_dGetWordAligned(0x2e0);
+		return -1;
+	}
+	return buf[0] + (buf[1] << 8);
+}
+
+/* Start or continue loading */
+static void loader_cont(void)
+{
+	if (BINLOAD_bin_file == NULL)
+		return;
+	if (BINLOAD_start_binloading) {
+		MEMORY_dPutByte(0x244, 0);
+		MEMORY_dPutByte(0x09, 1);
+	}
+	else
+		CPU_regS += 2;	/* pop ESC code */
+
+	MEMORY_dPutByte(0x2e3, 0xd7);
+	do {
+		int temp;
+		UWORD from;
+		UWORD to;
+		do
+			temp = read_word();
+		while (temp == 0xffff);
+		if (temp < 0)
+			return;
+		from = (UWORD) temp;
+
+		temp = read_word();
+		if (temp < 0)
+			return;
+		to = (UWORD) temp;
+
+		if (BINLOAD_start_binloading) {
+			MEMORY_dPutWordAligned(0x2e0, from);
+			BINLOAD_start_binloading = FALSE;
+		}
+
+		to++;
+		do {
+			int byte = fgetc(BINLOAD_bin_file);
+			if (byte == EOF) {
+				fclose(BINLOAD_bin_file);
+				BINLOAD_bin_file = NULL;
+				CPU_regPC = MEMORY_dGetWordAligned(0x2e0);
+				if (MEMORY_dGetByte(0x2e3) != 0xd7) {
+					/* run INIT routine which RTSes directly to RUN routine */
+					CPU_regPC--;
+					MEMORY_dPutByte(0x0100 + CPU_regS--, CPU_regPC >> 8);		/* high */
+					MEMORY_dPutByte(0x0100 + CPU_regS--, CPU_regPC & 0xff);	/* low */
+					CPU_regPC = MEMORY_dGetWordAligned(0x2e2);
+				}
+				return;
+			}
+			MEMORY_PutByte(from, (UBYTE) byte);
+			from++;
+		} while (from != to);
+	} while (MEMORY_dGetByte(0x2e3) == 0xd7);
+
+	CPU_regS--;
+	ESC_Add((UWORD) (0x100 + CPU_regS), ESC_BINLOADER_CONT, loader_cont);
+	CPU_regS--;
+	MEMORY_dPutByte(0x0100 + CPU_regS--, 0x01);	/* high */
+	MEMORY_dPutByte(0x0100 + CPU_regS, CPU_regS + 1);	/* low */
+	CPU_regS--;
+	CPU_regPC = MEMORY_dGetWordAligned(0x2e2);
+	CPU_SetC;
+
+	MEMORY_dPutByte(0x0300, 0x31);	/* for "Studio Dream" */
+}
+
+/* Fake boot sector to call loader_cont at boot time */
+int BINLOAD_LoaderStart(UBYTE *buffer)
+{
+	buffer[0] = 0x00;	/* ignored */
+	buffer[1] = 0x01;	/* one boot sector */
+	buffer[2] = 0x00;	/* start at memory location 0x0700 */
+	buffer[3] = 0x07;
+	buffer[4] = 0x77;	/* reset reboots (0xe477 = Atari OS Coldstart) */
+	buffer[5] = 0xe4;
+	buffer[6] = 0xf2;	/* ESC */
+	buffer[7] = ESC_BINLOADER_CONT;
+	ESC_Add(0x706, ESC_BINLOADER_CONT, loader_cont);
+	return 'C';
+}
+
+/* Load BIN file, returns TRUE if ok */
+int BINLOAD_Loader(const char *filename)
+{
+	UBYTE buf[2];
+	if (BINLOAD_bin_file != NULL) {		/* close previously open file */
+		fclose(BINLOAD_bin_file);
+		BINLOAD_bin_file = NULL;
+		BINLOAD_loading_basic = 0;
+	}
+	if (Atari800_machine_type == Atari800_MACHINE_5200) {
+		Log_print("binload: can't run Atari programs directly on the 5200");
+		return FALSE;
+	}
+	BINLOAD_bin_file = fopen(filename, "rb");
+	if (BINLOAD_bin_file == NULL) {	/* open */
+		Log_print("binload: can't open \"%s\"", filename);
+		return FALSE;
+	}
+	/* Avoid "BOOT ERROR" when loading a BASIC program */
+	if (SIO_drive_status[0] == SIO_NO_DISK)
+		SIO_DisableDrive(1);
+	if (fread(buf, 1, 2, BINLOAD_bin_file) == 2) {
+		if (buf[0] == 0xff && buf[1] == 0xff) {
+			BINLOAD_start_binloading = TRUE; /* force SIO to call BINLOAD_LoaderStart at boot */
+			Atari800_Coldstart();             /* reboot */
+			return TRUE;
+		}
+		else if (buf[0] == 0 && buf[1] == 0) {
+			BINLOAD_loading_basic = BINLOAD_LOADING_BASIC_SAVED;
+			Devices_PatchOS();
+			Atari800_Coldstart();
+			return TRUE;
+		}
+		else if (buf[0] >= '0' && buf[0] <= '9') {
+			BINLOAD_loading_basic = BINLOAD_LOADING_BASIC_LISTED;
+			Devices_PatchOS();
+			Atari800_Coldstart();
+			return TRUE;
+		}
+	}
+	fclose(BINLOAD_bin_file);
+	BINLOAD_bin_file = NULL;
+	Log_print("binload: \"%s\" not recognized as a DOS or BASIC program", filename);
+	return FALSE;
+}
diff --git a/project/jni/application/atari800/src/binload.h b/project/jni/application/atari800/src/binload.h
new file mode 100644
index 000000000..58197c259
--- /dev/null
+++ b/project/jni/application/atari800/src/binload.h
@@ -0,0 +1,22 @@
+#ifndef BINLOAD_H_
+#define BINLOAD_H_
+
+#include <stdio.h> /* FILE */
+#include "atari.h" /* UBYTE */
+
+extern FILE *BINLOAD_bin_file;
+
+int BINLOAD_Loader(const char *filename);
+extern int BINLOAD_start_binloading;
+extern int BINLOAD_loading_basic;
+#define BINLOAD_LOADING_BASIC_SAVED              1
+#define BINLOAD_LOADING_BASIC_LISTED             2
+#define BINLOAD_LOADING_BASIC_LISTED_ATARI       3
+#define BINLOAD_LOADING_BASIC_LISTED_CR          4
+#define BINLOAD_LOADING_BASIC_LISTED_LF          5
+#define BINLOAD_LOADING_BASIC_LISTED_CRLF        6
+#define BINLOAD_LOADING_BASIC_LISTED_CR_OR_CRLF  7
+#define BINLOAD_LOADING_BASIC_RUN                8
+int BINLOAD_LoaderStart(UBYTE *buffer);
+
+#endif /* BINLOAD_H_ */
diff --git a/project/jni/application/atari800/src/cartridge.c b/project/jni/application/atari800/src/cartridge.c
new file mode 100644
index 000000000..3d7a5bead
--- /dev/null
+++ b/project/jni/application/atari800/src/cartridge.c
@@ -0,0 +1,794 @@
+/*
+ * cartridge.c - cartridge emulation
+ *
+ * Copyright (C) 2001-2006 Piotr Fusik
+ * Copyright (C) 2001-2006 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "atari.h"
+#include "binload.h" /* BINLOAD_loading_basic */
+#include "cartridge.h"
+#include "memory.h"
+#include "pia.h"
+#include "rtime.h"
+#include "util.h"
+#ifndef BASIC
+#include "statesav.h"
+#endif
+
+int CARTRIDGE_kb[CARTRIDGE_LAST_SUPPORTED + 1] = {
+	0,
+	8,    /* CARTRIDGE_STD_8 */
+	16,   /* CARTRIDGE_STD_16 */
+	16,   /* CARTRIDGE_OSS_16 */
+	32,   /* CARTRIDGE_5200_32 */
+	32,   /* CARTRIDGE_DB_32 */
+	16,   /* CARTRIDGE_5200_EE_16 */
+	40,   /* CARTRIDGE_5200_40 */
+	64,   /* CARTRIDGE_WILL_64 */
+	64,   /* CARTRIDGE_EXP_64 */
+	64,   /* CARTRIDGE_DIAMOND_64 */
+	64,   /* CARTRIDGE_SDX */
+	32,   /* CARTRIDGE_XEGS_32 */
+	64,   /* CARTRIDGE_XEGS_64 */
+	128,  /* CARTRIDGE_XEGS_128 */
+	16,   /* CARTRIDGE_OSS2_16 */
+	16,   /* CARTRIDGE_5200_NS_16 */
+	128,  /* CARTRIDGE_ATRAX_128 */
+	40,   /* CARTRIDGE_BBSB_40 */
+	8,    /* CARTRIDGE_5200_8 */
+	4,    /* CARTRIDGE_5200_4 */
+	8,    /* CARTRIDGE_RIGHT_8 */
+	32,   /* CARTRIDGE_WILL_32 */
+	256,  /* CARTRIDGE_XEGS_256 */
+	512,  /* CARTRIDGE_XEGS_512 */
+	1024, /* CARTRIDGE_XEGS_1024 */
+	16,   /* CARTRIDGE_MEGA_16 */
+	32,   /* CARTRIDGE_MEGA_32 */
+	64,   /* CARTRIDGE_MEGA_64 */
+	128,  /* CARTRIDGE_MEGA_128 */
+	256,  /* CARTRIDGE_MEGA_256 */
+	512,  /* CARTRIDGE_MEGA_512 */
+	1024, /* CARTRIDGE_MEGA_1024 */
+	32,   /* CARTRIDGE_SWXEGS_32 */
+	64,   /* CARTRIDGE_SWXEGS_64 */
+	128,  /* CARTRIDGE_SWXEGS_128 */
+	256,  /* CARTRIDGE_SWXEGS_256 */
+	512,  /* CARTRIDGE_SWXEGS_512 */
+	1024, /* CARTRIDGE_SWXEGS_1024 */
+	8,    /* CARTRIDGE_PHOENIX_8 */
+	16,   /* CARTRIDGE_BLIZZARD_16 */
+	128,  /* CARTRIDGE_ATMAX_128 */
+	1024, /* CARTRIDGE_ATMAX_1024 */
+	128   /* CARTRIDGE_SDX_128 */
+};
+
+int CARTRIDGE_IsFor5200(int type)
+{
+	switch (type) {
+	case CARTRIDGE_5200_32:
+	case CARTRIDGE_5200_EE_16:
+	case CARTRIDGE_5200_40:
+	case CARTRIDGE_5200_NS_16:
+	case CARTRIDGE_5200_8:
+	case CARTRIDGE_5200_4:
+		return TRUE;
+	default:
+		break;
+	}
+	return FALSE;
+}
+
+static UBYTE *cart_image = NULL;		/* cartridge memory */
+static char cart_filename[FILENAME_MAX];
+int CARTRIDGE_type = CARTRIDGE_NONE;
+
+static int bank;
+
+/* DB_32, XEGS_32, XEGS_64, XEGS_128, XEGS_256, XEGS_512, XEGS_1024,
+   SWXEGS_32, SWXEGS_64, SWXEGS_128, SWXEGS_256, SWXEGS_512, SWXEGS_1024 */
+static void set_bank_809F(int b, int main)
+{
+	if (b != bank) {
+		if (b & 0x80) {
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfDisable();
+		}
+		else {
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image + b * 0x2000);
+			if (bank & 0x80)
+				MEMORY_CopyROM(0xa000, 0xbfff, cart_image + main);
+		}
+		bank = b;
+	}
+}
+
+/* OSS_16, OSS2_16 */
+static void set_bank_A0AF(int b, int main)
+{
+	if (b != bank) {
+		if (b < 0)
+			MEMORY_CartA0bfDisable();
+		else {
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xafff, cart_image + b * 0x1000);
+			if (bank < 0)
+				MEMORY_CopyROM(0xb000, 0xbfff, cart_image + main);
+		}
+		bank = b;
+	}
+}
+
+/* WILL_64, EXP_64, DIAMOND_64, SDX_64, WILL_32, ATMAX_128, ATMAX_1024,
+   ATRAX_128 */
+static void set_bank_A0BF(int b, int n)
+{
+	if (b != bank) {
+		if (b & n)
+			MEMORY_CartA0bfDisable();
+		else {
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + (b & (n - 1)) * 0x2000);
+		}
+		bank = b;
+	}
+}
+
+static void set_bank_80BF(int b)
+{
+	if (b != bank) {
+		if (b & 0x80) {
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfDisable();
+		}
+		else {
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0xbfff, cart_image + b * 0x4000);
+		}
+		bank = b;
+	}
+}
+
+/* an access (read or write) to D500-D5FF area */
+static void access_D5(UWORD addr)
+{
+	int b = bank;
+	switch (CARTRIDGE_type) {
+	case CARTRIDGE_OSS_16:
+		if (addr & 0x08)
+			b = -1;
+		else
+			switch (addr & 0x07) {
+			case 0x00:
+			case 0x01:
+				b = 0;
+				break;
+			case 0x03:
+			case 0x07:
+				b = 1;
+				break;
+			case 0x04:
+			case 0x05:
+				b = 2;
+				break;
+			/* case 0x02:
+			case 0x06: */
+			default:
+				break;
+			}
+		set_bank_A0AF(b, 0x3000);
+		break;
+	case CARTRIDGE_DB_32:
+		set_bank_809F(addr & 0x03, 0x6000);
+		break;
+	case CARTRIDGE_WILL_64:
+		set_bank_A0BF(addr, 8);
+		break;
+	case CARTRIDGE_WILL_32:
+		set_bank_A0BF(addr & 0xb, 8);
+		break;
+	case CARTRIDGE_EXP_64:
+		if ((addr & 0xf0) == 0x70)
+			set_bank_A0BF(addr ^ 7, 8);
+		break;
+	case CARTRIDGE_DIAMOND_64:
+		if ((addr & 0xf0) == 0xd0)
+			set_bank_A0BF(addr ^ 7, 8);
+		break;
+	case CARTRIDGE_SDX_64:
+		if ((addr & 0xf0) == 0xe0)
+			set_bank_A0BF(addr ^ 7, 8);
+		break;
+	case CARTRIDGE_SDX_128:
+		if ((addr & 0xe0) == 0xe0 && addr != bank) {
+			if (addr & 8)
+				MEMORY_CartA0bfDisable();
+			else {
+				MEMORY_CartA0bfEnable();
+				MEMORY_CopyROM(0xa000, 0xbfff,
+					cart_image + (((addr & 7) + ((addr & 0x10) >> 1)) ^ 0xf) * 0x2000);
+			}
+			bank = addr;
+		}
+		break;
+	case CARTRIDGE_OSS2_16:
+		switch (addr & 0x09) {
+		case 0x00:
+			b = 1;
+			break;
+		case 0x01:
+			b = 3;
+			break;
+		case 0x08:
+			b = -1;
+			break;
+		case 0x09:
+			b = 2;
+			break;
+		}
+		set_bank_A0AF(b, 0x0000);
+		break;
+	case CARTRIDGE_PHOENIX_8:
+		MEMORY_CartA0bfDisable();
+		break;
+	case CARTRIDGE_BLIZZARD_16:
+		MEMORY_Cart809fDisable();
+		MEMORY_CartA0bfDisable();
+		break;
+	case CARTRIDGE_ATMAX_128:
+		if ((addr & 0xe0) == 0)
+			set_bank_A0BF(addr, 16);
+		break;
+	case CARTRIDGE_ATMAX_1024:
+		set_bank_A0BF(addr, 128);
+		break;
+	default:
+		break;
+	}
+}
+
+/* a read from D500-D5FF area */
+UBYTE CARTRIDGE_GetByte(UWORD addr)
+{
+	if (RTIME_enabled && (addr == 0xd5b8 || addr == 0xd5b9))
+		return RTIME_GetByte();
+	access_D5(addr);
+	return 0xff;
+}
+
+/* a write to D500-D5FF area */
+void CARTRIDGE_PutByte(UWORD addr, UBYTE byte)
+{
+	if (RTIME_enabled && (addr == 0xd5b8 || addr == 0xd5b9)) {
+		RTIME_PutByte(byte);
+		return;
+	}
+	switch (CARTRIDGE_type) {
+	case CARTRIDGE_XEGS_32:
+		set_bank_809F(byte & 0x03, 0x6000);
+		break;
+	case CARTRIDGE_XEGS_64:
+		set_bank_809F(byte & 0x07, 0xe000);
+		break;
+	case CARTRIDGE_XEGS_128:
+		set_bank_809F(byte & 0x0f, 0x1e000);
+		break;
+	case CARTRIDGE_XEGS_256:
+		set_bank_809F(byte & 0x1f, 0x3e000);
+		break;
+	case CARTRIDGE_XEGS_512:
+		set_bank_809F(byte & 0x3f, 0x7e000);
+		break;
+	case CARTRIDGE_XEGS_1024:
+		set_bank_809F(byte & 0x7f, 0xfe000);
+		break;
+	case CARTRIDGE_ATRAX_128:
+		set_bank_A0BF(byte & 0x8f, 128);
+		break;
+	case CARTRIDGE_MEGA_16:
+		set_bank_80BF(byte & 0x80);
+		break;
+	case CARTRIDGE_MEGA_32:
+		set_bank_80BF(byte & 0x81);
+		break;
+	case CARTRIDGE_MEGA_64:
+		set_bank_80BF(byte & 0x83);
+		break;
+	case CARTRIDGE_MEGA_128:
+		set_bank_80BF(byte & 0x87);
+		break;
+	case CARTRIDGE_MEGA_256:
+		set_bank_80BF(byte & 0x8f);
+		break;
+	case CARTRIDGE_MEGA_512:
+		set_bank_80BF(byte & 0x9f);
+		break;
+	case CARTRIDGE_MEGA_1024:
+		set_bank_80BF(byte & 0xbf);
+		break;
+	case CARTRIDGE_SWXEGS_32:
+		set_bank_809F(byte & 0x83, 0x6000);
+		break;
+	case CARTRIDGE_SWXEGS_64:
+		set_bank_809F(byte & 0x87, 0xe000);
+		break;
+	case CARTRIDGE_SWXEGS_128:
+		set_bank_809F(byte & 0x8f, 0x1e000);
+		break;
+	case CARTRIDGE_SWXEGS_256:
+		set_bank_809F(byte & 0x9f, 0x3e000);
+		break;
+	case CARTRIDGE_SWXEGS_512:
+		set_bank_809F(byte & 0xbf, 0x7e000);
+		break;
+	case CARTRIDGE_SWXEGS_1024:
+		set_bank_809F(byte, 0xfe000);
+		break;
+	default:
+		access_D5(addr);
+		break;
+	}
+}
+
+/* special support of Bounty Bob on Atari5200 */
+void CARTRIDGE_BountyBob1(UWORD addr)
+{
+	if (Atari800_machine_type == Atari800_MACHINE_5200) {
+		if (addr >= 0x4ff6 && addr <= 0x4ff9) {
+			addr -= 0x4ff6;
+			MEMORY_CopyROM(0x4000, 0x4fff, cart_image + addr * 0x1000);
+		}
+	} else {
+		if (addr >= 0x8ff6 && addr <= 0x8ff9) {
+			addr -= 0x8ff6;
+			MEMORY_CopyROM(0x8000, 0x8fff, cart_image + addr * 0x1000);
+		}
+	}
+}
+
+void CARTRIDGE_BountyBob2(UWORD addr)
+{
+	if (Atari800_machine_type == Atari800_MACHINE_5200) {
+		if (addr >= 0x5ff6 && addr <= 0x5ff9) {
+			addr -= 0x5ff6;
+			MEMORY_CopyROM(0x5000, 0x5fff, cart_image + 0x4000 + addr * 0x1000);
+		}
+	}
+	else {
+		if (addr >= 0x9ff6 && addr <= 0x9ff9) {
+			addr -= 0x9ff6;
+			MEMORY_CopyROM(0x9000, 0x9fff, cart_image + 0x4000 + addr * 0x1000);
+		}
+	}
+}
+
+#ifdef PAGED_ATTRIB
+UBYTE CARTRIDGE_BountyBob1GetByte(UWORD addr)
+{
+	if (Atari800_machine_type == Atari800_MACHINE_5200) {
+		if (addr >= 0x4ff6 && addr <= 0x4ff9) {
+			CARTRIDGE_BountyBob1(addr);
+			return 0;
+		}
+	} else {
+		if (addr >= 0x8ff6 && addr <= 0x8ff9) {
+			CARTRIDGE_BountyBob1(addr);
+			return 0;
+		}
+	}
+	return MEMORY_dGetByte(addr);
+}
+
+UBYTE CARTRIDGE_BountyBob2GetByte(UWORD addr)
+{
+	if (Atari800_machine_type == Atari800_MACHINE_5200) {
+		if (addr >= 0x5ff6 && addr <= 0x5ff9) {
+			CARTRIDGE_BountyBob2(addr);
+			return 0;
+		}
+	} else {
+		if (addr >= 0x9ff6 && addr <= 0x9ff9) {
+			CARTRIDGE_BountyBob2(addr);
+			return 0;
+		}
+	}
+	return MEMORY_dGetByte(addr);
+}
+
+void CARTRIDGE_BountyBob1PutByte(UWORD addr, UBYTE value)
+{
+	if (Atari800_machine_type == Atari800_MACHINE_5200) {
+		if (addr >= 0x4ff6 && addr <= 0x4ff9) {
+			CARTRIDGE_BountyBob1(addr);
+		}
+	} else {
+		if (addr >= 0x8ff6 && addr <= 0x8ff9) {
+			CARTRIDGE_BountyBob1(addr);
+		}
+	}
+}
+
+void CARTRIDGE_BountyBob2PutByte(UWORD addr, UBYTE value)
+{
+	if (Atari800_machine_type == Atari800_MACHINE_5200) {
+		if (addr >= 0x5ff6 && addr <= 0x5ff9) {
+			CARTRIDGE_BountyBob2(addr);
+		}
+	} else {
+		if (addr >= 0x9ff6 && addr <= 0x9ff9) {
+			CARTRIDGE_BountyBob2(addr);
+		}
+	}
+}
+#endif
+
+int CARTRIDGE_Checksum(const UBYTE *image, int nbytes)
+{
+	int checksum = 0;
+	while (nbytes > 0) {
+		checksum += *image++;
+		nbytes--;
+	}
+	return checksum;
+}
+
+int CARTRIDGE_Insert(const char *filename)
+{
+	FILE *fp;
+	int len;
+	int type;
+	UBYTE header[16];
+
+	/* remove currently inserted cart */
+	CARTRIDGE_Remove();
+
+	/* open file */
+	fp = fopen(filename, "rb");
+	if (fp == NULL)
+		return CARTRIDGE_CANT_OPEN;
+	/* check file length */
+	len = Util_flen(fp);
+	Util_rewind(fp);
+
+	/* Save Filename for state save */
+	strcpy(cart_filename, filename);
+
+	/* if full kilobytes, assume it is raw image */
+	if ((len & 0x3ff) == 0) {
+		/* alloc memory and read data */
+		cart_image = (UBYTE *) Util_malloc(len);
+		fread(cart_image, 1, len, fp);
+		fclose(fp);
+		/* find cart type */
+		CARTRIDGE_type = CARTRIDGE_NONE;
+		len >>= 10;	/* number of kilobytes */
+		for (type = 1; type <= CARTRIDGE_LAST_SUPPORTED; type++)
+			if (CARTRIDGE_kb[type] == len) {
+				if (CARTRIDGE_type == CARTRIDGE_NONE)
+					CARTRIDGE_type = type;
+				else
+					return len;	/* more than one cartridge type of such length - user must select */
+			}
+		if (CARTRIDGE_type != CARTRIDGE_NONE) {
+			CARTRIDGE_Start();
+			return 0;	/* ok */
+		}
+		free(cart_image);
+		cart_image = NULL;
+		return CARTRIDGE_BAD_FORMAT;
+	}
+	/* if not full kilobytes, assume it is CART file */
+	fread(header, 1, 16, fp);
+	if ((header[0] == 'C') &&
+		(header[1] == 'A') &&
+		(header[2] == 'R') &&
+		(header[3] == 'T')) {
+		type = (header[4] << 24) |
+			(header[5] << 16) |
+			(header[6] << 8) |
+			header[7];
+		if (type >= 1 && type <= CARTRIDGE_LAST_SUPPORTED) {
+			int checksum;
+			len = CARTRIDGE_kb[type] << 10;
+			/* alloc memory and read data */
+			cart_image = (UBYTE *) Util_malloc(len);
+			fread(cart_image, 1, len, fp);
+			fclose(fp);
+			checksum = (header[8] << 24) |
+				(header[9] << 16) |
+				(header[10] << 8) |
+				header[11];
+			CARTRIDGE_type = type;
+			CARTRIDGE_Start();
+			return checksum == CARTRIDGE_Checksum(cart_image, len) ? 0 : CARTRIDGE_BAD_CHECKSUM;
+		}
+	}
+	fclose(fp);
+	return CARTRIDGE_BAD_FORMAT;
+}
+
+void CARTRIDGE_Remove(void)
+{
+	CARTRIDGE_type = CARTRIDGE_NONE;
+	if (cart_image != NULL) {
+		free(cart_image);
+		cart_image = NULL;
+	}
+	CARTRIDGE_Start();
+}
+
+void CARTRIDGE_Start(void) {
+	if (Atari800_machine_type == Atari800_MACHINE_5200) {
+		MEMORY_SetROM(0x4ff6, 0x4ff9);		/* disable Bounty Bob bank switching */
+		MEMORY_SetROM(0x5ff6, 0x5ff9);
+		switch (CARTRIDGE_type) {
+		case CARTRIDGE_5200_32:
+			MEMORY_CopyROM(0x4000, 0xbfff, cart_image);
+			break;
+		case CARTRIDGE_5200_EE_16:
+			MEMORY_CopyROM(0x4000, 0x5fff, cart_image);
+			MEMORY_CopyROM(0x6000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0x2000);
+			break;
+		case CARTRIDGE_5200_40:
+			MEMORY_CopyROM(0x4000, 0x4fff, cart_image);
+			MEMORY_CopyROM(0x5000, 0x5fff, cart_image + 0x4000);
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image + 0x8000);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0x8000);
+#ifndef PAGED_ATTRIB
+			MEMORY_SetHARDWARE(0x4ff6, 0x4ff9);
+			MEMORY_SetHARDWARE(0x5ff6, 0x5ff9);
+#else
+			MEMORY_readmap[0x4f] = CARTRIDGE_BountyBob1GetByte;
+			MEMORY_readmap[0x5f] = CARTRIDGE_BountyBob2GetByte;
+			MEMORY_writemap[0x4f] = CARTRIDGE_BountyBob1PutByte;
+			MEMORY_writemap[0x5f] = CARTRIDGE_BountyBob2PutByte;
+#endif
+			break;
+		case CARTRIDGE_5200_NS_16:
+			MEMORY_CopyROM(0x8000, 0xbfff, cart_image);
+			break;
+		case CARTRIDGE_5200_8:
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image);
+			break;
+		case CARTRIDGE_5200_4:
+			MEMORY_CopyROM(0x8000, 0x8fff, cart_image);
+			MEMORY_CopyROM(0x9000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xafff, cart_image);
+			MEMORY_CopyROM(0xb000, 0xbfff, cart_image);
+			break;
+		default:
+			/* clear cartridge area so the 5200 will crash */
+			MEMORY_dFillMem(0x4000, 0, 0x8000);
+			break;
+		}
+	}
+	else {
+		switch (CARTRIDGE_type) {
+		case CARTRIDGE_STD_8:
+		case CARTRIDGE_PHOENIX_8:
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image);
+			break;
+		case CARTRIDGE_STD_16:
+		case CARTRIDGE_BLIZZARD_16:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0xbfff, cart_image);
+			break;
+		case CARTRIDGE_OSS_16:
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xafff, cart_image);
+			MEMORY_CopyROM(0xb000, 0xbfff, cart_image + 0x3000);
+			bank = 0;
+			break;
+		case CARTRIDGE_DB_32:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0x6000);
+			bank = 0;
+			break;
+		case CARTRIDGE_WILL_64:
+		case CARTRIDGE_WILL_32:
+		case CARTRIDGE_EXP_64:
+		case CARTRIDGE_DIAMOND_64:
+		case CARTRIDGE_SDX_64:
+		case CARTRIDGE_SDX_128:
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image);
+			bank = 0;
+			break;
+		case CARTRIDGE_XEGS_32:
+		case CARTRIDGE_SWXEGS_32:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0x6000);
+			bank = 0;
+			break;
+		case CARTRIDGE_XEGS_64:
+		case CARTRIDGE_SWXEGS_64:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0xe000);
+			bank = 0;
+			break;
+		case CARTRIDGE_XEGS_128:
+		case CARTRIDGE_SWXEGS_128:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0x1e000);
+			bank = 0;
+			break;
+		case CARTRIDGE_XEGS_256:
+		case CARTRIDGE_SWXEGS_256:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0x3e000);
+			bank = 0;
+			break;
+		case CARTRIDGE_XEGS_512:
+		case CARTRIDGE_SWXEGS_512:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0x7e000);
+			bank = 0;
+			break;
+		case CARTRIDGE_XEGS_1024:
+		case CARTRIDGE_SWXEGS_1024:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0xfe000);
+			bank = 0;
+			break;
+		case CARTRIDGE_OSS2_16:
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xafff, cart_image + 0x1000);
+			MEMORY_CopyROM(0xb000, 0xbfff, cart_image);
+			bank = 0;
+			break;
+		case CARTRIDGE_ATRAX_128:
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image);
+			bank = 0;
+			break;
+		case CARTRIDGE_BBSB_40:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0x8fff, cart_image);
+			MEMORY_CopyROM(0x9000, 0x9fff, cart_image + 0x4000);
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0x8000);
+#ifndef PAGED_ATTRIB
+			MEMORY_SetHARDWARE(0x8ff6, 0x8ff9);
+			MEMORY_SetHARDWARE(0x9ff6, 0x9ff9);
+#else
+			MEMORY_readmap[0x8f] = CARTRIDGE_BountyBob1GetByte;
+			MEMORY_readmap[0x9f] = CARTRIDGE_BountyBob2GetByte;
+			MEMORY_writemap[0x8f] = CARTRIDGE_BountyBob1PutByte;
+			MEMORY_writemap[0x9f] = CARTRIDGE_BountyBob2PutByte;
+#endif
+			break;
+		case CARTRIDGE_RIGHT_8:
+			if (Atari800_machine_type == Atari800_MACHINE_OSA || Atari800_machine_type == Atari800_MACHINE_OSB) {
+				MEMORY_Cart809fEnable();
+				MEMORY_CopyROM(0x8000, 0x9fff, cart_image);
+				if ((!Atari800_disable_basic || BINLOAD_loading_basic) && MEMORY_have_basic) {
+					MEMORY_CartA0bfEnable();
+					MEMORY_CopyROM(0xa000, 0xbfff, MEMORY_basic);
+					break;
+				}
+				MEMORY_CartA0bfDisable();
+				break;
+			}
+			/* there's no right slot in XL/XE */
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfDisable();
+			break;
+		case CARTRIDGE_MEGA_16:
+		case CARTRIDGE_MEGA_32:
+		case CARTRIDGE_MEGA_64:
+		case CARTRIDGE_MEGA_128:
+		case CARTRIDGE_MEGA_256:
+		case CARTRIDGE_MEGA_512:
+		case CARTRIDGE_MEGA_1024:
+			MEMORY_Cart809fEnable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0x8000, 0xbfff, cart_image);
+			bank = 0;
+			break;
+		case CARTRIDGE_ATMAX_128:
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image);
+			bank = 0;
+			break;
+		case CARTRIDGE_ATMAX_1024:
+			MEMORY_Cart809fDisable();
+			MEMORY_CartA0bfEnable();
+			MEMORY_CopyROM(0xa000, 0xbfff, cart_image + 0xfe000);
+			bank = 0x7f;
+			break;
+		default:
+			MEMORY_Cart809fDisable();
+			if ((Atari800_machine_type == Atari800_MACHINE_OSA || Atari800_machine_type == Atari800_MACHINE_OSB)
+			 && (!Atari800_disable_basic || BINLOAD_loading_basic) && MEMORY_have_basic) {
+				MEMORY_CartA0bfEnable();
+				MEMORY_CopyROM(0xa000, 0xbfff, MEMORY_basic);
+				break;
+			}
+			MEMORY_CartA0bfDisable();
+			break;
+		}
+	}
+}
+
+#ifndef BASIC
+
+void CARTRIDGE_StateRead(void)
+{
+	int savedCartType = CARTRIDGE_NONE;
+
+	/* Read the cart type from the file.  If there is no cart type, becaused we have
+	   reached the end of the file, this will just default to CARTRIDGE_NONE */
+	StateSav_ReadINT(&savedCartType, 1);
+	if (savedCartType != CARTRIDGE_NONE) {
+		char filename[FILENAME_MAX];
+		StateSav_ReadFNAME(filename);
+		if (filename[0]) {
+			/* Insert the cartridge... */
+			if (CARTRIDGE_Insert(filename) >= 0) {
+				/* And set the type to the saved type, in case it was a raw cartridge image */
+				CARTRIDGE_type = savedCartType;
+				CARTRIDGE_Start();
+			}
+		}
+	}
+}
+
+void CARTRIDGE_StateSave(void)
+{
+	/* Save the cartridge type, or CARTRIDGE_NONE if there isn't one...*/
+	StateSav_SaveINT(&CARTRIDGE_type, 1);
+	if (CARTRIDGE_type != CARTRIDGE_NONE) {
+		StateSav_SaveFNAME(cart_filename);
+	}
+}
+
+#endif
diff --git a/project/jni/application/atari800/src/cartridge.h b/project/jni/application/atari800/src/cartridge.h
new file mode 100644
index 000000000..d62998374
--- /dev/null
+++ b/project/jni/application/atari800/src/cartridge.h
@@ -0,0 +1,81 @@
+#ifndef CARTRIDGE_H_
+#define CARTRIDGE_H_
+
+#include "config.h"
+#include "atari.h"
+
+#define CARTRIDGE_NONE            0
+#define CARTRIDGE_STD_8           1
+#define CARTRIDGE_STD_16          2
+#define CARTRIDGE_OSS_16          3
+#define CARTRIDGE_5200_32         4
+#define CARTRIDGE_DB_32           5
+#define CARTRIDGE_5200_EE_16      6
+#define CARTRIDGE_5200_40         7
+#define CARTRIDGE_WILL_64         8
+#define CARTRIDGE_EXP_64          9
+#define CARTRIDGE_DIAMOND_64     10
+#define CARTRIDGE_SDX_64         11
+#define CARTRIDGE_XEGS_32        12
+#define CARTRIDGE_XEGS_64        13
+#define CARTRIDGE_XEGS_128       14
+#define CARTRIDGE_OSS2_16        15
+#define CARTRIDGE_5200_NS_16     16
+#define CARTRIDGE_ATRAX_128      17
+#define CARTRIDGE_BBSB_40        18
+#define CARTRIDGE_5200_8         19
+#define CARTRIDGE_5200_4         20
+#define CARTRIDGE_RIGHT_8        21
+#define CARTRIDGE_WILL_32        22
+#define CARTRIDGE_XEGS_256       23
+#define CARTRIDGE_XEGS_512       24
+#define CARTRIDGE_XEGS_1024      25
+#define CARTRIDGE_MEGA_16        26
+#define CARTRIDGE_MEGA_32        27
+#define CARTRIDGE_MEGA_64        28
+#define CARTRIDGE_MEGA_128       29
+#define CARTRIDGE_MEGA_256       30
+#define CARTRIDGE_MEGA_512       31
+#define CARTRIDGE_MEGA_1024      32
+#define CARTRIDGE_SWXEGS_32      33
+#define CARTRIDGE_SWXEGS_64      34
+#define CARTRIDGE_SWXEGS_128     35
+#define CARTRIDGE_SWXEGS_256     36
+#define CARTRIDGE_SWXEGS_512     37
+#define CARTRIDGE_SWXEGS_1024    38
+#define CARTRIDGE_PHOENIX_8      39
+#define CARTRIDGE_BLIZZARD_16    40
+#define CARTRIDGE_ATMAX_128      41
+#define CARTRIDGE_ATMAX_1024     42
+#define CARTRIDGE_SDX_128        43
+#define CARTRIDGE_LAST_SUPPORTED 43
+
+#define CARTRIDGE_MAX_SIZE	(1024 * 1024)
+extern int CARTRIDGE_kb[CARTRIDGE_LAST_SUPPORTED + 1];
+extern int CARTRIDGE_type;
+
+int CARTRIDGE_IsFor5200(int type);
+int CARTRIDGE_Checksum(const UBYTE *image, int nbytes);
+
+#define CARTRIDGE_CANT_OPEN		-1	/* Can't open cartridge image file */
+#define CARTRIDGE_BAD_FORMAT		-2	/* Unknown cartridge format */
+#define CARTRIDGE_BAD_CHECKSUM	-3	/* Warning: bad CART checksum */
+int CARTRIDGE_Insert(const char *filename);
+
+void CARTRIDGE_Remove(void);
+
+void CARTRIDGE_Start(void);
+UBYTE CARTRIDGE_GetByte(UWORD addr);
+void CARTRIDGE_PutByte(UWORD addr, UBYTE byte);
+void CARTRIDGE_BountyBob1(UWORD addr);
+void CARTRIDGE_BountyBob2(UWORD addr);
+void CARTRIDGE_StateSave(void);
+void CARTRIDGE_StateRead(void);
+#ifdef PAGED_ATTRIB
+UBYTE CARTRIDGE_BountyBob1GetByte(UWORD addr);
+UBYTE CARTRIDGE_BountyBob2GetByte(UWORD addr);
+void CARTRIDGE_BountyBob1PutByte(UWORD addr, UBYTE value);
+void CARTRIDGE_BountyBob2PutByte(UWORD addr, UBYTE value);
+#endif
+
+#endif /* CARTRIDGE_H_ */
diff --git a/project/jni/application/atari800/src/cassette.c b/project/jni/application/atari800/src/cassette.c
new file mode 100644
index 000000000..59707afd5
--- /dev/null
+++ b/project/jni/application/atari800/src/cassette.c
@@ -0,0 +1,752 @@
+/*
+ * cassette.c - cassette emulation
+ *
+ * Copyright (C) 2001 Piotr Fusik
+ * Copyright (C) 2001-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <string.h>
+
+#include "atari.h"
+#include "cpu.h"
+#include "cassette.h"
+#include "log.h"
+#include "memory.h"
+#include "sio.h"
+#include "util.h"
+#include "pokey.h"
+
+#define MAX_BLOCKS 2048
+
+static FILE *cassette_file = NULL;
+static int cassette_isCAS;
+UBYTE CASSETTE_buffer[4096];
+static ULONG cassette_block_offset[MAX_BLOCKS];
+static SLONG cassette_elapsedtime;  /* elapsed time since begin of file */
+                                    /* in scanlines */
+static SLONG cassette_savetime;	    /* helper for cas save */
+static SLONG cassette_nextirqevent; /* timestamp of next irq in scanlines */
+
+static char cassette_filename[FILENAME_MAX];
+static char cassette_description[CASSETTE_DESCRIPTION_MAX];
+static int cassette_current_blockbyte = 0;
+static int cassette_current_block;
+static int cassette_max_blockbytes = 0;
+static int cassette_max_block = 0;
+static int cassette_savefile = FALSE;
+static int cassette_gapdelay = 0;	/* in ms, includes leader and all gaps */
+static int cassette_putdelay = 0;	/* in ms, delay since last putbyte */
+static int cassette_motor = 0;
+static int cassette_baudrate = 600;
+static int cassette_baudblock[MAX_BLOCKS];
+
+int CASSETTE_hold_start_on_reboot = 0;
+int CASSETTE_hold_start = 0;
+int CASSETTE_press_space = 0;
+static int eof_of_tape = 0;
+
+typedef struct {
+	char identifier[4];
+	UBYTE length_lo;
+	UBYTE length_hi;
+	UBYTE aux_lo;
+	UBYTE aux_hi;
+} CAS_Header;
+/*
+Just for remembering - CAS format in short:
+It consists of chunks. Each chunk has a header, possibly followed by data.
+If a header is unknown or unexpected it may be skipped by the length of the
+header (8 bytes), and additionally the length given in the length-field(s).
+There are (until now) 3 types of chunks:
+-CAS file marker, has to be at begin of file - identifier "FUJI", length is
+number of characters of an (optional) ascii-name (without trailing 0), aux
+is always 0.
+-baud rate selector - identifier "baud", length always 0, aux is rate in baud
+(usually 600; one byte is 8 bits + startbit + stopbit, makes 60 bytes per
+second).
+-data record - identifier "data", length is length of the data block (usually
+$84 as used by the OS), aux is length of mark tone (including leader and gaps)
+just before the record data in milliseconds.
+*/
+
+int CASSETTE_Initialise(int *argc, char *argv[])
+{
+	int i;
+	int j;
+
+	strcpy(cassette_filename, "None");
+	memset(cassette_description, 0, sizeof(cassette_description));
+
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = FALSE;			/* error, argument missing! */
+
+		if (strcmp(argv[i], "-tape") == 0) {
+			if (i_a)
+				CASSETTE_Insert(argv[++i]);
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-boottape") == 0) {
+			if (i_a) {
+				CASSETTE_Insert(argv[++i]);
+				CASSETTE_hold_start = 1;
+			}
+			else a_m = TRUE;
+		}
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-tape <file>     Insert cassette image");
+				Log_print("\t-boottape <file> Insert cassette image and boot it");
+			}
+			argv[j++] = argv[i];
+		}
+
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return FALSE;
+		}
+	}
+
+	*argc = j;
+
+	return TRUE;
+}
+
+/* Gets information about the cassette image. Returns TRUE if ok.
+   To get information without attaching file, use:
+   char description[CASSETTE_DESCRIPTION_MAX];
+   int last_block;
+   int isCAS;
+   CASSETTE_CheckFile(filename, NULL, description, &last_block, &isCAS);
+*/
+int CASSETTE_CheckFile(const char *filename, FILE **fp, char *description, int *last_block, int *isCAS)
+{
+	FILE *f;
+	CAS_Header header;
+	int blocks;
+
+/* atm, no appending to existing cas files - too dangerous to data!
+   and will not work anyway without patched sio
+	f = fopen(filename, "rb+");
+	if (f == NULL) */
+		f = fopen(filename, "rb");
+	if (f == NULL)
+		return FALSE;
+	if (description)
+		memset(description, 0, CASSETTE_DESCRIPTION_MAX);
+
+	if (fread(&header, 1, 6, f) == 6
+		&& header.identifier[0] == 'F'
+		&& header.identifier[1] == 'U'
+		&& header.identifier[2] == 'J'
+		&& header.identifier[3] == 'I') {
+		/* CAS file */
+		UWORD length;
+		UWORD skip;
+		if (isCAS)
+			*isCAS = TRUE;
+		fseek(f, 2L, SEEK_CUR);	/* ignore the aux bytes */
+
+		/* read or skip file description */
+		skip = length = header.length_lo + (header.length_hi << 8);
+		if (description) {
+			if (length < CASSETTE_DESCRIPTION_MAX)
+				skip = 0;
+			else
+				skip -= CASSETTE_DESCRIPTION_MAX - 1;
+			fread(description, 1, length - skip, f);
+		}
+		fseek(f, skip, SEEK_CUR);
+
+		/* count number of blocks */
+		blocks = 0;
+		cassette_baudblock[0]=600;
+		do {
+			/* chunk header is always 8 bytes */
+			if (fread(&header, 1, 8, f) != 8)
+				break;
+			if (header.identifier[0] == 'b'
+			 && header.identifier[1] == 'a'
+			 && header.identifier[2] == 'u'
+			 && header.identifier[3] == 'd') {
+				cassette_baudrate=header.aux_lo + (header.aux_hi << 8);
+			}
+			else if (header.identifier[0] == 'd'
+			 && header.identifier[1] == 'a'
+			 && header.identifier[2] == 't'
+			 && header.identifier[3] == 'a') {
+				blocks++;
+				if (fp) {
+					cassette_block_offset[blocks] = ftell(f) - 4;
+					cassette_baudblock[blocks] = cassette_baudrate;
+				}
+			}
+			length = header.length_lo + (header.length_hi << 8);
+			/* skip possibly present data block */
+			fseek(f, length, SEEK_CUR);
+		} while (blocks < MAX_BLOCKS);
+	}
+	else {
+		/* raw file */
+		int file_length = Util_flen(f);
+		blocks = ((file_length + 127) >> 7) + 1;
+		if (isCAS)
+			*isCAS = FALSE;
+	}
+	if (last_block)
+		*last_block = blocks;
+	/* if filelength is 0, then it is a savefile */
+	fseek(f,0L,SEEK_SET);
+	if (fread(&header, 1, 4, f) == 0) {
+		cassette_savefile = TRUE;
+	}
+	if (fp)
+		*fp = f;
+	else
+		fclose(f);
+	return TRUE;
+}
+
+/* Create CAS file header for saving data to tape */
+int CASSETTE_CreateFile(const char *filename, FILE **fp, int *isCAS)
+{
+	CAS_Header header;
+	memset(&header, 0, sizeof(header));
+
+	/* if no file pointer location was given, this function is senseless */
+	if (fp == NULL)
+		return FALSE;
+	/* close if open */
+	if (*fp != NULL)
+		fclose(*fp);
+	/* create new file */
+	*fp = fopen(filename, "wb");
+	if (*fp == NULL)
+		return FALSE;
+
+	/* write CAS-header */
+	{
+		size_t desc_len = strlen(cassette_description);
+		header.length_lo = (UBYTE) desc_len;
+		header.length_hi = (UBYTE) (desc_len >> 8);
+		if (fwrite("FUJI", 1, 4, *fp) == 4
+		 && fwrite(&header.length_lo, 1, 4, *fp) == 4
+		 && fwrite(cassette_description, 1, desc_len, *fp) == desc_len) {
+			/* ok */
+		}
+		else {
+			fclose(*fp);
+			*fp = NULL;
+			return FALSE;
+		}
+	}
+
+	memset(&header, 0, sizeof(header));
+	header.aux_lo = cassette_baudrate & 0xff;	/* provisional: 600 baud */
+	header.aux_hi = cassette_baudrate >> 8;
+	if ((fwrite("baud", 1, 4, *fp) == 4)
+	 && (fwrite(&header.length_lo, 1, 4, *fp) == 4)) {
+		/* ok */
+	}
+	else {
+		fclose(*fp);
+		*fp = NULL;
+		return FALSE;
+	};
+
+	/* file is now a cassette file */
+	*isCAS = TRUE;
+	return TRUE;
+}
+
+int CASSETTE_Insert(const char *filename)
+{
+	CASSETTE_Remove();
+	strcpy(cassette_filename, filename);
+	cassette_elapsedtime = 0;
+	cassette_savetime = 0;
+	cassette_nextirqevent = 0;
+	cassette_current_blockbyte = 0;
+	cassette_max_blockbytes = 0;
+	cassette_current_block = 1;
+	cassette_gapdelay = 0;
+	eof_of_tape = 0;
+	cassette_savefile = FALSE;
+	cassette_baudrate = 600;
+	return CASSETTE_CheckFile(filename, &cassette_file, cassette_description,
+		 &cassette_max_block, &cassette_isCAS);
+}
+
+void CASSETTE_Remove(void)
+{
+	if (cassette_file != NULL) {
+		/* save last block, ignore trailing space tone */
+		if ((cassette_current_blockbyte > 0) && cassette_savefile)
+			CASSETTE_Write(cassette_current_blockbyte);
+
+		fclose(cassette_file);
+		cassette_file = NULL;
+	}
+	cassette_max_block = 0;
+	strcpy(cassette_filename, "None");
+	memset(cassette_description, 0, sizeof(cassette_description));
+}
+
+/* Read a record by SIO-patch
+   returns block length (with checksum) */
+static int ReadRecord_SIO(void)
+{
+	int length = 0;
+	if (cassette_isCAS) {
+		CAS_Header header;
+		/* if waiting for gap was longer than gap of record, skip
+		   atm there is no check if we start then inmidst a record */
+		int filegaptimes = 0;
+		while (cassette_gapdelay >= filegaptimes) {
+			if (cassette_current_block > cassette_max_block) {
+				length = -1;
+				break;
+			};
+			fseek(cassette_file, cassette_block_offset[cassette_current_block], SEEK_SET);
+			fread(&header.length_lo, 1, 4, cassette_file);
+			length = header.length_lo + (header.length_hi << 8);
+			/* add gaplength */
+			filegaptimes += header.aux_lo + (header.aux_hi << 8);
+			/* add time used by the data themselves
+			   a byte is encoded into 10 bits */
+			filegaptimes += length * 10 * 1000 / cassette_baudblock[cassette_current_block];
+
+			fread(&CASSETTE_buffer[0], 1, length, cassette_file);
+			cassette_current_block++;
+		}
+		cassette_gapdelay = 0;
+	}
+	else {
+		length = 132;
+		CASSETTE_buffer[0] = 0x55;
+		CASSETTE_buffer[1] = 0x55;
+		if (cassette_current_block >= cassette_max_block) {
+			/* EOF record */
+			CASSETTE_buffer[2] = 0xfe;
+			memset(CASSETTE_buffer + 3, 0, 128);
+		}
+		else {
+			int bytes;
+			fseek(cassette_file, (cassette_current_block - 1) * 128, SEEK_SET);
+			bytes = fread(CASSETTE_buffer + 3, 1, 128, cassette_file);
+			if (bytes < 128) {
+				CASSETTE_buffer[2] = 0xfa;	/* non-full record */
+				memset(CASSETTE_buffer + 3 + bytes, 0, 127 - bytes);
+				CASSETTE_buffer[0x82] = bytes;
+			}
+			else
+				CASSETTE_buffer[2] = 0xfc;	/* full record */
+		}
+		CASSETTE_buffer[0x83] = SIO_ChkSum(CASSETTE_buffer, 0x83);
+		cassette_current_block++;
+	}
+	return length;
+}
+
+static UWORD WriteRecord(int len)
+{
+	CAS_Header header;
+	memset(&header, 0, sizeof(header));
+
+	/* always append */
+	fseek(cassette_file, 0, SEEK_END);
+	/* write recordheader */
+	Util_strncpy(header.identifier, "data", 4);
+	header.length_lo = len & 0xFF;
+	header.length_hi = (len >> 8) & 0xFF;
+	header.aux_lo = cassette_gapdelay & 0xff;
+	header.aux_hi = (cassette_gapdelay >> 8) & 0xff;
+	cassette_gapdelay = 0;
+	fwrite(&header, 1, 8, cassette_file);
+	cassette_max_block++;
+	cassette_current_block++;
+	/* write record */
+	return fwrite(&CASSETTE_buffer, 1, len, cassette_file);
+}
+
+int CASSETTE_AddGap(int gaptime)
+{
+	cassette_gapdelay += gaptime;
+	if (cassette_gapdelay < 0)
+		cassette_gapdelay = 0;
+	return cassette_gapdelay;
+}
+
+/* Indicates that a loading leader is expected by the OS */
+void CASSETTE_LeaderLoad(void)
+{
+	cassette_gapdelay = 9600;
+	/* registers for SETVBV: third system timer, ~0.1 sec */
+	CPU_regA = 3;
+	CPU_regX = 0;
+	CPU_regY = 5;
+}
+
+/* indicates that a save leader is written by the OS */
+void CASSETTE_LeaderSave(void)
+{
+	cassette_gapdelay = 19200;
+	/* registers for SETVBV: third system timer, ~0.1 sec */
+	CPU_regA = 3;
+	CPU_regX = 0;
+	CPU_regY = 5;
+}
+
+/* Read Cassette Record from Storage medium
+  returns size of data in buffer (atm equal with record size, but there
+    are protections with variable baud rates imaginable where a record
+    must be split and a baud chunk inserted inbetween) or -1 for error */
+int CASSETTE_Read(void)
+{
+	/* no file or blockpositions don't match anymore after saving */
+	if ((cassette_file == NULL) || (cassette_savefile == TRUE))
+		return -1;
+	if (cassette_current_block > cassette_max_block)
+		return -1; /* EOF */
+	return ReadRecord_SIO();
+}
+
+/* Write Cassette Record to Storage medium
+  length is size of the whole data with checksum(s)
+  returns really written bytes, -1 for error */
+int CASSETTE_Write(int length)
+{
+	/* there must be a filename given for saving */
+	if (strcmp(cassette_filename, "None") == 0)
+		return -1;
+	/* if file doesn't exist (or has no records), create the header */
+	if ((cassette_file == NULL || ftell(cassette_file) == 0) &&
+			(CASSETTE_CreateFile(cassette_filename,
+			&cassette_file,&cassette_isCAS) == FALSE))
+		return -1;
+	/* on a raw file, saving is denied because it can hold
+	    only 1 file and could cause confusion */
+	if (cassette_isCAS == FALSE)
+		return -1;
+	/* save record (always appends to the end of file) */
+	cassette_savefile = TRUE;
+	return WriteRecord(length);
+}
+
+/* convert milliseconds to scanlines */
+static SLONG MSToScanLines(int ms)
+{
+	/* for PAL resolution, deviation in NTSC is negligible */
+	return 312*50*ms/1000;
+}
+
+/* Support to read a record by POKEY-registers
+   evals gap length
+   returns block length (with checksum) */
+static int ReadRecord_POKEY(void)
+{
+	int length = 0;
+	if (cassette_isCAS) {
+		CAS_Header header;
+		/* no file or blockpositions don't match anymore after saving */
+		if ((cassette_file == NULL) || (cassette_savefile == TRUE)) {
+			cassette_nextirqevent = -1;
+			length = -1;
+			return length;
+		}
+		/* if end of CAS file */
+		if (cassette_current_block > cassette_max_block){
+			cassette_nextirqevent = -1;
+			length = -1;
+			eof_of_tape = 1;
+			return length;
+		}
+		else {
+			fseek(cassette_file, cassette_block_offset[
+				cassette_current_block], SEEK_SET);
+			fread(&header.length_lo, 1, 4, cassette_file);
+			length = header.length_lo + (header.length_hi << 8);
+			/* eval total length as pregap + 1 byte */
+			cassette_nextirqevent = cassette_elapsedtime +
+				MSToScanLines(
+				header.aux_lo + (header.aux_hi << 8)
+				+ 10 * 1000 / cassette_baudblock[
+				cassette_current_block]);
+			/* read block into buffer */
+			fread(&CASSETTE_buffer[0], 1, length, cassette_file);
+			cassette_max_blockbytes = length;
+			cassette_current_blockbyte = 0;
+			cassette_current_block++;
+		}
+	}
+	else {
+		length = 132;
+		CASSETTE_buffer[0] = 0x55;
+		CASSETTE_buffer[1] = 0x55;
+		if (cassette_current_block >= cassette_max_block) {
+			/* EOF record */
+			CASSETTE_buffer[2] = 0xfe;
+			memset(CASSETTE_buffer + 3, 0, 128);
+			if (cassette_current_block > cassette_max_block) {
+				eof_of_tape = 1;
+			}
+		}
+		else {
+			int bytes;
+			fseek(cassette_file,
+				(cassette_current_block - 1) * 128, SEEK_SET);
+			bytes = fread(CASSETTE_buffer + 3, 1, 128,
+				cassette_file);
+			if (bytes < 128) {
+				CASSETTE_buffer[2] = 0xfa; /* non-full record */
+				memset(CASSETTE_buffer + 3 + bytes, 0,
+					127 - bytes);
+				CASSETTE_buffer[0x82] = bytes;
+			}
+			else
+				CASSETTE_buffer[2] = 0xfc; /* full record */
+		}
+		CASSETTE_buffer[0x83] = SIO_ChkSum(CASSETTE_buffer, 0x83);
+		/* eval time to first byte coming out of pokey */
+		if (cassette_current_block == 1) {
+			/* on first block, length includes a leader */
+			cassette_nextirqevent = cassette_elapsedtime +
+				MSToScanLines(19200
+				+ 10 * 1000 / 600); /* always 600 baud */
+		}
+		else {
+			cassette_nextirqevent = cassette_elapsedtime +
+				MSToScanLines(260
+				+ 10 * 1000 / 600); /* always 600 baud */
+		}
+		cassette_max_blockbytes = length;
+		cassette_current_blockbyte = 0;
+		cassette_current_block++;
+	}
+	return length;
+}
+
+/* sets the stamp of next irq and loads new record if necessary
+   adjust is a value to correction of time of next irq*/
+static int SetNextByteTime_POKEY(int adjust)
+{
+	int length = 0;
+	cassette_current_blockbyte += 1;
+	/* if there are still bytes in the buffer, take next byte */
+	if (cassette_current_blockbyte < cassette_max_blockbytes) {
+		cassette_nextirqevent = cassette_elapsedtime + adjust
+			+ MSToScanLines(10 * 1000 / (cassette_isCAS?cassette_baudblock[
+			cassette_current_block-1]:600));
+		return 0;
+	}
+
+	/* if buffer is exhausted, load next record */
+	length = ReadRecord_POKEY();
+	/* if failed, return -1 */
+	if (length == -1) {
+		cassette_nextirqevent = -1;
+		return -1;
+	}
+	cassette_nextirqevent += adjust;
+	return 0;
+}
+
+/* Get the byte for which the serial data ready int has been triggered */
+int CASSETTE_GetByte(void)
+{
+	/* there are programs which load 2 blocks as one */
+	return CASSETTE_buffer[cassette_current_blockbyte];
+}
+
+/* Check status of I/O-line
+  Mark tone and stop bit gives 1, start bit 0
+  $55 as data give 1,0,1,0,1,0,1,0 (sync to evaluate tape speed,
+    least significant bit first)
+  returns state of I/O-line as block.byte.bit */
+int CASSETTE_IOLineStatus(void)
+{
+	int bit = 0;
+
+	/* if motor off and EOF return always 1 (equivalent the mark tone) */
+	if ((cassette_motor == 0)
+		|| (eof_of_tape != 0)) {
+		return 1;
+	}
+
+	/* exam rate; if elapsed time > nextirq - duration of one byte */
+	if (cassette_elapsedtime >
+		(cassette_nextirqevent - 10 * 50 * 312 / 
+		(cassette_isCAS?cassette_baudblock[cassette_current_block-1]:
+		600) + 1)) {
+		bit = (cassette_nextirqevent - cassette_elapsedtime)
+			/ (50 * 312 / (cassette_isCAS?cassette_baudblock[
+			cassette_current_block-1]:600));
+	}
+	else {
+		bit = 0;
+	}
+
+	/* if stopbit or out of range, return mark tone */
+	if ((bit <= 0) || (bit > 9))
+		return 1;
+
+	/* if start bit, return space tone */
+	if (bit == 9)
+		return 0;
+
+	/* eval tone to return */
+	return (CASSETTE_GetByte() >> (8 - bit)) & 1;
+}
+
+/* Get the delay to trigger the next interrupt
+   remark: The I/O-Line-status is also evaluated on this basis */
+int CASSETTE_GetInputIRQDelay(void)
+{
+	int timespan;
+
+	/* if no file or eof or motor off, return zero */
+	if ((cassette_file == NULL)
+		|| (eof_of_tape != 0)
+		|| (cassette_motor == 0)
+		|| (cassette_nextirqevent < 0)
+		|| cassette_savefile) {
+		return 0;
+	}
+
+	/* return time span */
+	timespan = cassette_nextirqevent - cassette_elapsedtime;
+	/* if timespan is negative, eval timespan to next byte */
+	if (timespan <= 0) {
+		if (SetNextByteTime_POKEY(0) == -1) {
+			return -1;
+		}
+		/* return time span */
+		timespan = cassette_nextirqevent - cassette_elapsedtime;
+	}
+	if (timespan < 40) {
+		timespan += ((312 * 50 - 1) / (cassette_isCAS?cassette_baudblock[
+			cassette_current_block-1]:600)) * 10;
+	}
+
+	/* if still negative, return "failed" */
+	if (timespan < 0) {
+		timespan = -1;
+	}
+	return timespan;
+}
+
+/* return if save file */
+int CASSETTE_IsSaveFile(void)
+{
+	return cassette_savefile;
+}
+
+/* put a byte into the cas file */
+/* the block is being written at first putbyte of the subsequent block */
+void CASSETTE_PutByte(int byte)
+{
+	/* get time since last byte-put resp. motor on */
+	cassette_putdelay = 1000*(cassette_elapsedtime-cassette_savetime)/312/50;
+	/* subtract one byte-duration from put delay */
+	cassette_putdelay -= 1000 * 10 * (POKEY_AUDF[POKEY_CHAN3] + POKEY_AUDF[POKEY_CHAN4]*0x100)/895000;
+	/* if putdelay > 5 (ms) */
+	if (cassette_putdelay > 05) {
+
+		/* write previous block */
+		if (cassette_current_blockbyte > 0) {
+			CASSETTE_Write(cassette_current_blockbyte);
+			cassette_current_blockbyte = 0;
+			cassette_gapdelay = 0;
+		}
+		/* set new gap-time */
+		cassette_gapdelay += cassette_putdelay;
+	}
+	/* put byte into buffer */
+	CASSETTE_buffer[cassette_current_blockbyte] = byte;
+	cassette_current_blockbyte++;
+	/* set new last byte-put time */
+	cassette_savetime = cassette_elapsedtime;
+}
+
+/* set motor status
+ 1 - on, 0 - off
+ remark: the real evaluation is done in AddScanLine*/
+void CASSETTE_TapeMotor(int onoff)
+{
+	if (cassette_file != NULL) {
+		if (cassette_savefile) { /* cas save */
+			if (onoff != cassette_motor) {
+				if (onoff == 0) {
+					/* get time since last byte-put resp. motor on */
+					cassette_putdelay = 1000*(cassette_elapsedtime-cassette_savetime)/312/50;
+					/* subtract one byte-duration from put delay */
+					cassette_putdelay -= 1000*10 * (POKEY_AUDF[POKEY_CHAN3] + POKEY_AUDF[POKEY_CHAN4]*0x100)/895000;
+					/* set putdelay non-negative */
+        				if (cassette_putdelay < 0) {
+						cassette_putdelay = 0;
+					}
+					/* write block from buffer */
+					if (cassette_current_blockbyte > 0) {
+						CASSETTE_Write(cassette_current_blockbyte);
+						cassette_gapdelay = 0;
+						cassette_current_blockbyte = 0;
+					}
+					/* set new gap-time */
+					cassette_gapdelay += cassette_putdelay;
+
+				}
+				else {
+					/* motor on if it was off - restart gap time */
+					cassette_savetime = cassette_elapsedtime;
+				}
+				cassette_motor = onoff;
+			}
+		}
+		else {
+			cassette_motor = onoff;
+			/* restart gap time */
+			if (onoff == 1)
+				cassette_savetime = cassette_elapsedtime;
+		};
+	}
+}
+
+void CASSETTE_AddScanLine(void)
+{
+	int tmp;
+	/* if motor on and a cassette file is opened, and not eof */
+	/* increment elapsed cassette time */
+	if (cassette_motor && (cassette_file != NULL)
+		&& ((eof_of_tape == 0) || cassette_savefile)) {
+		cassette_elapsedtime++;
+
+		/* only for loading: set next byte interrupt time */
+		/* valid cassette times are up to 870 baud, giving
+		   a time span of 18 scanlines, so comparing with
+		   -2 leaves a safe timespan for letting get the bit out
+		   of the pokey */
+		if (((cassette_nextirqevent - cassette_elapsedtime) <= -2)
+			&& !cassette_savefile) {
+			tmp = SetNextByteTime_POKEY(-2);
+		}
+	}
+}
diff --git a/project/jni/application/atari800/src/cassette.h b/project/jni/application/atari800/src/cassette.h
new file mode 100644
index 000000000..cf83aa2f4
--- /dev/null
+++ b/project/jni/application/atari800/src/cassette.h
@@ -0,0 +1,35 @@
+#ifndef CASSETTE_H_
+#define CASSETTE_H_
+
+#include <stdio.h>		/* for FILE and FILENAME_MAX */
+
+#include "atari.h"		/* for UBYTE */
+
+#define CASSETTE_DESCRIPTION_MAX 256
+
+int CASSETTE_Initialise(int *argc, char *argv[]);
+
+int CASSETTE_CheckFile(const char *filename, FILE **fp, char *description, int *last_block, int *isCAS);
+int CASSETTE_CreateFile(const char *filename, FILE **fp, int *isCAS);
+int CASSETTE_Insert(const char *filename);
+void CASSETTE_Remove(void);
+
+extern int CASSETTE_hold_start;
+extern int CASSETTE_hold_start_on_reboot; /* preserve hold_start after reboot */
+extern int CASSETTE_press_space;
+
+int CASSETTE_AddGap(int gaptime);
+void CASSETTE_LeaderLoad(void);
+void CASSETTE_LeaderSave(void);
+int CASSETTE_Read(void);
+int CASSETTE_Write(int length);
+int CASSETTE_IOLineStatus(void);
+int CASSETTE_GetByte(void);
+int CASSETTE_GetInputIRQDelay(void);
+int CASSETTE_IsSaveFile(void);
+void CASSETTE_PutByte(int byte);
+void CASSETTE_TapeMotor(int onoff);
+void CASSETTE_AddScanLine(void);
+extern UBYTE CASSETTE_buffer[4096];
+
+#endif /* CASSETTE_H_ */
diff --git a/project/jni/application/atari800/src/cfg.c b/project/jni/application/atari800/src/cfg.c
new file mode 100755
index 000000000..752d0e75d
--- /dev/null
+++ b/project/jni/application/atari800/src/cfg.c
@@ -0,0 +1,405 @@
+/*
+ * cfg.c - Emulator Configuration
+ *
+ * Copyright (c) 1995-1998 David Firth
+ * Copyright (c) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+#include "config.h"
+#include "atari.h"
+#include <stdlib.h>
+#include "cfg.h"
+#include "devices.h"
+#include "esc.h"
+#include "log.h"
+#include "memory.h"
+#include "pbi.h"
+#include "platform.h"
+#include "pokeysnd.h"
+#include "ui.h"
+#include "util.h"
+
+char CFG_osa_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+char CFG_osb_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+char CFG_xlxe_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+char CFG_5200_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+char CFG_basic_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+
+
+void CFG_FindROMImages(const char *directory, int only_if_not_set)
+{
+	static char * const rom_filenames[5] = {
+		CFG_osa_filename,
+		CFG_osb_filename,
+		CFG_xlxe_filename,
+		CFG_5200_filename,
+		CFG_basic_filename
+	};
+	static const char * const common_filenames[] = {
+		"atariosa.rom", "atari_osa.rom", "atari_os_a.rom",
+		"ATARIOSA.ROM", "ATARI_OSA.ROM", "ATARI_OS_A.ROM",
+		NULL,
+		"atariosb.rom", "atari_osb.rom", "atari_os_b.rom",
+		"ATARIOSB.ROM", "ATARI_OSB.ROM", "ATARI_OS_B.ROM",
+		NULL,
+		"atarixlxe.rom", "atarixl.rom", "atari_xlxe.rom", "atari_xl_xe.rom",
+		"ATARIXLXE.ROM", "ATARIXL.ROM", "ATARI_XLXE.ROM", "ATARI_XL_XE.ROM",
+		NULL,
+		"atari5200.rom", "atar5200.rom", "5200.rom", "5200.bin", "atari_5200.rom",
+		"ATARI5200.ROM", "ATAR5200.ROM", "5200.ROM", "5200.BIN", "ATARI_5200.ROM",
+		NULL,
+		"ataribasic.rom", "ataribas.rom", "basic.rom", "atari_basic.rom",
+		"ATARIBASIC.ROM", "ATARIBAS.ROM", "BASIC.ROM", "ATARI_BASIC.ROM",
+		NULL
+	};
+	const char * const *common_filename = common_filenames;
+	int i;
+	for (i = 0; i < 5; i++) {
+		if (!only_if_not_set || Util_filenamenotset(rom_filenames[i])) {
+			do {
+				char full_filename[FILENAME_MAX];
+				Util_catpath(full_filename, directory, *common_filename);
+				if (Util_fileexists(full_filename)) {
+					strcpy(rom_filenames[i], full_filename);
+					break;
+				}
+			} while (*++common_filename != NULL);
+		}
+		while (*common_filename++ != NULL);
+	}
+}
+
+/* If another default path config path is defined use it
+   otherwise use the default one */
+#ifndef DEFAULT_CFG_NAME
+#define DEFAULT_CFG_NAME ".atari800.cfg"
+#endif
+
+#ifndef SYSTEM_WIDE_CFG_FILE
+#define SYSTEM_WIDE_CFG_FILE "/etc/atari800.cfg"
+#endif
+
+static char rtconfig_filename[FILENAME_MAX];
+
+int CFG_LoadConfig(const char *alternate_config_filename)
+{
+	FILE *fp;
+	const char *fname = rtconfig_filename;
+	char string[256];
+#ifndef BASIC
+	int was_obsolete_dir = FALSE;
+#endif
+
+#ifdef SUPPORTS_PLATFORM_CONFIGINIT
+	PLATFORM_ConfigInit();
+#endif
+
+	/* if alternate config filename is passed then use it */
+	if (alternate_config_filename != NULL && *alternate_config_filename > 0) {
+		Util_strlcpy(rtconfig_filename, alternate_config_filename, FILENAME_MAX);
+	}
+	/* else use the default config name under the HOME folder */
+	else {
+		char *home = getenv("HOME");
+		if (home != NULL)
+			Util_catpath(rtconfig_filename, home, DEFAULT_CFG_NAME);
+		else
+			strcpy(rtconfig_filename, DEFAULT_CFG_NAME);
+	}
+
+	fp = fopen(fname, "r");
+	if (fp == NULL) {
+		Log_print("User config file '%s' not found.", rtconfig_filename);
+
+#ifdef SYSTEM_WIDE_CFG_FILE
+		/* try system wide config file */
+		fname = SYSTEM_WIDE_CFG_FILE;
+		Log_print("Trying system wide config file: %s", fname);
+		fp = fopen(fname, "r");
+#endif
+		if (fp == NULL) {
+			Log_print("No configuration file found, will create fresh one from scratch:");
+			return FALSE;
+		}
+	}
+
+	fgets(string, sizeof(string), fp);
+
+	Log_print("Using Atari800 config file: %s\nCreated by %s", fname, string);
+
+	while (fgets(string, sizeof(string), fp)) {
+		char *ptr;
+		Util_chomp(string);
+		ptr = strchr(string, '=');
+		if (ptr != NULL) {
+			*ptr++ = '\0';
+			Util_trim(string);
+			Util_trim(ptr);
+
+			if (strcmp(string, "OS/A_ROM") == 0)
+				Util_strlcpy(CFG_osa_filename, ptr, sizeof(CFG_osa_filename));
+			else if (strcmp(string, "OS/B_ROM") == 0)
+				Util_strlcpy(CFG_osb_filename, ptr, sizeof(CFG_osb_filename));
+			else if (strcmp(string, "XL/XE_ROM") == 0)
+				Util_strlcpy(CFG_xlxe_filename, ptr, sizeof(CFG_xlxe_filename));
+			else if (strcmp(string, "BASIC_ROM") == 0)
+				Util_strlcpy(CFG_basic_filename, ptr, sizeof(CFG_basic_filename));
+			else if (strcmp(string, "5200_ROM") == 0)
+				Util_strlcpy(CFG_5200_filename, ptr, sizeof(CFG_5200_filename));
+#ifdef BASIC
+			else if (strcmp(string, "ATARI_FILES_DIR") == 0
+				  || strcmp(string, "SAVED_FILES_DIR") == 0
+				  || strcmp(string, "DISK_DIR") == 0 || strcmp(string, "ROM_DIR") == 0
+				  || strcmp(string, "EXE_DIR") == 0 || strcmp(string, "STATE_DIR") == 0)
+				/* do nothing */;
+#else
+			else if (strcmp(string, "ATARI_FILES_DIR") == 0) {
+				if (UI_n_atari_files_dir >= UI_MAX_DIRECTORIES)
+					Log_print("All ATARI_FILES_DIR slots used!");
+				else
+					Util_strlcpy(UI_atari_files_dir[UI_n_atari_files_dir++], ptr, FILENAME_MAX);
+			}
+			else if (strcmp(string, "SAVED_FILES_DIR") == 0) {
+				if (UI_n_saved_files_dir >= UI_MAX_DIRECTORIES)
+					Log_print("All SAVED_FILES_DIR slots used!");
+				else
+					Util_strlcpy(UI_saved_files_dir[UI_n_saved_files_dir++], ptr, FILENAME_MAX);
+			}
+			else if (strcmp(string, "DISK_DIR") == 0 || strcmp(string, "ROM_DIR") == 0
+				  || strcmp(string, "EXE_DIR") == 0 || strcmp(string, "STATE_DIR") == 0) {
+				/* ignore blank and "." values */
+				if (ptr[0] != '\0' && (ptr[0] != '.' || ptr[1] != '\0'))
+					was_obsolete_dir = TRUE;
+			}
+#endif
+			else if (strcmp(string, "H1_DIR") == 0)
+				Util_strlcpy(Devices_atari_h_dir[0], ptr, FILENAME_MAX);
+			else if (strcmp(string, "H2_DIR") == 0)
+				Util_strlcpy(Devices_atari_h_dir[1], ptr, FILENAME_MAX);
+			else if (strcmp(string, "H3_DIR") == 0)
+				Util_strlcpy(Devices_atari_h_dir[2], ptr, FILENAME_MAX);
+			else if (strcmp(string, "H4_DIR") == 0)
+				Util_strlcpy(Devices_atari_h_dir[3], ptr, FILENAME_MAX);
+			else if (strcmp(string, "HD_READ_ONLY") == 0)
+				Devices_h_read_only = Util_sscandec(ptr);
+
+			else if (strcmp(string, "PRINT_COMMAND") == 0) {
+				if (!Devices_SetPrintCommand(ptr))
+					Log_print("Unsafe PRINT_COMMAND ignored");
+			}
+
+			else if (strcmp(string, "SCREEN_REFRESH_RATIO") == 0)
+				Atari800_refresh_rate = Util_sscandec(ptr);
+			else if (strcmp(string, "DISABLE_BASIC") == 0)
+				Atari800_disable_basic = Util_sscanbool(ptr);
+
+			else if (strcmp(string, "ENABLE_SIO_PATCH") == 0) {
+				ESC_enable_sio_patch = Util_sscanbool(ptr);
+			}
+			else if (strcmp(string, "ENABLE_H_PATCH") == 0) {
+				Devices_enable_h_patch = Util_sscanbool(ptr);
+			}
+			else if (strcmp(string, "ENABLE_P_PATCH") == 0) {
+				Devices_enable_p_patch = Util_sscanbool(ptr);
+			}
+			else if (strcmp(string, "ENABLE_R_PATCH") == 0) {
+				Devices_enable_r_patch = Util_sscanbool(ptr);
+			}
+
+			else if (strcmp(string, "ENABLE_NEW_POKEY") == 0) {
+#ifdef SOUND
+				POKEYSND_enable_new_pokey = Util_sscanbool(ptr);
+#endif
+			}
+			else if (strcmp(string, "STEREO_POKEY") == 0) {
+#ifdef STEREO_SOUND
+				POKEYSND_stereo_enabled = Util_sscanbool(ptr);
+#endif
+			}
+			else if (strcmp(string, "SPEAKER_SOUND") == 0) {
+#ifdef CONSOLE_SOUND
+				POKEYSND_console_sound_enabled = Util_sscanbool(ptr);
+#endif
+			}
+			else if (strcmp(string, "SERIO_SOUND") == 0) {
+#ifdef SERIO_SOUND
+				POKEYSND_serio_sound_enabled = Util_sscanbool(ptr);
+#endif
+			}
+			else if (strcmp(string, "MACHINE_TYPE") == 0) {
+				if (strcmp(ptr, "Atari OS/A") == 0)
+					Atari800_machine_type = Atari800_MACHINE_OSA;
+				else if (strcmp(ptr, "Atari OS/B") == 0)
+					Atari800_machine_type = Atari800_MACHINE_OSB;
+				else if (strcmp(ptr, "Atari XL/XE") == 0)
+					Atari800_machine_type = Atari800_MACHINE_XLXE;
+				else if (strcmp(ptr, "Atari 5200") == 0)
+					Atari800_machine_type = Atari800_MACHINE_5200;
+				else
+					Log_print("Invalid machine type: %s", ptr);
+			}
+			else if (strcmp(string, "RAM_SIZE") == 0) {
+				if (strcmp(ptr, "16") == 0)
+					MEMORY_ram_size = 16;
+				else if (strcmp(ptr, "48") == 0)
+					MEMORY_ram_size = 48;
+				else if (strcmp(ptr, "52") == 0)
+					MEMORY_ram_size = 52;
+				else if (strcmp(ptr, "64") == 0)
+					MEMORY_ram_size = 64;
+				else if (strcmp(ptr, "128") == 0)
+					MEMORY_ram_size = 128;
+				else if (strcmp(ptr, "192") == 0)
+					MEMORY_ram_size = 192;
+				else if (strcmp(ptr, "320 (RAMBO)") == 0)
+					MEMORY_ram_size = MEMORY_RAM_320_RAMBO;
+				else if (strcmp(ptr, "320 (COMPY SHOP)") == 0)
+					MEMORY_ram_size = MEMORY_RAM_320_COMPY_SHOP;
+				else if (strcmp(ptr, "576") == 0)
+					MEMORY_ram_size = 576;
+				else if (strcmp(ptr, "1088") == 0)
+					MEMORY_ram_size = 1088;
+				else
+					Log_print("Invalid RAM size: %s", ptr);
+			}
+			else if (strcmp(string, "DEFAULT_TV_MODE") == 0) {
+				if (strcmp(ptr, "PAL") == 0)
+					Atari800_tv_mode = Atari800_TV_PAL;
+				else if (strcmp(ptr, "NTSC") == 0)
+					Atari800_tv_mode = Atari800_TV_NTSC;
+				else
+					Log_print("Invalid TV Mode: %s", ptr);
+			}
+			/* Add module-specific configurations here */
+			else if (PBI_ReadConfig(string,ptr)) {
+			}
+			else {
+#ifdef SUPPORTS_PLATFORM_CONFIGURE
+				if (!PLATFORM_Configure(string, ptr)) {
+					Log_print("Unrecognized variable or bad parameters: '%s=%s'", string, ptr);
+				}
+#else
+				Log_print("Unrecognized variable: %s", string);
+#endif
+			}
+		}
+		else {
+			Log_print("Ignored config line: %s", string);
+		}
+	}
+
+	fclose(fp);
+#ifndef BASIC
+	if (was_obsolete_dir) {
+		Log_print(
+			"DISK_DIR, ROM_DIR, EXE_DIR and STATE_DIR configuration options\n"
+			"are no longer supported. Please use ATARI_FILES_DIR\n"
+			"and SAVED_FILES_DIR in your Atari800 configuration file.");
+	}
+#endif
+	return TRUE;
+}
+
+int CFG_WriteConfig(void)
+{
+	FILE *fp;
+	int i;
+	static const char * const machine_type_string[4] = {
+		"OS/A", "OS/B", "XL/XE", "5200"
+	};
+
+	fp = fopen(rtconfig_filename, "w");
+	if (fp == NULL) {
+		perror(rtconfig_filename);
+		Log_print("Cannot write to config file: %s", rtconfig_filename);
+		return FALSE;
+	}
+	Log_print("Writing config file: %s", rtconfig_filename);
+
+	fprintf(fp, "%s\n", Atari800_TITLE);
+	fprintf(fp, "OS/A_ROM=%s\n", CFG_osa_filename);
+	fprintf(fp, "OS/B_ROM=%s\n", CFG_osb_filename);
+	fprintf(fp, "XL/XE_ROM=%s\n", CFG_xlxe_filename);
+	fprintf(fp, "BASIC_ROM=%s\n", CFG_basic_filename);
+	fprintf(fp, "5200_ROM=%s\n", CFG_5200_filename);
+#ifndef BASIC
+	for (i = 0; i < UI_n_atari_files_dir; i++)
+		fprintf(fp, "ATARI_FILES_DIR=%s\n", UI_atari_files_dir[i]);
+	for (i = 0; i < UI_n_saved_files_dir; i++)
+		fprintf(fp, "SAVED_FILES_DIR=%s\n", UI_saved_files_dir[i]);
+#endif
+	for (i = 0; i < 4; i++)
+		fprintf(fp, "H%c_DIR=%s\n", '1' + i, Devices_atari_h_dir[i]);
+	fprintf(fp, "HD_READ_ONLY=%d\n", Devices_h_read_only);
+
+#ifdef HAVE_SYSTEM
+	fprintf(fp, "PRINT_COMMAND=%s\n", Devices_print_command);
+#endif
+
+#ifndef BASIC
+	fprintf(fp, "SCREEN_REFRESH_RATIO=%d\n", Atari800_refresh_rate);
+#endif
+
+	fprintf(fp, "MACHINE_TYPE=Atari %s\n", machine_type_string[Atari800_machine_type]);
+
+	fprintf(fp, "RAM_SIZE=");
+	switch (MEMORY_ram_size) {
+	case MEMORY_RAM_320_RAMBO:
+		fprintf(fp, "320 (RAMBO)\n");
+		break;
+	case MEMORY_RAM_320_COMPY_SHOP:
+		fprintf(fp, "320 (COMPY SHOP)\n");
+		break;
+	default:
+		fprintf(fp, "%d\n", MEMORY_ram_size);
+		break;
+	}
+
+	fprintf(fp, (Atari800_tv_mode == Atari800_TV_PAL) ? "DEFAULT_TV_MODE=PAL\n" : "DEFAULT_TV_MODE=NTSC\n");
+
+	fprintf(fp, "DISABLE_BASIC=%d\n", Atari800_disable_basic);
+	fprintf(fp, "ENABLE_SIO_PATCH=%d\n", ESC_enable_sio_patch);
+	fprintf(fp, "ENABLE_H_PATCH=%d\n", Devices_enable_h_patch);
+	fprintf(fp, "ENABLE_P_PATCH=%d\n", Devices_enable_p_patch);
+#ifdef R_IO_DEVICE
+	fprintf(fp, "ENABLE_R_PATCH=%d\n", Devices_enable_r_patch);
+#endif
+
+#ifdef SOUND
+	fprintf(fp, "ENABLE_NEW_POKEY=%d\n", POKEYSND_enable_new_pokey);
+#ifdef STEREO_SOUND
+	fprintf(fp, "STEREO_POKEY=%d\n", POKEYSND_stereo_enabled);
+#endif
+#ifdef CONSOLE_SOUND
+	fprintf(fp, "SPEAKER_SOUND=%d\n", POKEYSND_console_sound_enabled);
+#endif
+#ifdef SERIO_SOUND
+	fprintf(fp, "SERIO_SOUND=%d\n", POKEYSND_serio_sound_enabled);
+#endif
+#endif /* SOUND */
+	/* Add module-specific configurations here */
+	PBI_WriteConfig(fp);
+
+#ifdef SUPPORTS_PLATFORM_CONFIGSAVE
+	PLATFORM_ConfigSave(fp);
+#endif
+
+	fclose(fp);
+	return TRUE;
+}
diff --git a/project/jni/application/atari800/src/cfg.h b/project/jni/application/atari800/src/cfg.h
new file mode 100755
index 000000000..789dc030e
--- /dev/null
+++ b/project/jni/application/atari800/src/cfg.h
@@ -0,0 +1,22 @@
+#ifndef CFG_H_
+#define CFG_H_
+/* Checks for "popular" filenames of ROM images in the specified directory
+   and sets CFG_*_filename to the ones found.
+   If only_if_not_set is TRUE, then CFG_*_filename is modified only when
+   Util_filenamenotset() is TRUE for it. */
+void CFG_FindROMImages(const char *directory, int only_if_not_set);
+
+/* Load Atari800 text configuration file. */
+int CFG_LoadConfig(const char *alternate_config_filename);
+
+/* Writes Atari800 text configuration file. */
+int CFG_WriteConfig(void);
+
+/* Paths to ROM images. */
+extern char CFG_osa_filename[FILENAME_MAX];
+extern char CFG_osb_filename[FILENAME_MAX];
+extern char CFG_xlxe_filename[FILENAME_MAX];
+extern char CFG_5200_filename[FILENAME_MAX];
+extern char CFG_basic_filename[FILENAME_MAX];
+
+#endif /* CFG_H_ */
diff --git a/project/jni/application/atari800/src/colours.c b/project/jni/application/atari800/src/colours.c
new file mode 100644
index 000000000..ad31fe04a
--- /dev/null
+++ b/project/jni/application/atari800/src/colours.c
@@ -0,0 +1,443 @@
+/*
+ * colours.c - Atari colour palette
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2009 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <string.h>	/* for strcmp() */
+#include <math.h>
+#include <stdlib.h>
+#include "atari.h"
+#include "colours.h"
+#include "log.h"
+#include "util.h"
+#include "platform.h"
+#ifdef __PLUS
+#include "display_win.h"
+#include "misc_win.h"
+#endif
+
+#ifndef M_PI
+#define M_PI		3.14159265358979323846
+#endif
+
+#define PALETTE_R(x,c) ((UBYTE) (c[x] >> 16))
+#define PALETTE_G(x,c) ((UBYTE) (c[x] >> 8))
+#define PALETTE_B(x,c) ((UBYTE) c[x])
+#define PALETTE_Y(x,c) (0.30 * PALETTE_R(x,c) + 0.59 * PALETTE_G(x,c) + 0.11 * PALETTE_B(x,c))
+
+int *Colours_table;
+
+static int colortable_ntsc[256] = {
+ 0x000000, 0x101010, 0x1f1f1f, 0x2f2f2f,
+ 0x3e3e3e, 0x4e4e4e, 0x5e5e5e, 0x6e6e6e,
+ 0x797979, 0x8a8a8a, 0x9c9c9c, 0xadadad,
+ 0xbfbfbf, 0xd2d2d2, 0xe6e6e6, 0xfcfcfc,
+ 0x110900, 0x241d00, 0x342c00, 0x433c00,
+ 0x514a00, 0x615a00, 0x716a00, 0x817a00,
+ 0x8c850c, 0x9c951f, 0xaea734, 0xbfb847,
+ 0xd0c95b, 0xe3dc71, 0xf6f087, 0xffffa1,
+ 0x2a0000, 0x3d0b00, 0x4c1b00, 0x5b2b00,
+ 0x693a00, 0x794a00, 0x885a04, 0x976a16,
+ 0xa27522, 0xb28634, 0xc39848, 0xd4aa5c,
+ 0xe4bb6f, 0xf7cf84, 0xffe29a, 0xfff9b3,
+ 0x360000, 0x490100, 0x581100, 0x672100,
+ 0x752f00, 0x844008, 0x93501a, 0xa2602b,
+ 0xad6c37, 0xbd7d49, 0xcd8f5c, 0xdea16f,
+ 0xeeb282, 0xffc697, 0xffdaac, 0xfff1c4,
+ 0x420000, 0x540000, 0x630204, 0x721214,
+ 0x802123, 0x8f3233, 0x9e4244, 0xad5354,
+ 0xb75e60, 0xc77071, 0xd88284, 0xe89496,
+ 0xf8a6a7, 0xffbabb, 0xffced0, 0xffe5e7,
+ 0x3e002a, 0x51003e, 0x60004d, 0x6f065c,
+ 0x7d156a, 0x8c2679, 0x9b3789, 0xaa4798,
+ 0xb453a3, 0xc464b3, 0xd577c4, 0xe589d4,
+ 0xf59ce5, 0xffb0f7, 0xffc4ff, 0xffdcff,
+ 0x0f0077, 0x220089, 0x320097, 0x410fa5,
+ 0x501eb2, 0x5f2ec1, 0x6f3fcf, 0x7f50dd,
+ 0x8a5be7, 0x9a6df5, 0xac7fff, 0xbd91ff,
+ 0xcea3ff, 0xe1b7ff, 0xf4ccff, 0xffe3ff,
+ 0x000076, 0x000288, 0x0c1297, 0x1c22a5,
+ 0x2b31b2, 0x3b41c0, 0x4c51ce, 0x5c61dc,
+ 0x686de6, 0x797ef5, 0x8b90ff, 0x9da2ff,
+ 0xafb3ff, 0xc2c7ff, 0xd6dbff, 0xedf2ff,
+ 0x000065, 0x001077, 0x002086, 0x082f94,
+ 0x173ea1, 0x284eb0, 0x395ebe, 0x496ecc,
+ 0x5579d7, 0x668ae6, 0x799cf6, 0x8baeff,
+ 0x9ebfff, 0xb2d2ff, 0xc6e6ff, 0xddfcff,
+ 0x00074f, 0x001b62, 0x002a71, 0x003a7f,
+ 0x0b488d, 0x1b589c, 0x2c68ab, 0x3d78b9,
+ 0x4983c4, 0x5b94d3, 0x6ea5e3, 0x80b7f3,
+ 0x93c8ff, 0xa7dbff, 0xbceeff, 0xd3ffff,
+ 0x000f3b, 0x00234e, 0x00325d, 0x00426c,
+ 0x035079, 0x146089, 0x257098, 0x367fa7,
+ 0x428ab1, 0x539bc1, 0x67acd2, 0x79bee2,
+ 0x8ccff2, 0xa0e1ff, 0xb5f5ff, 0xcdffff,
+ 0x001a17, 0x002d2b, 0x003d3a, 0x004c49,
+ 0x005a58, 0x0c6a67, 0x1e7a77, 0x2f8987,
+ 0x3b9492, 0x4da4a2, 0x60b6b3, 0x73c7c4,
+ 0x86d7d5, 0x9aeae8, 0xb0fdfb, 0xc8ffff,
+ 0x002500, 0x003800, 0x004803, 0x005713,
+ 0x006522, 0x0d7432, 0x1e8443, 0x2f9353,
+ 0x3b9e5f, 0x4dae70, 0x60bf83, 0x73d095,
+ 0x86e0a7, 0x9bf3bb, 0xb0ffcf, 0xc8ffe6,
+ 0x001e00, 0x003100, 0x0c4100, 0x1c5000,
+ 0x2a5e00, 0x3b6e00, 0x4b7d00, 0x5b8d00,
+ 0x67970c, 0x78a81f, 0x8ab933, 0x9cca47,
+ 0xaedb5b, 0xc2ed71, 0xd6ff87, 0xedffa0,
+ 0x001300, 0x132600, 0x233600, 0x324500,
+ 0x415400, 0x516300, 0x617300, 0x718300,
+ 0x7c8e08, 0x8d9e1b, 0x9fb02f, 0xb0c143,
+ 0xc1d257, 0xd5e46d, 0xe8f883, 0xfeff9d,
+ 0x1e0000, 0x311400, 0x412400, 0x503300,
+ 0x5e4200, 0x6e5200, 0x7d6200, 0x8d7209,
+ 0x977d15, 0xa88e28, 0xb9a03c, 0xcab150,
+ 0xdbc263, 0xedd679, 0xffe98f, 0xffffa8
+};
+
+static int colortable_pal[256] = {
+ 0x2d2d2d, 0x3b3b3b, 0x494949, 0x575757,
+ 0x656565, 0x737373, 0x818181, 0x8f8f8f,
+ 0x9d9d9d, 0xababab, 0xb9b9b9, 0xc7c7c7,
+ 0xd5d5d5, 0xe3e3e3, 0xf1f1f1, 0xffffff,
+ 0x5c2300, 0x6a3100, 0x783f00, 0x864d0a,
+ 0x945b18, 0xa26926, 0xb07734, 0xbe8542,
+ 0xcc9350, 0xdaa15e, 0xe8af6c, 0xf6bd7a,
+ 0xffcb88, 0xffd996, 0xffe7a4, 0xfff5b2,
+ 0x691409, 0x772217, 0x853025, 0x933e33,
+ 0xa14c41, 0xaf5a4f, 0xbd685d, 0xcb766b,
+ 0xd98479, 0xe79287, 0xf5a095, 0xffaea3,
+ 0xffbcb1, 0xffcabf, 0xffd8cd, 0xffe6db,
+ 0x6c0a38, 0x7a1846, 0x882654, 0x963462,
+ 0xa44270, 0xb2507e, 0xc05e8c, 0xce6c9a,
+ 0xdc7aa8, 0xea88b6, 0xf896c4, 0xffa4d2,
+ 0xffb2e0, 0xffc0ee, 0xffcefc, 0xffdcff,
+ 0x640565, 0x721373, 0x802181, 0x8e2f8f,
+ 0x9c3d9d, 0xaa4bab, 0xb859b9, 0xc667c7,
+ 0xd475d5, 0xe283e3, 0xf091f1, 0xfe9fff,
+ 0xffadff, 0xffbbff, 0xffc9ff, 0xffd7ff,
+ 0x520789, 0x601597, 0x6e23a5, 0x7c31b3,
+ 0x8a3fc1, 0x984dcf, 0xa65bdd, 0xb469eb,
+ 0xc277f9, 0xd085ff, 0xde93ff, 0xeca1ff,
+ 0xfaafff, 0xffbdff, 0xffcbff, 0xffd9ff,
+ 0x3a109c, 0x481eaa, 0x562cb8, 0x643ac6,
+ 0x7248d4, 0x8056e2, 0x8e64f0, 0x9c72fe,
+ 0xaa80ff, 0xb88eff, 0xc69cff, 0xd4aaff,
+ 0xe2b8ff, 0xf0c6ff, 0xfed4ff, 0xffe2ff,
+ 0x1f1e9c, 0x2d2caa, 0x3b3ab8, 0x4948c6,
+ 0x5756d4, 0x6564e2, 0x7372f0, 0x8180fe,
+ 0x8f8eff, 0x9d9cff, 0xabaaff, 0xb9b8ff,
+ 0xc7c6ff, 0xd5d4ff, 0xe3e2ff, 0xf1f0ff,
+ 0x072e89, 0x153c97, 0x234aa5, 0x3158b3,
+ 0x3f66c1, 0x4d74cf, 0x5b82dd, 0x6990eb,
+ 0x779ef9, 0x85acff, 0x93baff, 0xa1c8ff,
+ 0xafd6ff, 0xbde4ff, 0xcbf2ff, 0xd9ffff,
+ 0x003e65, 0x034c73, 0x115a81, 0x1f688f,
+ 0x2d769d, 0x3b84ab, 0x4992b9, 0x57a0c7,
+ 0x65aed5, 0x73bce3, 0x81caf1, 0x8fd8ff,
+ 0x9de6ff, 0xabf4ff, 0xb9ffff, 0xc7ffff,
+ 0x004b38, 0x005946, 0x096754, 0x177562,
+ 0x258370, 0x33917e, 0x419f8c, 0x4fad9a,
+ 0x5dbba8, 0x6bc9b6, 0x79d7c4, 0x87e5d2,
+ 0x95f3e0, 0xa3ffee, 0xb1fffc, 0xbfffff,
+ 0x005209, 0x006017, 0x0c6e25, 0x1a7c33,
+ 0x288a41, 0x36984f, 0x44a65d, 0x52b46b,
+ 0x60c279, 0x6ed087, 0x7cde95, 0x8aeca3,
+ 0x98fab1, 0xa6ffbf, 0xb4ffcd, 0xc2ffdb,
+ 0x005300, 0x0b6100, 0x196f00, 0x277d0a,
+ 0x358b18, 0x439926, 0x51a734, 0x5fb542,
+ 0x6dc350, 0x7bd15e, 0x89df6c, 0x97ed7a,
+ 0xa5fb88, 0xb3ff96, 0xc1ffa4, 0xcfffb2,
+ 0x134e00, 0x215c00, 0x2f6a00, 0x3d7800,
+ 0x4b8600, 0x59940b, 0x67a219, 0x75b027,
+ 0x83be35, 0x91cc43, 0x9fda51, 0xade85f,
+ 0xbbf66d, 0xc9ff7b, 0xd7ff89, 0xe5ff97,
+ 0x2d4300, 0x3b5100, 0x495f00, 0x576d00,
+ 0x657b00, 0x738901, 0x81970f, 0x8fa51d,
+ 0x9db32b, 0xabc139, 0xb9cf47, 0xc7dd55,
+ 0xd5eb63, 0xe3f971, 0xf1ff7f, 0xffff8d,
+ 0x463300, 0x544100, 0x624f00, 0x705d00,
+ 0x7e6b00, 0x8c790b, 0x9a8719, 0xa89527,
+ 0xb6a335, 0xc4b143, 0xd2bf51, 0xe0cd5f,
+ 0xeedb6d, 0xfce97b, 0xfff789, 0xffff97
+};
+
+void Colours_SetRGB(int i, int r, int g, int b, int *colortable_ptr)
+{
+	if (r < 0)
+		r = 0;
+	else if (r > 255)
+		r = 255;
+	if (g < 0)
+		g = 0;
+	else if (g > 255)
+		g = 255;
+	if (b < 0)
+		b = 0;
+	else if (b > 255)
+		b = 255;
+	colortable_ptr[i] = (r << 16) + (g << 8) + b;
+}
+
+int Colours_Read(const char *filename, int *colortable_ptr)
+{
+	FILE *fp;
+	int i;
+	fp = fopen(filename, "rb");
+	if (fp == NULL)
+		return FALSE;
+	for (i = 0; i < 256; i++) {
+		int j;
+		colortable_ptr[i] = 0;
+		for (j = 16; j >= 0; j -= 8) {
+			int c = fgetc(fp);
+			if (c == EOF) {
+				fclose(fp);
+				return FALSE;
+			}
+			colortable_ptr[i] |= c << j;
+		}
+	}
+	fclose(fp);
+	return TRUE;
+}
+
+void Colours_Generate(int black, int white, int colshift, int *colortable_ptr)
+{
+	int i;
+	int j;
+	for (i = 0; i < 16; i++) {
+		double angle;
+		int r;
+		int g;
+		int b;
+		if (i == 0) {
+			r = g = b = 0;
+		}
+		else {
+			angle = M_PI * (i / 7.0 - colshift * 0.01);
+			r = (int) (0.08 / 0.30 * cos(angle) * (white - black));
+			g = (int) (0.08 / 0.59 * cos(angle + M_PI * 2 / 3) * (white - black));
+			b = (int) (0.08 / 0.11 * cos(angle + M_PI * 4 / 3) * (white - black));
+		}
+		for (j = 0; j < 16; j++) {
+			int y;
+			y = black + white * j / 15;
+			Colours_SetRGB(i * 16 + j, y + r, y + g, y + b, colortable_ptr);
+		}
+	}
+}
+
+void Colours_Adjust(int black, int white, int colintens, int *colortable_ptr)
+{
+	double black_in;
+	double white_in;
+	double brightfix;
+	double colorfix;
+	int i;
+	black_in = PALETTE_Y(0, colortable_ptr);
+	white_in = PALETTE_Y(15, colortable_ptr);
+	brightfix = (white - black) / (white_in - black_in);
+	colorfix = brightfix * colintens / 100;
+	for (i = 0; i < 256; i++) {
+		double y;
+		double r;
+		double g;
+		double b;
+		y = PALETTE_Y(i, colortable_ptr);
+		r = PALETTE_R(i, colortable_ptr) - y;
+		g = PALETTE_G(i, colortable_ptr) - y;
+		b = PALETTE_B(i, colortable_ptr) - y;
+		y = (y - black_in) * brightfix + black;
+		r = y + r * colorfix;
+		g = y + g * colorfix;
+		b = y + b * colorfix;
+		Colours_SetRGB(i, (int) r, (int) g, (int) b, colortable_ptr);
+	}
+}
+
+void Colours_SetVideoSystem(int mode) {
+	if (mode == Atari800_TV_NTSC) {
+		Colours_table = colortable_ntsc;
+	}
+       	else if (mode == Atari800_TV_PAL) {
+		Colours_table = colortable_pal;
+	}
+	else {
+		Atari800_Exit(FALSE);
+		Log_print("Interal error: Invalid Atari800_tv_mode\n");
+		exit(1);
+	}
+}
+
+void Colours_InitialiseMachine(void)
+{
+	static int saved_tv_mode = Atari800_TV_UNSET;
+	if (saved_tv_mode == Atari800_TV_UNSET) {
+		/* Colours_SetVideoSystem was already called in initialisation*/
+		saved_tv_mode = Atari800_tv_mode;
+	}
+	else if (saved_tv_mode != Atari800_tv_mode) {
+		/* Atari800_tv_mode has changed */
+		saved_tv_mode = Atari800_tv_mode;
+		Colours_SetVideoSystem(Atari800_tv_mode);
+#if SUPPORTS_PLATFORM_PALETTEUPDATE
+		PLATFORM_PaletteUpdate();
+#endif
+	}
+}
+
+int Colours_Initialise(int *argc, char *argv[])
+{
+	int i;
+	int j;
+#ifndef __PLUS
+	/* NTSC */
+	int black_ntsc = 0;
+	int white_ntsc = 255;
+	int colintens_ntsc = 100;
+	int colshift_ntsc = 30;
+	/* PAL */
+	int black_pal = 0;
+	int white_pal = 255;
+	int colintens_pal = 100;
+	int colshift_pal = 30;
+#else /* __PLUS */
+	/*XXX FIXME: add pal/ntsc*/
+	int black = g_Screen.Pal.nBlackLevel;
+	int white = g_Screen.Pal.nWhiteLevel;
+	int colintens = g_Screen.Pal.nSaturation;
+	int colshift = g_Screen.Pal.nColorShift;
+#endif /* __PLUS */
+	int generate_ntsc = FALSE;
+	int generate_pal = FALSE;
+	int adjust_ntsc = FALSE;
+	int adjust_pal = FALSE;
+
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = FALSE;			/* error, argument missing! */
+		
+		if (strcmp(argv[i], "-blackn") == 0) {
+			if (i_a) {
+				black_ntsc = Util_sscandec(argv[++i]);
+				adjust_ntsc = TRUE;
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-blackp") == 0) {
+			if (i_a) {
+				black_pal = Util_sscandec(argv[++i]);
+				adjust_pal = TRUE;
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-whiten") == 0) {
+			if (i_a) {
+				white_ntsc = Util_sscandec(argv[++i]);
+				adjust_ntsc = TRUE;
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-whitep") == 0) {
+			if (i_a) {
+				white_pal = Util_sscandec(argv[++i]);
+				adjust_pal = TRUE;
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-colorsn") == 0) {
+			if (i_a) {
+				colintens_ntsc = Util_sscandec(argv[++i]);
+				adjust_ntsc = TRUE;
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-colorsp") == 0) {
+			if (i_a) {
+				colintens_pal = Util_sscandec(argv[++i]);
+				adjust_pal = TRUE;
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-colshiftn") == 0)
+			if (i_a)
+				colshift_ntsc = Util_sscandec(argv[++i]);
+			else a_m = TRUE;
+		else if (strcmp(argv[i], "-colshiftp") == 0)
+			if (i_a)
+				colshift_pal = Util_sscandec(argv[++i]);
+			else a_m = TRUE;
+		else if (strcmp(argv[i], "-genpaln") == 0)
+			generate_ntsc = TRUE;
+		else if (strcmp(argv[i], "-genpalp") == 0)
+			generate_pal = TRUE;
+		else if (strcmp(argv[i], "-paletten") == 0)
+			if (i_a)
+				Colours_Read(argv[++i], colortable_ntsc);
+			else a_m = TRUE;
+		else if (strcmp(argv[i], "-palettep") == 0)
+			if (i_a)
+				Colours_Read(argv[++i], colortable_pal);
+			else a_m = TRUE;
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-paletten <file> Use external NTSC palette");
+				Log_print("\t-palettep <file> Use external PAL palette");
+				Log_print("\t-blackn <0-255>  Set NTSC palette black level");
+				Log_print("\t-blackp <0-255>  Set PAL palette black level");
+				Log_print("\t-whiten <0-255>  Set NTSC palette white level");
+				Log_print("\t-whitep <0-255>  Set PAL palette white level");
+				Log_print("\t-colorsn <num>   Set NTSC palette colors saturation");
+				Log_print("\t-colorsp <num>   Set PAL palette colors saturation");
+				Log_print("\t-genpaln         Generate artificial NTSC palette");
+				Log_print("\t-genpalp         Generate artificial PAL palette");
+				Log_print("\t-colshiftn <num> Set NTSC palette color shift (-genpaln only)");
+				Log_print("\t-colshiftp <num> Set PAL palette color shift (-genpalp only)");
+			}
+			argv[j++] = argv[i];
+		}
+
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return FALSE;
+		}
+	}
+	*argc = j;
+
+	if (generate_ntsc) {
+		Colours_Generate(black_ntsc, white_ntsc, colshift_ntsc, colortable_ntsc);
+	}
+	if (generate_pal) {
+		Colours_Generate(black_pal, white_pal, colshift_pal, colortable_pal);
+	}
+	if (adjust_ntsc) {
+		Colours_Adjust(black_ntsc, white_ntsc, colintens_ntsc, colortable_ntsc);
+	}
+	if (adjust_pal) {
+		Colours_Adjust(black_pal, white_pal, colintens_pal, colortable_pal);
+	}
+	Colours_SetVideoSystem(Atari800_tv_mode); /* Atari800_tv_mode is set before calling Colours_Initialise */
+
+	return TRUE;
+}
diff --git a/project/jni/application/atari800/src/colours.h b/project/jni/application/atari800/src/colours.h
new file mode 100644
index 000000000..40b79b87b
--- /dev/null
+++ b/project/jni/application/atari800/src/colours.h
@@ -0,0 +1,19 @@
+#ifndef COLOURS_H_
+#define COLOURS_H_
+
+extern int *Colours_table;
+
+#define Colours_GetR(x) ((UBYTE) (Colours_table[x] >> 16))
+#define Colours_GetG(x) ((UBYTE) (Colours_table[x] >> 8))
+#define Colours_GetB(x) ((UBYTE) Colours_table[x])
+#define Colours_GetY(x) (0.30 * Colours_GetR(x) + 0.59 * Colours_GetG(x) + 0.11 * Colours_GetB(x))
+void Colours_SetRGB(int i, int r, int g, int b, int *colortable_ptr);
+
+int Colours_Read(const char *filename, int *colortable_ptr);
+void Colours_Generate(int black, int white, int colshift, int *colortable_ptr);
+void Colours_Adjust(int black, int white, int colintens, int *colortable_ptr);
+void Colours_SetVideoSystem(int mode);
+void Colours_InitialiseMachine(void);
+int Colours_Initialise(int *argc, char *argv[]);
+
+#endif /* COLOURS_H_ */
diff --git a/project/jni/application/atari800/src/compfile.c b/project/jni/application/atari800/src/compfile.c
new file mode 100644
index 000000000..3d6fda248
--- /dev/null
+++ b/project/jni/application/atari800/src/compfile.c
@@ -0,0 +1,311 @@
+/*
+ * compfile.c - File I/O and ZLIB compression
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2006 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#ifdef HAVE_LIBZ
+#include <zlib.h>
+#endif
+
+#include "afile.h"
+#include "atari.h"
+#include "compfile.h"
+#include "log.h"
+#include "util.h"
+
+/* GZ decompression ------------------------------------------------------ */
+
+/* Opens a GZIP compressed file and decompresses its contents to outfp.
+   Returns TRUE on success. */
+int CompFile_ExtractGZ(const char *infilename, FILE *outfp)
+{
+#ifndef HAVE_LIBZ
+	Log_print("This executable cannot decompress ZLIB files");
+	return FALSE;
+#else
+	/* TODO: replace gz* with low-level light-weight ZLIB functions. */
+	gzFile gzf = gzopen(infilename, "rb");
+	void *buf;
+	int result;
+	if (gzf == NULL) {
+		Log_print("ZLIB could not open file %s", infilename);
+		return FALSE;
+	}
+#define UNCOMPRESS_BUFFER_SIZE 32768
+	buf = Util_malloc(UNCOMPRESS_BUFFER_SIZE);
+	do {
+		result = gzread(gzf, buf, UNCOMPRESS_BUFFER_SIZE);
+		if (result > 0) {
+			if ((int) fwrite(buf, 1, result, outfp) != result)
+				result = -1;
+		}
+	} while (result == UNCOMPRESS_BUFFER_SIZE);
+	free(buf);
+	gzclose(gzf);
+	return result >= 0;
+#endif	/* HAVE_LIBZ */
+}
+
+
+/* DCM decompression ----------------------------------------------------- */
+
+static int fgetw(FILE *fp)
+{
+	int low;
+	int high;
+	low = fgetc(fp);
+	if (low == EOF)
+		return -1;
+	high = fgetc(fp);
+	if (high == EOF)
+		return -1;
+	return low + (high << 8);
+}
+
+static int fload(void *buf, int size, FILE *fp)
+{
+	return (int) fread(buf, 1, size, fp) == size;
+}
+
+static int fsave(void *buf, int size, FILE *fp)
+{
+	return (int) fwrite(buf, 1, size, fp) == size;
+}
+
+typedef struct {
+	FILE *fp;
+	int sectorcount;
+	int sectorsize;
+	int current_sector;
+} ATR_Info;
+
+static int write_atr_header(const ATR_Info *pai)
+{
+	int sectorcount;
+	int sectorsize;
+	ULONG paras;
+	struct AFILE_ATR_Header header;
+	sectorcount = pai->sectorcount;
+	sectorsize = pai->sectorsize;
+	paras = (sectorsize != 256 || sectorcount <= 3)
+		? (sectorcount << 3) /* single density or only boot sectors: sectorcount * 128 / 16 */
+		: (sectorcount << 4) - 0x18; /* double density with 128-byte boot sectors: (sectorcount * 256 - 3 * 128) / 16 */
+	memset(&header, 0, sizeof(header));
+	header.magic1 = AFILE_ATR_MAGIC1;
+	header.magic2 = AFILE_ATR_MAGIC2;
+	header.secsizelo = (UBYTE) sectorsize;
+	header.secsizehi = (UBYTE) (sectorsize >> 8);
+	header.seccountlo = (UBYTE) paras;
+	header.seccounthi = (UBYTE) (paras >> 8);
+	header.hiseccountlo = (UBYTE) (paras >> 16);
+	header.hiseccounthi = (UBYTE) (paras >> 24);
+	return fsave(&header, sizeof(header), pai->fp);
+}
+
+static int write_atr_sector(ATR_Info *pai, UBYTE *buf)
+{
+	return fsave(buf, pai->current_sector++ <= 3 ? 128 : pai->sectorsize, pai->fp);
+}
+
+static int pad_till_sector(ATR_Info *pai, int till_sector)
+{
+	UBYTE zero_buf[256];
+	memset(zero_buf, 0, sizeof(zero_buf));
+	while (pai->current_sector < till_sector)
+		if (!write_atr_sector(pai, zero_buf))
+			return FALSE;
+	return TRUE;
+}
+
+static int dcm_pass(FILE *infp, ATR_Info *pai)
+{
+	UBYTE sector_buf[256];
+	memset(sector_buf, 0, sizeof(sector_buf));
+	for (;;) {
+		/* sector group */
+		int sector_no;
+		int sector_type;
+		sector_no = fgetw(infp);
+		sector_type = fgetc(infp);
+		if (sector_type == 0x45)
+			return TRUE;
+		if (sector_no < pai->current_sector) {
+			Log_print("Error: current sector is %d, next sector group at %d", pai->current_sector, sector_no);
+			return FALSE;
+		}
+		if (!pad_till_sector(pai, sector_no))
+			return FALSE;
+		for (;;) {
+			/* sector */
+			int i;
+			switch (sector_type & 0x7f) {
+			case 0x41:
+				i = fgetc(infp);
+				if (i == EOF)
+					return FALSE;
+				do {
+					int b = fgetc(infp);
+					if (b == EOF)
+						return FALSE;
+					sector_buf[i] = (UBYTE) b;
+				} while (i-- != 0);
+				break;
+			case 0x42:
+				if (!fload(sector_buf + 123, 5, infp))
+					return FALSE;
+				memset(sector_buf, sector_buf[123], 123);
+				break;
+			case 0x43:
+				i = 0;
+				do {
+					int j;
+					int c;
+					j = fgetc(infp);
+					if (j < i) {
+						if (j != 0)
+							return FALSE;
+						j = 256;
+					}
+					if (i < j && !fload(sector_buf + i, j - i, infp))
+						return FALSE;
+					if (j >= pai->sectorsize)
+						break;
+					i = fgetc(infp);
+					if (i < j) {
+						if (i != 0)
+							return FALSE;
+						i = 256;
+					}
+					c = fgetc(infp);
+					if (c == EOF)
+						return FALSE;
+					memset(sector_buf + j, c, i - j);
+				} while (i < pai->sectorsize);
+				break;
+			case 0x44:
+				i = fgetc(infp);
+				if (i == EOF || i >= pai->sectorsize)
+					return FALSE;
+				if (!fload(sector_buf + i, pai->sectorsize - i, infp))
+					return FALSE;
+				break;
+			case 0x46:
+				break;
+			case 0x47:
+				if (!fload(sector_buf, pai->sectorsize, infp))
+					return FALSE;
+				break;
+			default:
+				Log_print("Unrecognized sector coding type 0x%02X", sector_type);
+				return FALSE;
+			}
+			if (!write_atr_sector(pai, sector_buf))
+				return FALSE;
+			if (!(sector_type & 0x80))
+				break; /* goto sector group */
+			sector_type = fgetc(infp);
+			if (sector_type == 0x45)
+				return TRUE;
+		}
+	}
+}
+
+int CompFile_DCMtoATR(FILE *infp, FILE *outfp)
+{
+	int archive_type;
+	int archive_flags;
+	ATR_Info ai;
+	int pass_flags;
+	int last_sector;
+	archive_type = fgetc(infp);
+	if (archive_type != 0xf9 && archive_type != 0xfa) {
+		Log_print("This is not a DCM image");
+		return FALSE;
+	}
+	archive_flags = fgetc(infp);
+	if ((archive_flags & 0x1f) != 1) {
+		Log_print("Expected pass one first");
+		if (archive_type == 0xf9)
+			Log_print("It seems that DCMs of a multi-file archive have been combined in wrong order");
+		return FALSE;
+	}
+	ai.fp = outfp;
+	ai.current_sector = 1;
+	switch ((archive_flags >> 5) & 3) {
+	case 0:
+		ai.sectorcount = 720;
+		ai.sectorsize = 128;
+		break;
+	case 1:
+		ai.sectorcount = 720;
+		ai.sectorsize = 256;
+		break;
+	case 2:
+		ai.sectorcount = 1040;
+		ai.sectorsize = 128;
+		break;
+	default:
+		Log_print("Unrecognized density");
+		return FALSE;
+	}
+	if (!write_atr_header(&ai))
+		return FALSE;
+	pass_flags = archive_flags;
+	for (;;) {
+		/* pass */
+		int block_type;
+		if (!dcm_pass(infp, &ai))
+			return FALSE;
+		if (pass_flags & 0x80)
+			break;
+		block_type = fgetc(infp);
+		if (block_type != archive_type) {
+			if (block_type == EOF && archive_type == 0xf9) {
+				Log_print("Multi-part archive error.");
+				Log_print("To process these files, you must first combine the files into a single file.");
+#if defined(WIN32) || defined(DJGPP)
+				Log_print("COPY /B file1.dcm+file2.dcm+file3.dcm newfile.dcm from the DOS prompt");
+#elif defined(linux) || defined(unix)
+				Log_print("cat file1.dcm file2.dcm file3.dcm >newfile.dcm from the shell");
+#endif
+			}
+			return FALSE;
+		}
+		pass_flags = fgetc(infp);
+		if ((pass_flags ^ archive_flags) & 0x60) {
+			Log_print("Density changed inside DCM archive?");
+			return FALSE;
+		}
+		/* TODO: check pass number, this is tricky for >31 */
+	}
+	last_sector = ai.current_sector - 1;
+	if (last_sector <= ai.sectorcount)
+		return pad_till_sector(&ai, ai.sectorcount + 1);
+	/* more sectors written: update ATR header */
+	ai.sectorcount = last_sector;
+	Util_rewind(outfp);
+	return write_atr_header(&ai);
+}
diff --git a/project/jni/application/atari800/src/compfile.h b/project/jni/application/atari800/src/compfile.h
new file mode 100644
index 000000000..c9de741fa
--- /dev/null
+++ b/project/jni/application/atari800/src/compfile.h
@@ -0,0 +1,9 @@
+#ifndef COMPFILE_H_
+#define COMPFILE_H_
+
+#include <stdio.h>  /* FILE */
+
+int CompFile_ExtractGZ(const char *infilename, FILE *outfp);
+int CompFile_DCMtoATR(FILE *infp, FILE *outfp);
+
+#endif /* COMPFILE_H_ */
diff --git a/project/jni/application/atari800/src/config.h b/project/jni/application/atari800/src/config.h
new file mode 100644
index 000000000..77039927a
--- /dev/null
+++ b/project/jni/application/atari800/src/config.h
@@ -0,0 +1,481 @@
+/* config.h.  Generated from config.h.in by configure.  */
+/* config.h.in.  Generated from configure.ac by autoheader.  */
+
+/* Target: standard I/O. */
+/* #undef BASIC */
+
+/* Define to use buffered debug output. */
+/* #undef BUFFERED_LOG */
+
+/* Define to allow sound clipping. */
+/* #undef CLIP_SOUND */
+
+/* Define to 1 if the `closedir' function returns void instead of `int'. */
+/* #undef CLOSEDIR_VOID */
+
+/* Define to allow console sound (keyboard clicks). */
+#define CONSOLE_SOUND 1
+
+/* Define to activate crash menu after CIM instruction. */
+#define CRASH_MENU 1
+
+/* Define to disable bitmap graphics emulation in CURSES target. */
+/* #undef CURSES_BASIC */
+
+/* Alternate config filename due to 8+3 fs limit. */
+/* #undef DEFAULT_CFG_NAME */
+
+/* Target: Windows with DirectX. */
+/* #undef DIRECTX */
+
+/* Define to use back slash as directory separator. */
+/* #undef DIR_SEP_BACKSLASH */
+
+/* Target: DOS VGA. */
+/* #undef DOSVGA */
+
+/* Define to enable DOS style drives support. */
+/* #undef DOS_DRIVES */
+
+/* Define to enable event recording. */
+#define EVENT_RECORDING 1
+
+/* Target: Atari Falcon system. */
+/* #undef FALCON */
+
+/* Define to use m68k assembler CPU core for Falcon target. */
+/* #undef FALCON_CPUASM */
+
+/* Define to 1 if you have the <arpa/inet.h> header file. */
+#define HAVE_ARPA_INET_H 1
+
+/* Define to 1 if you have the `atexit' function. */
+#define HAVE_ATEXIT 1
+
+/* Define to 1 if you have the `chmod' function. */
+#define HAVE_CHMOD 1
+
+/* Define to 1 if you have the `clock' function. */
+#define HAVE_CLOCK 1
+
+/* Define to 1 if you have the <direct.h> header file. */
+/* #undef HAVE_DIRECT_H */
+
+/* Define to 1 if you have the <dirent.h> header file, and it defines `DIR'.
+   */
+#define HAVE_DIRENT_H 1
+
+/* Define to 1 if you don't have `vprintf' but do have `_doprnt.' */
+/* #undef HAVE_DOPRNT */
+
+/* Define to 1 if you have the <errno.h> header file. */
+#define HAVE_ERRNO_H 1
+
+/* Define to 1 if you have the <fcntl.h> header file. */
+#define HAVE_FCNTL_H 1
+
+/* Define to 1 if you have the `fdopen' function. */
+#define HAVE_FDOPEN 1
+
+/* Define to 1 if you have the `fflush' function. */
+#define HAVE_FFLUSH 1
+
+/* Define to 1 if you have the <file.h> header file. */
+/* #undef HAVE_FILE_H */
+
+/* Define to 1 if you have the `floor' function. */
+#define HAVE_FLOOR 1
+
+/* Define to 1 if you have the `fstat' function. */
+#define HAVE_FSTAT 1
+
+/* Define to 1 if you have the `getcwd' function. */
+#define HAVE_GETCWD 1
+
+/* Define to 1 if you have the `gethostbyaddr' function. */
+#define HAVE_GETHOSTBYADDR 1
+
+/* Define to 1 if you have the `gethostbyname' function. */
+#define HAVE_GETHOSTBYNAME 1
+
+/* Define to 1 if you have the `gettimeofday' function. */
+#define HAVE_GETTIMEOFDAY 1
+
+/* Define to 1 if you have the `inet_ntoa' function. */
+#define HAVE_INET_NTOA 1
+
+/* Define to 1 if you have the <inttypes.h> header file. */
+#define HAVE_INTTYPES_H 1
+
+/* Define to 1 if you have the `png' library (-lpng). */
+#define HAVE_LIBPNG 1
+
+/* Define to 1 if you have the `z' library (-lz). */
+#define HAVE_LIBZ 1
+
+/* Define to 1 if you have the `localtime' function. */
+#define HAVE_LOCALTIME 1
+
+/* Define to 1 if you have the `memmove' function. */
+#define HAVE_MEMMOVE 1
+
+/* Define to 1 if you have the <memory.h> header file. */
+#define HAVE_MEMORY_H 1
+
+/* Define to 1 if you have the `memset' function. */
+#define HAVE_MEMSET 1
+
+/* Define to 1 if you have the `mkdir' function. */
+#define HAVE_MKDIR 1
+
+/* Define to 1 if you have the `mkstemp' function. */
+#define HAVE_MKSTEMP 1
+
+/* Define to 1 if you have the `mktemp' function. */
+#define HAVE_MKTEMP 1
+
+/* Define to 1 if you have the `modf' function. */
+#define HAVE_MODF 1
+
+/* Define to 1 if you have the `nanosleep' function. */
+#define HAVE_NANOSLEEP 1
+
+/* Define to 1 if you have the <ndir.h> header file, and it defines `DIR'. */
+/* #undef HAVE_NDIR_H */
+
+/* Define to 1 if you have the <netdb.h> header file. */
+#define HAVE_NETDB_H 1
+
+/* Define to 1 if you have the <netinet/in.h> header file. */
+#define HAVE_NETINET_IN_H 1
+
+/* Define to 1 if you have the `opendir' function. */
+#define HAVE_OPENDIR 1
+
+/* Define to 1 if you have the `rename' function. */
+#define HAVE_RENAME 1
+
+/* Define to 1 if you have the `rewind' function. */
+#define HAVE_REWIND 1
+
+/* Define to 1 if you have the `rmdir' function. */
+#define HAVE_RMDIR 1
+
+/* Define to 1 if you have the `select' function. */
+#define HAVE_SELECT 1
+
+/* Define to 1 if you have the `signal' function. */
+#define HAVE_SIGNAL 1
+
+/* Define to 1 if you have the <signal.h> header file. */
+#define HAVE_SIGNAL_H 1
+
+/* Define to 1 if you have the `snprintf' function. */
+#define HAVE_SNPRINTF 1
+
+/* Define to 1 if you have the `socket' function. */
+#define HAVE_SOCKET 1
+
+/* Define to 1 if you have the `stat' function. */
+#define HAVE_STAT 1
+
+/* Define to 1 if `stat' has the bug that it succeeds when given the
+   zero-length file name argument. */
+/* #undef HAVE_STAT_EMPTY_STRING_BUG */
+
+/* Define to 1 if you have the <stdint.h> header file. */
+#define HAVE_STDINT_H 1
+
+/* Define to 1 if you have the <stdlib.h> header file. */
+#define HAVE_STDLIB_H 1
+
+/* Define to 1 if you have the `strcasecmp' function. */
+#define HAVE_STRCASECMP 1
+
+/* Define to 1 if you have the `strchr' function. */
+#define HAVE_STRCHR 1
+
+/* Define to 1 if you have the `strdup' function. */
+#define HAVE_STRDUP 1
+
+/* Define to 1 if you have the `strerror' function. */
+#define HAVE_STRERROR 1
+
+/* Define to 1 if you have the <strings.h> header file. */
+#define HAVE_STRINGS_H 1
+
+/* Define to 1 if you have the <string.h> header file. */
+#define HAVE_STRING_H 1
+
+/* Define to 1 if you have the `strncpy' function. */
+#define HAVE_STRNCPY 1
+
+/* Define to 1 if you have the `strrchr' function. */
+#define HAVE_STRRCHR 1
+
+/* Define to 1 if you have the `strstr' function. */
+#define HAVE_STRSTR 1
+
+/* Define to 1 if you have the `strtol' function. */
+#define HAVE_STRTOL 1
+
+/* Define to 1 if you have the `system' function. */
+#define HAVE_SYSTEM 1
+
+/* Define to 1 if you have the <sys/dir.h> header file, and it defines `DIR'.
+   */
+/* #undef HAVE_SYS_DIR_H */
+
+/* Define to 1 if you have the <sys/ioctl.h> header file. */
+#define HAVE_SYS_IOCTL_H 1
+
+/* Define to 1 if you have the <sys/ndir.h> header file, and it defines `DIR'.
+   */
+/* #undef HAVE_SYS_NDIR_H */
+
+/* Define to 1 if you have the <sys/select.h> header file. */
+#define HAVE_SYS_SELECT_H 1
+
+/* Define to 1 if you have the <sys/socket.h> header file. */
+#define HAVE_SYS_SOCKET_H 1
+
+/* Define to 1 if you have the <sys/soundcard.h> header file. */
+#define HAVE_SYS_SOUNDCARD_H 1
+
+/* Define to 1 if you have the <sys/stat.h> header file. */
+#define HAVE_SYS_STAT_H 1
+
+/* Define to 1 if you have the <sys/time.h> header file. */
+#define HAVE_SYS_TIME_H 1
+
+/* Define to 1 if you have the <sys/types.h> header file. */
+#define HAVE_SYS_TYPES_H 1
+
+/* Define to 1 if you have the <termios.h> header file. */
+#define HAVE_TERMIOS_H 1
+
+/* Define to 1 if you have the `time' function. */
+#define HAVE_TIME 1
+
+/* Define to 1 if you have the <time.h> header file. */
+#define HAVE_TIME_H 1
+
+/* Define to 1 if you have the `tmpfile' function. */
+#define HAVE_TMPFILE 1
+
+/* Define to 1 if you have the `tmpnam' function. */
+#define HAVE_TMPNAM 1
+
+/* Define to 1 if you have the `uclock' function. */
+/* #undef HAVE_UCLOCK */
+
+/* Define to 1 if you have the <unistd.h> header file. */
+#define HAVE_UNISTD_H 1
+
+/* Define to 1 if you have the <unixio.h> header file. */
+/* #undef HAVE_UNIXIO_H */
+
+/* Define to 1 if you have the `unlink' function. */
+#define HAVE_UNLINK 1
+
+/* Define to 1 if you have the `usleep' function. */
+#define HAVE_USLEEP 1
+
+/* Define to 1 if you have the `vprintf' function. */
+#define HAVE_VPRINTF 1
+
+/* Define to 1 if you have the `vsnprintf' function. */
+#define HAVE_VSNPRINTF 1
+
+/* Define to 1 if you have the <winsock2.h> header file. */
+/* #undef HAVE_WINSOCK2_H */
+
+/* Define to allow sound interpolation. */
+#define INTERPOLATE_SOUND 1
+
+/* Target: Java NestedVM. */
+/* #undef JAVANVM */
+
+/* Define to use LINUX joystick. */
+/* #undef LINUX_JOYSTICK */
+
+/* Define to 1 if `lstat' dereferences a symlink specified with a trailing
+   slash. */
+#define LSTAT_FOLLOWS_SLASHED_SYMLINK 1
+
+/* Define to activate assembler in monitor. */
+#define MONITOR_ASSEMBLER 1
+
+/* Define to activate code breakpoints and execution history. */
+#define MONITOR_BREAK 1
+
+/* Define to activate user-defined breakpoints. */
+/* #undef MONITOR_BREAKPOINTS */
+
+/* Define to activate hints in disassembler. */
+#define MONITOR_HINTS 1
+
+/* Define to activate 6502 opcode profiling. */
+/* #undef MONITOR_PROFILE */
+
+/* Define to activate readline support in monitor. */
+/* #define MONITOR_READLINE 1 */
+
+/* Define to activate TRACE command in monitor. */
+/* #undef MONITOR_TRACE */
+
+/* Target: X11 with Motif. */
+/* #undef MOTIF */
+
+/* Define to allow color changes inside a scanline. */
+#define NEW_CYCLE_EXACT 1
+
+/* Define to use nonlinear POKEY mixing. */
+/* #undef NONLINEAR_MIXING */
+
+/* Use NTSC video filter. */
+#define NTSC_FILTER 1
+
+/* Define to the address where bug reports for this package should be sent. */
+#define PACKAGE_BUGREPORT "pstehlik@sophics.cz"
+
+/* Define to the full name of this package. */
+#define PACKAGE_NAME "Atari800"
+
+/* Define to the full name and version of this package. */
+#define PACKAGE_STRING "Atari800 2.1.0"
+
+/* Define to the one symbol short name of this package. */
+#define PACKAGE_TARNAME "atari800"
+
+/* Define to the version of this package. */
+#define PACKAGE_VERSION "2.1.0"
+
+/* Define to use page-based attribute array. */
+/* #undef PAGED_ATTRIB */
+
+/* Define to emulate the Black Box. */
+#define PBI_BB 1
+
+/* Define to emulate the MIO board. */
+#define PBI_MIO 1
+
+/* A prototype 80 column card for the 1090 expansion box. */
+#define PBI_PROTO80 1
+
+/* Define to emulate the 1400XL/1450XLD. */
+#define PBI_XLD 1
+
+/* Target: Sony PlayStation 2. */
+/* #undef PS2 */
+
+/* Define as the return type of signal handlers (`int' or `void'). */
+#define RETSIGTYPE void
+
+/* Define to use R: device. */
+/* #undef R_IO_DEVICE */
+
+/* Define to use IP network connection with the R: device. */
+#define R_NETWORK 1
+
+/* Define to use the host serial port with the R: device. */
+/* #undef R_SERIAL */
+
+/* Target: SDL library. */
+#define SDL 1
+
+/* Define to the type of arg 1 for `select'. */
+#define SELECT_TYPE_ARG1 int
+
+/* Define to the type of args 2, 3 and 4 for `select'. */
+#define SELECT_TYPE_ARG234 (fd_set *)
+
+/* Define to the type of arg 5 for `select'. */
+#define SELECT_TYPE_ARG5 (struct timeval *)
+
+/* Define to allow serial in/out sound. */
+/* #undef SERIO_SOUND */
+
+/* Target: X11 with shared memory extensions. */
+/* #undef SHM */
+
+/* Define to activate sound support. */
+#define SOUND 1
+
+/* Define to 1 if you have the ANSI C header files. */
+#define STDC_HEADERS 1
+
+/* Define to allow stereo sound. */
+#define STEREO_SOUND 1
+
+/* Save additional config file options. */
+#define SUPPORTS_PLATFORM_CONFIGSAVE 1
+
+/* Additional config file options. */
+#define SUPPORTS_PLATFORM_CONFIGURE 1
+
+/* Update the Palette if it changed. */
+#define SUPPORTS_PLATFORM_PALETTEUPDATE 1
+
+/* Platform-specific sleep function. */
+/* #undef SUPPORTS_PLATFORM_SLEEP */
+
+/* Reinitialise the sound system. */
+#define SUPPORTS_SOUND_REINIT 1
+
+/* Alternate system-wide config file for non-Unix OS. */
+/* #undef SYSTEM_WIDE_CFG_FILE */
+
+/* Define to 1 if you can safely include both <sys/time.h> and <time.h>. */
+#define TIME_WITH_SYS_TIME 1
+
+/* Define to 1 if your <sys/time.h> declares `struct tm'. */
+/* #undef TM_IN_SYS_TIME */
+
+/* Target: Curses-compatible library. */
+/* #undef USE_CURSES */
+
+/* Define for using cursor/ctrl keys for keyboard joystick. */
+/* #undef USE_CURSORBLOCK */
+
+/* Target: Ncurses library. */
+/* #undef USE_NCURSES */
+
+/* Define to use very slow computer support (faster -refresh). */
+/* #undef VERY_SLOW */
+
+/* Define to allow volume only sound. */
+#define VOL_ONLY_SOUND 1
+
+/* Define to 1 if your processor stores words with the most significant byte
+   first (like Motorola and SPARC, unlike Intel and VAX). */
+/* #undef WORDS_BIGENDIAN */
+
+/* Define if unaligned word access is ok. */
+#define WORDS_UNALIGNED_OK 1
+
+/* Target: Standard X11. */
+/* #undef X11 */
+
+/* Emulate the XEP80. */
+#define XEP80_EMULATION 1
+
+/* Target: X11 with XView. */
+/* #undef XVIEW */
+
+/* Define to empty if `const' does not conform to ANSI C. */
+/* #undef const */
+
+/* Define to `__inline__' or `__inline' if that's what the C compiler
+   calls it, or to nothing if 'inline' is not supported under any name.  */
+#ifndef __cplusplus
+#define inline __inline__
+#endif
+
+/* Define to `unsigned int' if <sys/types.h> does not define. */
+/* #undef size_t */
+
+/* Define to empty if the keyword `volatile' does not work. Warning: valid
+   code using `volatile' can become incorrect without. Disable with care. */
+/* #undef volatile */
+
diff --git a/project/jni/application/atari800/src/cpu.c b/project/jni/application/atari800/src/cpu.c
new file mode 100644
index 000000000..f9ffab193
--- /dev/null
+++ b/project/jni/application/atari800/src/cpu.c
@@ -0,0 +1,2398 @@
+/*
+ * cpu.c - 6502 CPU emulation
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+/*
+	Configuration symbols
+	=====================
+
+	Define CPU65C02 if you don't want 6502 JMP() bug emulation.
+	Define CYCLES_PER_OPCODE to update ANTIC_xpos in each opcode's emulation.
+	Define MONITOR_BREAK if you want code breakpoints and execution history.
+	Define MONITOR_BREAKPOINTS if you want user-defined breakpoints.
+	Define MONITOR_PROFILE if you want 6502 opcode profiling.
+	Define MONITOR_TRACE if you want the code to be disassembled while it is executed.
+	Define NO_GOTO if you compile with GCC, but want switch() rather than goto *.
+	Define NO_V_FLAG_VARIABLE to don't use local (static) variable V for the V flag.
+	Define PC_PTR to emulate 6502 Program Counter using UBYTE *.
+	Define PREFETCH_CODE to always fetch 2 bytes after the opcode.
+	Define WRAP_64K to correctly emulate instructions that wrap at 64K.
+	Define WRAP_ZPAGE to prevent incorrect access to the address 0x0100 in zeropage
+	indirect mode.
+
+
+	Limitations & Known bugs
+	========================
+
+	There is no emulation of the bug in the BRK instruction executed simultaneously
+	with another interrupt.
+
+	The 6502 emulation ignores memory attributes for instruction fetch.
+	This is because the instruction must come from either RAM or ROM.
+	A program that executes instructions from within hardware addresses will fail
+	since there is never any usable code there.
+
+	The 6502 emulation also ignores memory attributes for accesses to page 0 and page 1.
+ */
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>	/* exit() */
+
+#include "cpu.h"
+#ifdef ASAP /* external project, see http://asap.sf.net */
+#include "asap_internal.h"
+#else
+#include "antic.h"
+#include "atari.h"
+#include "esc.h"
+#include "memory.h"
+#include "monitor.h"
+#ifndef BASIC
+#include "statesav.h"
+#ifndef __PLUS
+#include "ui.h"
+#endif
+#endif /* BASIC */
+#endif /* ASAP */
+
+#ifdef FALCON_CPUASM
+
+extern UBYTE CPU_IRQ;
+
+#ifdef PAGED_MEM
+#error cpu_m68k.asm cannot work with paged memory
+#endif
+
+void CPU_Initialise(void)
+{
+	CPU_INIT();
+}
+
+void CPU_GetStatus(void)
+{
+	CPU_GET();
+}
+
+void CPU_PutStatus(void)
+{
+	CPU_PUT();
+}
+
+#else /* FALCON_CPUASM */
+
+/* Windows headers define it */
+#undef ABSOLUTE
+
+#ifndef __GNUC__
+#define NO_GOTO
+#endif
+
+/* #define CYCLES_PER_OPCODE */
+
+/* #define MONITOR_PROFILE */
+
+/* #define NO_V_FLAG_VARIABLE */
+
+/* If PC_PTR is defined, local PC is "const UBYTE *", otherwise it's UWORD. */
+/* #define PC_PTR */
+
+/* If PREFETCH_CODE is defined, 2 bytes after the opcode are always fetched. */
+/* #define PREFETCH_CODE */
+
+
+/* 6502 stack handling */
+#define PL                  MEMORY_dGetByte(0x0100 + ++S)
+#define PH(x)               MEMORY_dPutByte(0x0100 + S--, x)
+#define PHW(x)              PH((x) >> 8); PH((x) & 0xff)
+
+/* 6502 code fetching */
+#ifdef PC_PTR
+#define GET_PC()            (PC - MEMORY_mem)
+#define SET_PC(newpc)       (PC = MEMORY_mem + (newpc))
+#define PHPC                { UWORD tmp = PC - MEMORY_mem; PHW(tmp); }
+#define GET_CODE_BYTE()     (*PC++)
+#define PEEK_CODE_BYTE()    (*PC)
+#if !defined(WORDS_BIGENDIAN) && defined(WORDS_UNALIGNED_OK)
+#define PEEK_CODE_WORD()    (*(const UWORD *) PC)
+#else
+#define PEEK_CODE_WORD()    (*PC + (PC[1] << 8))
+#endif
+#else /* PC_PTR */
+#define GET_PC()            PC
+#define SET_PC(newpc)       (PC = (newpc))
+#define PHPC                PHW(PC)
+#define GET_CODE_BYTE()     MEMORY_dGetByte(PC++)
+#define PEEK_CODE_BYTE()    MEMORY_dGetByte(PC)
+#define PEEK_CODE_WORD()    MEMORY_dGetWord(PC)
+#endif /* PC_PTR */
+
+/* Cycle-exact Read-Modify-Write instructions.
+   RMW instructions: ASL, LSR, ROL, ROR, INC, DEC
+   (+ some undocumented) write to the specified address
+   *twice*: first the unmodified value, then the modified value.
+   This can be observed only with some hardware registers. */
+/* XXX: we do this only for GTIA, because NEW_CYCLE_EXACT does not correctly
+   emulate INC $D400 (and INC $D40A wasn't tested) */
+#ifdef NEW_CYCLE_EXACT
+#ifndef PAGED_ATTRIB
+#define RMW_GetByte(x, addr) \
+	if (MEMORY_attrib[addr] == MEMORY_HARDWARE) { \
+		x = MEMORY_HwGetByte(addr); \
+		if ((addr & 0xef00) == 0xc000) { \
+			ANTIC_xpos--; \
+			MEMORY_HwPutByte(addr, x); \
+			ANTIC_xpos++; \
+		} \
+	} else \
+		x = MEMORY_dGetByte(addr);
+#else /* PAGED_ATTRIB */
+#define RMW_GetByte(x, addr) \
+	x = MEMORY_GetByte(addr); \
+	if ((addr & 0xef00) == 0xc000) { \
+		ANTIC_xpos--; \
+		MEMORY_PutByte(addr, x); \
+		ANTIC_xpos++; \
+	}
+#endif /* PAGED_ATTRIB */
+#else /* NEW_CYCLE_EXACT */
+/* Don't emulate the first write */
+#define RMW_GetByte(x, addr) x = MEMORY_GetByte(addr);
+#endif /* NEW_CYCLE_EXACT */
+
+/* 6502 registers. */
+UWORD CPU_regPC;
+UBYTE CPU_regA;
+UBYTE CPU_regX;
+UBYTE CPU_regY;
+UBYTE CPU_regP;						/* Processor Status Byte (Partial) */
+UBYTE CPU_regS;
+UBYTE CPU_IRQ;
+
+/* Transfer 6502 registers between global variables and local variables inside CPU_GO() */
+#define UPDATE_GLOBAL_REGS  CPU_regPC = GET_PC(); CPU_regS = S; CPU_regA = A; CPU_regX = X; CPU_regY = Y
+#define UPDATE_LOCAL_REGS   SET_PC(CPU_regPC); S = CPU_regS; A = CPU_regA; X = CPU_regX; Y = CPU_regY
+
+/* 6502 flags local to this module */
+static UBYTE N;					/* bit7 set => N flag set */
+#ifndef NO_V_FLAG_VARIABLE
+static UBYTE V;                 /* non-zero => V flag set */
+#endif
+static UBYTE Z;					/* zero     => Z flag set */
+static UBYTE C;					/* must be 0 or 1 */
+/* B, D, I are always in CPU_regP */
+
+void CPU_GetStatus(void)
+{
+#ifndef NO_V_FLAG_VARIABLE
+	CPU_regP = (N & 0x80) + (V ? 0x40 : 0) + (CPU_regP & 0x3c) + ((Z == 0) ? 0x02 : 0) + C;
+#else
+	CPU_regP = (N & 0x80) + (CPU_regP & 0x7c) + ((Z == 0) ? 0x02 : 0) + C;
+#endif
+}
+
+void CPU_PutStatus(void)
+{
+	N = CPU_regP;
+#ifndef NO_V_FLAG_VARIABLE
+	V = (CPU_regP & 0x40);
+#endif
+	Z = (CPU_regP & 0x02) ^ 0x02;
+	C = (CPU_regP & 0x01);
+}
+
+/* For Atari Basic loader */
+void (*CPU_rts_handler)(void) = NULL;
+
+/* 6502 instruction profiling */
+#ifdef MONITOR_PROFILE
+int CPU_instruction_count[256];
+#endif
+
+UBYTE CPU_cim_encountered = FALSE;
+
+/* Execution history */
+#ifdef MONITOR_BREAK
+UWORD CPU_remember_PC[CPU_REMEMBER_PC_STEPS];
+unsigned int CPU_remember_PC_curpos = 0;
+int CPU_remember_xpos[CPU_REMEMBER_PC_STEPS];
+UWORD CPU_remember_JMP[CPU_REMEMBER_JMP_STEPS];
+unsigned int CPU_remember_jmp_curpos = 0;
+#define INC_RET_NESTING MONITOR_ret_nesting++
+#else /* MONITOR_BREAK */
+#define INC_RET_NESTING
+#endif /* MONITOR_BREAK */
+
+/* Addressing modes */
+#ifdef WRAP_ZPAGE
+#define zGetWord(x) (MEMORY_dGetByte(x) + (MEMORY_dGetByte((UBYTE) ((x) + 1)) << 8))
+#else
+#define zGetWord(x) MEMORY_dGetWord(x)
+#endif
+#ifdef PREFETCH_CODE
+#if defined(WORDS_BIGENDIAN) || !defined(WORDS_UNALIGNED_OK)
+#warning PREFETCH_CODE is efficient only on little-endian machines with WORDS_UNALIGNED_OK
+#endif
+#define OP_BYTE     ((UBYTE) addr)
+#define OP_WORD     addr
+#define IMMEDIATE   (PC++, (UBYTE) addr)
+#define ABSOLUTE    PC += 2
+#define ZPAGE       PC++; addr &= 0xff
+#define ABSOLUTE_X  addr += X; PC += 2
+#define ABSOLUTE_Y  addr += Y; PC += 2
+#define INDIRECT_X  PC++; addr = (UBYTE) (addr + X); addr = zGetWord(addr)
+#define INDIRECT_Y  PC++; addr &= 0xff; addr = zGetWord(addr) + Y
+#define ZPAGE_X     PC++; addr = (UBYTE) (addr + X)
+#define ZPAGE_Y     PC++; addr = (UBYTE) (addr + Y)
+#else /* PREFETCH_CODE */
+#define OP_BYTE     PEEK_CODE_BYTE()
+#define OP_WORD     PEEK_CODE_WORD()
+#define IMMEDIATE   GET_CODE_BYTE()
+#define ABSOLUTE    addr = PEEK_CODE_WORD(); PC += 2
+#define ZPAGE       addr = GET_CODE_BYTE()
+#define ABSOLUTE_X  addr = PEEK_CODE_WORD() + X; PC += 2
+#define ABSOLUTE_Y  addr = PEEK_CODE_WORD() + Y; PC += 2
+#define INDIRECT_X  addr = (UBYTE) (GET_CODE_BYTE() + X); addr = zGetWord(addr)
+#define INDIRECT_Y  addr = GET_CODE_BYTE(); addr = zGetWord(addr) + Y
+#define ZPAGE_X     addr = (UBYTE) (GET_CODE_BYTE() + X)
+#define ZPAGE_Y     addr = (UBYTE) (GET_CODE_BYTE() + Y)
+#endif /* PREFETCH_CODE */
+
+/* Instructions */
+#define AND(t_data) Z = N = A &= t_data
+#define CMP(t_data) data = t_data; Z = N = A - data; C = (A >= data)
+#define CPX(t_data) data = t_data; Z = N = X - data; C = (X >= data)
+#define CPY(t_data) data = t_data; Z = N = Y - data; C = (Y >= data)
+#define EOR(t_data) Z = N = A ^= t_data
+#define LDA(t_data) Z = N = A = t_data
+#define LDX(t_data) Z = N = X = t_data
+#define LDY(t_data) Z = N = Y = t_data
+#define ORA(t_data) Z = N = A |= t_data
+#ifndef NO_V_FLAG_VARIABLE
+#define PHP(x)      data = (N & 0x80) + (V ? 0x40 : 0) + (CPU_regP & (x)) + ((Z == 0) ? 0x02 : 0) + C; PH(data)
+#define PHPB0       PHP(0x2c)  /* push flags with B flag clear (NMI, IRQ) */
+#define PHPB1       PHP(0x3c)  /* push flags with B flag set (PHP, BRK) */
+#define PLP         data = PL; N = data; V = (data & 0x40); Z = (data & 0x02) ^ 0x02; C = (data & 0x01); CPU_regP = (data & 0x0c) + 0x30
+#else /* NO_V_FLAG_VARIABLE */
+#define PHP(x)      data = (N & 0x80) + (CPU_regP & (x)) + ((Z == 0) ? 0x02 : 0) + C; PH(data)
+#define PHPB0       PHP(0x6c)  /* push flags with B flag clear (NMI, IRQ) */
+#define PHPB1       PHP(0x7c)  /* push flags with B flag set (PHP, BRK) */
+#define PLP         data = PL; N = data; Z = (data & 0x02) ^ 0x02; C = (data & 0x01); CPU_regP = (data & 0x4c) + 0x30
+#endif /* NO_V_FLAG_VARIABLE */
+/* 1 or 2 extra cycles for conditional jumps */
+#if 0
+/* old, less efficient version */
+#define BRANCH(cond) \
+	if (cond) { \
+		SWORD sdata = (SBYTE) GET_CODE_BYTE(); \
+		if ((sdata + (UBYTE) GET_PC()) & 0xff00) \
+			ANTIC_xpos++; \
+		ANTIC_xpos++; \
+		PC += sdata; \
+		DONE \
+	} \
+	PC++; \
+	DONE
+#else
+#define BRANCH(cond) \
+	if (cond) { \
+		addr = (UWORD) (SBYTE) IMMEDIATE; \
+		addr += GET_PC(); \
+		if ((addr ^ GET_PC()) & 0xff00) \
+			ANTIC_xpos++; \
+		ANTIC_xpos++; \
+		SET_PC(addr); \
+		DONE \
+	} \
+	PC++; \
+	DONE
+#endif
+
+/* 1 extra cycle for X (or Y) index overflow */
+#define NCYCLES_X   if ((UBYTE) addr < X) ANTIC_xpos++
+#define NCYCLES_Y   if ((UBYTE) addr < Y) ANTIC_xpos++
+
+/* Triggers a Non-Maskable Interrupt */
+void CPU_NMI(void)
+{
+	UBYTE S = CPU_regS;
+	UBYTE data;
+
+	PHW(CPU_regPC);
+	PHPB0;
+	CPU_SetI;
+	CPU_regPC = MEMORY_dGetWordAligned(0xfffa);
+	CPU_regS = S;
+	ANTIC_xpos += 7; /* handling an interrupt by 6502 takes 7 cycles */
+	INC_RET_NESTING;
+}
+
+/* Check pending IRQ, helps in (not only) Lucasfilm games */
+#define CPUCHECKIRQ \
+	if (CPU_IRQ && !(CPU_regP & CPU_I_FLAG) && ANTIC_xpos < ANTIC_xpos_limit) { \
+		PHPC; \
+		PHPB0; \
+		CPU_SetI; \
+		SET_PC(MEMORY_dGetWordAligned(0xfffe)); \
+		ANTIC_xpos += 7; \
+		INC_RET_NESTING; \
+	}
+
+/* Enter monitor */
+#ifdef __PLUS
+#define ENTER_MONITOR  Atari800_Exit(TRUE)
+#else
+#define ENTER_MONITOR  if (!Atari800_Exit(TRUE)) exit(0)
+#endif
+#define DO_BREAK \
+	UPDATE_GLOBAL_REGS; \
+	CPU_GetStatus(); \
+	ENTER_MONITOR; \
+	CPU_PutStatus(); \
+	UPDATE_LOCAL_REGS;
+
+
+/*	0  1  2  3  4  5  6  7  8  9  A  B  C  D  E  F */
+static const int cycles[256] =
+{
+	7, 6, 2, 8, 3, 3, 5, 5, 3, 2, 2, 2, 4, 4, 6, 6,		/* 0x */
+	2, 5, 2, 8, 4, 4, 6, 6, 2, 4, 2, 7, 4, 4, 7, 7,		/* 1x */
+	6, 6, 2, 8, 3, 3, 5, 5, 4, 2, 2, 2, 4, 4, 6, 6,		/* 2x */
+	2, 5, 2, 8, 4, 4, 6, 6, 2, 4, 2, 7, 4, 4, 7, 7,		/* 3x */
+
+	6, 6, 2, 8, 3, 3, 5, 5, 3, 2, 2, 2, 3, 4, 6, 6,		/* 4x */
+	2, 5, 2, 8, 4, 4, 6, 6, 2, 4, 2, 7, 4, 4, 7, 7,		/* 5x */
+	6, 6, 2, 8, 3, 3, 5, 5, 4, 2, 2, 2, 5, 4, 6, 6,		/* 6x */
+	2, 5, 2, 8, 4, 4, 6, 6, 2, 4, 2, 7, 4, 4, 7, 7,		/* 7x */
+
+	2, 6, 2, 6, 3, 3, 3, 3, 2, 2, 2, 2, 4, 4, 4, 4,		/* 8x */
+	2, 6, 2, 6, 4, 4, 4, 4, 2, 5, 2, 5, 5, 5, 5, 5,		/* 9x */
+	2, 6, 2, 6, 3, 3, 3, 3, 2, 2, 2, 2, 4, 4, 4, 4,		/* Ax */
+	2, 5, 2, 5, 4, 4, 4, 4, 2, 4, 2, 4, 4, 4, 4, 4,		/* Bx */
+
+	2, 6, 2, 8, 3, 3, 5, 5, 2, 2, 2, 2, 4, 4, 6, 6,		/* Cx */
+	2, 5, 2, 8, 4, 4, 6, 6, 2, 4, 2, 7, 4, 4, 7, 7,		/* Dx */
+	2, 6, 2, 8, 3, 3, 5, 5, 2, 2, 2, 2, 4, 4, 6, 6,		/* Ex */
+	2, 5, 2, 8, 4, 4, 6, 6, 2, 4, 2, 7, 4, 4, 7, 7		/* Fx */
+};
+
+/* 6502 emulation routine */
+#ifndef NO_GOTO
+__extension__ /* suppress -ansi -pedantic warnings */
+#endif
+void CPU_GO(int limit)
+{
+#ifdef NO_GOTO
+#define OPCODE_ALIAS(code)	case 0x##code:
+#define DONE				break;
+#else
+#define OPCODE_ALIAS(code)	opcode_##code:
+#define DONE				goto next;
+	static const void *opcode[256] =
+	{
+		&&opcode_00, &&opcode_01, &&opcode_02, &&opcode_03,
+		&&opcode_04, &&opcode_05, &&opcode_06, &&opcode_07,
+		&&opcode_08, &&opcode_09, &&opcode_0a, &&opcode_0b,
+		&&opcode_0c, &&opcode_0d, &&opcode_0e, &&opcode_0f,
+
+		&&opcode_10, &&opcode_11, &&opcode_12, &&opcode_13,
+		&&opcode_14, &&opcode_15, &&opcode_16, &&opcode_17,
+		&&opcode_18, &&opcode_19, &&opcode_1a, &&opcode_1b,
+		&&opcode_1c, &&opcode_1d, &&opcode_1e, &&opcode_1f,
+
+		&&opcode_20, &&opcode_21, &&opcode_22, &&opcode_23,
+		&&opcode_24, &&opcode_25, &&opcode_26, &&opcode_27,
+		&&opcode_28, &&opcode_29, &&opcode_2a, &&opcode_2b,
+		&&opcode_2c, &&opcode_2d, &&opcode_2e, &&opcode_2f,
+
+		&&opcode_30, &&opcode_31, &&opcode_32, &&opcode_33,
+		&&opcode_34, &&opcode_35, &&opcode_36, &&opcode_37,
+		&&opcode_38, &&opcode_39, &&opcode_3a, &&opcode_3b,
+		&&opcode_3c, &&opcode_3d, &&opcode_3e, &&opcode_3f,
+
+		&&opcode_40, &&opcode_41, &&opcode_42, &&opcode_43,
+		&&opcode_44, &&opcode_45, &&opcode_46, &&opcode_47,
+		&&opcode_48, &&opcode_49, &&opcode_4a, &&opcode_4b,
+		&&opcode_4c, &&opcode_4d, &&opcode_4e, &&opcode_4f,
+
+		&&opcode_50, &&opcode_51, &&opcode_52, &&opcode_53,
+		&&opcode_54, &&opcode_55, &&opcode_56, &&opcode_57,
+		&&opcode_58, &&opcode_59, &&opcode_5a, &&opcode_5b,
+		&&opcode_5c, &&opcode_5d, &&opcode_5e, &&opcode_5f,
+
+		&&opcode_60, &&opcode_61, &&opcode_62, &&opcode_63,
+		&&opcode_64, &&opcode_65, &&opcode_66, &&opcode_67,
+		&&opcode_68, &&opcode_69, &&opcode_6a, &&opcode_6b,
+		&&opcode_6c, &&opcode_6d, &&opcode_6e, &&opcode_6f,
+
+		&&opcode_70, &&opcode_71, &&opcode_72, &&opcode_73,
+		&&opcode_74, &&opcode_75, &&opcode_76, &&opcode_77,
+		&&opcode_78, &&opcode_79, &&opcode_7a, &&opcode_7b,
+		&&opcode_7c, &&opcode_7d, &&opcode_7e, &&opcode_7f,
+
+		&&opcode_80, &&opcode_81, &&opcode_82, &&opcode_83,
+		&&opcode_84, &&opcode_85, &&opcode_86, &&opcode_87,
+		&&opcode_88, &&opcode_89, &&opcode_8a, &&opcode_8b,
+		&&opcode_8c, &&opcode_8d, &&opcode_8e, &&opcode_8f,
+
+		&&opcode_90, &&opcode_91, &&opcode_92, &&opcode_93,
+		&&opcode_94, &&opcode_95, &&opcode_96, &&opcode_97,
+		&&opcode_98, &&opcode_99, &&opcode_9a, &&opcode_9b,
+		&&opcode_9c, &&opcode_9d, &&opcode_9e, &&opcode_9f,
+
+		&&opcode_a0, &&opcode_a1, &&opcode_a2, &&opcode_a3,
+		&&opcode_a4, &&opcode_a5, &&opcode_a6, &&opcode_a7,
+		&&opcode_a8, &&opcode_a9, &&opcode_aa, &&opcode_ab,
+		&&opcode_ac, &&opcode_ad, &&opcode_ae, &&opcode_af,
+
+		&&opcode_b0, &&opcode_b1, &&opcode_b2, &&opcode_b3,
+		&&opcode_b4, &&opcode_b5, &&opcode_b6, &&opcode_b7,
+		&&opcode_b8, &&opcode_b9, &&opcode_ba, &&opcode_bb,
+		&&opcode_bc, &&opcode_bd, &&opcode_be, &&opcode_bf,
+
+		&&opcode_c0, &&opcode_c1, &&opcode_c2, &&opcode_c3,
+		&&opcode_c4, &&opcode_c5, &&opcode_c6, &&opcode_c7,
+		&&opcode_c8, &&opcode_c9, &&opcode_ca, &&opcode_cb,
+		&&opcode_cc, &&opcode_cd, &&opcode_ce, &&opcode_cf,
+
+		&&opcode_d0, &&opcode_d1, &&opcode_d2, &&opcode_d3,
+		&&opcode_d4, &&opcode_d5, &&opcode_d6, &&opcode_d7,
+		&&opcode_d8, &&opcode_d9, &&opcode_da, &&opcode_db,
+		&&opcode_dc, &&opcode_dd, &&opcode_de, &&opcode_df,
+
+		&&opcode_e0, &&opcode_e1, &&opcode_e2, &&opcode_e3,
+		&&opcode_e4, &&opcode_e5, &&opcode_e6, &&opcode_e7,
+		&&opcode_e8, &&opcode_e9, &&opcode_ea, &&opcode_eb,
+		&&opcode_ec, &&opcode_ed, &&opcode_ee, &&opcode_ef,
+
+		&&opcode_f0, &&opcode_f1, &&opcode_f2, &&opcode_f3,
+		&&opcode_f4, &&opcode_f5, &&opcode_f6, &&opcode_f7,
+		&&opcode_f8, &&opcode_f9, &&opcode_fa, &&opcode_fb,
+		&&opcode_fc, &&opcode_fd, &&opcode_fe, &&opcode_ff,
+	};
+#endif	/* NO_GOTO */
+
+#ifdef CYCLES_PER_OPCODE
+#define OPCODE(code) OPCODE_ALIAS(code) ANTIC_xpos += cycles[0x##code];
+#else
+#define OPCODE(code) OPCODE_ALIAS(code)
+#endif
+
+#ifdef PC_PTR
+	const UBYTE *PC;
+#else
+	UWORD PC;
+#endif
+	UBYTE A;
+	UBYTE X;
+	UBYTE Y;
+	UBYTE S;
+
+	UWORD addr;
+	UBYTE data;
+#define insn data
+
+/*
+   This used to be in the main loop but has been removed to improve
+   execution speed. It does not seem to have any adverse effect on
+   the emulation for two reasons:
+
+   1. NMI's will can only be raised in antic.c - there is
+      no way an NMI can be generated whilst in this routine.
+
+   2. The timing of the IRQs are not that critical. */
+
+	if (ANTIC_wsync_halt) {
+
+#ifdef NEW_CYCLE_EXACT
+		if (ANTIC_DRAWING_SCREEN) {
+/* if ANTIC_WSYNC_C is a stolen cycle, ANTIC_antic2cpu_ptr will convert that to the nearest
+   cpu cycle before that cycle.  The CPU will see this cycle, if WSYNC is not
+   delayed. (Actually this cycle is the first cycle of the instruction after
+   STA WSYNC, which was really executed one cycle after STA WSYNC because
+   of an internal antic delay ).   ANTIC_delayed_wsync is added to this cycle to form
+   the limit in the case that WSYNC is not early (does not allow this extra cycle) */
+
+			if (limit < ANTIC_antic2cpu_ptr[ANTIC_WSYNC_C] + ANTIC_delayed_wsync)
+				return;
+			ANTIC_xpos = ANTIC_antic2cpu_ptr[ANTIC_WSYNC_C] + ANTIC_delayed_wsync;
+		}
+		else {
+			if (limit < (ANTIC_WSYNC_C + ANTIC_delayed_wsync))
+				return;
+			ANTIC_xpos = ANTIC_WSYNC_C;
+		}
+		ANTIC_delayed_wsync = 0;
+
+#else /* NEW_CYCLE_EXACT */
+
+		if (limit < ANTIC_WSYNC_C)
+			return;
+		ANTIC_xpos = ANTIC_WSYNC_C;
+
+#endif /* NEW_CYCLE_EXACT */
+
+		ANTIC_wsync_halt = 0;
+	}
+	ANTIC_xpos_limit = limit;			/* needed for WSYNC store inside ANTIC */
+
+	UPDATE_LOCAL_REGS;
+
+	CPUCHECKIRQ;
+
+	while (ANTIC_xpos < ANTIC_xpos_limit) {
+
+#ifdef MONITOR_BREAKPOINTS
+	breakpoint_return:
+#endif
+
+#ifdef PC_PTR
+		/* must handle 64k wrapping */
+		if (PC >= MEMORY_mem + 0xfffe) {
+			if (PC >= MEMORY_mem + 0x10000)
+				PC -= 0x10000;
+			else {
+				/* the opcode is before 0x10000, but the operand is past */
+#ifdef WORDS_UNALIGNED_OK
+				*(UWORD *) (MEMORY_mem + 0x10000) = *(UWORD *) MEMORY_mem;
+#else
+				MEMORY_mem[0x10000] = MEMORY_mem[0];
+				MEMORY_mem[0x10001] = MEMORY_mem[1];
+#endif /* WORDS_UNALIGNED_OK */
+			}
+		}
+#endif /* PC_PTR */
+
+#ifdef MONITOR_TRACE
+		if (MONITOR_trace_file != NULL) {
+			MONITOR_ShowState(MONITOR_trace_file, GET_PC(), A, X, Y, S,
+				(N & 0x80) ? 'N' : '-',
+#ifndef NO_V_FLAG_VARIABLE
+				V ? 'V' : '-',
+#else
+				(CPU_regP & CPU_V_FLAG) ? 'V' : '-',
+#endif
+				(Z == 0) ? 'Z' : '-',
+				(C != 0) ? 'C' : '-');
+		}
+#endif
+
+#ifdef MONITOR_BREAK
+		CPU_remember_PC[CPU_remember_PC_curpos] = GET_PC();
+#ifdef NEW_CYCLE_EXACT
+		if (ANTIC_DRAWING_SCREEN)
+			CPU_remember_xpos[CPU_remember_PC_curpos] = ANTIC_cpu2antic_ptr[ANTIC_xpos] + (ANTIC_ypos << 8);
+		else
+#endif
+			CPU_remember_xpos[CPU_remember_PC_curpos] = ANTIC_xpos + (ANTIC_ypos << 8);
+		CPU_remember_PC_curpos = (CPU_remember_PC_curpos + 1) % CPU_REMEMBER_PC_STEPS;
+
+		if (MONITOR_break_addr == GET_PC() || ANTIC_break_ypos == ANTIC_ypos) {
+			DO_BREAK;
+		}
+#endif /* MONITOR_BREAK */
+
+#if defined(WRAP_64K) && !defined(PC_PTR)
+		MEMORY_mem[0x10000] = MEMORY_mem[0];
+#endif
+
+		insn = GET_CODE_BYTE();
+
+#ifdef MONITOR_BREAKPOINTS
+		if (MONITOR_breakpoint_table_size > 0 && MONITOR_breakpoints_enabled) {
+			UBYTE optype = MONITOR_optype6502[insn];
+			int i;
+			switch (optype >> 4) {
+			case 1:
+				addr = PEEK_CODE_WORD();
+				break;
+			case 2:
+				addr = PEEK_CODE_BYTE();
+				break;
+			case 3:
+				addr = PEEK_CODE_WORD() + X;
+				break;
+			case 4:
+				addr = PEEK_CODE_WORD() + Y;
+				break;
+			case 5:
+				addr = (UBYTE) (PEEK_CODE_BYTE() + X);
+				addr = zGetWord(addr);
+				break;
+			case 6:
+				addr = PEEK_CODE_BYTE();
+				addr = zGetWord(addr) + Y;
+				break;
+			case 7:
+				addr = (UBYTE) (PEEK_CODE_BYTE() + X);
+				break;
+			case 8:
+				addr = (UBYTE) (PEEK_CODE_BYTE() + Y);
+				break;
+			/* XXX: case 13 */
+			default:
+				addr = 0;
+				break;
+			}
+			for (i = 0; i < MONITOR_breakpoint_table_size; i++) {
+				int cond;
+				int value;
+				if (!MONITOR_breakpoint_table[i].enabled)
+					continue; /* skip */
+				cond = MONITOR_breakpoint_table[i].condition;
+				if (cond == MONITOR_BREAKPOINT_OR)
+					break; /* fire */
+				value = MONITOR_breakpoint_table[i].value;
+				if (cond == MONITOR_BREAKPOINT_FLAG_CLEAR) {
+					switch (value) {
+					case CPU_N_FLAG:
+						if ((N & 0x80) == 0)
+							continue;
+						break;
+#ifndef NO_V_FLAG_VARIABLE
+					case CPU_V_FLAG:
+						if (V == 0)
+							continue;
+						break;
+#endif
+					case CPU_Z_FLAG:
+						if (Z != 0)
+							continue;
+						break;
+					case CPU_C_FLAG:
+						if (C == 0)
+							continue;
+						break;
+					default:
+						if ((CPU_regP & value) == 0)
+							continue;
+						break;
+					}
+				}
+				else if (cond == MONITOR_BREAKPOINT_FLAG_SET) {
+					switch (value) {
+					case CPU_N_FLAG:
+						if ((N & 0x80) != 0)
+							continue;
+						break;
+#ifndef NO_V_FLAG_VARIABLE
+					case CPU_V_FLAG:
+						if (V != 0)
+							continue;
+						break;
+#endif
+					case CPU_Z_FLAG:
+						if (Z == 0)
+							continue;
+						break;
+					case CPU_C_FLAG:
+						if (C != 0)
+							continue;
+						break;
+					default:
+						if ((CPU_regP & value) != 0)
+							continue;
+						break;
+					}
+				}
+				else {
+					int val;
+					switch (cond >> 3) {
+					case MONITOR_BREAKPOINT_PC >> 3:
+						val = GET_PC() - 1;
+						break;
+					case MONITOR_BREAKPOINT_A >> 3:
+						val = A;
+						break;
+					case MONITOR_BREAKPOINT_X >> 3:
+						val = X;
+						break;
+					case MONITOR_BREAKPOINT_Y >> 3:
+						val = Y;
+						break;
+					case MONITOR_BREAKPOINT_S >> 3:
+						val = S;
+						break;
+					case MONITOR_BREAKPOINT_READ >> 3:
+						if ((optype & 4) == 0)
+							goto cond_failed;
+						val = addr;
+						break;
+					case MONITOR_BREAKPOINT_WRITE >> 3:
+						if ((optype & 8) == 0)
+							goto cond_failed;
+						val = addr;
+						break;
+					case MONITOR_BREAKPOINT_ACCESS >> 3:
+						if ((optype & 12) == 0)
+							goto cond_failed;
+						val = addr;
+						break;
+					default:
+						/* shouldn't happen */
+						continue;
+					}
+					if ((cond & MONITOR_BREAKPOINT_LESS) != 0 && val < value)
+						continue;
+					if ((cond & MONITOR_BREAKPOINT_EQUAL) != 0 && val == value)
+						continue;
+					if ((cond & MONITOR_BREAKPOINT_GREATER) != 0 && val > value)
+						continue;
+				cond_failed:
+					;
+				}
+				/* a condition failed */
+				/* quickly skip AND-connected conditions */
+				do {
+					if (++i >= MONITOR_breakpoint_table_size)
+						goto no_breakpoint;
+				} while (MONITOR_breakpoint_table[i].condition != MONITOR_BREAKPOINT_OR || !MONITOR_breakpoint_table[i].enabled);
+			}
+			/* fire breakpoint */
+			PC--;
+			DO_BREAK;
+			goto breakpoint_return;
+		no_breakpoint:
+			;
+		}
+#endif /* MONITOR_BREAKPOINTS */
+
+#ifndef CYCLES_PER_OPCODE
+		ANTIC_xpos += cycles[insn];
+#endif
+
+#ifdef MONITOR_PROFILE
+		CPU_instruction_count[insn]++;
+#endif
+
+#ifdef PREFETCH_CODE
+		addr = PEEK_CODE_WORD();
+#endif
+
+#ifdef NO_GOTO
+		switch (insn) {
+#else
+		goto *opcode[insn];
+#endif
+
+	OPCODE(00)				/* BRK */
+#ifdef MONITOR_BREAK
+		if (MONITOR_break_brk) {
+			DO_BREAK;
+		}
+		else
+#endif
+		{
+			PC++;
+			PHPC;
+			PHPB1;
+			CPU_SetI;
+			SET_PC(MEMORY_dGetWordAligned(0xfffe));
+			INC_RET_NESTING;
+		}
+		DONE
+
+	OPCODE(01)				/* ORA (ab,x) */
+		INDIRECT_X;
+		ORA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(03)				/* ASO (ab,x) [unofficial - ASL then ORA with Acc] */
+		INDIRECT_X;
+
+	aso:
+		RMW_GetByte(data, addr);
+		C = (data & 0x80) ? 1 : 0;
+		data <<= 1;
+		MEMORY_PutByte(addr, data);
+		Z = N = A |= data;
+		DONE
+
+	OPCODE_ALIAS(04)		/* NOP ab [unofficial - skip byte] */
+	OPCODE_ALIAS(44)
+	OPCODE(64)
+		PC++;
+		DONE
+
+	OPCODE_ALIAS(14)		/* NOP ab,x [unofficial - skip byte] */
+	OPCODE_ALIAS(34)
+	OPCODE_ALIAS(54)
+	OPCODE_ALIAS(74)
+	OPCODE_ALIAS(d4)
+	OPCODE(f4)
+		PC++;
+		DONE
+
+	OPCODE_ALIAS(80)		/* NOP #ab [unofficial - skip byte] */
+	OPCODE_ALIAS(82)
+	OPCODE_ALIAS(89)
+	OPCODE_ALIAS(c2)
+	OPCODE(e2)
+		PC++;
+		DONE
+
+	OPCODE(05)				/* ORA ab */
+		ZPAGE;
+		ORA(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(06)				/* ASL ab */
+		ZPAGE;
+		data = MEMORY_dGetByte(addr);
+		C = (data & 0x80) ? 1 : 0;
+		Z = N = data << 1;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(07)				/* ASO ab [unofficial - ASL then ORA with Acc] */
+		ZPAGE;
+
+	aso_zpage:
+		data = MEMORY_dGetByte(addr);
+		C = (data & 0x80) ? 1 : 0;
+		data <<= 1;
+		MEMORY_dPutByte(addr, data);
+		Z = N = A |= data;
+		DONE
+
+	OPCODE(08)				/* PHP */
+		PHPB1;
+		DONE
+
+	OPCODE(09)				/* ORA #ab */
+		ORA(IMMEDIATE);
+		DONE
+
+	OPCODE(0a)				/* ASL */
+		C = (A & 0x80) ? 1 : 0;
+		Z = N = A <<= 1;
+		DONE
+
+	OPCODE_ALIAS(0b)		/* ANC #ab [unofficial - AND then copy N to C (Fox) */
+	OPCODE(2b)
+		AND(IMMEDIATE);
+		C = N >= 0x80;
+		DONE
+
+	OPCODE(0c)				/* NOP abcd [unofficial - skip word] */
+		PC += 2;
+		DONE
+
+	OPCODE(0d)				/* ORA abcd */
+		ABSOLUTE;
+		ORA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(0e)				/* ASL abcd */
+		ABSOLUTE;
+		RMW_GetByte(data, addr);
+		C = (data & 0x80) ? 1 : 0;
+		Z = N = data << 1;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(0f)				/* ASO abcd [unofficial - ASL then ORA with Acc] */
+		ABSOLUTE;
+		goto aso;
+
+	OPCODE(10)				/* BPL */
+		BRANCH(!(N & 0x80))
+
+	OPCODE(11)				/* ORA (ab),y */
+		INDIRECT_Y;
+		NCYCLES_Y;
+		ORA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(13)				/* ASO (ab),y [unofficial - ASL then ORA with Acc] */
+		INDIRECT_Y;
+		goto aso;
+
+	OPCODE(15)				/* ORA ab,x */
+		ZPAGE_X;
+		ORA(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(16)				/* ASL ab,x */
+		ZPAGE_X;
+		data = MEMORY_dGetByte(addr);
+		C = (data & 0x80) ? 1 : 0;
+		Z = N = data << 1;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(17)				/* ASO ab,x [unofficial - ASL then ORA with Acc] */
+		ZPAGE_X;
+		goto aso_zpage;
+
+	OPCODE(18)				/* CLC */
+		C = 0;
+		DONE
+
+	OPCODE(19)				/* ORA abcd,y */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		ORA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(1b)				/* ASO abcd,y [unofficial - ASL then ORA with Acc] */
+		ABSOLUTE_Y;
+		goto aso;
+
+	OPCODE_ALIAS(1c)		/* NOP abcd,x [unofficial - skip word] */
+	OPCODE_ALIAS(3c)
+	OPCODE_ALIAS(5c)
+	OPCODE_ALIAS(7c)
+	OPCODE_ALIAS(dc)
+	OPCODE(fc)
+		if (OP_BYTE + X >= 0x100)
+			ANTIC_xpos++;
+		PC += 2;
+		DONE
+
+	OPCODE(1d)				/* ORA abcd,x */
+		ABSOLUTE_X;
+		NCYCLES_X;
+		ORA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(1e)				/* ASL abcd,x */
+		ABSOLUTE_X;
+		RMW_GetByte(data, addr);
+		C = (data & 0x80) ? 1 : 0;
+		Z = N = data << 1;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(1f)				/* ASO abcd,x [unofficial - ASL then ORA with Acc] */
+		ABSOLUTE_X;
+		goto aso;
+
+	OPCODE(20)				/* JSR abcd */
+		{
+			UWORD retaddr = GET_PC() + 1;
+#ifdef MONITOR_BREAK
+			CPU_remember_JMP[CPU_remember_jmp_curpos] = GET_PC() - 1;
+			CPU_remember_jmp_curpos = (CPU_remember_jmp_curpos + 1) % CPU_REMEMBER_JMP_STEPS;
+			MONITOR_ret_nesting++;
+#endif
+			PHW(retaddr);
+		}
+		SET_PC(OP_WORD);
+		DONE
+
+	OPCODE(21)				/* AND (ab,x) */
+		INDIRECT_X;
+		AND(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(23)				/* RLA (ab,x) [unofficial - ROL Mem, then AND with A] */
+		INDIRECT_X;
+
+	rla:
+		RMW_GetByte(data, addr);
+		if (C) {
+			C = (data & 0x80) ? 1 : 0;
+			data = (data << 1) + 1;
+		}
+		else {
+			C = (data & 0x80) ? 1 : 0;
+			data = (data << 1);
+		}
+		MEMORY_PutByte(addr, data);
+		Z = N = A &= data;
+		DONE
+
+	OPCODE(24)				/* BIT ab */
+		ZPAGE;
+		N = MEMORY_dGetByte(addr);
+#ifndef NO_V_FLAG_VARIABLE
+		V = N & 0x40;
+#else
+		CPU_regP = (CPU_regP & 0xbf) + (N & 0x40);
+#endif
+		Z = (A & N);
+		DONE
+
+	OPCODE(25)				/* AND ab */
+		ZPAGE;
+		AND(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(26)				/* ROL ab */
+		ZPAGE;
+		data = MEMORY_dGetByte(addr);
+		Z = N = (data << 1) + C;
+		C = (data & 0x80) ? 1 : 0;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(27)				/* RLA ab [unofficial - ROL Mem, then AND with A] */
+		ZPAGE;
+
+	rla_zpage:
+		data = MEMORY_dGetByte(addr);
+		if (C) {
+			C = (data & 0x80) ? 1 : 0;
+			data = (data << 1) + 1;
+		}
+		else {
+			C = (data & 0x80) ? 1 : 0;
+			data = (data << 1);
+		}
+		MEMORY_dPutByte(addr, data);
+		Z = N = A &= data;
+		DONE
+
+	OPCODE(28)				/* PLP */
+		PLP;
+		CPUCHECKIRQ;
+		DONE
+
+	OPCODE(29)				/* AND #ab */
+		AND(IMMEDIATE);
+		DONE
+
+	OPCODE(2a)				/* ROL */
+		Z = N = (A << 1) + C;
+		C = (A & 0x80) ? 1 : 0;
+		A = Z;
+		DONE
+
+	OPCODE(2c)				/* BIT abcd */
+		ABSOLUTE;
+		N = MEMORY_GetByte(addr);
+#ifndef NO_V_FLAG_VARIABLE
+		V = N & 0x40;
+#else
+		CPU_regP = (CPU_regP & 0xbf) + (N & 0x40);
+#endif
+		Z = (A & N);
+		DONE
+
+	OPCODE(2d)				/* AND abcd */
+		ABSOLUTE;
+		AND(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(2e)				/* ROL abcd */
+		ABSOLUTE;
+		RMW_GetByte(data, addr);
+		Z = N = (data << 1) + C;
+		C = (data & 0x80) ? 1 : 0;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(2f)				/* RLA abcd [unofficial - ROL Mem, then AND with A] */
+		ABSOLUTE;
+		goto rla;
+
+	OPCODE(30)				/* BMI */
+		BRANCH(N & 0x80)
+
+	OPCODE(31)				/* AND (ab),y */
+		INDIRECT_Y;
+		NCYCLES_Y;
+		AND(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(33)				/* RLA (ab),y [unofficial - ROL Mem, then AND with A] */
+		INDIRECT_Y;
+		goto rla;
+
+	OPCODE(35)				/* AND ab,x */
+		ZPAGE_X;
+		AND(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(36)				/* ROL ab,x */
+		ZPAGE_X;
+		data = MEMORY_dGetByte(addr);
+		Z = N = (data << 1) + C;
+		C = (data & 0x80) ? 1 : 0;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(37)				/* RLA ab,x [unofficial - ROL Mem, then AND with A] */
+		ZPAGE_X;
+		goto rla_zpage;
+
+	OPCODE(38)				/* SEC */
+		C = 1;
+		DONE
+
+	OPCODE(39)				/* AND abcd,y */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		AND(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(3b)				/* RLA abcd,y [unofficial - ROL Mem, then AND with A] */
+		ABSOLUTE_Y;
+		goto rla;
+
+	OPCODE(3d)				/* AND abcd,x */
+		ABSOLUTE_X;
+		NCYCLES_X;
+		AND(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(3e)				/* ROL abcd,x */
+		ABSOLUTE_X;
+		RMW_GetByte(data, addr);
+		Z = N = (data << 1) + C;
+		C = (data & 0x80) ? 1 : 0;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(3f)				/* RLA abcd,x [unofficial - ROL Mem, then AND with A] */
+		ABSOLUTE_X;
+		goto rla;
+
+	OPCODE(40)				/* RTI */
+		PLP;
+		data = PL;
+		SET_PC((PL << 8) + data);
+		CPUCHECKIRQ;
+#ifdef MONITOR_BREAK
+		if (MONITOR_break_ret && --MONITOR_ret_nesting <= 0)
+			MONITOR_break_step = TRUE;
+#endif
+		DONE
+
+	OPCODE(41)				/* EOR (ab,x) */
+		INDIRECT_X;
+		EOR(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(43)				/* LSE (ab,x) [unofficial - LSR then EOR result with A] */
+		INDIRECT_X;
+
+	lse:
+		RMW_GetByte(data, addr);
+		C = data & 1;
+		data >>= 1;
+		MEMORY_PutByte(addr, data);
+		Z = N = A ^= data;
+		DONE
+
+	OPCODE(45)				/* EOR ab */
+		ZPAGE;
+		EOR(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(46)				/* LSR ab */
+		ZPAGE;
+		data = MEMORY_dGetByte(addr);
+		C = data & 1;
+		Z = data >> 1;
+		N = 0;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(47)				/* LSE ab [unofficial - LSR then EOR result with A] */
+		ZPAGE;
+
+	lse_zpage:
+		data = MEMORY_dGetByte(addr);
+		C = data & 1;
+		data >>= 1;
+		MEMORY_dPutByte(addr, data);
+		Z = N = A ^= data;
+		DONE
+
+	OPCODE(48)				/* PHA */
+		PH(A);
+		DONE
+
+	OPCODE(49)				/* EOR #ab */
+		EOR(IMMEDIATE);
+		DONE
+
+	OPCODE(4a)				/* LSR */
+		C = A & 1;
+		Z = N = A >>= 1;
+		DONE
+
+	OPCODE(4b)				/* ALR #ab [unofficial - Acc AND Data, LSR result] */
+		data = A & IMMEDIATE;
+		C = data & 1;
+		Z = N = A = (data >> 1);
+		DONE
+
+	OPCODE(4c)				/* JMP abcd */
+#ifdef MONITOR_BREAK
+		CPU_remember_JMP[CPU_remember_jmp_curpos] = GET_PC() - 1;
+		CPU_remember_jmp_curpos = (CPU_remember_jmp_curpos + 1) % CPU_REMEMBER_JMP_STEPS;
+#endif
+		SET_PC(OP_WORD);
+		DONE
+
+	OPCODE(4d)				/* EOR abcd */
+		ABSOLUTE;
+		EOR(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(4e)				/* LSR abcd */
+		ABSOLUTE;
+		RMW_GetByte(data, addr);
+		C = data & 1;
+		Z = data >> 1;
+		N = 0;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(4f)				/* LSE abcd [unofficial - LSR then EOR result with A] */
+		ABSOLUTE;
+		goto lse;
+
+	OPCODE(50)				/* BVC */
+#ifndef NO_V_FLAG_VARIABLE
+		BRANCH(!V)
+#else
+		BRANCH(!(CPU_regP & 0x40))
+#endif
+
+	OPCODE(51)				/* EOR (ab),y */
+		INDIRECT_Y;
+		NCYCLES_Y;
+		EOR(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(53)				/* LSE (ab),y [unofficial - LSR then EOR result with A] */
+		INDIRECT_Y;
+		goto lse;
+
+	OPCODE(55)				/* EOR ab,x */
+		ZPAGE_X;
+		EOR(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(56)				/* LSR ab,x */
+		ZPAGE_X;
+		data = MEMORY_dGetByte(addr);
+		C = data & 1;
+		Z = data >> 1;
+		N = 0;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(57)				/* LSE ab,x [unofficial - LSR then EOR result with A] */
+		ZPAGE_X;
+		goto lse_zpage;
+
+	OPCODE(58)				/* CLI */
+		CPU_ClrI;
+		CPUCHECKIRQ;
+		DONE
+
+	OPCODE(59)				/* EOR abcd,y */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		EOR(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(5b)				/* LSE abcd,y [unofficial - LSR then EOR result with A] */
+		ABSOLUTE_Y;
+		goto lse;
+
+	OPCODE(5d)				/* EOR abcd,x */
+		ABSOLUTE_X;
+		NCYCLES_X;
+		EOR(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(5e)				/* LSR abcd,x */
+		ABSOLUTE_X;
+		RMW_GetByte(data, addr);
+		C = data & 1;
+		Z = data >> 1;
+		N = 0;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(5f)				/* LSE abcd,x [unofficial - LSR then EOR result with A] */
+		ABSOLUTE_X;
+		goto lse;
+
+	OPCODE(60)				/* RTS */
+		data = PL;
+		SET_PC((PL << 8) + data + 1);
+#ifdef MONITOR_BREAK
+		if (MONITOR_break_ret && --MONITOR_ret_nesting <= 0)
+			MONITOR_break_step = TRUE;
+#endif
+		if (CPU_rts_handler != NULL) {
+			CPU_rts_handler();
+			CPU_rts_handler = NULL;
+		}
+		DONE
+
+	OPCODE(61)				/* ADC (ab,x) */
+		INDIRECT_X;
+		data = MEMORY_GetByte(addr);
+		goto adc;
+
+	OPCODE(63)				/* RRA (ab,x) [unofficial - ROR Mem, then ADC to Acc] */
+		INDIRECT_X;
+
+	rra:
+		RMW_GetByte(data, addr);
+		if (C) {
+			C = data & 1;
+			data = (data >> 1) + 0x80;
+		}
+		else {
+			C = data & 1;
+			data >>= 1;
+		}
+		MEMORY_PutByte(addr, data);
+		goto adc;
+
+	OPCODE(65)				/* ADC ab */
+		ZPAGE;
+		data = MEMORY_dGetByte(addr);
+		goto adc;
+
+	OPCODE(66)				/* ROR ab */
+		ZPAGE;
+		data = MEMORY_dGetByte(addr);
+		Z = N = (C << 7) + (data >> 1);
+		C = data & 1;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(67)				/* RRA ab [unofficial - ROR Mem, then ADC to Acc] */
+		ZPAGE;
+
+	rra_zpage:
+		data = MEMORY_dGetByte(addr);
+		if (C) {
+			C = data & 1;
+			data = (data >> 1) + 0x80;
+		}
+		else {
+			C = data & 1;
+			data >>= 1;
+		}
+		MEMORY_dPutByte(addr, data);
+		goto adc;
+
+	OPCODE(68)				/* PLA */
+		Z = N = A = PL;
+		DONE
+
+	OPCODE(69)				/* ADC #ab */
+		data = IMMEDIATE;
+		goto adc;
+
+	OPCODE(6a)				/* ROR */
+		Z = N = (C << 7) + (A >> 1);
+		C = A & 1;
+		A = Z;
+		DONE
+
+	OPCODE(6b)				/* ARR #ab [unofficial - Acc AND Data, ROR result] */
+		/* It does some 'BCD fixup' if D flag is set */
+		/* MPC 05/24/00 */
+		data = A & IMMEDIATE;
+		if (CPU_regP & CPU_D_FLAG) {
+			UBYTE temp = (data >> 1) + (C << 7);
+			Z = N = temp;
+#ifndef NO_V_FLAG_VARIABLE
+			V = ((temp ^ data) & 0x40);
+#else
+			CPU_regP = (CPU_regP & 0xbf) + ((temp ^ data) & 0x40);
+#endif
+			if ((data & 0x0F) + (data & 0x01) > 5)
+				temp = (temp & 0xF0) + ((temp + 0x6) & 0x0F);
+			if (data + (data & 0x10) >= 0x60) {
+				temp += 0x60;
+				C = 1;
+			}
+			else
+				C = 0;
+			A = (UBYTE) temp;
+		}
+		else {
+			Z = N = A = (data >> 1) + (C << 7);
+			C = data >> 7;
+#ifndef NO_V_FLAG_VARIABLE
+			V = C ^ ((A >> 5) & 1);
+#else
+			CPU_regP = (CPU_regP & 0xbf) + ((A ^ data) & 0x40);
+#endif
+		}
+		DONE
+
+	OPCODE(6c)				/* JMP (abcd) */
+#ifdef MONITOR_BREAK
+		CPU_remember_JMP[CPU_remember_jmp_curpos] = GET_PC() - 1;
+		CPU_remember_jmp_curpos = (CPU_remember_jmp_curpos + 1) % CPU_REMEMBER_JMP_STEPS;
+#endif
+		ABSOLUTE;
+#ifdef CPU65C02
+		/* XXX: if ((UBYTE) addr == 0xff) ANTIC_xpos++; */
+		SET_PC(MEMORY_dGetWord(addr));
+#else
+		/* original 6502 had a bug in JMP (addr) when addr crossed page boundary */
+		if ((UBYTE) addr == 0xff)
+			SET_PC((MEMORY_dGetByte(addr - 0xff) << 8) + MEMORY_dGetByte(addr));
+		else
+			SET_PC(MEMORY_dGetWord(addr));
+#endif
+		DONE
+
+	OPCODE(6d)				/* ADC abcd */
+		ABSOLUTE;
+		data = MEMORY_GetByte(addr);
+		goto adc;
+
+	OPCODE(6e)				/* ROR abcd */
+		ABSOLUTE;
+		RMW_GetByte(data, addr);
+		Z = N = (C << 7) + (data >> 1);
+		C = data & 1;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(6f)				/* RRA abcd [unofficial - ROR Mem, then ADC to Acc] */
+		ABSOLUTE;
+		goto rra;
+
+	OPCODE(70)				/* BVS */
+#ifndef NO_V_FLAG_VARIABLE
+		BRANCH(V)
+#else
+		BRANCH(CPU_regP & 0x40)
+#endif
+
+	OPCODE(71)				/* ADC (ab),y */
+		INDIRECT_Y;
+		NCYCLES_Y;
+		data = MEMORY_GetByte(addr);
+		goto adc;
+
+	OPCODE(73)				/* RRA (ab),y [unofficial - ROR Mem, then ADC to Acc] */
+		INDIRECT_Y;
+		goto rra;
+
+	OPCODE(75)				/* ADC ab,x */
+		ZPAGE_X;
+		data = MEMORY_dGetByte(addr);
+		goto adc;
+
+	OPCODE(76)				/* ROR ab,x */
+		ZPAGE_X;
+		data = MEMORY_dGetByte(addr);
+		Z = N = (C << 7) + (data >> 1);
+		C = data & 1;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(77)				/* RRA ab,x [unofficial - ROR Mem, then ADC to Acc] */
+		ZPAGE_X;
+		goto rra_zpage;
+
+	OPCODE(78)				/* SEI */
+		CPU_SetI;
+		DONE
+
+	OPCODE(79)				/* ADC abcd,y */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		data = MEMORY_GetByte(addr);
+		goto adc;
+
+	OPCODE(7b)				/* RRA abcd,y [unofficial - ROR Mem, then ADC to Acc] */
+		ABSOLUTE_Y;
+		goto rra;
+
+	OPCODE(7d)				/* ADC abcd,x */
+		ABSOLUTE_X;
+		NCYCLES_X;
+		data = MEMORY_GetByte(addr);
+		goto adc;
+
+	OPCODE(7e)				/* ROR abcd,x */
+		ABSOLUTE_X;
+		RMW_GetByte(data, addr);
+		Z = N = (C << 7) + (data >> 1);
+		C = data & 1;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(7f)				/* RRA abcd,x [unofficial - ROR Mem, then ADC to Acc] */
+		ABSOLUTE_X;
+		goto rra;
+
+	OPCODE(81)				/* STA (ab,x) */
+		INDIRECT_X;
+		MEMORY_PutByte(addr, A);
+		DONE
+
+	/* AXS doesn't change flags and SAX is better name for it (Fox) */
+	OPCODE(83)				/* SAX (ab,x) [unofficial - Store result A AND X */
+		INDIRECT_X;
+		data = A & X;
+		MEMORY_PutByte(addr, data);
+		DONE
+
+	OPCODE(84)				/* STY ab */
+		ZPAGE;
+		MEMORY_dPutByte(addr, Y);
+		DONE
+
+	OPCODE(85)				/* STA ab */
+		ZPAGE;
+		MEMORY_dPutByte(addr, A);
+		DONE
+
+	OPCODE(86)				/* STX ab */
+		ZPAGE;
+		MEMORY_dPutByte(addr, X);
+		DONE
+
+	OPCODE(87)				/* SAX ab [unofficial - Store result A AND X] */
+		ZPAGE;
+		data = A & X;
+		MEMORY_dPutByte(addr, data);
+		DONE
+
+	OPCODE(88)				/* DEY */
+		Z = N = --Y;
+		DONE
+
+	OPCODE(8a)				/* TXA */
+		Z = N = A = X;
+		DONE
+
+	OPCODE(8b)				/* ANE #ab [unofficial - A AND X AND (Mem OR $EF) to Acc] (Fox) */
+		data = IMMEDIATE;
+		N = Z = A & X & data;
+		A &= X & (data | 0xef);
+		DONE
+
+	OPCODE(8c)				/* STY abcd */
+		ABSOLUTE;
+		MEMORY_PutByte(addr, Y);
+		DONE
+
+	OPCODE(8d)				/* STA abcd */
+		ABSOLUTE;
+		MEMORY_PutByte(addr, A);
+		DONE
+
+	OPCODE(8e)				/* STX abcd */
+		ABSOLUTE;
+		MEMORY_PutByte(addr, X);
+		DONE
+
+	OPCODE(8f)				/* SAX abcd [unofficial - Store result A AND X] */
+		ABSOLUTE;
+		data = A & X;
+		MEMORY_PutByte(addr, data);
+		DONE
+
+	OPCODE(90)				/* BCC */
+		BRANCH(!C)
+
+	OPCODE(91)				/* STA (ab),y */
+		INDIRECT_Y;
+		MEMORY_PutByte(addr, A);
+		DONE
+
+	OPCODE(93)				/* SHA (ab),y [unofficial, UNSTABLE - Store A AND X AND (H+1) ?] (Fox) */
+		/* It seems previous memory value is important - also in 9f */
+		ZPAGE;
+		data = MEMORY_dGetByte((UBYTE) (addr + 1));	/* Get high byte from zpage */
+		data = A & X & (data + 1);
+		addr = MEMORY_dGetWord(addr) + Y;
+		MEMORY_PutByte(addr, data);
+		DONE
+
+	OPCODE(94)				/* STY ab,x */
+		ZPAGE_X;
+		MEMORY_dPutByte(addr, Y);
+		DONE
+
+	OPCODE(95)				/* STA ab,x */
+		ZPAGE_X;
+		MEMORY_dPutByte(addr, A);
+		DONE
+
+	OPCODE(96)				/* STX ab,y */
+		ZPAGE_Y;
+		MEMORY_PutByte(addr, X);
+		DONE
+
+	OPCODE(97)				/* SAX ab,y [unofficial - Store result A AND X] */
+		ZPAGE_Y;
+		data = A & X;
+		MEMORY_dPutByte(addr, data);
+		DONE
+
+	OPCODE(98)				/* TYA */
+		Z = N = A = Y;
+		DONE
+
+	OPCODE(99)				/* STA abcd,y */
+		ABSOLUTE_Y;
+		MEMORY_PutByte(addr, A);
+		DONE
+
+	OPCODE(9a)				/* TXS */
+		S = X;
+		DONE
+
+	OPCODE(9b)				/* SHS abcd,y [unofficial, UNSTABLE] (Fox) */
+		/* Transfer A AND X to S, then store S AND (H+1)] */
+		/* S seems to be stable, only memory values vary */
+		ABSOLUTE;
+		S = A & X;
+		data = S & ((addr >> 8) + 1);
+		addr += Y;
+		MEMORY_PutByte(addr, data);
+		DONE
+
+	OPCODE(9c)				/* SHY abcd,x [unofficial - Store Y and (H+1)] (Fox) */
+		/* Seems to be stable */
+		ABSOLUTE;
+		/* MPC 05/24/00 */
+		data = Y & ((UBYTE) ((addr >> 8) + 1));
+		addr += X;
+		MEMORY_PutByte(addr, data);
+		DONE
+
+	OPCODE(9d)				/* STA abcd,x */
+		ABSOLUTE_X;
+		MEMORY_PutByte(addr, A);
+		DONE
+
+	OPCODE(9e)				/* SHX abcd,y [unofficial - Store X and (H+1)] (Fox) */
+		/* Seems to be stable */
+		ABSOLUTE;
+		/* MPC 05/24/00 */
+		data = X & ((UBYTE) ((addr >> 8) + 1));
+		addr += Y;
+		MEMORY_PutByte(addr, data);
+		DONE
+
+	OPCODE(9f)				/* SHA abcd,y [unofficial, UNSTABLE - Store A AND X AND (H+1) ?] (Fox) */
+		ABSOLUTE;
+		data = A & X & ((addr >> 8) + 1);
+		addr += Y;
+		MEMORY_PutByte(addr, data);
+		DONE
+
+	OPCODE(a0)				/* LDY #ab */
+		LDY(IMMEDIATE);
+		DONE
+
+	OPCODE(a1)				/* LDA (ab,x) */
+		INDIRECT_X;
+		LDA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(a2)				/* LDX #ab */
+		LDX(IMMEDIATE);
+		DONE
+
+	OPCODE(a3)				/* LAX (ab,x) [unofficial] */
+		INDIRECT_X;
+		Z = N = X = A = MEMORY_GetByte(addr);
+		DONE
+
+	OPCODE(a4)				/* LDY ab */
+		ZPAGE;
+		LDY(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(a5)				/* LDA ab */
+		ZPAGE;
+		LDA(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(a6)				/* LDX ab */
+		ZPAGE;
+		LDX(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(a7)				/* LAX ab [unofficial] */
+		ZPAGE;
+		Z = N = X = A = MEMORY_GetByte(addr);
+		DONE
+
+	OPCODE(a8)				/* TAY */
+		Z = N = Y = A;
+		DONE
+
+	OPCODE(a9)				/* LDA #ab */
+		LDA(IMMEDIATE);
+		DONE
+
+	OPCODE(aa)				/* TAX */
+		Z = N = X = A;
+		DONE
+
+	OPCODE(ab)				/* ANX #ab [unofficial - AND #ab, then TAX] */
+		Z = N = X = A &= IMMEDIATE;
+		DONE
+
+	OPCODE(ac)				/* LDY abcd */
+		ABSOLUTE;
+		LDY(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(ad)				/* LDA abcd */
+		ABSOLUTE;
+		LDA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(ae)				/* LDX abcd */
+		ABSOLUTE;
+		LDX(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(af)				/* LAX abcd [unofficial] */
+		ABSOLUTE;
+		Z = N = X = A = MEMORY_GetByte(addr);
+		DONE
+
+	OPCODE(b0)				/* BCS */
+		BRANCH(C)
+
+	OPCODE(b1)				/* LDA (ab),y */
+		INDIRECT_Y;
+		NCYCLES_Y;
+		LDA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(b3)				/* LAX (ab),y [unofficial] */
+		INDIRECT_Y;
+		NCYCLES_Y;
+		Z = N = X = A = MEMORY_GetByte(addr);
+		DONE
+
+	OPCODE(b4)				/* LDY ab,x */
+		ZPAGE_X;
+		LDY(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(b5)				/* LDA ab,x */
+		ZPAGE_X;
+		LDA(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(b6)				/* LDX ab,y */
+		ZPAGE_Y;
+		LDX(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(b7)				/* LAX ab,y [unofficial] */
+		ZPAGE_Y;
+		Z = N = X = A = MEMORY_GetByte(addr);
+		DONE
+
+	OPCODE(b8)				/* CLV */
+#ifndef NO_V_FLAG_VARIABLE
+		V = 0;
+#else
+		CPU_ClrV;
+#endif
+		DONE
+
+	OPCODE(b9)				/* LDA abcd,y */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		LDA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(ba)				/* TSX */
+		Z = N = X = S;
+		DONE
+
+/* AXA [unofficial - original decode by R.Sterba and R.Petruzela 15.1.1998 :-)]
+   AXA - this is our new imaginative name for instruction with opcode hex BB.
+   AXA - Store Mem AND #$FD to Acc and X, then set stackpoint to value (Acc - 4)
+   It's cool! :-)
+   LAS - this is better name for this :) (Fox)
+   It simply ANDs stack pointer with Mem, then transfers result to A and X
+ */
+
+	OPCODE(bb)				/* LAS abcd,y [unofficial - AND S with Mem, transfer to A and X (Fox) */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		Z = N = A = X = S &= MEMORY_GetByte(addr);
+		DONE
+
+	OPCODE(bc)				/* LDY abcd,x */
+		ABSOLUTE_X;
+		NCYCLES_X;
+		LDY(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(bd)				/* LDA abcd,x */
+		ABSOLUTE_X;
+		NCYCLES_X;
+		LDA(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(be)				/* LDX abcd,y */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		LDX(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(bf)				/* LAX abcd,y [unofficial] */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		Z = N = X = A = MEMORY_GetByte(addr);
+		DONE
+
+	OPCODE(c0)				/* CPY #ab */
+		CPY(IMMEDIATE);
+		DONE
+
+	OPCODE(c1)				/* CMP (ab,x) */
+		INDIRECT_X;
+		CMP(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(c3)				/* DCM (ab,x) [unofficial - DEC Mem then CMP with Acc] */
+		INDIRECT_X;
+
+	dcm:
+		RMW_GetByte(data, addr);
+		data--;
+		MEMORY_PutByte(addr, data);
+		CMP(data);
+		DONE
+
+	OPCODE(c4)				/* CPY ab */
+		ZPAGE;
+		CPY(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(c5)				/* CMP ab */
+		ZPAGE;
+		CMP(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(c6)				/* DEC ab */
+		ZPAGE;
+		Z = N = MEMORY_dGetByte(addr) - 1;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(c7)				/* DCM ab [unofficial - DEC Mem then CMP with Acc] */
+		ZPAGE;
+
+	dcm_zpage:
+		data = MEMORY_dGetByte(addr) - 1;
+		MEMORY_dPutByte(addr, data);
+		CMP(data);
+		DONE
+
+	OPCODE(c8)				/* INY */
+		Z = N = ++Y;
+		DONE
+
+	OPCODE(c9)				/* CMP #ab */
+		CMP(IMMEDIATE);
+		DONE
+
+	OPCODE(ca)				/* DEX */
+		Z = N = --X;
+		DONE
+
+	OPCODE(cb)				/* SBX #ab [unofficial - store ((A AND X) - Mem) in X] (Fox) */
+		X &= A;
+		data = IMMEDIATE;
+		C = X >= data;
+		/* MPC 05/24/00 */
+		Z = N = X -= data;
+		DONE
+
+	OPCODE(cc)				/* CPY abcd */
+		ABSOLUTE;
+		CPY(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(cd)				/* CMP abcd */
+		ABSOLUTE;
+		CMP(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(ce)				/* DEC abcd */
+		ABSOLUTE;
+		RMW_GetByte(Z, addr);
+		N = --Z;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(cf)				/* DCM abcd [unofficial - DEC Mem then CMP with Acc] */
+		ABSOLUTE;
+		goto dcm;
+
+	OPCODE(d0)				/* BNE */
+		BRANCH(Z)
+
+	OPCODE(d1)				/* CMP (ab),y */
+		INDIRECT_Y;
+		NCYCLES_Y;
+		CMP(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(d3)				/* DCM (ab),y [unofficial - DEC Mem then CMP with Acc] */
+		INDIRECT_Y;
+		goto dcm;
+
+	OPCODE(d5)				/* CMP ab,x */
+		ZPAGE_X;
+		CMP(MEMORY_dGetByte(addr));
+		Z = N = A - data;
+		C = (A >= data);
+		DONE
+
+	OPCODE(d6)				/* DEC ab,x */
+		ZPAGE_X;
+		Z = N = MEMORY_dGetByte(addr) - 1;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(d7)				/* DCM ab,x [unofficial - DEC Mem then CMP with Acc] */
+		ZPAGE_X;
+		goto dcm_zpage;
+
+	OPCODE(d8)				/* CLD */
+		CPU_ClrD;
+		DONE
+
+	OPCODE(d9)				/* CMP abcd,y */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		CMP(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(db)				/* DCM abcd,y [unofficial - DEC Mem then CMP with Acc] */
+		ABSOLUTE_Y;
+		goto dcm;
+
+	OPCODE(dd)				/* CMP abcd,x */
+		ABSOLUTE_X;
+		NCYCLES_X;
+		CMP(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(de)				/* DEC abcd,x */
+		ABSOLUTE_X;
+		RMW_GetByte(Z, addr);
+		N = --Z;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(df)				/* DCM abcd,x [unofficial - DEC Mem then CMP with Acc] */
+		ABSOLUTE_X;
+		goto dcm;
+
+	OPCODE(e0)				/* CPX #ab */
+		CPX(IMMEDIATE);
+		DONE
+
+	OPCODE(e1)				/* SBC (ab,x) */
+		INDIRECT_X;
+		data = MEMORY_GetByte(addr);
+		goto sbc;
+
+	OPCODE(e3)				/* INS (ab,x) [unofficial - INC Mem then SBC with Acc] */
+		INDIRECT_X;
+
+	ins:
+		RMW_GetByte(data, addr);
+		++data;
+		MEMORY_PutByte(addr, data);
+		goto sbc;
+
+	OPCODE(e4)				/* CPX ab */
+		ZPAGE;
+		CPX(MEMORY_dGetByte(addr));
+		DONE
+
+	OPCODE(e5)				/* SBC ab */
+		ZPAGE;
+		data = MEMORY_dGetByte(addr);
+		goto sbc;
+
+	OPCODE(e6)				/* INC ab */
+		ZPAGE;
+		Z = N = MEMORY_dGetByte(addr) + 1;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(e7)				/* INS ab [unofficial - INC Mem then SBC with Acc] */
+		ZPAGE;
+
+	ins_zpage:
+		data = MEMORY_dGetByte(addr) + 1;
+		MEMORY_dPutByte(addr, data);
+		goto sbc;
+
+	OPCODE(e8)				/* INX */
+		Z = N = ++X;
+		DONE
+
+	OPCODE_ALIAS(e9)		/* SBC #ab */
+	OPCODE(eb)				/* SBC #ab [unofficial] */
+		data = IMMEDIATE;
+		goto sbc;
+
+	OPCODE_ALIAS(ea)		/* NOP */
+	OPCODE_ALIAS(1a)		/* NOP [unofficial] */
+	OPCODE_ALIAS(3a)
+	OPCODE_ALIAS(5a)
+	OPCODE_ALIAS(7a)
+	OPCODE_ALIAS(da)
+	OPCODE(fa)
+		DONE
+
+	OPCODE(ec)				/* CPX abcd */
+		ABSOLUTE;
+		CPX(MEMORY_GetByte(addr));
+		DONE
+
+	OPCODE(ed)				/* SBC abcd */
+		ABSOLUTE;
+		data = MEMORY_GetByte(addr);
+		goto sbc;
+
+	OPCODE(ee)				/* INC abcd */
+		ABSOLUTE;
+		RMW_GetByte(Z, addr);
+		N = ++Z;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(ef)				/* INS abcd [unofficial - INC Mem then SBC with Acc] */
+		ABSOLUTE;
+		goto ins;
+
+	OPCODE(f0)				/* BEQ */
+		BRANCH(!Z)
+
+	OPCODE(f1)				/* SBC (ab),y */
+		INDIRECT_Y;
+		NCYCLES_Y;
+		data = MEMORY_GetByte(addr);
+		goto sbc;
+
+	OPCODE(f3)				/* INS (ab),y [unofficial - INC Mem then SBC with Acc] */
+		INDIRECT_Y;
+		goto ins;
+
+	OPCODE(f5)				/* SBC ab,x */
+		ZPAGE_X;
+		data = MEMORY_dGetByte(addr);
+		goto sbc;
+
+	OPCODE(f6)				/* INC ab,x */
+		ZPAGE_X;
+		Z = N = MEMORY_dGetByte(addr) + 1;
+		MEMORY_dPutByte(addr, Z);
+		DONE
+
+	OPCODE(f7)				/* INS ab,x [unofficial - INC Mem then SBC with Acc] */
+		ZPAGE_X;
+		goto ins_zpage;
+
+	OPCODE(f8)				/* SED */
+		CPU_SetD;
+		DONE
+
+	OPCODE(f9)				/* SBC abcd,y */
+		ABSOLUTE_Y;
+		NCYCLES_Y;
+		data = MEMORY_GetByte(addr);
+		goto sbc;
+
+	OPCODE(fb)				/* INS abcd,y [unofficial - INC Mem then SBC with Acc] */
+		ABSOLUTE_Y;
+		goto ins;
+
+	OPCODE(fd)				/* SBC abcd,x */
+		ABSOLUTE_X;
+		NCYCLES_X;
+		data = MEMORY_GetByte(addr);
+		goto sbc;
+
+	OPCODE(fe)				/* INC abcd,x */
+		ABSOLUTE_X;
+		RMW_GetByte(Z, addr);
+		N = ++Z;
+		MEMORY_PutByte(addr, Z);
+		DONE
+
+	OPCODE(ff)				/* INS abcd,x [unofficial - INC Mem then SBC with Acc] */
+		ABSOLUTE_X;
+		goto ins;
+
+#ifdef ASAP
+
+	OPCODE_ALIAS(d2)
+	OPCODE_ALIAS(f2)
+
+#else
+
+	OPCODE(d2)				/* ESCRTS #ab (CIM) - on Atari is here instruction CIM [unofficial] !RS! */
+		data = IMMEDIATE;
+		UPDATE_GLOBAL_REGS;
+		CPU_GetStatus();
+		ESC_Run(data);
+		CPU_PutStatus();
+		UPDATE_LOCAL_REGS;
+		data = PL;
+		SET_PC((PL << 8) + data + 1);
+#ifdef MONITOR_BREAK
+		if (MONITOR_break_ret && --MONITOR_ret_nesting <= 0)
+			MONITOR_break_step = TRUE;
+#endif
+		DONE
+
+	OPCODE(f2)				/* ESC #ab (CIM) - on Atari is here instruction CIM [unofficial] !RS! */
+		/* OPCODE(ff: ESC #ab - opcode FF is now used for INS [unofficial] instruction !RS! */
+		data = IMMEDIATE;
+		UPDATE_GLOBAL_REGS;
+		CPU_GetStatus();
+		ESC_Run(data);
+		CPU_PutStatus();
+		UPDATE_LOCAL_REGS;
+		DONE
+
+#endif /* ASAP */
+
+	OPCODE_ALIAS(02)		/* CIM [unofficial - crash intermediate] */
+	OPCODE_ALIAS(12)
+	OPCODE_ALIAS(22)
+	OPCODE_ALIAS(32)
+	OPCODE_ALIAS(42)
+	OPCODE_ALIAS(52)
+	OPCODE_ALIAS(62)
+	OPCODE_ALIAS(72)
+	OPCODE_ALIAS(92)
+	OPCODE(b2)
+
+#ifdef ASAP
+
+		ASAP_CIM();
+		DONE
+
+#else
+
+	/* OPCODE(d2) Used for ESCRTS #ab (CIM) */
+	/* OPCODE(f2) Used for ESC #ab (CIM) */
+		PC--;
+		UPDATE_GLOBAL_REGS;
+		CPU_GetStatus();
+
+#ifdef CRASH_MENU
+		UI_crash_address = GET_PC();
+		UI_crash_afterCIM = GET_PC() + 1;
+		UI_crash_code = insn;
+		UI_Run();
+#else
+		CPU_cim_encountered = TRUE;
+		ENTER_MONITOR;
+#endif /* CRASH_MENU */
+
+		CPU_PutStatus();
+		UPDATE_LOCAL_REGS;
+		DONE
+
+#endif /* ASAP */
+
+/* ---------------------------------------------- */
+/* ADC and SBC routines */
+
+	adc:
+		if (!(CPU_regP & CPU_D_FLAG)) {
+			/* Binary mode */
+			unsigned int tmp;
+			tmp = A + data + C;
+			C = tmp > 0xff;
+			/* C = tmp >> 8; */
+#ifndef NO_V_FLAG_VARIABLE
+			V = !((A ^ data) & 0x80) && ((data ^ tmp) & 0x80);
+#else
+			CPU_ClrV;
+			if (!((A ^ data) & 0x80) && ((data ^ tmp) & 0x80))
+				CPU_SetV;
+#endif
+			Z = N = A = (UBYTE) tmp;
+	    }
+		else {
+			/* Decimal mode */
+			unsigned int tmp;
+			tmp = (A & 0x0f) + (data & 0x0f) + C;
+			if (tmp >= 10)
+				tmp = (tmp - 10) | 0x10;
+			tmp += (A & 0xf0) + (data & 0xf0);
+
+			Z = A + data + C;
+			N = (UBYTE) tmp;
+#ifndef NO_V_FLAG_VARIABLE
+			V = !((A ^ data) & 0x80) && ((data ^ tmp) & 0x80);
+#else
+			CPU_ClrV;
+			if (!((A ^ data) & 0x80) && ((data ^ tmp) & 0x80))
+				CPU_SetV;
+#endif
+
+			if (tmp > 0x9f)
+				tmp += 0x60;
+			C = tmp > 0xff;
+			A = (UBYTE) tmp;
+		}
+		DONE
+
+	sbc:
+		if (!(CPU_regP & CPU_D_FLAG)) {
+			/* Binary mode */
+			unsigned int tmp;
+			/* tmp = A - data - !C; */
+			tmp = A - data - 1 + C;
+			C = tmp < 0x100;
+#ifndef NO_V_FLAG_VARIABLE
+			V = ((A ^ tmp) & 0x80) && ((A ^ data) & 0x80);
+#else
+			CPU_ClrV;
+			if (((A ^ tmp) & 0x80) && ((A ^ data) & 0x80))
+				CPU_SetV;
+#endif
+			Z = N = A = (UBYTE) tmp;
+		}
+		else {
+			/* Decimal mode */
+			unsigned int al, ah, tmp;
+			/* tmp = A - data - !C; */
+			tmp = A - data - 1 + C;
+			/* al = (A & 0x0f) - (data & 0x0f) - !C; */
+			al = (A & 0x0f) - (data & 0x0f) - 1 + C;	/* Calculate lower nybble */
+			ah = (A >> 4) - (data >> 4);		/* Calculate upper nybble */
+			if (al & 0x10) {
+				al -= 6;	/* BCD fixup for lower nybble */
+				ah--;
+			}
+			if (ah & 0x10)
+				ah -= 6;	/* BCD fixup for upper nybble */
+
+			C = tmp < 0x100;			/* Set flags */
+#ifndef NO_V_FLAG_VARIABLE
+			V = ((A ^ tmp) & 0x80) && ((A ^ data) & 0x80);
+#else
+			CPU_ClrV;
+			if (((A ^ tmp) & 0x80) && ((A ^ data) & 0x80))
+				CPU_SetV;
+#endif
+			Z = N = (UBYTE) tmp;
+
+			A = (ah << 4) + (al & 0x0f);	/* Compose result */
+		}
+		DONE
+
+#ifdef NO_GOTO
+	}
+#else
+	next:
+#endif
+
+#ifdef MONITOR_BREAK
+		if (MONITOR_break_step) {
+			DO_BREAK;
+		}
+#endif
+		/* This "continue" does nothing here.
+		   But it is necessary because, if we're not using NO_GOTO nor MONITOR_BREAK,
+		   gcc can complain: "error: label at end of compound statement". */
+		continue;
+	}
+
+	UPDATE_GLOBAL_REGS;
+}
+
+void CPU_Initialise(void)
+{
+}
+
+#endif /* FALCON_CPUASM */
+
+void CPU_Reset(void)
+{
+#ifdef MONITOR_PROFILE
+	memset(CPU_instruction_count, 0, sizeof(CPU_instruction_count));
+#endif
+
+	CPU_IRQ = 0;
+
+	CPU_regP = 0x34;				/* The unused bit is always 1, I flag set! */
+	CPU_PutStatus();	/* Make sure flags are all updated */
+	CPU_regS = 0xff;
+	CPU_regPC = MEMORY_dGetWordAligned(0xfffc);
+}
+
+#if !defined(BASIC) && !defined(ASAP)
+
+void CPU_StateSave(UBYTE SaveVerbose)
+{
+	StateSav_SaveUBYTE(&CPU_regA, 1);
+
+	CPU_GetStatus();	/* Make sure flags are all updated */
+	StateSav_SaveUBYTE(&CPU_regP, 1);
+
+	StateSav_SaveUBYTE(&CPU_regS, 1);
+	StateSav_SaveUBYTE(&CPU_regX, 1);
+	StateSav_SaveUBYTE(&CPU_regY, 1);
+	StateSav_SaveUBYTE(&CPU_IRQ, 1);
+
+	MEMORY_StateSave(SaveVerbose);
+
+	StateSav_SaveUWORD(&CPU_regPC, 1);
+}
+
+void CPU_StateRead(UBYTE SaveVerbose, UBYTE StateVersion)
+{
+	StateSav_ReadUBYTE(&CPU_regA, 1);
+
+	StateSav_ReadUBYTE(&CPU_regP, 1);
+	CPU_PutStatus();	/* Make sure flags are all updated */
+
+	StateSav_ReadUBYTE(&CPU_regS, 1);
+	StateSav_ReadUBYTE(&CPU_regX, 1);
+	StateSav_ReadUBYTE(&CPU_regY, 1);
+	StateSav_ReadUBYTE(&CPU_IRQ, 1);
+
+	MEMORY_StateRead(SaveVerbose, StateVersion);
+
+	StateSav_ReadUWORD(&CPU_regPC, 1);
+}
+
+#endif
diff --git a/project/jni/application/atari800/src/cpu.h b/project/jni/application/atari800/src/cpu.h
new file mode 100644
index 000000000..103d682c4
--- /dev/null
+++ b/project/jni/application/atari800/src/cpu.h
@@ -0,0 +1,76 @@
+#ifndef CPU_H_
+#define CPU_H_
+
+#include "config.h"
+#ifdef ASAP /* external project, see http://asap.sf.net */
+#include "asap_internal.h"
+#else
+#include "atari.h"
+#endif
+
+#define CPU_N_FLAG 0x80
+#define CPU_V_FLAG 0x40
+#define CPU_B_FLAG 0x10
+#define CPU_D_FLAG 0x08
+#define CPU_I_FLAG 0x04
+#define CPU_Z_FLAG 0x02
+#define CPU_C_FLAG 0x01
+
+void CPU_Initialise(void);		/* used in the assembler version of cpu.c only */
+void CPU_GetStatus(void);
+void CPU_PutStatus(void);
+void CPU_Reset(void);
+void CPU_StateSave(UBYTE SaveVerbose);
+void CPU_StateRead(UBYTE SaveVerbose, UBYTE StateVersion);
+void CPU_NMI(void);
+void CPU_GO(int limit);
+#define CPU_GenerateIRQ() (CPU_IRQ = 1)
+
+#ifdef FALCON_CPUASM
+extern void CPU_INIT(void);
+extern void CPU_GET(void);		/* put from CCR, N & Z FLAG into regP */
+extern void CPU_PUT(void);		/* put from regP into CCR, N & Z FLAG */
+#endif
+
+extern UWORD CPU_regPC;
+extern UBYTE CPU_regA;
+extern UBYTE CPU_regP;
+extern UBYTE CPU_regS;
+extern UBYTE CPU_regY;
+extern UBYTE CPU_regX;
+
+#define CPU_SetN CPU_regP |= CPU_N_FLAG
+#define CPU_ClrN CPU_regP &= (~CPU_N_FLAG)
+#define CPU_SetV CPU_regP |= CPU_V_FLAG
+#define CPU_ClrV CPU_regP &= (~CPU_V_FLAG)
+#define CPU_SetB CPU_regP |= CPU_B_FLAG
+#define CPU_ClrB CPU_regP &= (~CPU_B_FLAG)
+#define CPU_SetD CPU_regP |= CPU_D_FLAG
+#define CPU_ClrD CPU_regP &= (~CPU_D_FLAG)
+#define CPU_SetI CPU_regP |= CPU_I_FLAG
+#define CPU_ClrI CPU_regP &= (~CPU_I_FLAG)
+#define CPU_SetZ CPU_regP |= CPU_Z_FLAG
+#define CPU_ClrZ CPU_regP &= (~CPU_Z_FLAG)
+#define CPU_SetC CPU_regP |= CPU_C_FLAG
+#define CPU_ClrC CPU_regP &= (~CPU_C_FLAG)
+
+extern UBYTE CPU_IRQ;
+
+extern void (*CPU_rts_handler)(void);
+
+extern UBYTE CPU_cim_encountered;
+
+#define CPU_REMEMBER_PC_STEPS 64
+extern UWORD CPU_remember_PC[CPU_REMEMBER_PC_STEPS];
+extern unsigned int CPU_remember_PC_curpos;
+extern int CPU_remember_xpos[CPU_REMEMBER_PC_STEPS];
+
+#define CPU_REMEMBER_JMP_STEPS 16
+extern UWORD CPU_remember_JMP[CPU_REMEMBER_JMP_STEPS];
+extern unsigned int CPU_remember_jmp_curpos;
+
+#ifdef MONITOR_PROFILE
+extern int CPU_instruction_count[256];
+#endif
+
+#endif /* CPU_H_ */
diff --git a/project/jni/application/atari800/src/cycle_map.c b/project/jni/application/atari800/src/cycle_map.c
new file mode 100644
index 000000000..552e951eb
--- /dev/null
+++ b/project/jni/application/atari800/src/cycle_map.c
@@ -0,0 +1,201 @@
+/*
+ * cycle_map.c - part of the ANTIC emulation
+ *
+ * Copyright (C) 1995-1998 Perry McFarlane
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include <stdio.h>
+#include "cycle_map.h"
+
+int CYCLE_MAP_cpu2antic[CYCLE_MAP_SIZE * (17 * 7 + 1)];
+int CYCLE_MAP_antic2cpu[CYCLE_MAP_SIZE * (17 * 7 + 1)];
+static void try_all_scroll(int md, int use_char_index,
+	int use_font, int use_bitmap, int *cpu2antic, int *antic2cpu);
+static void antic_steal_map(int width, int md, int scroll_offset, int use_char_index,
+	int use_font, int use_bitmap, char *antic_cycles, int *cpucycles,
+	int *actualcycles);
+static void cpu_cycle_map(char *antic_cycles_orig, int *cpu_cycles, int *actual_cycles);
+
+#undef TEST_CYCLE_MAP
+#ifdef TEST_CYCLE_MAP
+int main()
+{
+	CYCLE_MAP_Create();
+	return 0;
+};
+#endif
+
+static void cpu_cycle_map(char *antic_cycles_orig, int *cpu_cycles, int *actual_cycles)
+{
+	int i;
+	char antic_cycles[CYCLE_MAP_SIZE];
+	int antic_xpos;
+	int cpu_xpos = 0;
+	for (i = 0; i <= 113; i++)
+		antic_cycles[i] = antic_cycles_orig[i];
+	for (i = 114; i < CYCLE_MAP_SIZE; i++)
+		antic_cycles[i] = '.';
+	for (i = 0; i < CYCLE_MAP_SIZE; i++)
+		cpu_cycles[i]=-1;
+	for (antic_xpos = 0; antic_xpos < CYCLE_MAP_SIZE; antic_xpos++) {
+		char c = antic_cycles[antic_xpos];
+		actual_cycles[antic_xpos] = cpu_xpos;
+		if (c != 'R' && c != 'S' && c != 'F' && c != 'I') {
+			/*Not a stolen cycle*/
+			cpu_cycles[cpu_xpos] = antic_xpos;
+			cpu_xpos++;
+		}
+	}
+}
+
+void CYCLE_MAP_Create(void)
+{
+#ifdef TEST_CYCLE_MAP
+	int i, j;
+	int *cpu_cycles;
+	int *actual_cycles;
+#endif
+	char antic_cycles[115];
+	int k = 0;
+	antic_steal_map(1, 0, 0, 0, 0, 0, antic_cycles, &CYCLE_MAP_cpu2antic[k], &CYCLE_MAP_antic2cpu[k]); /* blank line, or mode 8-F following line*/
+	k = CYCLE_MAP_SIZE * (17 * 0 + 1);
+	try_all_scroll(0, 1, 1, 0, &CYCLE_MAP_cpu2antic[k], &CYCLE_MAP_antic2cpu[k]); /* mode 2,3,4,5 first line */
+	k = CYCLE_MAP_SIZE * (17 * 1 + 1);
+	try_all_scroll(0, 0, 1, 0, &CYCLE_MAP_cpu2antic[k], &CYCLE_MAP_antic2cpu[k]); /* mode 2,3,4,5 following lines */
+	k = CYCLE_MAP_SIZE * (17 * 2 + 1);
+	try_all_scroll(1, 1, 1, 0, &CYCLE_MAP_cpu2antic[k], &CYCLE_MAP_antic2cpu[k]); /* mode 6,7 first line */
+	k = CYCLE_MAP_SIZE * (17 * 3 + 1);
+	try_all_scroll(1, 0, 1, 0, &CYCLE_MAP_cpu2antic[k], &CYCLE_MAP_antic2cpu[k]); /* mode 6,7 following lines */
+	k = CYCLE_MAP_SIZE * (17 * 4 + 1);
+	try_all_scroll(0, 0, 0, 1, &CYCLE_MAP_cpu2antic[k], &CYCLE_MAP_antic2cpu[k]); /* mode 8,9 first line */
+	k = CYCLE_MAP_SIZE * (17 * 5 + 1);
+	try_all_scroll(1, 0, 0, 1, &CYCLE_MAP_cpu2antic[k], &CYCLE_MAP_antic2cpu[k]); /* mode A,B,C  first line */
+	k = CYCLE_MAP_SIZE * (17 * 6 + 1);
+	try_all_scroll(2, 0, 0, 1, &CYCLE_MAP_cpu2antic[k], &CYCLE_MAP_antic2cpu[k]); /* mode D,E,F  first line */
+#ifdef TEST_CYCLE_MAP
+	for(j = 0; j < 17 * 7 + 1; j++) {
+		cpu_cycles = &CYCLE_MAP_cpu2antic[CYCLE_MAP_SIZE * j];
+		actual_cycles = &CYCLE_MAP_antic2cpu[CYCLE_MAP_SIZE * j];
+		printf("%3d ", actual_cycles[114]);
+		for(i = 0; i <= actual_cycles[114] + 6; i++)
+			printf("%3d, ", cpu_cycles[i]);
+		printf("\n");
+	}
+#endif
+}
+
+static void try_all_scroll(int md, int use_char_index,
+	int use_font, int use_bitmap, int *cpu2antic, int *antic2cpu)
+{
+	char antic_cycles[115];
+	int width;
+	int scroll_offset = 0;
+	width = 1; /* narrow width without scroll*/
+	antic_steal_map(width, md, scroll_offset, use_char_index, use_font,
+		use_bitmap, antic_cycles, &cpu2antic[CYCLE_MAP_SIZE * 0], &antic2cpu[CYCLE_MAP_SIZE * 0]);
+	width = 2; /* standard without scroll or narrow with scroll */
+	for (scroll_offset = 0; scroll_offset <= 7; scroll_offset++) {
+		antic_steal_map(width, md, scroll_offset, use_char_index, use_font,
+			use_bitmap, antic_cycles, &cpu2antic[CYCLE_MAP_SIZE * (1 + scroll_offset)],
+			&antic2cpu[CYCLE_MAP_SIZE * (1 + scroll_offset)]);
+	}
+	width = 3; /* standard with scroll or wide */
+	for (scroll_offset = 0; scroll_offset <= 7; scroll_offset++) {
+		antic_steal_map(width, md, scroll_offset, use_char_index, use_font,
+			use_bitmap, antic_cycles, &cpu2antic[CYCLE_MAP_SIZE * (9 + scroll_offset)],
+			&antic2cpu[CYCLE_MAP_SIZE * (9 + scroll_offset)]);
+	}
+}
+
+static void antic_steal_map(int width, int md, int scroll_offset, int use_char_index,
+	int use_font, int use_bitmap, char *antic_cycles, int *cpu_cycles,
+	int *actual_cycles)
+{
+	int char_start;
+	int bitmap_start;
+	int font_start;
+	int i;
+	int dram_pending;
+	int interval;
+	int steal;
+	int max_chars;
+	/* defaults for wide playfield */
+#define CHAR_C 13
+#define BITMAP_C (CHAR_C + 2)
+#define FONT_C (CHAR_C + 3)
+#define END_C (CHAR_C + 95)
+#define DMARS_C (CHAR_C + 15)
+#define DMARE_C (DMARS_C + 32)
+	char_start = CHAR_C + scroll_offset;
+	bitmap_start = BITMAP_C + scroll_offset;
+	font_start = FONT_C + scroll_offset;
+	max_chars = 48;
+	if (width == 2) { /* standard width */
+		char_start += 8;
+		bitmap_start += 8;
+		font_start += 8;
+		max_chars = 40;
+	}
+	else if (width == 1) { /* narrow */
+		char_start += 16;
+		bitmap_start += 16;
+		font_start += 16;
+		max_chars = 32;
+	}
+
+	interval = (2 << md);
+	max_chars = (max_chars >> md);
+	for (i = 0; i <= 113; i++)
+		antic_cycles[i] = '.';
+	antic_cycles[114] = '\0';
+	antic_cycles[0] = 'M';
+	antic_cycles[1] = antic_cycles[6] = antic_cycles[7] = 'D';
+	antic_cycles[2] = antic_cycles[3] = antic_cycles[4] = antic_cycles[5] = 'P';
+	dram_pending = 0;
+	for (i = 0; i <= 114; i++) {
+		steal = 0;
+		if (i <= END_C) {
+			if (use_char_index && i >= char_start && ((i - char_start) % interval == 0)
+				&& ((i - char_start) < max_chars * interval)) {
+				steal = 'I';
+			}
+			if (use_font && i >= font_start && ((i - font_start) % interval == 0)
+				&& ((i - font_start) < max_chars * interval)) {
+				steal = 'F';
+			}
+			if (use_bitmap && i >= bitmap_start && ((i - bitmap_start) % interval == 0)
+				&& ((i - bitmap_start) < max_chars * interval)) {
+				steal = 'S';
+			}
+			if (i >= DMARS_C && i <= DMARE_C && ((i - DMARS_C) % 4 == 0)) {
+				dram_pending = 1;
+			}
+		}
+		if (steal !=0 ) {
+			antic_cycles[i] = steal;
+		}
+		else if (dram_pending != 0){
+			antic_cycles[i] = 'R';
+			dram_pending = 0;
+		}
+	}
+	cpu_cycle_map(antic_cycles, cpu_cycles, actual_cycles);
+}
diff --git a/project/jni/application/atari800/src/cycle_map.h b/project/jni/application/atari800/src/cycle_map.h
new file mode 100644
index 000000000..39d7831a7
--- /dev/null
+++ b/project/jni/application/atari800/src/cycle_map.h
@@ -0,0 +1,9 @@
+#ifndef CYCLE_MAP_H_
+#define CYCLE_MAP_H_
+
+#define CYCLE_MAP_SIZE (114 + 9)
+extern int CYCLE_MAP_cpu2antic[CYCLE_MAP_SIZE * (17 * 7 + 1)];
+extern int CYCLE_MAP_antic2cpu[CYCLE_MAP_SIZE * (17 * 7 + 1)];
+void CYCLE_MAP_Create(void);
+
+#endif /* CYCLE_MAP_H_ */
diff --git a/project/jni/application/atari800/src/devices.c b/project/jni/application/atari800/src/devices.c
new file mode 100644
index 000000000..cfbd5b19d
--- /dev/null
+++ b/project/jni/application/atari800/src/devices.c
@@ -0,0 +1,2510 @@
+/*
+ * devices.c - emulation of H:, P:, E: and K: Atari devices
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#ifdef HAVE_ERRNO_H
+#include <errno.h>
+#endif
+#ifdef HAVE_TIME_H
+#include <time.h>
+#endif
+#ifdef HAVE_UNIXIO_H
+/* VMS */
+#include <unixio.h>
+#endif
+#ifdef HAVE_FILE_H
+/* VMS */
+#include <file.h>
+#endif
+#ifdef HAVE_FCNTL_H
+#include <fcntl.h>
+#endif
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+#ifdef HAVE_DIRECT_H
+/* WIN32 */
+#include <direct.h> /* mkdir, rmdir */
+#endif
+/* XXX: <sys/dir.h>, <ndir.h>, <sys/ndir.h> */
+#ifdef HAVE_DIRENT_H
+#include <dirent.h>
+#endif
+#ifdef HAVE_SYS_STAT_H
+#include <sys/stat.h>
+#endif
+
+#include "atari.h"
+#include "binload.h"
+#include "cpu.h"
+#include "devices.h"
+#include "esc.h"
+#include "log.h"
+#include "memory.h"
+#include "sio.h"
+#include "util.h"
+#ifdef R_IO_DEVICE
+#include "rdevice.h"
+#endif
+#ifdef __PLUS
+#include "misc_win.h"
+#endif
+
+#ifndef S_IREAD
+#define S_IREAD S_IRUSR
+#endif
+#ifndef S_IWRITE
+#define S_IWRITE S_IWUSR
+#endif
+
+#ifdef WIN32
+
+#include <windows.h>
+
+#undef FILENAME_CONV
+#undef FILENAME
+
+#ifdef UNICODE
+#define FILENAME_CONV \
+	WCHAR wfilename[FILENAME_MAX]; \
+	if (MultiByteToWideChar(CP_ACP, 0, filename, -1, wfilename, FILENAME_MAX) <= 0) \
+		return FALSE;
+#define FILENAME wfilename
+#else /* UNICODE */
+#define FILENAME_CONV
+#define FILENAME filename
+#endif /* UNICODE */
+
+#endif /* WIN32 */
+
+
+/* Read Directory abstraction layer -------------------------------------- */
+
+#ifdef WIN32
+
+static char dir_path[FILENAME_MAX];
+static WIN32_FIND_DATA wfd;
+static HANDLE dh = INVALID_HANDLE_VALUE;
+
+static int Devices_OpenDir(const char *filename)
+{
+	FILENAME_CONV;
+	Util_splitpath(filename, dir_path, NULL);
+	if (dh != INVALID_HANDLE_VALUE)
+		FindClose(dh);
+	dh = FindFirstFile(FILENAME, &wfd);
+	if (dh == INVALID_HANDLE_VALUE) {
+		/* don't raise error if the path is ok but no file matches:
+		   Win98 returns ERROR_FILE_NOT_FOUND,
+		   WinCE returns ERROR_NO_MORE_FILES */
+		DWORD err = GetLastError();
+		if (err != ERROR_FILE_NOT_FOUND && err != ERROR_NO_MORE_FILES)
+			return FALSE;
+	}
+	return TRUE;
+}
+
+static int Devices_ReadDir(char *fullpath, char *filename, int *isdir,
+                          int *readonly, int *size, char *timetext)
+{
+#ifdef UNICODE
+	char afilename[MAX_PATH];
+#endif
+	if (dh == INVALID_HANDLE_VALUE)
+		return FALSE;
+	/* don't match "." nor ".."  */
+	while (wfd.cFileName[0] == '.' &&
+	       (wfd.cFileName[1] == '\0' || (wfd.cFileName[1] == '.' && wfd.cFileName[2] == '\0'))
+	) {
+		if (!FindNextFile(dh, &wfd)) {
+			FindClose(dh);
+			dh = INVALID_HANDLE_VALUE;
+			return FALSE;
+		}
+	}
+#ifdef UNICODE
+	if (WideCharToMultiByte(CP_ACP, 0, wfd.cFileName, -1, afilename, MAX_PATH, NULL, NULL) <= 0)
+		strcpy(afilename, "?ERROR");
+#define FOUND_FILENAME afilename
+#else
+#define FOUND_FILENAME wfd.cFileName
+#endif /* UNICODE */
+	if (filename != NULL)
+		strcpy(filename, FOUND_FILENAME);
+	if (fullpath != NULL)
+		Util_catpath(fullpath, dir_path, FOUND_FILENAME);
+	if (isdir != NULL)
+		*isdir = (wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ? TRUE : FALSE;
+	if (readonly != NULL)
+		*readonly = (wfd.dwFileAttributes & FILE_ATTRIBUTE_READONLY) ? TRUE : FALSE;
+	if (size != NULL)
+		*size = (int) wfd.nFileSizeLow;
+	if (timetext != NULL) {
+		FILETIME lt;
+		SYSTEMTIME st;
+		if (FileTimeToLocalFileTime(&wfd.ftLastWriteTime, &lt) != 0
+		 && FileTimeToSystemTime(&lt, &st) != 0) {
+			int hour = st.wHour;
+			char ampm = 'a';
+			if (hour >= 12) {
+				hour -= 12;
+				ampm = 'p';
+			}
+			if (hour == 0)
+				hour = 12;
+			sprintf(timetext, "%2d-%02d-%02d %2d:%02d%c",
+				st.wMonth, st.wDay, st.wYear % 100, hour, st.wMinute, ampm);
+		}
+		else
+			strcpy(timetext, " 1-01-01 12:00p");
+	}
+
+	if (!FindNextFile(dh, &wfd)) {
+		FindClose(dh);
+		dh = INVALID_HANDLE_VALUE;
+	}
+	return TRUE;
+}
+
+#define DO_DIR
+
+#elif defined(HAVE_OPENDIR)
+
+static int match(const char *pattern, const char *filename)
+{
+	if (strcmp(pattern, "*.*") == 0)
+		return TRUE;
+
+	for (;;) {
+		switch (*pattern) {
+		case '\0':
+			return (*filename == '\0');
+		case '?':
+			if (*filename == '\0' || *filename == '.')
+				return FALSE;
+			pattern++;
+			filename++;
+			break;
+		case '*':
+			if (Util_chrieq(*filename, pattern[1]))
+				pattern++;
+			else if (*filename == '\0')
+				return FALSE; /* because pattern[1] != '\0' */
+			else
+				filename++;
+			break;
+		default:
+			if (!Util_chrieq(*pattern, *filename))
+				return FALSE;
+			pattern++;
+			filename++;
+			break;
+		}
+	}
+}
+
+static char dir_path[FILENAME_MAX];
+static char filename_pattern[FILENAME_MAX];
+static DIR *dp = NULL;
+
+static int Devices_OpenDir(const char *filename)
+{
+	Util_splitpath(filename, dir_path, filename_pattern);
+	if (dp != NULL)
+		closedir(dp);
+	dp = opendir(dir_path);
+	return dp != NULL;
+}
+
+static int Devices_ReadDir(char *fullpath, char *filename, int *isdir,
+                          int *readonly, int *size, char *timetext)
+{
+	struct dirent *entry;
+	char temppath[FILENAME_MAX];
+#ifdef HAVE_STAT
+	struct stat status;
+#endif
+	for (;;) {
+		entry = readdir(dp);
+		if (entry == NULL) {
+			closedir(dp);
+			dp = NULL;
+			return FALSE;
+		}
+		if (entry->d_name[0] == '.') {
+			/* don't match Unix hidden files unless specifically requested */
+			if (filename_pattern[0] != '.')
+				continue;
+			/* never match "." */
+			if (entry->d_name[1] == '\0')
+				continue;
+			/* never match ".." */
+			if (entry->d_name[1] == '.' && entry->d_name[2] == '\0')
+				continue;
+		}
+		if (match(filename_pattern, entry->d_name))
+			break;
+	}
+	if (filename != NULL)
+		strcpy(filename, entry->d_name);
+	Util_catpath(temppath, dir_path, entry->d_name);
+	if (fullpath != NULL)
+		strcpy(fullpath, temppath);
+#ifdef HAVE_STAT
+	if (stat(temppath, &status) == 0) {
+		if (isdir != NULL)
+			*isdir = (status.st_mode & S_IFDIR) ? TRUE : FALSE;
+		if (readonly != NULL)
+			*readonly = (status.st_mode & S_IWRITE) ? FALSE : TRUE;
+		if (size != NULL)
+			*size = (int) status.st_size;
+		if (timetext != NULL) {
+#ifdef HAVE_LOCALTIME
+			struct tm *ft;
+			int hour;
+			char ampm = 'a';
+			ft = localtime(&status.st_mtime);
+			hour = ft->tm_hour;
+			if (hour >= 12) {
+				hour -= 12;
+				ampm = 'p';
+			}
+			if (hour == 0)
+				hour = 12;
+			sprintf(timetext, "%2d-%02d-%02d %2d:%02d%c",
+				ft->tm_mon + 1, ft->tm_mday, ft->tm_year % 100,
+				hour, ft->tm_min, ampm);
+#else
+			strcpy(timetext, " 1-01-01 12:00p");
+#endif /* HAVE_LOCALTIME */
+		}
+	}
+	else
+#endif /* HAVE_STAT */
+	{
+		if (isdir != NULL)
+			*isdir = FALSE;
+		if (readonly != NULL)
+			*readonly = FALSE;
+		if (size != NULL)
+			*size = 0;
+		if (timetext != NULL)
+			strcpy(timetext, " 1-01-01 12:00p");
+	}
+	return TRUE;
+}
+
+#define DO_DIR
+
+#elif defined(PS2)
+
+extern char dir_path[FILENAME_MAX];
+
+int Atari_OpenDir(const char *filename);
+
+#define Devices_OpenDir Atari_OpenDir
+
+int Atari_ReadDir(char *fullpath, char *filename, int *isdir,
+                  int *readonly, int *size, char *timetext);
+
+static int Devices_ReadDir(char *fullpath, char *filename, int *isdir,
+                          int *readonly, int *size, char *timetext)
+{
+	char tmp_filename[FILENAME_MAX];
+	if (filename == NULL)
+		filename = tmp_filename;
+	do {
+		if (!Atari_ReadDir(fullpath, filename, isdir, readonly, size, timetext))
+			return FALSE;
+		/* reject "." and ".." */
+	} while (filename[0] == '.' &&
+	         (filename[1] == '\0' || (filename[1] == '.' && filename[2] == '\0')));
+	return TRUE;
+}
+
+#define DO_DIR
+
+#endif /* defined(PS2) */
+
+
+/* Rename File/Directory abstraction layer ------------------------------- */
+
+#ifdef WIN32
+
+static int Devices_Rename(const char *oldname, const char *newname)
+{
+#ifdef UNICODE
+	WCHAR woldname[FILENAME_MAX];
+	WCHAR wnewname[FILENAME_MAX];
+	if (MultiByteToWideChar(CP_ACP, 0, oldname, -1, woldname, FILENAME_MAX) <= 0
+	 || MultiByteToWideChar(CP_ACP, 0, newname, -1, wnewname, FILENAME_MAX) <= 0)
+		return FALSE;
+	return MoveFile(woldname, wnewname) != 0;
+#else
+	return MoveFile(oldname, newname) != 0;
+#endif /* UNICODE */
+}
+
+#define DO_RENAME
+
+#elif defined(HAVE_RENAME)
+
+static int Devices_Rename(const char *oldname, const char *newname)
+{
+	return rename(oldname, newname) == 0;
+}
+
+#define DO_RENAME
+
+#endif
+
+
+/* Set/Reset Read-Only Attribute abstraction layer ----------------------- */
+
+#ifdef WIN32
+
+/* Enables/disables read-only mode for the file. Returns TRUE on success. */
+static int Devices_SetReadOnly(const char *filename, int readonly)
+{
+	DWORD attr;
+	FILENAME_CONV;
+	attr = GetFileAttributes(FILENAME);
+	if (attr == 0xffffffff)
+		return FALSE;
+	return SetFileAttributes(FILENAME, readonly
+		? (attr | FILE_ATTRIBUTE_READONLY)
+		: (attr & ~FILE_ATTRIBUTE_READONLY)) != 0;
+}
+
+#define DO_LOCK
+
+#elif defined(HAVE_CHMOD)
+
+static int Devices_SetReadOnly(const char *filename, int readonly)
+{
+	return chmod(filename, readonly ? S_IREAD : (S_IREAD | S_IWRITE)) == 0;
+}
+
+#define DO_LOCK
+
+#endif /* defined(HAVE_CHMOD) */
+
+
+/* Make Directory abstraction layer -------------------------------------- */
+
+#ifdef WIN32
+
+static int Devices_MakeDirectory(const char *filename)
+{
+	FILENAME_CONV;
+	return CreateDirectory(FILENAME, NULL) != 0;
+}
+
+#define DO_MKDIR
+
+#elif defined(HAVE_MKDIR)
+
+static int Devices_MakeDirectory(const char *filename)
+{
+	/* XXX: I don't see any good reason why umask() and limited permissions were used. */
+	/* umask(S_IWGRP | S_IWOTH); */
+	return (mkdir(filename, 0777
+		 /* S_IRUSR | S_IWUSR | S_IXUSR | S_IRGRP | S_IROTH | S_IXGRP | S_IXOTH */) == 0);
+}
+
+#define DO_MKDIR
+
+#endif /* defined(HAVE_MKDIR) */
+
+
+/* Remove Directory abstraction layer ------------------------------------ */
+
+#ifdef WIN32
+
+static UBYTE Devices_RemoveDirectory(const char *filename)
+{
+	FILENAME_CONV;
+	if (RemoveDirectory(FILENAME) != 0)
+		return 1;
+	return (UBYTE) ((HRESULT_CODE(GetLastError()) == ERROR_DIR_NOT_EMPTY) ? 167 : 150);
+}
+
+#define DO_RMDIR
+
+#elif defined(HAVE_RMDIR)
+
+static UBYTE Devices_RemoveDirectory(const char *filename)
+{
+	if (rmdir(filename) == 0)
+		return 1;
+	return (UBYTE) ((errno == ENOTEMPTY) ? 167 : 150);
+}
+
+#define DO_RMDIR
+
+#endif /* defined(HAVE_RMDIR) */
+
+
+/* H: device emulation --------------------------------------------------- */
+
+#define DEFAULT_H_PATH  "H1:>DOS;>DOS"
+
+/* emulator debugging mode */
+static int devbug = FALSE;
+
+/* host path for each H: unit */
+char Devices_atari_h_dir[4][FILENAME_MAX] = { "", "", "", "" };
+
+/* read only mode for H: device */
+int Devices_h_read_only = TRUE;
+
+/* ';'-separated list of Atari paths checked by the "load executable"
+   command. if a path does not start with "Hn:", then the selected device
+   is used. */
+char Devices_h_exe_path[FILENAME_MAX] = DEFAULT_H_PATH;
+
+/* Devices_h_current_dir must be empty or terminated with Util_DIR_SEP_CHAR;
+   only Util_DIR_SEP_CHAR can be used as a directory separator here */
+char Devices_h_current_dir[4][FILENAME_MAX];
+
+/* stream open via H: device per IOCB */
+static FILE *h_fp[8] = { NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL };
+
+/* H: text mode per IOCB */
+static int h_textmode[8];
+
+/* last read character was CR, per IOCB */
+static int h_wascr[8];
+
+/* last operation: 'o': open, 'r': read, 'w': write, per IOCB */
+/* (this is needed to apply fseek(fp, 0, SEEK_CUR) between reads and writes
+   in update (12) mode) */
+static char h_lastop[8];
+
+Util_tmpbufdef(static, h_tmpbuf[8])
+
+/* IOCB #, 0-7 */
+static int h_iocb;
+
+/* H: device number, 0-3 */
+static int h_devnum;
+
+/* filename as specified after "Hn:" */
+static char atari_filename[FILENAME_MAX];
+
+#ifdef DO_RENAME
+/* new filename (no directories!) */
+static char new_filename[FILENAME_MAX];
+#endif
+
+/* atari_filename applied to H:'s current dir, with Util_DIR_SEP_CHARs only */
+static char atari_path[FILENAME_MAX];
+
+/* full filename for the current operation */
+static char host_path[FILENAME_MAX];
+
+int Devices_H_CountOpen(void)
+{
+	int r = 0;
+	int i;
+	for (i = 0; i < 8; i++)
+		if (h_fp[i] != NULL)
+			r++;
+	return r;
+}
+
+void Devices_H_CloseAll(void)
+{
+	int i;
+	for (i = 0; i < 8; i++)
+		if (h_fp[i] != NULL) {
+			Util_fclose(h_fp[i], h_tmpbuf[i]);
+			h_fp[i] = NULL;
+		}
+}
+
+static void Devices_H_Init(void)
+{
+	if (devbug)
+		Log_print("HHINIT");
+	Devices_h_current_dir[0][0] = '\0';
+	Devices_h_current_dir[1][0] = '\0';
+	Devices_h_current_dir[2][0] = '\0';
+	Devices_h_current_dir[3][0] = '\0';
+	Devices_H_CloseAll();
+}
+
+int Devices_Initialise(int *argc, char *argv[])
+{
+	int i;
+	int j;
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = FALSE;			/* error, argument missing! */
+
+		if (strcmp(argv[i], "-H1") == 0) {
+			if (i_a)
+				Util_strlcpy(Devices_atari_h_dir[0], argv[++i], FILENAME_MAX);
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-H2") == 0) {
+			if (i_a)
+				Util_strlcpy(Devices_atari_h_dir[1], argv[++i], FILENAME_MAX);
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-H3") == 0) {
+			if (i_a)
+				Util_strlcpy(Devices_atari_h_dir[2], argv[++i], FILENAME_MAX);
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-H4") == 0) {
+			if (i_a)
+				Util_strlcpy(Devices_atari_h_dir[3], argv[++i], FILENAME_MAX);
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-Hpath") == 0) {
+			if (i_a)
+				Util_strlcpy(Devices_h_exe_path, argv[++i], FILENAME_MAX);
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-hreadonly") == 0)
+			Devices_h_read_only = TRUE;
+		else if (strcmp(argv[i], "-hreadwrite") == 0)
+			Devices_h_read_only = FALSE;
+		else if (strcmp(argv[i], "-devbug") == 0)
+			devbug = TRUE;
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-H1 <path>       Set path for H1: device");
+				Log_print("\t-H2 <path>       Set path for H2: device");
+				Log_print("\t-H3 <path>       Set path for H3: device");
+				Log_print("\t-H4 <path>       Set path for H4: device");
+				Log_print("\t-Hpath <path>    Set path for Atari executables on the H: device");
+				Log_print("\t-hreadonly       Enable read-only mode for H: device");
+				Log_print("\t-hreadwrite      Disable read-only mode for H: device");
+				Log_print("\t-devbug          Debugging messages for H: and P: devices");
+			}
+			argv[j++] = argv[i];
+		}
+
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return FALSE;
+		}
+	}
+	*argc = j;
+	Devices_H_Init();
+
+	return TRUE;
+}
+
+#define IS_DIR_SEP(c) ((c) == '/' || (c) == '\\' || (c) == ':' || (c) == '>')
+
+static int Devices_IsValidForFilename(char ch)
+{
+	if ((ch >= 'A' && ch <= 'Z')
+	 || (ch >= 'a' && ch <= 'z')
+	 || (ch >= '0' && ch <= '9'))
+		return TRUE;
+	switch (ch) {
+	case '!':
+	case '#':
+	case '$':
+	case '&':
+	case '\'':
+	case '(':
+	case ')':
+	case '*':
+	case '-':
+	case '.':
+	case '?':
+	case '@':
+	case '_':
+		return TRUE;
+	default:
+		return FALSE;
+	}
+}
+
+UWORD Devices_SkipDeviceName(void)
+{
+	UWORD bufadr;
+	for (bufadr = MEMORY_dGetWordAligned(Devices_ICBALZ); ; bufadr++) {
+		char c = (char) MEMORY_dGetByte(bufadr);
+		if (c == ':')
+			return (UWORD) (bufadr + 1);
+		if (c < '!' || c > '\x7e')
+			return 0;
+	}
+}
+
+/* devnum must be 0-3; p must point inside atari_filename */
+static UWORD Devices_GetAtariPath(int devnum, char *p)
+{
+	UWORD bufadr = Devices_SkipDeviceName();
+	if (bufadr != 0) {
+		while (p < atari_filename + sizeof(atari_filename) - 1) {
+			char c = (char) MEMORY_dGetByte(bufadr);
+			if (Devices_IsValidForFilename(c) || IS_DIR_SEP(c) || c == '<') {
+				*p++ = c;
+				bufadr++;
+			}
+			else {
+				/* end of filename */
+				/* now apply it to Devices_h_current_dir */
+				const char *q = atari_filename;
+				*p = '\0';
+				if (IS_DIR_SEP(*q)) {
+					/* absolute path on H: device */
+					q++;
+					p = atari_path;
+				}
+				else {
+					strcpy(atari_path, Devices_h_current_dir[devnum]);
+					p = atari_path + strlen(atari_path);
+				}
+				for (;;) {
+					/* we are here at the beginning of a path element,
+					   i.e. at the beginning of atari_path or after Util_DIR_SEP_CHAR */
+					if (*q == '<'
+					 || (*q == '.' && q[1] == '.' && (q[2] == '\0' || IS_DIR_SEP(q[2])))) {
+						/* "<" or "..": parent directory */
+						if (p == atari_path) {
+							CPU_regY = 150; /* Sparta: directory not found */
+							CPU_SetN;
+							return 0;
+						}
+						do
+							p--;
+						while (p > atari_path && p[-1] != Util_DIR_SEP_CHAR);
+						if (*q == '.') {
+							if (q[2] != '\0')
+								q++;
+							q++;
+						}
+						q++;
+						continue;
+					}
+					if (IS_DIR_SEP(*q)) {
+						/* duplicate DIR_SEP */
+						CPU_regY = 165; /* bad filename */
+						CPU_SetN;
+						return 0;
+					}
+					do {
+						if (p >= atari_path + sizeof(atari_path) - 1) {
+							CPU_regY = 165; /* bad filename */
+							CPU_SetN;
+							return 0;
+						}
+						*p++ = *q;
+						if (*q == '\0')
+							return bufadr;
+						q++;
+					} while (!IS_DIR_SEP(*q));
+					*p++ = Util_DIR_SEP_CHAR;
+					q++;
+				}
+			}
+		}
+	}
+	CPU_regY = 165; /* bad filename */
+	CPU_SetN;
+	return 0;
+}
+
+static int Devices_GetIOCB(void)
+{
+	if ((CPU_regX & 0x8f) != 0) {
+		CPU_regY = 134; /* invalid IOCB number */
+		CPU_SetN;
+		return FALSE;
+	}
+	h_iocb = CPU_regX >> 4;
+	return TRUE;
+}
+
+static int Devices_GetNumber(int set_textmode)
+{
+	int devnum;
+	if (!Devices_GetIOCB())
+		return -1;
+	devnum = MEMORY_dGetByte(Devices_ICDNOZ);
+	if (devnum > 9 || devnum == 0 || devnum == 5) {
+		CPU_regY = 160; /* invalid unit/drive number */
+		CPU_SetN;
+		return -1;
+	}
+	if (devnum < 5) {
+		if (set_textmode)
+			h_textmode[h_iocb] = FALSE;
+		return devnum - 1;
+	}
+	if (set_textmode)
+		h_textmode[h_iocb] = TRUE;
+	return devnum - 6;
+}
+
+static UWORD Devices_GetHostPath(int set_textmode)
+{
+	UWORD bufadr;
+	h_devnum = Devices_GetNumber(set_textmode);
+	if (h_devnum < 0)
+		return 0;
+	bufadr = Devices_GetAtariPath(h_devnum, atari_filename);
+	if (bufadr == 0)
+		return 0;
+	Util_catpath(host_path, Devices_atari_h_dir[h_devnum], atari_path);
+	return bufadr;
+}
+
+static void Devices_H_Open(void)
+{
+	FILE *fp;
+	UBYTE aux1;
+#ifdef DO_DIR
+	UBYTE aux2;
+	char entryname[FILENAME_MAX];
+	int isdir;
+	int readonly;
+	int size;
+	char timetext[16];
+#endif
+
+	if (devbug)
+		Log_print("HHOPEN");
+
+	if (Devices_GetHostPath(TRUE) == 0)
+		return;
+
+	if (h_fp[h_iocb] != NULL)
+		Util_fclose(h_fp[h_iocb], h_tmpbuf[h_iocb]);
+
+#if 0
+	if (devbug)
+		Log_print("atari_filename=\"%s\", atari_path=\"%s\" host_path=\"%s\"", atari_filename, atari_path, host_path);
+#endif
+
+	fp = NULL;
+	h_wascr[h_iocb] = FALSE;
+	h_lastop[h_iocb] = 'o';
+
+	aux1 = MEMORY_dGetByte(Devices_ICAX1Z);
+	switch (aux1) {
+	case 4:
+		/* don't bother using "r" for textmode:
+		   we want to support LF, CR/LF and CR, not only native EOLs */
+		fp = Util_fopen(host_path, "rb", h_tmpbuf[h_iocb]);
+		if (fp != NULL) {
+			CPU_regY = 1;
+			CPU_ClrN;
+		}
+		else {
+			CPU_regY = 170; /* file not found */
+			CPU_SetN;
+		}
+		break;
+#ifdef DO_DIR
+	case 6:
+	case 7:
+		fp = Util_tmpopen(h_tmpbuf[h_iocb]);
+		if (fp == NULL) {
+			CPU_regY = 144; /* device done error */
+			CPU_SetN;
+			break;
+		}
+		if (!Devices_OpenDir(host_path)) {
+			Util_fclose(fp, h_tmpbuf[h_iocb]);
+			fp = NULL;
+			CPU_regY = 144; /* device done error */
+			CPU_SetN;
+			break;
+		}
+		aux2 = MEMORY_dGetByte(Devices_ICAX2Z);
+		if (aux2 >= 128) {
+			fprintf(fp, "\nVolume:    HDISK%c\nDirectory: ", '1' + h_devnum);
+			/* if (strcmp(dir_path, Devices_atari_h_dir[h_devnum]) == 0) */
+			if (strchr(atari_path, Util_DIR_SEP_CHAR) == NULL)
+				fprintf(fp, "MAIN\n\n");
+			else {
+				char end_dir_str[FILENAME_MAX];
+				Util_splitpath(dir_path, NULL, end_dir_str);
+				fprintf(fp, "%s\n\n", /* Util_strupper */(end_dir_str));
+			}
+		}
+
+		while (Devices_ReadDir(NULL, entryname, &isdir, &readonly, &size,
+		                      (aux2 >= 128) ? timetext : NULL)) {
+			char *ext;
+			/* Util_strupper(entryname); */
+			ext = strrchr(entryname, '.');
+			if (ext == NULL)
+				ext = "";
+			else {
+				/* replace the dot with NUL,
+				   so entryname is without extension */
+				*ext++ = '\0';
+				if (ext[0] != '\0' && ext[1] != '\0' && ext[2] != '\0' && ext[3] != '\0') {
+					ext[2] = '+';
+					ext[3] = '\0';
+				}
+			}
+			if (strlen(entryname) > 8) {
+				entryname[7] = '+';
+				entryname[8] = '\0';
+			}
+			if (aux2 >= 128) {
+				if (isdir)
+					fprintf(fp, "%-13s<DIR>  %s\n", entryname, timetext);
+				else {
+					if (size > 999999)
+						size = 999999;
+					fprintf(fp, "%-9s%-3s %6d %s\n", entryname, ext, size, timetext);
+				}
+			}
+			else {
+				char dirchar = ' ';
+				size = (size + 255) >> 8;
+				if (size > 999)
+					size = 999;
+				if (isdir) {
+					if (MEMORY_dGetByte(0x700) == 'M') /* MyDOS */
+						dirchar = ':';
+					else /* Sparta */
+						ext = "\304\311\322"; /* "DIR" with bit 7 set */
+				}
+				fprintf(fp, "%c%c%-8s%-3s %03d\n", readonly ? '*' : ' ',
+				        dirchar, entryname, ext, size);
+			}
+		}
+
+		if (aux2 >= 128)
+			fprintf(fp, "   999 FREE SECTORS\n");
+		else
+			fprintf(fp, "999 FREE SECTORS\n");
+
+		Util_rewind(fp);
+		h_textmode[h_iocb] = TRUE;
+		CPU_regY = 1;
+		CPU_ClrN;
+		break;
+#endif /* DO_DIR */
+	case 8: /* write: "w" */
+	case 9: /* write at end of file (append): "a" */
+	case 12: /* write and read (update): "r+" || "w+" */
+	case 13: /* append and read: "a+" */
+		if (Devices_h_read_only) {
+			CPU_regY = 163; /* disk write-protected */
+			CPU_SetN;
+			break;
+		}
+		{
+			char mode[4];
+			char *p = mode + 1;
+			mode[0] = (aux1 & 1) ? 'a' : (aux1 < 12) ? 'w' : 'r';
+			if (!h_textmode[h_iocb])
+				*p++ = 'b';
+			if (aux1 >= 12)
+				*p++ = '+';
+			*p = '\0';
+			fp = Util_fopen(host_path, mode, h_tmpbuf[h_iocb]);
+			if (fp == NULL && aux1 == 12) {
+				mode[0] = 'w';
+				fp = Util_fopen(host_path, mode, h_tmpbuf[h_iocb]);
+			}
+		}
+		if (fp != NULL) {
+			CPU_regY = 1;
+			CPU_ClrN;
+		}
+		else {
+			CPU_regY = 144; /* device done error */
+			CPU_SetN;
+		}
+		break;
+	default:
+		CPU_regY = 168; /* invalid device command */
+		CPU_SetN;
+		break;
+	}
+	h_fp[h_iocb] = fp;
+}
+
+static void Devices_H_Close(void)
+{
+	if (devbug)
+		Log_print("HHCLOS");
+	if (!Devices_GetIOCB())
+		return;
+	if (h_fp[h_iocb] != NULL) {
+		Util_fclose(h_fp[h_iocb], h_tmpbuf[h_iocb]);
+		h_fp[h_iocb] = NULL;
+	}
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+static void Devices_H_Read(void)
+{
+	if (devbug)
+		Log_print("HHREAD");
+	if (!Devices_GetIOCB())
+		return;
+	if (h_fp[h_iocb] != NULL) {
+		int ch;
+		if (h_lastop[h_iocb] == 'w')
+			fseek(h_fp[h_iocb], 0, SEEK_CUR);
+		h_lastop[h_iocb] = 'r';
+		ch = fgetc(h_fp[h_iocb]);
+		if (ch != EOF) {
+			if (h_textmode[h_iocb]) {
+				switch (ch) {
+				case 0x0d:
+					h_wascr[h_iocb] = TRUE;
+					ch = 0x9b;
+					break;
+				case 0x0a:
+					if (h_wascr[h_iocb]) {
+						/* ignore LF next to CR */
+						ch = fgetc(h_fp[h_iocb]);
+						if (ch != EOF) {
+							if (ch == 0x0d) {
+								h_wascr[h_iocb] = TRUE;
+								ch = 0x9b;
+							}
+							else
+								h_wascr[h_iocb] = FALSE;
+						}
+						else {
+							CPU_regY = 136; /* end of file */
+							CPU_SetN;
+							break;
+						}
+					}
+					else
+						ch = 0x9b;
+					break;
+				default:
+					h_wascr[h_iocb] = FALSE;
+					break;
+				}
+			}
+			CPU_regA = (UBYTE) ch;
+			CPU_regY = 1;
+			CPU_ClrN;
+		}
+		else {
+			CPU_regY = 136; /* end of file */
+			CPU_SetN;
+		}
+	}
+	else {
+		CPU_regY = 136; /* end of file; XXX: this seems to be what Atari DOSes return */
+		CPU_SetN;
+	}
+}
+
+static void Devices_H_Write(void)
+{
+	if (devbug)
+		Log_print("HHWRIT");
+	if (!Devices_GetIOCB())
+		return;
+	if (h_fp[h_iocb] != NULL) {
+		int ch;
+		if (h_lastop[h_iocb] == 'r')
+			fseek(h_fp[h_iocb], 0, SEEK_CUR);
+		h_lastop[h_iocb] = 'w';
+		ch = CPU_regA;
+		if (ch == 0x9b && h_textmode[h_iocb])
+			ch = '\n';
+		fputc(ch, h_fp[h_iocb]);
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+	else {
+		CPU_regY = 135; /* attempted to write to a read-only device */
+		            /* XXX: this seems to be what Atari DOSes return */
+		CPU_SetN;
+	}
+}
+
+static void Devices_H_Status(void)
+{
+	if (devbug)
+		Log_print("HHSTAT");
+
+	CPU_regY = 146; /* function not implemented in handler; XXX: check file existence? */
+	CPU_SetN;
+}
+
+#define CHECK_READ_ONLY \
+	if (Devices_h_read_only) { \
+		CPU_regY = 163; \
+		CPU_SetN; \
+		return; \
+	}
+
+#ifdef DO_RENAME
+
+static void fillin(const char *pattern, char *filename)
+{
+	const char *filename_end = filename + strlen(filename);
+	for (;;) {
+		switch (*pattern) {
+		case '\0':
+			*filename = '\0';
+			return;
+		case '?':
+			pattern++;
+			if (filename < filename_end)
+				filename++;
+			break;
+		case '*':
+			if (filename >= filename_end || *filename == pattern[1])
+				pattern++;
+			else
+				filename++;
+			break;
+		default:
+			*filename++ = *pattern++;
+			break;
+		}
+	}
+}
+
+static void Devices_H_Rename(void)
+{
+	UWORD bufadr;
+	char c;
+	char *p;
+	int num_changed = 0;
+	int num_failed = 0;
+	int num_locked = 0;
+	int readonly = FALSE;
+
+	if (devbug)
+		Log_print("RENAME Command");
+	CHECK_READ_ONLY;
+
+	bufadr = Devices_GetHostPath(FALSE);
+	if (bufadr == 0)
+		return;
+	/* skip space between filenames */
+	for (;;) {
+		c = (char) MEMORY_dGetByte(bufadr);
+		if (Devices_IsValidForFilename(c))
+			break;
+		if (c == '\0' || (UBYTE) c > 0x80 || IS_DIR_SEP(c)) {
+			CPU_regY = 165; /* bad filename */
+			CPU_SetN;
+			return;
+		}
+		bufadr++;
+	}
+	/* get new filename */
+	p = new_filename;
+	do {
+		if (p >= new_filename + sizeof(new_filename) - 1) {
+			CPU_regY = 165; /* bad filename */
+			CPU_SetN;
+			return;
+		}
+		*p++ = c;
+		bufadr++;
+		c = (char) MEMORY_dGetByte(bufadr);
+	} while (Devices_IsValidForFilename(c));
+	*p = '\0';
+
+#ifdef DO_DIR
+	if (!Devices_OpenDir(host_path)) {
+		CPU_regY = 170; /* file not found */
+		CPU_SetN;
+		return;
+	}
+	while (Devices_ReadDir(host_path, NULL, NULL, &readonly, NULL, NULL))
+#endif /* DO_DIR */
+	{
+		/* Check file write permission to mimic Atari
+		   permission system: read-only ("locked") file
+		   cannot be renamed. */
+		if (readonly)
+			num_locked++;
+		else {
+			char new_dirpart[FILENAME_MAX];
+			char new_filepart[FILENAME_MAX];
+			char new_path[FILENAME_MAX];
+			/* split old filepath into dir part and file part */
+			Util_splitpath(host_path, new_dirpart, new_filepart);
+			/* replace old file part with new file part */
+			fillin(new_filename, new_filepart);
+			/* combine new filepath */
+			Util_catpath(new_path, new_dirpart, new_filepart);
+			if (Devices_Rename(host_path, new_path))
+				num_changed++;
+			else
+				num_failed++;
+		}
+	}
+
+	if (devbug)
+		Log_print("%d renamed, %d failed, %d locked",
+		       num_changed, num_failed, num_locked);
+
+	if (num_locked) {
+		CPU_regY = 167; /* file locked */
+		CPU_SetN;
+	}
+	else if (num_failed != 0 || num_changed == 0) {
+		CPU_regY = 170; /* file not found */
+		CPU_SetN;
+	}
+	else {
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+}
+
+#endif /* DO_RENAME */
+
+#ifdef HAVE_UTIL_UNLINK
+
+static void Devices_H_Delete(void)
+{
+	int num_deleted = 0;
+	int num_failed = 0;
+	int num_locked = 0;
+	int readonly = FALSE;
+
+	if (devbug)
+		Log_print("DELETE Command");
+	CHECK_READ_ONLY;
+
+	if (Devices_GetHostPath(FALSE) == 0)
+		return;
+
+#ifdef DO_DIR
+	if (!Devices_OpenDir(host_path)) {
+		CPU_regY = 170; /* file not found */
+		CPU_SetN;
+		return;
+	}
+	while (Devices_ReadDir(host_path, NULL, NULL, &readonly, NULL, NULL))
+#endif /* DO_DIR */
+	{
+		/* Check file write permission to mimic Atari
+		   permission system: read-only ("locked") file
+		   cannot be deleted. Modern systems have
+		   a different permission for file deletion. */
+		if (readonly)
+			num_locked++;
+		else
+			if (Util_unlink(host_path) == 0)
+				num_deleted++;
+			else
+				num_failed++;
+	}
+
+	if (devbug)
+		Log_print("%d deleted, %d failed, %d locked",
+		       num_deleted, num_failed, num_locked);
+
+	if (num_locked) {
+		CPU_regY = 167; /* file locked */
+		CPU_SetN;
+	}
+	else if (num_failed != 0 || num_deleted == 0) {
+		CPU_regY = 170; /* file not found */
+		CPU_SetN;
+	}
+	else {
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+}
+
+#endif /* HAVE_UTIL_UNLINK */
+
+#ifdef DO_LOCK
+
+static void Devices_H_LockUnlock(int readonly)
+{
+	int num_changed = 0;
+	int num_failed = 0;
+
+	CHECK_READ_ONLY;
+
+	if (Devices_GetHostPath(FALSE) == 0)
+		return;
+
+#ifdef DO_DIR
+	if (!Devices_OpenDir(host_path)) {
+		CPU_regY = 170; /* file not found */
+		CPU_SetN;
+		return;
+	}
+	while (Devices_ReadDir(host_path, NULL, NULL, NULL, NULL, NULL))
+#endif /* DO_DIR */
+	{
+		if (Devices_SetReadOnly(host_path, readonly))
+			num_changed++;
+		else
+			num_failed++;
+	}
+
+	if (devbug)
+		Log_print("%d changed, %d failed",
+		       num_changed, num_failed);
+
+	if (num_failed != 0 || num_changed == 0) {
+		CPU_regY = 170; /* file not found */
+		CPU_SetN;
+	}
+	else {
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+}
+
+static void Devices_H_Lock(void)
+{
+	if (devbug)
+		Log_print("LOCK Command");
+	Devices_H_LockUnlock(TRUE);
+}
+
+static void Devices_H_Unlock(void)
+{
+	if (devbug)
+		Log_print("UNLOCK Command");
+	Devices_H_LockUnlock(FALSE);
+}
+
+#endif /* DO_LOCK */
+
+static void Devices_H_Note(void)
+{
+	if (devbug)
+		Log_print("NOTE Command");
+	if (!Devices_GetIOCB())
+		return;
+	if (h_fp[h_iocb] != NULL) {
+		long pos = ftell(h_fp[h_iocb]);
+		if (pos >= 0) {
+			int iocb = Devices_IOCB0 + h_iocb * 16;
+			MEMORY_dPutByte(iocb + Devices_ICAX5, (UBYTE) pos);
+			MEMORY_dPutByte(iocb + Devices_ICAX3, (UBYTE) (pos >> 8));
+			MEMORY_dPutByte(iocb + Devices_ICAX4, (UBYTE) (pos >> 16));
+			CPU_regY = 1;
+			CPU_ClrN;
+		}
+		else {
+			CPU_regY = 144; /* device done error */
+			CPU_SetN;
+		}
+	}
+	else {
+		CPU_regY = 130; /* specified device does not exist; XXX: correct? */
+		CPU_SetN;
+	}
+}
+
+static void Devices_H_Point(void)
+{
+	if (devbug)
+		Log_print("POINT Command");
+	if (!Devices_GetIOCB())
+		return;
+	if (h_fp[h_iocb] != NULL) {
+		int iocb = Devices_IOCB0 + h_iocb * 16;
+		long pos = (MEMORY_dGetByte(iocb + Devices_ICAX4) << 16) +
+			(MEMORY_dGetByte(iocb + Devices_ICAX3) << 8) + (MEMORY_dGetByte(iocb + Devices_ICAX5));
+		if (fseek(h_fp[h_iocb], pos, SEEK_SET) == 0) {
+			CPU_regY = 1;
+			CPU_ClrN;
+		}
+		else {
+			CPU_regY = 166; /* invalid POINT request */
+			CPU_SetN;
+		}
+	}
+	else {
+		CPU_regY = 130; /* specified device does not exist; XXX: correct? */
+		CPU_SetN;
+	}
+}
+
+static FILE *binf = NULL;
+static int runBinFile;
+static int initBinFile;
+
+/* Read a word from file */
+static int Devices_H_BinReadWord(void)
+{
+	UBYTE buf[2];
+	if (fread(buf, 1, 2, binf) != 2) {
+		fclose(binf);
+		binf = NULL;
+		if (BINLOAD_start_binloading) {
+			BINLOAD_start_binloading = FALSE;
+			Log_print("binload: not valid BIN file");
+			CPU_regY = 180; /* MyDOS: not a binary file */
+			CPU_SetN;
+			return -1;
+		}
+		if (runBinFile)
+			CPU_regPC = MEMORY_dGetWordAligned(0x2e0);
+		CPU_regY = 1;
+		CPU_ClrN;
+		return -1;
+	}
+	return buf[0] + (buf[1] << 8);
+}
+
+static void Devices_H_BinLoaderCont(void)
+{
+	if (binf == NULL)
+		return;
+	if (BINLOAD_start_binloading) {
+		MEMORY_dPutByte(0x244, 0);
+		MEMORY_dPutByte(0x09, 1);
+	}
+	else
+		CPU_regS += 2;				/* pop ESC code */
+
+	MEMORY_dPutByte(0x2e3, 0xd7);
+	do {
+		int temp;
+		UWORD from;
+		UWORD to;
+		do
+			temp = Devices_H_BinReadWord();
+		while (temp == 0xffff);
+		if (temp < 0)
+			return;
+		from = (UWORD) temp;
+
+		temp = Devices_H_BinReadWord();
+		if (temp < 0)
+			return;
+		to = (UWORD) temp;
+
+		if (devbug)
+			Log_print("H: Load: From %04X to %04X", from, to);
+
+		if (BINLOAD_start_binloading) {
+			if (runBinFile)
+				MEMORY_dPutWordAligned(0x2e0, from);
+			BINLOAD_start_binloading = FALSE;
+		}
+
+		to++;
+		do {
+			int byte = fgetc(binf);
+			if (byte == EOF) {
+				fclose(binf);
+				binf = NULL;
+				if (runBinFile)
+					CPU_regPC = MEMORY_dGetWordAligned(0x2e0);
+				if (initBinFile && (MEMORY_dGetByte(0x2e3) != 0xd7)) {
+					/* run INIT routine which RTSes directly to RUN routine */
+					CPU_regPC--;
+					MEMORY_dPutByte(0x0100 + CPU_regS--, CPU_regPC >> 8);	/* high */
+					MEMORY_dPutByte(0x0100 + CPU_regS--, CPU_regPC & 0xff);	/* low */
+					CPU_regPC = MEMORY_dGetWordAligned(0x2e2);
+				}
+				return;
+			}
+			MEMORY_PutByte(from, (UBYTE) byte);
+			from++;
+		} while (from != to);
+	} while (!initBinFile || MEMORY_dGetByte(0x2e3) == 0xd7);
+
+	CPU_regS--;
+	ESC_Add((UWORD) (0x100 + CPU_regS), ESC_BINLOADER_CONT, Devices_H_BinLoaderCont);
+	CPU_regS--;
+	MEMORY_dPutByte(0x0100 + CPU_regS--, 0x01);	/* high */
+	MEMORY_dPutByte(0x0100 + CPU_regS, CPU_regS + 1);	/* low */
+	CPU_regS--;
+	CPU_regPC = MEMORY_dGetWordAligned(0x2e2);
+	CPU_SetC;
+
+	MEMORY_dPutByte(0x0300, 0x31);		/* for "Studio Dream" */
+}
+
+static void Devices_H_LoadProceed(int mydos)
+{
+	/* Log_print("MyDOS %d, AX1 %d, AX2 %d", mydos, MEMORY_dGetByte(Devices_ICAX1Z), MEMORY_dGetByte(Devices_ICAX2Z)); */
+	if (mydos) {
+		switch (MEMORY_dGetByte(Devices_ICAX1Z) /* XXX: & 7 ? */) {
+		case 4:
+			runBinFile = TRUE;
+			initBinFile = TRUE;
+			break;
+		case 5:
+			runBinFile = TRUE;
+			initBinFile = FALSE;
+			break;
+		case 6:
+			runBinFile = FALSE;
+			initBinFile = TRUE;
+			break;
+		case 7:
+		default:
+			runBinFile = FALSE;
+			initBinFile = FALSE;
+			break;
+		}
+	}
+	else {
+		if (MEMORY_dGetByte(Devices_ICAX2Z) < 128)
+			runBinFile = TRUE;
+		else
+			runBinFile = FALSE;
+		initBinFile = TRUE;
+	}
+
+	BINLOAD_start_binloading = TRUE;
+	Devices_H_BinLoaderCont();
+}
+
+static void Devices_H_Load(int mydos)
+{
+	const char *p;
+	UBYTE buf[2];
+	if (devbug)
+		Log_print("LOAD Command");
+	h_devnum = Devices_GetNumber(FALSE);
+	if (h_devnum < 0)
+		return;
+
+	/* search for program on Devices_h_exe_path */
+	for (p = Devices_h_exe_path; *p != '\0'; ) {
+		int devnum;
+		const char *q;
+		char *r;
+		if (p[0] == 'H' && p[1] >= '1' && p[1] <= '4' && p[2] == ':') {
+			devnum = p[1] - '1';
+			p += 3;
+		}
+		else
+			devnum = h_devnum;
+		for (q = p; *q != '\0' && *q != ';'; q++);
+		r = atari_filename + (q - p);
+		if (q != p) {
+			memcpy(atari_filename, p, q - p);
+			if (!IS_DIR_SEP(q[-1]))
+				*r++ = '>';
+		}
+		if (Devices_GetAtariPath(devnum, r) == 0)
+			return;
+		Util_catpath(host_path, Devices_atari_h_dir[devnum], atari_path);
+		binf = fopen(host_path, "rb");
+		if (binf != NULL || *q == '\0')
+			break;
+		p = q + 1;
+	}
+
+	if (binf == NULL) {
+		/* open from the specified location */
+		if (Devices_GetAtariPath(h_devnum, atari_filename) == 0)
+			return;
+		Util_catpath(host_path, Devices_atari_h_dir[h_devnum], atari_path);
+		binf = fopen(host_path, "rb");
+		if (binf == NULL) {
+			CPU_regY = 170;
+			CPU_SetN;
+			return;
+		}
+	}
+
+	/* check header */
+	if (fread(buf, 1, 2, binf) != 2 || buf[0] != 0xff || buf[1] != 0xff) {
+		fclose(binf);
+		binf = NULL;
+		Log_print("H: load: not valid BIN file");
+		CPU_regY = 180;
+		CPU_SetN;
+		return;
+	}
+
+	Devices_H_LoadProceed(mydos);
+}
+
+static void Devices_H_FileLength(void)
+{
+	if (devbug)
+		Log_print("Get File Length Command");
+	if (!Devices_GetIOCB())
+		return;
+	/* if IOCB is closed then assume it is a MyDOS Load File command */
+	if (h_fp[h_iocb] == NULL)
+		Devices_H_Load(TRUE);
+	/* if we are running MyDOS then assume it is a MyDOS Load File command */
+	else if (MEMORY_dGetByte(0x700) == 'M') {
+		/* XXX: if (binf != NULL) fclose(binf); ? */
+		binf = h_fp[h_iocb];
+		Devices_H_LoadProceed(TRUE);
+		/* XXX: don't close binf when complete? */
+	}
+	/* otherwise assume it is a file length command */
+	else {
+		int iocb = Devices_IOCB0 + h_iocb * 16;
+		int filesize;
+#if 0
+		/* old, less portable implementation */
+		struct stat fstatus;
+		fstat(fileno(h_fp[h_iocb]), &fstatus);
+		filesize = fstatus.st_size;
+#else
+		FILE *fp = h_fp[h_iocb];
+		long currentpos = ftell(fp);
+		filesize = Util_flen(fp);
+		fseek(fp, currentpos, SEEK_SET);
+#endif
+		MEMORY_dPutByte(iocb + Devices_ICAX3, (UBYTE) filesize);
+		MEMORY_dPutByte(iocb + Devices_ICAX4, (UBYTE) (filesize >> 8));
+		MEMORY_dPutByte(iocb + Devices_ICAX5, (UBYTE) (filesize >> 16));
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+}
+
+#ifdef DO_MKDIR
+static void Devices_H_MakeDirectory(void)
+{
+	if (devbug)
+		Log_print("MKDIR Command");
+	CHECK_READ_ONLY;
+
+	if (Devices_GetHostPath(FALSE) == 0)
+		return;
+
+	if (Devices_MakeDirectory(host_path)) {
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+	else {
+		CPU_regY = 144; /* device done error */
+		CPU_SetN;
+	}
+}
+#endif
+
+#ifdef DO_RMDIR
+static void Devices_H_RemoveDirectory(void)
+{
+	if (devbug)
+		Log_print("RMDIR Command");
+	CHECK_READ_ONLY;
+
+	if (Devices_GetHostPath(FALSE) == 0)
+		return;
+
+	CPU_regY = Devices_RemoveDirectory(host_path);
+	if (CPU_regY >= 128)
+		CPU_SetN;
+	else
+		CPU_ClrN;
+}
+#endif
+
+static void Devices_H_ChangeDirectory(void)
+{
+	if (devbug)
+		Log_print("CD Command");
+
+	if (Devices_GetHostPath(FALSE) == 0)
+		return;
+
+	if (!Util_direxists(host_path)) {
+		CPU_regY = 150;
+		CPU_SetN;
+		return;
+	}
+
+	if (atari_path[0] == '\0')
+		Devices_h_current_dir[h_devnum][0] = '\0';
+	else {
+		char *p = Util_stpcpy(Devices_h_current_dir[h_devnum], atari_path);
+		p[0] = Util_DIR_SEP_CHAR;
+		p[1] = '\0';
+	}
+
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+static void Devices_H_DiskInfo(void)
+{
+	static UBYTE info[16] = {
+		0x20,                                                  /* disk version: Sparta >= 2.0 */
+		0x00,                                                  /* sector size: 0x100 */
+		0xff, 0xff,                                            /* total sectors: 0xffff */
+		0xff, 0xff,                                            /* free sectors: 0xffff */
+		'H', 'D', 'I', 'S', 'K', '1' /* + devnum */, ' ', ' ', /* disk name */
+		1,                                                     /* seq. number (number of writes) */
+		1 /* + devnum */                                       /* random number (disk id) */
+	};
+	int devnum;
+
+	if (devbug)
+		Log_print("Get Disk Information Command");
+
+	devnum = Devices_GetNumber(FALSE);
+	if (devnum < 0)
+		return;
+
+	info[11] = (UBYTE) ('1' + devnum);
+	info[15] = (UBYTE) (1 + devnum);
+	MEMORY_CopyToMem(info, (UWORD) MEMORY_dGetWordAligned(Devices_ICBLLZ), 16);
+
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+static void Devices_H_ToAbsolutePath(void)
+{
+	UWORD bufadr;
+	const char *p;
+
+	if (devbug)
+		Log_print("To Absolute Path Command");
+
+	if (Devices_GetHostPath(FALSE) == 0)
+		return;
+
+	/* XXX: we sometimes check here for directories
+	   with a trailing Util_DIR_SEP_CHAR. It seems to work on Win32 and DJGPP. */
+	if (!Util_direxists(host_path)) {
+		CPU_regY = 150;
+		CPU_SetN;
+		return;
+	}
+
+	bufadr = MEMORY_dGetWordAligned(Devices_ICBLLZ);
+	if (atari_path[0] != '\0') {
+		MEMORY_PutByte(bufadr, '>');
+		bufadr++;
+		for (p = atari_path; *p != '\0'; p++) {
+			if (*p == Util_DIR_SEP_CHAR) {
+				if (p[1] == '\0')
+					break;
+				MEMORY_PutByte(bufadr, '>');
+			}
+			else
+				MEMORY_PutByte(bufadr, (UBYTE) *p);
+			bufadr++;
+		}
+	}
+	MEMORY_PutByte(bufadr, 0x00);
+
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+static void Devices_H_Special(void)
+{
+	if (devbug)
+		Log_print("HHSPEC");
+
+	switch (MEMORY_dGetByte(Devices_ICCOMZ)) {
+#ifdef DO_RENAME
+	case 0x20:
+		Devices_H_Rename();
+		return;
+#endif
+#ifdef HAVE_UTIL_UNLINK
+	case 0x21:
+		Devices_H_Delete();
+		return;
+#endif
+#ifdef DO_LOCK
+	case 0x23:
+		Devices_H_Lock();
+		return;
+	case 0x24:
+		Devices_H_Unlock();
+		return;
+#endif
+	case 0x26:
+		Devices_H_Note();
+		return;
+	case 0x25:
+		Devices_H_Point();
+		return;
+	case 0x27: /* Sparta, MyDOS=Load */
+		Devices_H_FileLength();
+		return;
+	case 0x28: /* Sparta */
+		Devices_H_Load(FALSE);
+		return;
+#ifdef DO_MKDIR
+	case 0x22: /* MyDOS */
+	case 0x2a: /* MyDOS, Sparta */
+		Devices_H_MakeDirectory();
+		return;
+#endif
+#ifdef DO_RMDIR
+	case 0x2b: /* Sparta */
+		Devices_H_RemoveDirectory();
+		return;
+#endif
+	case 0x29: /* MyDOS */
+	case 0x2c: /* Sparta */
+		Devices_H_ChangeDirectory();
+		return;
+	case 0x2f: /* Sparta */
+		Devices_H_DiskInfo();
+		return;
+	case 0x30: /* Sparta */
+		Devices_H_ToAbsolutePath();
+		return;
+	case 0xfe:
+		if (devbug)
+			Log_print("FORMAT Command");
+		break;
+	default:
+		if (devbug)
+			Log_print("UNKNOWN Command %02X", MEMORY_dGetByte(Devices_ICCOMZ));
+		break;
+	}
+
+	CPU_regY = 168; /* invalid device command */
+	CPU_SetN;
+}
+
+
+/* P: device emulation --------------------------------------------------- */
+
+char Devices_print_command[256] = "lpr %s";
+
+int Devices_SetPrintCommand(const char *command)
+{
+	const char *p = command;
+	int was_percent_s = FALSE;
+	while (*p != '\0') {
+		if (*p++ == '%') {
+			char c = *p++;
+			if (c == '%')
+				continue; /* %% is safe */
+			if (c == 's' && !was_percent_s) {
+				was_percent_s = TRUE; /* only one %s is safe */
+				continue;
+			}
+			return FALSE;
+		}
+	}
+	strcpy(Devices_print_command, command);
+	return TRUE;
+}
+
+#ifdef HAVE_SYSTEM
+
+static FILE *phf = NULL;
+static char spool_file[FILENAME_MAX];
+
+static void Devices_P_Close(void)
+{
+	if (devbug)
+		Log_print("PHCLOS");
+
+	if (phf != NULL) {
+		fclose(phf);
+		phf = NULL;
+
+#ifdef __PLUS
+		if (!Misc_ExecutePrintCmd(spool_file))
+#endif
+		{
+			char command[256 + FILENAME_MAX]; /* 256 for Devices_print_command + FILENAME_MAX for spool_file */
+			sprintf(command, Devices_print_command, spool_file);
+			system(command);
+#if defined(HAVE_UTIL_UNLINK) && !defined(VMS) && !defined(MACOSX)
+			if (Util_unlink(spool_file) != 0) {
+				perror(spool_file);
+			}
+#endif
+		}
+	}
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+static void Devices_P_Open(void)
+{
+	if (devbug)
+		Log_print("PHOPEN");
+
+	if (phf != NULL)
+		Devices_P_Close();
+
+	phf = Util_uniqopen(spool_file, "w");
+	if (phf != NULL) {
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+	else {
+		CPU_regY = 144; /* device done error */
+		CPU_SetN;
+	}
+}
+
+static void Devices_P_Write(void)
+{
+	UBYTE byte;
+
+	if (devbug)
+		Log_print("PHWRIT");
+
+	byte = CPU_regA;
+	if (byte == 0x9b)
+		byte = '\n';
+
+	fputc(byte, phf);
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+static void Devices_P_Status(void)
+{
+	if (devbug)
+		Log_print("PHSTAT");
+}
+
+static void Devices_P_Init(void)
+{
+	if (devbug)
+		Log_print("PHINIT");
+
+	if (phf != NULL) {
+		fclose(phf);
+		phf = NULL;
+#ifdef HAVE_UTIL_UNLINK
+		Util_unlink(spool_file);
+#endif
+	}
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+#endif /* HAVE_SYSTEM */
+
+
+/* K: and E: handlers for BASIC version, using getchar() and putchar() --- */
+
+#ifdef BASIC
+
+static void Devices_E_Read(void)
+{
+	int ch;
+
+	ch = getchar();
+	switch (ch) {
+	case EOF:
+		Atari800_Exit(FALSE);
+		exit(0);
+		break;
+	case '\n':
+		ch = 0x9b;
+		break;
+	default:
+		break;
+	}
+	CPU_regA = (UBYTE) ch;
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+static void Devices_E_Write(void)
+{
+	UBYTE ch;
+
+	ch = CPU_regA;
+	/* XXX: are '\f', '\b' and '\a' fully portable? */
+	switch (ch) {
+	case 0x7d: /* Clear Screen */
+		putchar('\x0c'); /* ASCII Form Feed */
+		break;
+	case 0x7e:
+		putchar('\x08'); /* ASCII Backspace */
+		break;
+	case 0x7f:
+		putchar('\t');
+		break;
+	case 0x9b:
+		putchar('\n');
+		break;
+	case 0xfd:
+		putchar('\x07'); /* ASCII Bell */
+		break;
+	default:
+		if ((ch >= 0x20) && (ch <= 0x7e))
+			putchar(ch);
+		break;
+	}
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+static void Devices_K_Read(void)
+{
+	int ch;
+	int ch2;
+
+	ch = getchar();
+	switch (ch) {
+	case EOF:
+		Atari800_Exit(FALSE);
+		exit(0);
+		break;
+	case '\n':
+		ch = 0x9b;
+		break;
+	default:
+		/* ignore characters until EOF or EOL */
+		do
+			ch2 = getchar();
+		while (ch2 != EOF && ch2 != '\n');
+		break;
+	}
+	CPU_regA = (UBYTE) ch;
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+#endif /* BASIC */
+
+
+/* Atari BASIC loader ---------------------------------------------------- */
+
+static UWORD ehopen_addr = 0;
+static UWORD ehclos_addr = 0;
+static UWORD ehread_addr = 0;
+static UWORD ehwrit_addr = 0;
+
+static void Devices_IgnoreReady(void);
+static void Devices_GetBasicCommand(void);
+static void Devices_OpenBasicFile(void);
+static void Devices_ReadBasicFile(void);
+static void Devices_CloseBasicFile(void);
+
+static void Devices_RestoreHandler(UWORD address, UBYTE esc_code)
+{
+	ESC_Remove(esc_code);
+	/* restore original OS code */
+	MEMORY_dCopyToMem(Atari800_machine_type == Atari800_MACHINE_XLXE
+	            ? MEMORY_os + address - 0xc000
+	            : MEMORY_os + address - 0xd800,
+	           address, 3);
+}
+
+static void Devices_RestoreEHOPEN(void)
+{
+	Devices_RestoreHandler(ehopen_addr, ESC_EHOPEN);
+}
+
+static void Devices_RestoreEHCLOS(void)
+{
+	Devices_RestoreHandler(ehclos_addr, ESC_EHCLOS);
+}
+
+#ifndef BASIC
+
+static void Devices_RestoreEHREAD(void)
+{
+	Devices_RestoreHandler(ehread_addr, ESC_EHREAD);
+}
+
+static void Devices_RestoreEHWRIT(void)
+{
+	Devices_RestoreHandler(ehwrit_addr, ESC_EHWRIT);
+}
+
+static void Devices_InstallIgnoreReady(void)
+{
+	ESC_AddEscRts(ehwrit_addr, ESC_EHWRIT, Devices_IgnoreReady);
+}
+
+#endif
+
+/* Atari Basic loader step 1: ignore "READY" printed on E: after booting */
+/* or step 6: ignore "READY" printed on E: after the "ENTER" command */
+
+static const UBYTE * const ready_prompt = (const UBYTE *) "\x9bREADY\x9b";
+
+static const UBYTE *ready_ptr = NULL;
+
+static const UBYTE *basic_command_ptr = NULL;
+
+static void Devices_IgnoreReady(void)
+{
+	if (ready_ptr != NULL && CPU_regA == *ready_ptr) {
+		ready_ptr++;
+		if (*ready_ptr == '\0') {
+			ready_ptr = NULL;
+			/* uninstall patch */
+#ifdef BASIC
+			ESC_AddEscRts(ehwrit_addr, ESC_EHWRIT, Devices_E_Write);
+#else
+			CPU_rts_handler = Devices_RestoreEHWRIT;
+#endif
+			if (BINLOAD_loading_basic == BINLOAD_LOADING_BASIC_SAVED) {
+				basic_command_ptr = (const UBYTE *) "RUN \"E:\"\x9b";
+				ESC_AddEscRts(ehread_addr, ESC_EHREAD, Devices_GetBasicCommand);
+			}
+			else if (BINLOAD_loading_basic == BINLOAD_LOADING_BASIC_LISTED) {
+				basic_command_ptr = (const UBYTE *) "ENTER \"E:\"\x9b";
+				ESC_AddEscRts(ehread_addr, ESC_EHREAD, Devices_GetBasicCommand);
+			}
+			else if (BINLOAD_loading_basic == BINLOAD_LOADING_BASIC_RUN) {
+				basic_command_ptr = (const UBYTE *) "RUN\x9b";
+				ESC_AddEscRts(ehread_addr, ESC_EHREAD, Devices_GetBasicCommand);
+			}
+		}
+		CPU_regY = 1;
+		CPU_ClrN;
+		return;
+	}
+	/* not "READY" (maybe "BOOT ERROR" or a DOS message) */
+	if (BINLOAD_loading_basic == BINLOAD_LOADING_BASIC_RUN) {
+		/* don't "RUN" if no "READY" (probably "ERROR") */
+		BINLOAD_loading_basic = 0;
+		ready_ptr = NULL;
+	}
+	if (ready_ptr != NULL) {
+		/* If ready_ptr != ready_prompt then we skipped some characters
+		   from ready_prompt, which weren't part of full ready_prompt.
+		   Well, they probably weren't that important. :-) */
+		ready_ptr = ready_prompt;
+	}
+	/* call original handler */
+#ifdef BASIC
+	Devices_E_Write();
+#else
+	CPU_rts_handler = Devices_InstallIgnoreReady;
+	Devices_RestoreEHWRIT();
+	CPU_regPC = ehwrit_addr;
+#endif
+}
+
+/* Atari Basic loader step 2: type command to load file from E: */
+/* or step 7: type "RUN" for ENTERed program */
+
+static void Devices_GetBasicCommand(void)
+{
+	if (basic_command_ptr != NULL) {
+		CPU_regA = *basic_command_ptr++;
+		CPU_regY = 1;
+		CPU_ClrN;
+		if (*basic_command_ptr != '\0')
+			return;
+		if (BINLOAD_loading_basic == BINLOAD_LOADING_BASIC_SAVED || BINLOAD_loading_basic == BINLOAD_LOADING_BASIC_LISTED)
+			ESC_AddEscRts(ehopen_addr, ESC_EHOPEN, Devices_OpenBasicFile);
+		basic_command_ptr = NULL;
+	}
+#ifdef BASIC
+	ESC_AddEscRts(ehread_addr, ESC_EHREAD, Devices_E_Read);
+#else
+	CPU_rts_handler = Devices_RestoreEHREAD;
+#endif
+}
+
+/* Atari Basic loader step 3: open file */
+
+static void Devices_OpenBasicFile(void)
+{
+	if (BINLOAD_bin_file != NULL) {
+		fseek(BINLOAD_bin_file, 0, SEEK_SET);
+		ESC_AddEscRts(ehclos_addr, ESC_EHCLOS, Devices_CloseBasicFile);
+		ESC_AddEscRts(ehread_addr, ESC_EHREAD, Devices_ReadBasicFile);
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+	CPU_rts_handler = Devices_RestoreEHOPEN;
+}
+
+/* Atari Basic loader step 4: read byte */
+
+static void Devices_ReadBasicFile(void)
+{
+	if (BINLOAD_bin_file != NULL) {
+		int ch = fgetc(BINLOAD_bin_file);
+		if (ch == EOF) {
+			CPU_regY = 136;
+			CPU_SetN;
+			return;
+		}
+		switch (BINLOAD_loading_basic) {
+		case BINLOAD_LOADING_BASIC_LISTED:
+			switch (ch) {
+			case 0x9b:
+				BINLOAD_loading_basic = BINLOAD_LOADING_BASIC_LISTED_ATARI;
+				break;
+			case 0x0a:
+				BINLOAD_loading_basic = BINLOAD_LOADING_BASIC_LISTED_LF;
+				ch = 0x9b;
+				break;
+			case 0x0d:
+				BINLOAD_loading_basic = BINLOAD_LOADING_BASIC_LISTED_CR_OR_CRLF;
+				ch = 0x9b;
+				break;
+			default:
+				break;
+			}
+			break;
+		case BINLOAD_LOADING_BASIC_LISTED_CR:
+			if (ch == 0x0d)
+				ch = 0x9b;
+			break;
+		case BINLOAD_LOADING_BASIC_LISTED_LF:
+			if (ch == 0x0a)
+				ch = 0x9b;
+			break;
+		case BINLOAD_LOADING_BASIC_LISTED_CRLF:
+			if (ch == 0x0a) {
+				ch = fgetc(BINLOAD_bin_file);
+				if (ch == EOF) {
+					CPU_regY = 136;
+					CPU_SetN;
+					return;
+				}
+			}
+			if (ch == 0x0d)
+				ch = 0x9b;
+			break;
+		case BINLOAD_LOADING_BASIC_LISTED_CR_OR_CRLF:
+			if (ch == 0x0a) {
+				BINLOAD_loading_basic = BINLOAD_LOADING_BASIC_LISTED_CRLF;
+				ch = fgetc(BINLOAD_bin_file);
+				if (ch == EOF) {
+					CPU_regY = 136;
+					CPU_SetN;
+					return;
+				}
+			}
+			else
+				BINLOAD_loading_basic = BINLOAD_LOADING_BASIC_LISTED_CR;
+			if (ch == 0x0d)
+				ch = 0x9b;
+			break;
+		case BINLOAD_LOADING_BASIC_SAVED:
+		case BINLOAD_LOADING_BASIC_LISTED_ATARI:
+		default:
+			break;
+		}
+		CPU_regA = (UBYTE) ch;
+		CPU_regY = 1;
+		CPU_ClrN;
+	}
+}
+
+/* Atari Basic loader step 5: close file */
+
+static void Devices_CloseBasicFile(void)
+{
+	if (BINLOAD_bin_file != NULL) {
+		fclose(BINLOAD_bin_file);
+		BINLOAD_bin_file = NULL;
+		/* "RUN" ENTERed program */
+		if (BINLOAD_loading_basic != 0 && BINLOAD_loading_basic != BINLOAD_LOADING_BASIC_SAVED) {
+			ready_ptr = ready_prompt;
+			ESC_AddEscRts(ehwrit_addr, ESC_EHWRIT, Devices_IgnoreReady);
+			BINLOAD_loading_basic = BINLOAD_LOADING_BASIC_RUN;
+		}
+		else
+			BINLOAD_loading_basic = 0;
+	}
+#ifdef BASIC
+	ESC_AddEscRts(ehread_addr, ESC_EHREAD, Devices_E_Read);
+#else
+	Devices_RestoreEHREAD();
+#endif
+	CPU_rts_handler = Devices_RestoreEHCLOS;
+	CPU_regY = 1;
+	CPU_ClrN;
+}
+
+
+/* Patches management ---------------------------------------------------- */
+
+int Devices_enable_h_patch = TRUE;
+int Devices_enable_p_patch = TRUE;
+int Devices_enable_r_patch = FALSE;
+
+/* Devices_PatchOS is called by ESC_PatchOS to modify standard device
+   handlers in Atari OS. It puts escape codes at beginnings of OS routines,
+   so the patches work even if they are called directly, without CIO.
+   Returns TRUE if something has been patched.
+   Currently we only patch P: and, in BASIC version, E: and K:.
+   We don't replace C: with H: now, so the cassette works even
+   if H: is enabled.
+*/
+int Devices_PatchOS(void)
+{
+	UWORD addr;
+	int i;
+	int patched = FALSE;
+
+	switch (Atari800_machine_type) {
+	case Atari800_MACHINE_OSA:
+	case Atari800_MACHINE_OSB:
+		addr = 0xf0e3;
+		break;
+	case Atari800_MACHINE_XLXE:
+		addr = 0xc42e;
+		break;
+	default:
+		return FALSE;
+	}
+
+	for (i = 0; i < 5; i++) {
+		UWORD devtab = MEMORY_dGetWord(addr + 1);
+		switch (MEMORY_dGetByte(addr)) {
+#ifdef HAVE_SYSTEM
+		case 'P':
+			if (Devices_enable_p_patch) {
+				ESC_AddEscRts((UWORD) (MEMORY_dGetWord(devtab + Devices_TABLE_OPEN) + 1),
+				                   ESC_PHOPEN, Devices_P_Open);
+				ESC_AddEscRts((UWORD) (MEMORY_dGetWord(devtab + Devices_TABLE_CLOS) + 1),
+				                   ESC_PHCLOS, Devices_P_Close);
+				ESC_AddEscRts((UWORD) (MEMORY_dGetWord(devtab + Devices_TABLE_WRIT) + 1),
+				                   ESC_PHWRIT, Devices_P_Write);
+				ESC_AddEscRts((UWORD) (MEMORY_dGetWord(devtab + Devices_TABLE_STAT) + 1),
+				                   ESC_PHSTAT, Devices_P_Status);
+				ESC_AddEscRts2((UWORD) (devtab + Devices_TABLE_INIT), ESC_PHINIT,
+				                    Devices_P_Init);
+				patched = TRUE;
+			}
+			else {
+				ESC_Remove(ESC_PHOPEN);
+				ESC_Remove(ESC_PHCLOS);
+				ESC_Remove(ESC_PHWRIT);
+				ESC_Remove(ESC_PHSTAT);
+				ESC_Remove(ESC_PHINIT);
+			}
+			break;
+#endif
+
+		case 'E':
+			if (BINLOAD_loading_basic) {
+				ehopen_addr = MEMORY_dGetWord(devtab + Devices_TABLE_OPEN) + 1;
+				ehclos_addr = MEMORY_dGetWord(devtab + Devices_TABLE_CLOS) + 1;
+				ehread_addr = MEMORY_dGetWord(devtab + Devices_TABLE_READ) + 1;
+				ehwrit_addr = MEMORY_dGetWord(devtab + Devices_TABLE_WRIT) + 1;
+				ready_ptr = ready_prompt;
+				ESC_AddEscRts(ehwrit_addr, ESC_EHWRIT, Devices_IgnoreReady);
+				patched = TRUE;
+			}
+#ifdef BASIC
+			else
+				ESC_AddEscRts((UWORD) (MEMORY_dGetWord(devtab + Devices_TABLE_WRIT) + 1),
+				                   ESC_EHWRIT, Devices_E_Write);
+			ESC_AddEscRts((UWORD) (MEMORY_dGetWord(devtab + Devices_TABLE_READ) + 1),
+			                   ESC_EHREAD, Devices_E_Read);
+			patched = TRUE;
+			break;
+		case 'K':
+			ESC_AddEscRts((UWORD) (MEMORY_dGetWord(devtab + Devices_TABLE_READ) + 1),
+			                   ESC_KHREAD, Devices_K_Read);
+			patched = TRUE;
+			break;
+#endif
+		default:
+			break;
+		}
+		addr += 3;				/* Next Device in HATABS */
+	}
+	return patched;
+}
+
+/* New handling of H: device.
+   Previously we simply replaced C: device in OS with our H:.
+   Now we don't change ROM for H: patch, but add H: to HATABS in RAM
+   and put the device table and patches in unused address space
+   (0xd100-0xd1ff), which is meant for 'new devices' (like hard disk).
+   We have to continuously check if our H: is still in HATABS,
+   because RESET routine in Atari OS clears HATABS and initializes it
+   using a table in ROM (see Devices_PatchOS).
+   Before we put H: entry in HATABS, we must make sure that HATABS is there.
+   For example a program that doesn't use Atari OS can use this memory area
+   for its own data, and we shouldn't place 'H' there.
+   We also allow an Atari program to change address of H: device table.
+   So after we put H: entry in HATABS, we only check if 'H' is still where
+   we put it (h_entry_address).
+   Devices_UpdateHATABSEntry and Devices_RemoveHATABSEntry can be used to add
+   other devices than H:. */
+
+#define HATABS 0x31a
+
+UWORD Devices_UpdateHATABSEntry(char device, UWORD entry_address,
+							   UWORD table_address)
+{
+	UWORD address;
+	if (entry_address != 0 && MEMORY_dGetByte(entry_address) == device)
+		return entry_address;
+	if (MEMORY_dGetByte(HATABS) != 'P' || MEMORY_dGetByte(HATABS + 3) != 'C'
+		|| MEMORY_dGetByte(HATABS + 6) != 'E' || MEMORY_dGetByte(HATABS + 9) != 'S'
+		|| MEMORY_dGetByte(HATABS + 12) != 'K')
+		return entry_address;
+	for (address = HATABS + 15; address < HATABS + 33; address += 3) {
+		if (MEMORY_dGetByte(address) == device)
+			return address;
+		if (MEMORY_dGetByte(address) == 0) {
+			MEMORY_dPutByte(address, device);
+			MEMORY_dPutWord(address + 1, table_address);
+			return address;
+		}
+	}
+	/* HATABS full */
+	return entry_address;
+}
+
+void Devices_RemoveHATABSEntry(char device, UWORD entry_address,
+							  UWORD table_address)
+{
+	if (entry_address != 0 && MEMORY_dGetByte(entry_address) == device
+		&& MEMORY_dGetWord(entry_address + 1) == table_address) {
+		MEMORY_dPutByte(entry_address, 0);
+		MEMORY_dPutWord(entry_address + 1, 0);
+	}
+}
+
+static UWORD h_entry_address = 0;
+#ifdef R_IO_DEVICE
+static UWORD r_entry_address = 0;
+#endif
+
+#define H_DEVICE_BEGIN  0xd140
+#define H_TABLE_ADDRESS 0xd140
+#define H_PATCH_OPEN    0xd150
+#define H_PATCH_CLOS    0xd153
+#define H_PATCH_READ    0xd156
+#define H_PATCH_WRIT    0xd159
+#define H_PATCH_STAT    0xd15c
+#define H_PATCH_SPEC    0xd15f
+#define H_DEVICE_END    0xd161
+
+#ifdef R_IO_DEVICE
+#define R_DEVICE_BEGIN  0xd180
+#define R_TABLE_ADDRESS 0xd180
+#define R_PATCH_OPEN    0xd1a0
+#define R_PATCH_CLOS    0xd1a3
+#define R_PATCH_READ    0xd1a6
+#define R_PATCH_WRIT    0xd1a9
+#define R_PATCH_STAT    0xd1ac
+#define R_PATCH_SPEC    0xd1af
+#define R_PATCH_INIT    0xd1b3
+#define R_DEVICE_END    0xd1b5
+#endif
+
+void Devices_Frame(void)
+{
+	if (Devices_enable_h_patch)
+		h_entry_address = Devices_UpdateHATABSEntry('H', h_entry_address, H_TABLE_ADDRESS);
+
+#ifdef R_IO_DEVICE
+	if (Devices_enable_r_patch)
+		r_entry_address = Devices_UpdateHATABSEntry('R', r_entry_address, R_TABLE_ADDRESS);
+#endif
+}
+
+/* this is called when Devices_enable_h_patch is toggled */
+void Devices_UpdatePatches(void)
+{
+	if (Devices_enable_h_patch) {		/* enable H: device */
+		/* change memory attributes for the area, where we put
+		   the H: handler table and patches */
+		MEMORY_SetROM(H_DEVICE_BEGIN, H_DEVICE_END);
+		/* set handler table */
+		MEMORY_dPutWord(H_TABLE_ADDRESS + Devices_TABLE_OPEN, H_PATCH_OPEN - 1);
+		MEMORY_dPutWord(H_TABLE_ADDRESS + Devices_TABLE_CLOS, H_PATCH_CLOS - 1);
+		MEMORY_dPutWord(H_TABLE_ADDRESS + Devices_TABLE_READ, H_PATCH_READ - 1);
+		MEMORY_dPutWord(H_TABLE_ADDRESS + Devices_TABLE_WRIT, H_PATCH_WRIT - 1);
+		MEMORY_dPutWord(H_TABLE_ADDRESS + Devices_TABLE_STAT, H_PATCH_STAT - 1);
+		MEMORY_dPutWord(H_TABLE_ADDRESS + Devices_TABLE_SPEC, H_PATCH_SPEC - 1);
+		/* set patches */
+		ESC_AddEscRts(H_PATCH_OPEN, ESC_HHOPEN, Devices_H_Open);
+		ESC_AddEscRts(H_PATCH_CLOS, ESC_HHCLOS, Devices_H_Close);
+		ESC_AddEscRts(H_PATCH_READ, ESC_HHREAD, Devices_H_Read);
+		ESC_AddEscRts(H_PATCH_WRIT, ESC_HHWRIT, Devices_H_Write);
+		ESC_AddEscRts(H_PATCH_STAT, ESC_HHSTAT, Devices_H_Status);
+		ESC_AddEscRts(H_PATCH_SPEC, ESC_HHSPEC, Devices_H_Special);
+		/* H: in HATABS will be added next frame by Devices_Frame */
+	}
+	else {						/* disable H: device */
+		/* remove H: entry from HATABS */
+		Devices_RemoveHATABSEntry('H', h_entry_address, H_TABLE_ADDRESS);
+		/* remove patches */
+		ESC_Remove(ESC_HHOPEN);
+		ESC_Remove(ESC_HHCLOS);
+		ESC_Remove(ESC_HHREAD);
+		ESC_Remove(ESC_HHWRIT);
+		ESC_Remove(ESC_HHSTAT);
+		ESC_Remove(ESC_HHSPEC);
+		/* fill memory area used for table and patches with 0xff */
+		MEMORY_dFillMem(H_DEVICE_BEGIN, 0xff, H_DEVICE_END - H_DEVICE_BEGIN + 1);
+	}
+
+#ifdef R_IO_DEVICE
+	if (Devices_enable_r_patch) {		/* enable R: device */
+		/* change memory attributes for the area, where we put
+		   the R: handler table and patches */
+		MEMORY_SetROM(R_DEVICE_BEGIN, R_DEVICE_END);
+		/* set handler table */
+		MEMORY_dPutWord(R_TABLE_ADDRESS + Devices_TABLE_OPEN, R_PATCH_OPEN - 1);
+		MEMORY_dPutWord(R_TABLE_ADDRESS + Devices_TABLE_CLOS, R_PATCH_CLOS - 1);
+		MEMORY_dPutWord(R_TABLE_ADDRESS + Devices_TABLE_READ, R_PATCH_READ - 1);
+		MEMORY_dPutWord(R_TABLE_ADDRESS + Devices_TABLE_WRIT, R_PATCH_WRIT - 1);
+		MEMORY_dPutWord(R_TABLE_ADDRESS + Devices_TABLE_STAT, R_PATCH_STAT - 1);
+		MEMORY_dPutWord(R_TABLE_ADDRESS + Devices_TABLE_SPEC, R_PATCH_SPEC - 1);
+		MEMORY_dPutWord(R_TABLE_ADDRESS + Devices_TABLE_INIT, R_PATCH_INIT - 1);
+		/* set patches */
+		ESC_AddEscRts(R_PATCH_OPEN, ESC_ROPEN, RDevice_OPEN);
+		ESC_AddEscRts(R_PATCH_CLOS, ESC_RCLOS, RDevice_CLOS);
+		ESC_AddEscRts(R_PATCH_READ, ESC_RREAD, RDevice_READ);
+		ESC_AddEscRts(R_PATCH_WRIT, ESC_RWRIT, RDevice_WRIT);
+		ESC_AddEscRts(R_PATCH_STAT, ESC_RSTAT, RDevice_STAT);
+		ESC_AddEscRts(R_PATCH_SPEC, ESC_RSPEC, RDevice_SPEC);
+		ESC_AddEscRts(R_PATCH_INIT, ESC_RINIT, RDevice_INIT);
+		/* R: in HATABS will be added next frame by Devices_Frame */
+	}
+	else {						/* disable R: device */
+		/* remove R: entry from HATABS */
+		Devices_RemoveHATABSEntry('R', r_entry_address, R_TABLE_ADDRESS);
+		/* remove patches */
+		ESC_Remove(ESC_ROPEN);
+		ESC_Remove(ESC_RCLOS);
+		ESC_Remove(ESC_RREAD);
+		ESC_Remove(ESC_RWRIT);
+		ESC_Remove(ESC_RSTAT);
+		ESC_Remove(ESC_RSPEC);
+		/* fill memory area used for table and patches with 0xff */
+		MEMORY_dFillMem(R_DEVICE_BEGIN, 0xff, R_DEVICE_END - R_DEVICE_BEGIN + 1);
+	}
+#endif /* defined(R_IO_DEVICE) */
+}
diff --git a/project/jni/application/atari800/src/devices.h b/project/jni/application/atari800/src/devices.h
new file mode 100644
index 000000000..5b6ec88dc
--- /dev/null
+++ b/project/jni/application/atari800/src/devices.h
@@ -0,0 +1,74 @@
+#ifndef DEVICES_H_
+#define DEVICES_H_
+
+#include <stdio.h> /* FILENAME_MAX */
+#include "atari.h" /* UWORD */
+
+int Devices_Initialise(int *argc, char *argv[]);
+int Devices_PatchOS(void);
+void Devices_Frame(void);
+void Devices_UpdatePatches(void);
+
+UWORD Devices_SkipDeviceName(void);
+
+extern int Devices_enable_h_patch;
+extern int Devices_enable_p_patch;
+extern int Devices_enable_r_patch;
+
+extern char Devices_atari_h_dir[4][FILENAME_MAX];
+extern int Devices_h_read_only;
+
+extern char Devices_h_exe_path[FILENAME_MAX];
+
+extern char Devices_h_current_dir[4][FILENAME_MAX];
+
+int Devices_H_CountOpen(void);
+void Devices_H_CloseAll(void);
+
+extern char Devices_print_command[256];
+
+int Devices_SetPrintCommand(const char *command);
+
+#define	Devices_ICHIDZ	0x0020
+#define	Devices_ICDNOZ	0x0021
+#define	Devices_ICCOMZ	0x0022
+#define	Devices_ICSTAZ	0x0023
+#define	Devices_ICBALZ	0x0024
+#define	Devices_ICBAHZ	0x0025
+#define	Devices_ICPTLZ	0x0026
+#define	Devices_ICPTHZ	0x0027
+#define	Devices_ICBLLZ	0x0028
+#define	Devices_ICBLHZ	0x0029
+#define	Devices_ICAX1Z	0x002a
+#define	Devices_ICAX2Z	0x002b
+
+#define Devices_IOCB0   0x0340
+#define	Devices_ICHID	0x0000
+#define	Devices_ICDNO	0x0001
+#define	Devices_ICCOM	0x0002
+#define	Devices_ICSTA	0x0003
+#define	Devices_ICBAL	0x0004
+#define	Devices_ICBAH	0x0005
+#define	Devices_ICPTL	0x0006
+#define	Devices_ICPTH	0x0007
+#define	Devices_ICBLL	0x0008
+#define	Devices_ICBLH	0x0009
+#define	Devices_ICAX1	0x000a
+#define	Devices_ICAX2	0x000b
+#define	Devices_ICAX3	0x000c
+#define	Devices_ICAX4	0x000d
+#define	Devices_ICAX5	0x000e
+#define	Devices_ICAX6	0x000f
+
+#define Devices_TABLE_OPEN	0
+#define Devices_TABLE_CLOS	2
+#define Devices_TABLE_READ	4
+#define Devices_TABLE_WRIT	6
+#define Devices_TABLE_STAT	8
+#define Devices_TABLE_SPEC	10
+#define Devices_TABLE_INIT	12
+
+UWORD Devices_UpdateHATABSEntry(char device, UWORD entry_address, UWORD table_address);
+void Devices_RemoveHATABSEntry(char device, UWORD entry_address, UWORD table_address);
+
+#endif /* DEVICES_H_ */
diff --git a/project/jni/application/atari800/src/emuos.h b/project/jni/application/atari800/src/emuos.h
new file mode 100644
index 000000000..874c93716
--- /dev/null
+++ b/project/jni/application/atari800/src/emuos.h
@@ -0,0 +1,1032 @@
+#ifndef EMUOS_H_
+#define EMUOS_H_
+
+static const UBYTE emuos_h[8192] =
+{
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x18,0x18,0x18,0x18,0x00,0x18,0x00,
+	0x00,0x66,0x66,0x66,0x00,0x00,0x00,0x00,
+	0x00,0x66,0xff,0x66,0x66,0xff,0x66,0x00,
+	0x18,0x3e,0x60,0x3c,0x06,0x7c,0x18,0x00,
+	0x00,0x66,0x6c,0x18,0x30,0x66,0x46,0x00,
+	0x1c,0x36,0x1c,0x38,0x6f,0x66,0x3b,0x00,
+	0x00,0x18,0x18,0x18,0x00,0x00,0x00,0x00,
+	0x00,0x0e,0x1c,0x18,0x18,0x1c,0x0e,0x00,
+	0x00,0x70,0x38,0x18,0x18,0x38,0x70,0x00,
+	0x00,0x66,0x3c,0xff,0x3c,0x66,0x00,0x00,
+	0x00,0x18,0x18,0x7e,0x18,0x18,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x18,0x18,0x30,
+	0x00,0x00,0x00,0x7e,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x18,0x18,0x00,
+	0x00,0x06,0x0c,0x18,0x30,0x60,0x40,0x00,
+	0x00,0x3c,0x66,0x6e,0x76,0x66,0x3c,0x00,
+	0x00,0x18,0x38,0x18,0x18,0x18,0x7e,0x00,
+	0x00,0x3c,0x66,0x0c,0x18,0x30,0x7e,0x00,
+	0x00,0x7e,0x0c,0x18,0x0c,0x66,0x3c,0x00,
+	0x00,0x0c,0x1c,0x3c,0x6c,0x7e,0x0c,0x00,
+	0x00,0x7e,0x60,0x7c,0x06,0x66,0x3c,0x00,
+	0x00,0x3c,0x60,0x7c,0x66,0x66,0x3c,0x00,
+	0x00,0x7e,0x06,0x0c,0x18,0x30,0x30,0x00,
+	0x00,0x3c,0x66,0x3c,0x66,0x66,0x3c,0x00,
+	0x00,0x3c,0x66,0x3e,0x06,0x0c,0x38,0x00,
+	0x00,0x00,0x18,0x18,0x00,0x18,0x18,0x00,
+	0x00,0x00,0x18,0x18,0x00,0x18,0x18,0x30,
+	0x06,0x0c,0x18,0x30,0x18,0x0c,0x06,0x00,
+	0x00,0x00,0x7e,0x00,0x00,0x7e,0x00,0x00,
+	0x60,0x30,0x18,0x0c,0x18,0x30,0x60,0x00,
+	0x00,0x3c,0x66,0x0c,0x18,0x00,0x18,0x00,
+	0x00,0x3c,0x66,0x6e,0x6e,0x60,0x3e,0x00,
+	0x00,0x18,0x3c,0x66,0x66,0x7e,0x66,0x00,
+	0x00,0x7c,0x66,0x7c,0x66,0x66,0x7c,0x00,
+	0x00,0x3c,0x66,0x60,0x60,0x66,0x3c,0x00,
+	0x00,0x78,0x6c,0x66,0x66,0x6c,0x78,0x00,
+	0x00,0x7e,0x60,0x7c,0x60,0x60,0x7e,0x00,
+	0x00,0x7e,0x60,0x7c,0x60,0x60,0x60,0x00,
+	0x00,0x3e,0x60,0x60,0x6e,0x66,0x3e,0x00,
+	0x00,0x66,0x66,0x7e,0x66,0x66,0x66,0x00,
+	0x00,0x7e,0x18,0x18,0x18,0x18,0x7e,0x00,
+	0x00,0x06,0x06,0x06,0x06,0x66,0x3c,0x00,
+	0x00,0x66,0x6c,0x78,0x78,0x6c,0x66,0x00,
+	0x00,0x60,0x60,0x60,0x60,0x60,0x7e,0x00,
+	0x00,0x63,0x77,0x7f,0x6b,0x63,0x63,0x00,
+	0x00,0x66,0x76,0x7e,0x7e,0x6e,0x66,0x00,
+	0x00,0x3c,0x66,0x66,0x66,0x66,0x3c,0x00,
+	0x00,0x7c,0x66,0x66,0x7c,0x60,0x60,0x00,
+	0x00,0x3c,0x66,0x66,0x66,0x6c,0x36,0x00,
+	0x00,0x7c,0x66,0x66,0x7c,0x6c,0x66,0x00,
+	0x00,0x3c,0x60,0x3c,0x06,0x06,0x3c,0x00,
+	0x00,0x7e,0x18,0x18,0x18,0x18,0x18,0x00,
+	0x00,0x66,0x66,0x66,0x66,0x66,0x7e,0x00,
+	0x00,0x66,0x66,0x66,0x66,0x3c,0x18,0x00,
+	0x00,0x63,0x63,0x6b,0x7f,0x77,0x63,0x00,
+	0x00,0x66,0x66,0x3c,0x3c,0x66,0x66,0x00,
+	0x00,0x66,0x66,0x3c,0x18,0x18,0x18,0x00,
+	0x00,0x7e,0x0c,0x18,0x30,0x60,0x7e,0x00,
+	0x00,0x1e,0x18,0x18,0x18,0x18,0x1e,0x00,
+	0x00,0x40,0x60,0x30,0x18,0x0c,0x06,0x00,
+	0x00,0x78,0x18,0x18,0x18,0x18,0x78,0x00,
+	0x00,0x08,0x1c,0x36,0x63,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0xff,0x00,
+	0x00,0x36,0x7f,0x7f,0x3e,0x1c,0x08,0x00,
+	0x18,0x18,0x18,0x1f,0x1f,0x18,0x18,0x18,
+	0x03,0x03,0x03,0x03,0x03,0x03,0x03,0x03,
+	0x18,0x18,0x18,0xf8,0xf8,0x00,0x00,0x00,
+	0x18,0x18,0x18,0xf8,0xf8,0x18,0x18,0x18,
+	0x00,0x00,0x00,0xf8,0xf8,0x18,0x18,0x18,
+	0x03,0x07,0x0e,0x1c,0x38,0x70,0xe0,0xc0,
+	0xc0,0xe0,0x70,0x38,0x1c,0x0e,0x07,0x03,
+	0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff,
+	0x00,0x00,0x00,0x00,0x0f,0x0f,0x0f,0x0f,
+	0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff,
+	0x0f,0x0f,0x0f,0x0f,0x00,0x00,0x00,0x00,
+	0xf0,0xf0,0xf0,0xf0,0x00,0x00,0x00,0x00,
+	0xff,0xff,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0xff,0xff,
+	0x00,0x00,0x00,0x00,0xf0,0xf0,0xf0,0xf0,
+	0x00,0x1c,0x1c,0x77,0x77,0x08,0x1c,0x00,
+	0x00,0x00,0x00,0x1f,0x1f,0x18,0x18,0x18,
+	0x00,0x00,0x00,0xff,0xff,0x00,0x00,0x00,
+	0x18,0x18,0x18,0xff,0xff,0x18,0x18,0x18,
+	0x00,0x00,0x3c,0x7e,0x7e,0x7e,0x3c,0x00,
+	0x00,0x00,0x00,0x00,0xff,0xff,0xff,0xff,
+	0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,0xc0,
+	0x00,0x00,0x00,0xff,0xff,0x18,0x18,0x18,
+	0x18,0x18,0x18,0xff,0xff,0x00,0x00,0x00,
+	0xf0,0xf0,0xf0,0xf0,0xf0,0xf0,0xf0,0xf0,
+	0x18,0x18,0x18,0x1f,0x1f,0x00,0x00,0x00,
+	0x78,0x60,0x78,0x60,0x7e,0x18,0x1e,0x00,
+	0x00,0x18,0x3c,0x7e,0x18,0x18,0x18,0x00,
+	0x00,0x18,0x18,0x18,0x7e,0x3c,0x18,0x00,
+	0x00,0x18,0x30,0x7e,0x30,0x18,0x00,0x00,
+	0x00,0x18,0x0c,0x7e,0x0c,0x18,0x00,0x00,
+	0x00,0x18,0x3c,0x7e,0x7e,0x3c,0x18,0x00,
+	0x00,0x00,0x3c,0x06,0x3e,0x66,0x3e,0x00,
+	0x00,0x60,0x60,0x7c,0x66,0x66,0x7c,0x00,
+	0x00,0x00,0x3c,0x60,0x60,0x60,0x3c,0x00,
+	0x00,0x06,0x06,0x3e,0x66,0x66,0x3e,0x00,
+	0x00,0x00,0x3c,0x66,0x7e,0x60,0x3c,0x00,
+	0x00,0x0e,0x18,0x3e,0x18,0x18,0x18,0x00,
+	0x00,0x00,0x3e,0x66,0x66,0x3e,0x06,0x7c,
+	0x00,0x60,0x60,0x7c,0x66,0x66,0x66,0x00,
+	0x00,0x18,0x00,0x38,0x18,0x18,0x3c,0x00,
+	0x00,0x06,0x00,0x06,0x06,0x06,0x06,0x3c,
+	0x00,0x60,0x60,0x6c,0x78,0x6c,0x66,0x00,
+	0x00,0x38,0x18,0x18,0x18,0x18,0x3c,0x00,
+	0x00,0x00,0x66,0x7f,0x7f,0x6b,0x63,0x00,
+	0x00,0x00,0x7c,0x66,0x66,0x66,0x66,0x00,
+	0x00,0x00,0x3c,0x66,0x66,0x66,0x3c,0x00,
+	0x00,0x00,0x7c,0x66,0x66,0x7c,0x60,0x60,
+	0x00,0x00,0x3e,0x66,0x66,0x3e,0x06,0x06,
+	0x00,0x00,0x7c,0x66,0x60,0x60,0x60,0x00,
+	0x00,0x00,0x3e,0x60,0x3c,0x06,0x7c,0x00,
+	0x00,0x18,0x7e,0x18,0x18,0x18,0x0e,0x00,
+	0x00,0x00,0x66,0x66,0x66,0x66,0x3e,0x00,
+	0x00,0x00,0x66,0x66,0x66,0x3c,0x18,0x00,
+	0x00,0x00,0x63,0x6b,0x7f,0x3e,0x36,0x00,
+	0x00,0x00,0x66,0x3c,0x18,0x3c,0x66,0x00,
+	0x00,0x00,0x66,0x66,0x66,0x3e,0x0c,0x78,
+	0x00,0x00,0x7e,0x0c,0x18,0x30,0x7e,0x00,
+	0x00,0x18,0x3c,0x7e,0x7e,0x18,0x3c,0x00,
+	0x18,0x18,0x18,0x18,0x18,0x18,0x18,0x18,
+	0x00,0x7e,0x78,0x7c,0x6e,0x66,0x06,0x00,
+	0x08,0x18,0x38,0x78,0x38,0x18,0x08,0x00,
+	0x10,0x18,0x1c,0x1e,0x1c,0x18,0x10,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x4c,0xd8,0xf8,0x4c,0xd8,0xf8,0x4c,0xd8,
+	0xf8,0x4c,0xd8,0xf8,0x4c,0xd8,0xf8,0x4c,
+	0xd8,0xf8,0x4c,0xb7,0xfd,0x4c,0xd8,0xf8,
+	0x4c,0xd8,0xf8,0x4c,0xd8,0xf8,0x4c,0xd8,
+	0xf8,0x4c,0xd8,0xf8,0x4c,0x00,0xf8,0x4c,
+	0x00,0xf8,0x4c,0xd8,0xf8,0x4c,0xd8,0xf8,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0xa2,0xff,0x9a,0xa9,0x0e,0x8d,0x22,0x02,
+	0xa9,0xfd,0x8d,0x23,0x02,0xa9,0xb7,0x8d,
+	0x24,0x02,0xa9,0xfd,0x8d,0x25,0x02,0xa9,
+	0xbf,0x8d,0x16,0x02,0xa9,0xfd,0x8d,0x17,
+	0x02,0xa5,0x00,0xd0,0x18,0xa5,0x01,0xd0,
+	0x14,0xad,0xfc,0xbf,0xee,0xfc,0xbf,0xcd,
+	0xfc,0xbf,0xd0,0x0c,0x20,0x3a,0xf8,0x6c,
+	0xfa,0xbf,0x6c,0xfe,0xbf,0x6c,0x00,0x00,
+	0xa9,0x31,0x8d,0x00,0x03,0xa9,0x01,0x8d,
+	0x01,0x03,0xa9,0x52,0x8d,0x02,0x03,0xa9,
+	0x00,0x8d,0x04,0x03,0xa9,0x04,0x8d,0x05,
+	0x03,0xa9,0x80,0x8d,0x08,0x03,0xa9,0x00,
+	0x8d,0x09,0x03,0xa9,0x01,0x8d,0x0a,0x03,
+	0xa9,0x00,0x8d,0x0b,0x03,0x20,0x59,0xe4,
+	0x30,0x66,0xad,0x00,0x04,0xc9,0xff,0xd0,
+	0x07,0xad,0x01,0x04,0xc9,0xff,0xf0,0x58,
+	0x85,0x00,0x18,0xad,0x02,0x04,0x8d,0x04,
+	0x03,0x69,0x06,0x85,0x01,0xad,0x03,0x04,
+	0x8d,0x05,0x03,0x69,0x00,0x85,0x02,0xad,
+	0x04,0x04,0x85,0x03,0xad,0x05,0x04,0x85,
+	0x04,0x20,0x59,0xe4,0x30,0x32,0x18,0xad,
+	0x04,0x03,0x69,0x80,0x8d,0x04,0x03,0xad,
+	0x05,0x03,0x69,0x00,0x8d,0x05,0x03,0xee,
+	0x0a,0x03,0xd0,0x03,0xee,0x0b,0x03,0xc6,
+	0x00,0xd0,0xde,0xc6,0x05,0x10,0xda,0x20,
+	0xd2,0xf8,0xa9,0x01,0x85,0x09,0x20,0xd5,
+	0xf8,0x60,0x6c,0x01,0x00,0x6c,0x03,0x00,
+	0xa9,0x1b,0x8d,0x30,0x02,0x8d,0x02,0xd4,
+	0xa9,0xf9,0x8d,0x31,0x02,0x8d,0x03,0xd4,
+	0xa9,0xe0,0x8d,0x09,0xd4,0x8d,0xf4,0x02,
+	0xa9,0x22,0x8d,0x00,0xd4,0x8d,0x2f,0x02,
+	0xa9,0x02,0x8d,0x01,0xd4,0x8d,0xf3,0x02,
+	0xa9,0xca,0x8d,0x1a,0xd0,0x8d,0xc8,0x02,
+	0xa9,0x94,0x8d,0x18,0xd0,0x8d,0xc6,0x02,
+	0xa9,0x0a,0x8d,0x17,0xd0,0x8d,0xc5,0x02,
+	0x4c,0x18,0xf9,0x70,0x70,0x70,0x42,0x3b,
+	0xf9,0x02,0x02,0x02,0x02,0x02,0x02,0x02,
+	0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,
+	0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,
+	0x41,0x1b,0xf9,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x21,0x74,0x61,0x72,0x69,0x18,0x10,
+	0x10,0x0f,0x2f,0x33,0x00,0x25,0x6d,0x75,
+	0x6c,0x61,0x74,0x69,0x6f,0x6e,0x00,0x28,
+	0x61,0x6c,0x74,0x65,0x64,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x23,0x6f,
+	0x70,0x79,0x72,0x69,0x67,0x68,0x74,0x00,
+	0x08,0x63,0x09,0x00,0x11,0x19,0x19,0x17,
+	0x00,0x24,0x61,0x76,0x69,0x64,0x00,0x2a,
+	0x0e,0x00,0x26,0x69,0x72,0x74,0x68,0x00,
+	0x00,0x00,0x00,0x08,0x63,0x09,0x00,0x11,
+	0x19,0x19,0x18,0x0d,0x12,0x10,0x10,0x19,
+	0x00,0x21,0x74,0x61,0x72,0x69,0x18,0x10,
+	0x10,0x00,0x24,0x65,0x76,0x65,0x6c,0x6f,
+	0x70,0x6d,0x65,0x6e,0x74,0x00,0x34,0x65,
+	0x61,0x6d,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x68,0x74,0x74,0x70,0x1a,0x0f,
+	0x0f,0x61,0x74,0x61,0x72,0x69,0x18,0x10,
+	0x10,0x0e,0x61,0x74,0x61,0x72,0x69,0x0e,
+	0x6f,0x72,0x67,0x0f,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x33,0x6f,0x72,0x72,0x79,
+	0x00,0x74,0x68,0x69,0x73,0x00,0x70,0x72,
+	0x6f,0x67,0x72,0x61,0x6d,0x00,0x6e,0x65,
+	0x65,0x64,0x73,0x00,0x61,0x00,0x72,0x65,
+	0x61,0x6c,0x00,0x21,0x74,0x61,0x72,0x69,
+	0x0f,0x2f,0x33,0x00,0x00,0x36,0x69,0x73,
+	0x69,0x74,0x00,0x74,0x68,0x65,0x00,0x37,
+	0x65,0x62,0x00,0x70,0x61,0x67,0x65,0x73,
+	0x00,0x74,0x6f,0x00,0x66,0x69,0x6e,0x64,
+	0x00,0x6f,0x75,0x74,0x00,0x6d,0x6f,0x72,
+	0x65,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x2c,0x0f,0xd4,0x10,0x03,
+	0x6c,0x00,0x02,0x48,0x8a,0x48,0x98,0x48,
+	0x8d,0x0f,0xd4,0x6c,0x22,0x02,0xe6,0x14,
+	0xd0,0x06,0xe6,0x13,0xd0,0x02,0xe6,0x12,
+	0xad,0x2f,0x02,0x8d,0x00,0xd4,0xad,0x30,
+	0x02,0x8d,0x02,0xd4,0xad,0x31,0x02,0x8d,
+	0x03,0xd4,0xad,0xc8,0x02,0x8d,0x1a,0xd0,
+	0xad,0xc4,0x02,0x8d,0x16,0xd0,0xad,0xc5,
+	0x02,0x8d,0x17,0xd0,0xad,0xc6,0x02,0x8d,
+	0x18,0xd0,0xad,0xc7,0x02,0x8d,0x19,0xd0,
+	0xad,0xc0,0x02,0x8d,0x12,0xd0,0xad,0xc1,
+	0x02,0x8d,0x13,0xd0,0xad,0xc2,0x02,0x8d,
+	0x14,0xd0,0xad,0xc3,0x02,0x8d,0x15,0xd0,
+	0xad,0xf3,0x02,0x8d,0x01,0xd4,0xad,0xf4,
+	0x02,0x8d,0x09,0xd4,0xad,0x00,0xd3,0x29,
+	0x0f,0x8d,0x78,0x02,0xad,0x00,0xd3,0x0a,
+	0x0a,0x0a,0x0a,0x8d,0x79,0x02,0xad,0x01,
+	0xd3,0x29,0x0f,0x8d,0x7a,0x02,0xad,0x01,
+	0xd3,0x0a,0x0a,0x0a,0x0a,0x8d,0x7b,0x02,
+	0xad,0x6f,0x02,0x8d,0x1b,0xd0,0xad,0x32,
+	0x02,0x8d,0x0f,0xd2,0xad,0x10,0xd0,0x8d,
+	0x84,0x02,0xad,0x11,0xd0,0x8d,0x85,0x02,
+	0xad,0x12,0xd0,0x8d,0x86,0x02,0xad,0x13,
+	0xd0,0x8d,0x87,0x02,0x6c,0x24,0x02,0x68,
+	0xa8,0x68,0xaa,0x68,0x6c,0x16,0x02,0x48,
+	0xad,0x0e,0xd2,0x29,0x40,0xd0,0x06,0xad,
+	0x09,0xd2,0x8d,0xfc,0x02,0x68,0x40,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
+	0x00,0x00,0xfb,0xfc,0x00,0xf8,0xbc,0xfd
+};
+
+#endif /* EMUOS_H_ */
diff --git a/project/jni/application/atari800/src/emuos.lis b/project/jni/application/atari800/src/emuos.lis
new file mode 100644
index 000000000..4d494184a
--- /dev/null
+++ b/project/jni/application/atari800/src/emuos.lis
@@ -0,0 +1,569 @@
+        .OPT NO LIST
+;  emuos.lis - OS bootstrapping code
+;
+;  Copyright (C) 1995-1998 David Firth
+;  Copyright (C) 2001-2009 Atari800 development team (see DOC/CREDITS)
+;
+;  This file is part of the Atari800 emulator project which emulates
+;  the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+;
+;  Atari800 is free software; you can redistribute it and/or modify
+;  it under the terms of the GNU General Public License as published by
+;  the Free Software Foundation; either version 2 of the License, or
+;  (at your option) any later version.
+;
+;  Atari800 is distributed in the hope that it will be useful,
+;  but WITHOUT ANY WARRANTY; without even the implied warranty of
+;  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;  GNU General Public License for more details.
+;
+;  You should have received a copy of the GNU General Public License
+;  along with Atari800; if not, write to the Free Software
+;  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+;
+;
+; UPDATE EMUOS.LIS
+; Start Emulator
+; Insert MAC/65 Cartridge
+; ENTER #H5:EMUOS.LIS,A
+; ASM,,#H0:EMUOS.OBJ
+; Exit Emulator
+; mkimg -input emuos.obj -image emuos.img -header emuos.h e000 ffff
+;
+BOOT =  $09
+RTCLOK = $12
+VVBLKI = $0222
+VVBLKD = $0224
+;
+; ============================
+; OS Hardware Shadow Registers
+; ============================
+;
+CHART = $02F3
+CHBAS = $02F4
+CH  =   $02FC
+COLOR4 = $02C8
+COLOR0 = $02C4
+COLOR1 = $02C5
+COLOR2 = $02C6
+COLOR3 = $02C7
+PCOLR0 = $02C0
+PCOLR1 = $02C1
+PCOLR2 = $02C2
+PCOLR3 = $02C3
+SDLSTH = $0231
+SDLSTL = $0230
+SDMCTL = $022F
+STICK0 = $0278
+STICK1 = $0279
+STICK2 = $027A
+STICK3 = $027B
+GPRIOR = $026F
+SSKCTL = $0232
+STRIG0 = $0284
+STRIG1 = $0285
+STRIG2 = $0286
+STRIG3 = $0287
+;
+DDEVIC = $0300
+DUNIT = $0301
+DCOMND = $0302
+DSTATS = $0303
+DBUFLO = $0304
+DBUFHI = $0305
+DTIMLO = $0306
+DTIMHI = $0307
+DBYTLO = $0308
+DBYTHI = $0309
+DAUX1 = $030A
+DAUX2 = $030B
+;
+; ==================
+; Hardware Registers
+; ==================
+;
+CHACTL = $D401
+CHBASE = $D409
+COLBK = $D01A
+COLPF0 = $D016
+COLPF1 = $D017
+COLPF2 = $D018
+COLPF3 = $D019
+COLPM0 = $D012
+COLPM1 = $D013
+COLPM2 = $D014
+COLPM3 = $D015
+CONSOL = $D01F
+DLISTH = $D403
+DLISTL = $D402
+DMACTL = $D400
+KBCODE = $D209
+IRQEN = $D20E
+IRQST = $D20E
+NMIRES = $D40F
+NMIST = $D40F
+PACTL = $D302
+PORTA = $D300
+PORTB = $D301
+PRIOR = $D01B
+SKCTL = $D20F
+TRIG0 = $D010
+TRIG1 = $D011
+TRIG2 = $D012
+TRIG3 = $D013
+VCOUNT = $D40B
+;
+    *=  $E000
+    .BYTE $00,$00,$00,$00,$00,$00,$00,$00
+    .BYTE $00,$18,$18,$18,$18,$00,$18,$00
+    .BYTE $00,$66,$66,$66,$00,$00,$00,$00
+    .BYTE $00,$66,$FF,$66,$66,$FF,$66,$00
+    .BYTE $18,$3E,$60,$3C,$06,$7C,$18,$00
+    .BYTE $00,$66,$6C,$18,$30,$66,$46,$00
+    .BYTE $1C,$36,$1C,$38,$6F,$66,$3B,$00
+    .BYTE $00,$18,$18,$18,$00,$00,$00,$00
+    .BYTE $00,$0E,$1C,$18,$18,$1C,$0E,$00
+    .BYTE $00,$70,$38,$18,$18,$38,$70,$00
+    .BYTE $00,$66,$3C,$FF,$3C,$66,$00,$00
+    .BYTE $00,$18,$18,$7E,$18,$18,$00,$00
+    .BYTE $00,$00,$00,$00,$00,$18,$18,$30
+    .BYTE $00,$00,$00,$7E,$00,$00,$00,$00
+    .BYTE $00,$00,$00,$00,$00,$18,$18,$00
+    .BYTE $00,$06,$0C,$18,$30,$60,$40,$00
+    .BYTE $00,$3C,$66,$6E,$76,$66,$3C,$00
+    .BYTE $00,$18,$38,$18,$18,$18,$7E,$00
+    .BYTE $00,$3C,$66,$0C,$18,$30,$7E,$00
+    .BYTE $00,$7E,$0C,$18,$0C,$66,$3C,$00
+    .BYTE $00,$0C,$1C,$3C,$6C,$7E,$0C,$00
+    .BYTE $00,$7E,$60,$7C,$06,$66,$3C,$00
+    .BYTE $00,$3C,$60,$7C,$66,$66,$3C,$00
+    .BYTE $00,$7E,$06,$0C,$18,$30,$30,$00
+    .BYTE $00,$3C,$66,$3C,$66,$66,$3C,$00
+    .BYTE $00,$3C,$66,$3E,$06,$0C,$38,$00
+    .BYTE $00,$00,$18,$18,$00,$18,$18,$00
+    .BYTE $00,$00,$18,$18,$00,$18,$18,$30
+    .BYTE $06,$0C,$18,$30,$18,$0C,$06,$00
+    .BYTE $00,$00,$7E,$00,$00,$7E,$00,$00
+    .BYTE $60,$30,$18,$0C,$18,$30,$60,$00
+    .BYTE $00,$3C,$66,$0C,$18,$00,$18,$00
+    .BYTE $00,$3C,$66,$6E,$6E,$60,$3E,$00
+    .BYTE $00,$18,$3C,$66,$66,$7E,$66,$00
+    .BYTE $00,$7C,$66,$7C,$66,$66,$7C,$00
+    .BYTE $00,$3C,$66,$60,$60,$66,$3C,$00
+    .BYTE $00,$78,$6C,$66,$66,$6C,$78,$00
+    .BYTE $00,$7E,$60,$7C,$60,$60,$7E,$00
+    .BYTE $00,$7E,$60,$7C,$60,$60,$60,$00
+    .BYTE $00,$3E,$60,$60,$6E,$66,$3E,$00
+    .BYTE $00,$66,$66,$7E,$66,$66,$66,$00
+    .BYTE $00,$7E,$18,$18,$18,$18,$7E,$00
+    .BYTE $00,$06,$06,$06,$06,$66,$3C,$00
+    .BYTE $00,$66,$6C,$78,$78,$6C,$66,$00
+    .BYTE $00,$60,$60,$60,$60,$60,$7E,$00
+    .BYTE $00,$63,$77,$7F,$6B,$63,$63,$00
+    .BYTE $00,$66,$76,$7E,$7E,$6E,$66,$00
+    .BYTE $00,$3C,$66,$66,$66,$66,$3C,$00
+    .BYTE $00,$7C,$66,$66,$7C,$60,$60,$00
+    .BYTE $00,$3C,$66,$66,$66,$6C,$36,$00
+    .BYTE $00,$7C,$66,$66,$7C,$6C,$66,$00
+    .BYTE $00,$3C,$60,$3C,$06,$06,$3C,$00
+    .BYTE $00,$7E,$18,$18,$18,$18,$18,$00
+    .BYTE $00,$66,$66,$66,$66,$66,$7E,$00
+    .BYTE $00,$66,$66,$66,$66,$3C,$18,$00
+    .BYTE $00,$63,$63,$6B,$7F,$77,$63,$00
+    .BYTE $00,$66,$66,$3C,$3C,$66,$66,$00
+    .BYTE $00,$66,$66,$3C,$18,$18,$18,$00
+    .BYTE $00,$7E,$0C,$18,$30,$60,$7E,$00
+    .BYTE $00,$1E,$18,$18,$18,$18,$1E,$00
+    .BYTE $00,$40,$60,$30,$18,$0C,$06,$00
+    .BYTE $00,$78,$18,$18,$18,$18,$78,$00
+    .BYTE $00,$08,$1C,$36,$63,$00,$00,$00
+    .BYTE $00,$00,$00,$00,$00,$00,$FF,$00
+    .BYTE $00,$36,$7F,$7F,$3E,$1C,$08,$00
+    .BYTE $18,$18,$18,$1F,$1F,$18,$18,$18
+    .BYTE $03,$03,$03,$03,$03,$03,$03,$03
+    .BYTE $18,$18,$18,$F8,$F8,$00,$00,$00
+    .BYTE $18,$18,$18,$F8,$F8,$18,$18,$18
+    .BYTE $00,$00,$00,$F8,$F8,$18,$18,$18
+    .BYTE $03,$07,$0E,$1C,$38,$70,$E0,$C0
+    .BYTE $C0,$E0,$70,$38,$1C,$0E,$07,$03
+    .BYTE $01,$03,$07,$0F,$1F,$3F,$7F,$FF
+    .BYTE $00,$00,$00,$00,$0F,$0F,$0F,$0F
+    .BYTE $80,$C0,$E0,$F0,$F8,$FC,$FE,$FF
+    .BYTE $0F,$0F,$0F,$0F,$00,$00,$00,$00
+    .BYTE $F0,$F0,$F0,$F0,$00,$00,$00,$00
+    .BYTE $FF,$FF,$00,$00,$00,$00,$00,$00
+    .BYTE $00,$00,$00,$00,$00,$00,$FF,$FF
+    .BYTE $00,$00,$00,$00,$F0,$F0,$F0,$F0
+    .BYTE $00,$1C,$1C,$77,$77,$08,$1C,$00
+    .BYTE $00,$00,$00,$1F,$1F,$18,$18,$18
+    .BYTE $00,$00,$00,$FF,$FF,$00,$00,$00
+    .BYTE $18,$18,$18,$FF,$FF,$18,$18,$18
+    .BYTE $00,$00,$3C,$7E,$7E,$7E,$3C,$00
+    .BYTE $00,$00,$00,$00,$FF,$FF,$FF,$FF
+    .BYTE $C0,$C0,$C0,$C0,$C0,$C0,$C0,$C0
+    .BYTE $00,$00,$00,$FF,$FF,$18,$18,$18
+    .BYTE $18,$18,$18,$FF,$FF,$00,$00,$00
+    .BYTE $F0,$F0,$F0,$F0,$F0,$F0,$F0,$F0
+    .BYTE $18,$18,$18,$1F,$1F,$00,$00,$00
+    .BYTE $78,$60,$78,$60,$7E,$18,$1E,$00
+    .BYTE $00,$18,$3C,$7E,$18,$18,$18,$00
+    .BYTE $00,$18,$18,$18,$7E,$3C,$18,$00
+    .BYTE $00,$18,$30,$7E,$30,$18,$00,$00
+    .BYTE $00,$18,$0C,$7E,$0C,$18,$00,$00
+    .BYTE $00,$18,$3C,$7E,$7E,$3C,$18,$00
+    .BYTE $00,$00,$3C,$06,$3E,$66,$3E,$00
+    .BYTE $00,$60,$60,$7C,$66,$66,$7C,$00
+    .BYTE $00,$00,$3C,$60,$60,$60,$3C,$00
+    .BYTE $00,$06,$06,$3E,$66,$66,$3E,$00
+    .BYTE $00,$00,$3C,$66,$7E,$60,$3C,$00
+    .BYTE $00,$0E,$18,$3E,$18,$18,$18,$00
+    .BYTE $00,$00,$3E,$66,$66,$3E,$06,$7C
+    .BYTE $00,$60,$60,$7C,$66,$66,$66,$00
+    .BYTE $00,$18,$00,$38,$18,$18,$3C,$00
+    .BYTE $00,$06,$00,$06,$06,$06,$06,$3C
+    .BYTE $00,$60,$60,$6C,$78,$6C,$66,$00
+    .BYTE $00,$38,$18,$18,$18,$18,$3C,$00
+    .BYTE $00,$00,$66,$7F,$7F,$6B,$63,$00
+    .BYTE $00,$00,$7C,$66,$66,$66,$66,$00
+    .BYTE $00,$00,$3C,$66,$66,$66,$3C,$00
+    .BYTE $00,$00,$7C,$66,$66,$7C,$60,$60
+    .BYTE $00,$00,$3E,$66,$66,$3E,$06,$06
+    .BYTE $00,$00,$7C,$66,$60,$60,$60,$00
+    .BYTE $00,$00,$3E,$60,$3C,$06,$7C,$00
+    .BYTE $00,$18,$7E,$18,$18,$18,$0E,$00
+    .BYTE $00,$00,$66,$66,$66,$66,$3E,$00
+    .BYTE $00,$00,$66,$66,$66,$3C,$18,$00
+    .BYTE $00,$00,$63,$6B,$7F,$3E,$36,$00
+    .BYTE $00,$00,$66,$3C,$18,$3C,$66,$00
+    .BYTE $00,$00,$66,$66,$66,$3E,$0C,$78
+    .BYTE $00,$00,$7E,$0C,$18,$30,$7E,$00
+    .BYTE $00,$18,$3C,$7E,$7E,$18,$3C,$00
+    .BYTE $18,$18,$18,$18,$18,$18,$18,$18
+    .BYTE $00,$7E,$78,$7C,$6E,$66,$06,$00
+    .BYTE $08,$18,$38,$78,$38,$18,$08,$00
+    .BYTE $10,$18,$1C,$1E,$1C,$18,$10,$00
+;
+DISKIV = $E450
+DSKINV = $E453
+CIOV =  $E456
+SIOV =  $E459
+SETVBV = $E45C
+SYSVBV = $E45F
+XITVBV = $E462
+SIOINV = $E465
+SENDEV = $E468
+INTINV = $E46B
+CIOINV = $E46E
+BLKBDV = $E471
+WARMSV = $E474
+COLDSV = $E477
+RBLOKV = $E47A
+CSOPIV = $E47D
+;
+    *=  DISKIV
+    JMP HALT
+    *=  DSKINV
+    JMP HALT
+    *=  CIOV
+    JMP HALT
+    *=  SIOV
+    JMP HALT
+    *=  SETVBV
+    JMP HALT
+    *=  SYSVBV
+    JMP HALT
+    *=  XITVBV
+    JMP XITVBL
+    *=  SIOINV
+    JMP HALT
+    *=  SENDEV
+    JMP HALT
+    *=  INTINV
+    JMP HALT
+    *=  CIOINV
+    JMP HALT
+    *=  BLKBDV
+    JMP HALT
+    *=  WARMSV
+    JMP COLDSTART
+    *=  COLDSV
+    JMP COLDSTART
+    *=  RBLOKV
+    JMP HALT
+    *=  CSOPIV
+    JMP HALT
+;
+    *=  $F800
+COLDSTART
+    LDX #$FF
+    TXS 
+    LDA # <SYSVBL
+    STA VVBLKI
+    LDA # >SYSVBL
+    STA VVBLKI+1
+    LDA # <XITVBL
+    STA VVBLKD
+    LDA # >XITVBL
+    STA VVBLKD+1
+    LDA # <IRQ
+    STA $0216
+    LDA # >IRQ
+    STA $0217
+    LDA $0000
+    BNE RPIIMG	; Run pre-installed image
+    LDA $0001
+    BNE RPIIMG	; Run pre-installed image
+    LDA $BFFC
+    INC $BFFC
+    CMP $BFFC
+    BNE BOOTDISK
+;    BNE MONTY
+    JSR CART.INIT
+    JMP ($BFFA)
+CART.INIT
+    JMP ($BFFE)
+;MONTY
+;    STA $BFFC   ; Restore original value to $BFFC
+;    JMP $0115   ; Run Montezummas Revenge
+RPIIMG
+    JMP ($0000)	; Run pre-installed image
+;
+BOOTDISK
+    LDA #$31
+    STA DDEVIC
+    LDA #$01
+    STA DUNIT
+    LDA #$52
+    STA DCOMND
+    LDA #0
+    STA DBUFLO
+    LDA #4
+    STA DBUFHI
+    LDA #$80
+    STA DBYTLO
+    LDA #$00
+    STA DBYTHI
+    LDA #1
+    STA DAUX1
+    LDA #0
+    STA DAUX2
+    JSR SIOV
+    BMI HALT
+    LDA $0400
+    CMP #$FF
+    BNE BOOTDISK.1
+    LDA $0401
+    CMP #$FF
+    BEQ BINARY.FILE
+BOOTDISK.1
+    STA 0
+    CLC 
+    LDA $0402
+    STA DBUFLO
+    ADC #6
+    STA 1
+    LDA $0403
+    STA DBUFHI
+    ADC #0
+    STA 2
+    LDA $0404
+    STA 3
+    LDA $0405
+    STA 4
+?L1
+    JSR SIOV
+    BMI HALT
+    CLC 
+    LDA DBUFLO
+    ADC #$80
+    STA DBUFLO
+    LDA DBUFHI
+    ADC #0
+    STA DBUFHI
+    INC DAUX1
+    BNE ?L2
+    INC DAUX2
+?L2
+    DEC 0
+    BNE ?L1
+    DEC 5
+    BPL ?L1
+    JSR ?L3     ; Run initialisation code
+    LDA #1
+    STA BOOT
+    JSR ?L4     ; Run main program
+    RTS 
+?L3
+    JMP ($01)
+?L4
+    JMP ($03)
+;
+BINARY.FILE
+;
+HALT
+    LDA # <DLIST
+    STA SDLSTL
+    STA DLISTL
+    LDA # >DLIST
+    STA SDLSTH
+    STA DLISTH
+    LDA #$E0
+    STA CHBASE
+    STA CHBAS
+    LDA #$22
+    STA DMACTL
+    STA SDMCTL
+    LDA #$02
+    STA CHACTL
+    STA CHART
+    LDA #$CA
+    STA COLBK
+    STA COLOR4
+    LDA #$94
+    STA COLPF2
+    STA COLOR2
+    LDA #$0A
+    STA COLPF1
+    STA COLOR1
+;
+HALT2
+    JMP HALT2
+DLIST
+    .BYTE $70,$70,$70
+    .BYTE $42, <HALTMSG, >HALTMSG
+    .BYTE $02,$02,$02,$02,$02
+    .BYTE $02,$02,$02,$02,$02
+    .BYTE $02,$02,$02,$02,$02
+    .BYTE $02,$02,$02,$02,$02
+    .BYTE $02,$02,$02
+    .BYTE $41, <DLIST, >DLIST
+;
+HALTMSG
+    .SBYTE "      Atari800/OS Emulation Halted      "
+    .SBYTE "   Copyright (c) 1997 David J. Firth    "
+    .SBYTE "(c) 1998-2009 Atari800 Development Team "
+    .SBYTE "                                        "
+    .SBYTE "       http://atari800.atari.org/       "
+    .SBYTE "                                        "
+    .SBYTE "Sorry this program needs a real Atari/OS"
+    .SBYTE "  Visit the Web pages to find out more  "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+    .SBYTE "                                        "
+;
+NMI
+    BIT NMIST
+    BPL VBI
+    JMP ($0200)
+VBI
+    PHA 
+    TXA 
+    PHA 
+    TYA 
+    PHA 
+    STA NMIRES
+    JMP (VVBLKI)
+SYSVBL
+    INC RTCLOK+2
+    BNE SYSVBL.1
+    INC RTCLOK+1
+    BNE SYSVBL.1
+    INC RTCLOK
+SYSVBL.1
+    LDA SDMCTL
+    STA DMACTL
+    LDA SDLSTL
+    STA DLISTL
+    LDA SDLSTH
+    STA DLISTH
+    LDA COLOR4
+    STA COLBK
+    LDA COLOR0
+    STA COLPF0
+    LDA COLOR1
+    STA COLPF1
+    LDA COLOR2
+    STA COLPF2
+    LDA COLOR3
+    STA COLPF3
+    LDA PCOLR0
+    STA COLPM0
+    LDA PCOLR1
+    STA COLPM1
+    LDA PCOLR2
+    STA COLPM2
+    LDA PCOLR3
+    STA COLPM3
+    LDA CHART
+    STA CHACTL
+    LDA CHBAS
+    STA CHBASE
+    LDA PORTA
+    AND #$0F
+    STA STICK0
+    LDA PORTA
+    ASL A
+    ASL A
+    ASL A
+    ASL A
+    STA STICK1
+    LDA PORTB
+    AND #$0F
+    STA STICK2
+    LDA PORTB
+    ASL A
+    ASL A
+    ASL A
+    ASL A
+    STA STICK3
+    LDA GPRIOR
+    STA PRIOR
+    LDA SSKCTL
+    STA SKCTL
+    LDA TRIG0
+    STA STRIG0
+    LDA TRIG1
+    STA STRIG1
+    LDA TRIG2
+    STA STRIG2
+    LDA TRIG3
+    STA STRIG3
+    JMP (VVBLKD)
+XITVBL
+    PLA 
+    TAY 
+    PLA 
+    TAX 
+    PLA 
+IRQ.VECTOR
+    JMP ($0216)
+IRQ
+    PHA 
+    LDA IRQST   ; Get Interrupt Status
+    AND #$40
+    BNE IRQ.EXIT
+    LDA KBCODE
+    STA CH
+IRQ.EXIT
+    PLA 
+    RTI 
+;
+    *=  $FFFA
+    .WORD NMI
+    *=  $FFFC
+    .WORD COLDSTART
+    *=  $FFFE
+    .WORD IRQ.VECTOR
diff --git a/project/jni/application/atari800/src/esc.c b/project/jni/application/atari800/src/esc.c
new file mode 100755
index 000000000..8316fc717
--- /dev/null
+++ b/project/jni/application/atari800/src/esc.c
@@ -0,0 +1,197 @@
+/*
+ * esc.c - Patch the OS with escape sequences
+ *
+ * Copyright (c) 1995-1998 David Firth
+ * Copyright (c) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include "atari.h"
+#include "cassette.h"
+#include "cpu.h"
+#include "devices.h"
+#include "esc.h"
+#include "log.h"
+#include "memory.h"
+#include "pia.h"
+#include "sio.h"
+#include "ui.h"
+#include <stdlib.h>
+
+int ESC_enable_sio_patch = TRUE;
+
+/* Now we check address of every escape code, to make sure that the patch
+   has been set by the emulator and is not a CIM in Atari program.
+   Also switch() for escape codes has been changed to array of pointers
+   to functions. This allows adding port-specific patches (e.g. modem device)
+   using ESC_Add, Devices_UpdateHATABSEntry etc. without modifying
+   atari.c/devices.c. Unfortunately it can't be done for patches in Atari OS,
+   because the OS in XL/XE can be disabled.
+*/
+static UWORD esc_address[256];
+static ESC_FunctionType esc_function[256];
+
+void ESC_ClearAll(void)
+{
+	int i;
+	for (i = 0; i < 256; i++)
+		esc_function[i] = NULL;
+}
+
+void ESC_Add(UWORD address, UBYTE esc_code, ESC_FunctionType function)
+{
+	esc_address[esc_code] = address;
+	esc_function[esc_code] = function;
+	MEMORY_dPutByte(address, 0xf2);			/* ESC */
+	MEMORY_dPutByte(address + 1, esc_code);	/* ESC CODE */
+}
+
+void ESC_AddEscRts(UWORD address, UBYTE esc_code, ESC_FunctionType function)
+{
+	esc_address[esc_code] = address;
+	esc_function[esc_code] = function;
+	MEMORY_dPutByte(address, 0xf2);			/* ESC */
+	MEMORY_dPutByte(address + 1, esc_code);	/* ESC CODE */
+	MEMORY_dPutByte(address + 2, 0x60);		/* RTS */
+}
+
+/* 0xd2 is ESCRTS, which works same as pair of ESC and RTS (I think so...).
+   So this function does effectively the same as ESC_AddEscRts,
+   except that it modifies 2, not 3 bytes in Atari memory.
+   I don't know why it is done that way, so I simply leave it
+   unchanged (0xf2/0xd2 are used as in previous versions).
+*/
+void ESC_AddEscRts2(UWORD address, UBYTE esc_code, ESC_FunctionType function)
+{
+	esc_address[esc_code] = address;
+	esc_function[esc_code] = function;
+	MEMORY_dPutByte(address, 0xd2);			/* ESCRTS */
+	MEMORY_dPutByte(address + 1, esc_code);	/* ESC CODE */
+}
+
+void ESC_Remove(UBYTE esc_code)
+{
+	esc_function[esc_code] = NULL;
+}
+
+void ESC_Run(UBYTE esc_code)
+{
+	if (esc_address[esc_code] == CPU_regPC - 2 && esc_function[esc_code] != NULL) {
+		esc_function[esc_code]();
+		return;
+	}
+#ifdef CRASH_MENU
+	CPU_regPC -= 2;
+	UI_crash_address = CPU_regPC;
+	UI_crash_afterCIM = CPU_regPC + 2;
+	UI_crash_code = MEMORY_dGetByte(UI_crash_address);
+	UI_Run();
+#else /* CRASH_MENU */
+	CPU_cim_encountered = 1;
+	Log_print("Invalid ESC code %02x at address %04x", esc_code, CPU_regPC - 2);
+#ifndef __PLUS
+	if (!Atari800_Exit(TRUE))
+		exit(0);
+#else /* __PLUS */
+	Atari800_Exit(TRUE);
+#endif /* __PLUS */
+#endif /* CRASH_MENU */
+}
+
+void ESC_PatchOS(void)
+{
+	int patched = Devices_PatchOS();
+	if (ESC_enable_sio_patch) {
+		UWORD addr_l;
+		UWORD addr_s;
+		UBYTE check_s_0;
+		UBYTE check_s_1;
+		/* patch Open() of C: so we know when a leader is processed */
+		switch (Atari800_machine_type) {
+		case Atari800_MACHINE_OSA:
+		case Atari800_MACHINE_OSB:
+			addr_l = 0xef74;
+			addr_s = 0xefbc;
+			check_s_0 = 0xa0;
+			check_s_1 = 0x80;
+			break;
+		case Atari800_MACHINE_XLXE:
+			addr_l = 0xfd13;
+			addr_s = 0xfd60;
+			check_s_0 = 0xa9;
+			check_s_1 = 0x03;
+			break;
+		default:
+			return;
+		}
+		/* don't hurt non-standard OSes that may not support cassette at all  */
+		if (MEMORY_dGetByte(addr_l)     == 0xa9 && MEMORY_dGetByte(addr_l + 1) == 0x03
+		 && MEMORY_dGetByte(addr_l + 2) == 0x8d && MEMORY_dGetByte(addr_l + 3) == 0x2a
+		 && MEMORY_dGetByte(addr_l + 4) == 0x02
+		 && MEMORY_dGetByte(addr_s)     == check_s_0
+		 && MEMORY_dGetByte(addr_s + 1) == check_s_1
+		 && MEMORY_dGetByte(addr_s + 2) == 0x20 && MEMORY_dGetByte(addr_s + 3) == 0x5c
+		 && MEMORY_dGetByte(addr_s + 4) == 0xe4) {
+			ESC_Add(addr_l, ESC_COPENLOAD, CASSETTE_LeaderLoad);
+			ESC_Add(addr_s, ESC_COPENSAVE, CASSETTE_LeaderSave);
+		}
+		ESC_AddEscRts(0xe459, ESC_SIOV, SIO_Handler);
+		patched = TRUE;
+	}
+	else {
+		ESC_Remove(ESC_COPENLOAD);
+		ESC_Remove(ESC_COPENSAVE);
+		ESC_Remove(ESC_SIOV);
+	};
+	if (patched && Atari800_machine_type == Atari800_MACHINE_XLXE) {
+		/* Disable Checksum Test */
+		MEMORY_dPutByte(0xc314, 0x8e);
+		MEMORY_dPutByte(0xc315, 0xff);
+		MEMORY_dPutByte(0xc319, 0x8e);
+		MEMORY_dPutByte(0xc31a, 0xff);
+	}
+}
+
+void ESC_UpdatePatches(void)
+{
+	switch (Atari800_machine_type) {
+	case Atari800_MACHINE_OSA:
+	case Atari800_MACHINE_OSB:
+		/* Restore unpatched OS */
+		MEMORY_dCopyToMem(MEMORY_os, 0xd800, 0x2800);
+		/* Set patches */
+		ESC_PatchOS();
+		Devices_UpdatePatches();
+		break;
+	case Atari800_MACHINE_XLXE:
+		/* Don't patch if OS disabled */
+		if ((PIA_PORTB & 1) == 0)
+			break;
+		/* Restore unpatched OS */
+		MEMORY_dCopyToMem(MEMORY_os, 0xc000, 0x1000);
+		MEMORY_dCopyToMem(MEMORY_os + 0x1800, 0xd800, 0x2800);
+		/* Set patches */
+		ESC_PatchOS();
+		Devices_UpdatePatches();
+		break;
+	default:
+		break;
+	}
+}
diff --git a/project/jni/application/atari800/src/esc.h b/project/jni/application/atari800/src/esc.h
new file mode 100755
index 000000000..f278bf51f
--- /dev/null
+++ b/project/jni/application/atari800/src/esc.h
@@ -0,0 +1,96 @@
+#ifndef ESC_H_
+#define ESC_H_
+
+/* TRUE to enable patched (fast) Serial I/O. */
+extern int ESC_enable_sio_patch;
+
+/* Escape codes used to mark places in 6502 code that must
+   be handled specially by the emulator. An escape sequence
+   is an illegal 6502 opcode 0xF2 or 0xD2 followed
+   by one of these escape codes: */
+enum ESC_t {
+
+	/* SIO patch. */
+	ESC_SIOV,
+
+	/* stdio-based handlers for the BASIC version
+	   and handlers for Atari Basic loader. */
+	ESC_EHOPEN,
+	ESC_EHCLOS,
+	ESC_EHREAD,
+	ESC_EHWRIT,
+	ESC_EHSTAT,
+	ESC_EHSPEC,
+
+	ESC_KHOPEN,
+	ESC_KHCLOS,
+	ESC_KHREAD,
+	ESC_KHWRIT,
+	ESC_KHSTAT,
+	ESC_KHSPEC,
+
+	/* Atari executable loader. */
+	ESC_BINLOADER_CONT,
+
+	/* Cassette emulation. */
+	ESC_COPENLOAD = 0xa8,
+	ESC_COPENSAVE = 0xa9,
+
+	/* Printer. */
+	ESC_PHOPEN = 0xb0,
+	ESC_PHCLOS = 0xb1,
+	ESC_PHREAD = 0xb2,
+	ESC_PHWRIT = 0xb3,
+	ESC_PHSTAT = 0xb4,
+	ESC_PHSPEC = 0xb5,
+	ESC_PHINIT = 0xb6,
+
+#ifdef R_IO_DEVICE
+	/* R: device. */
+	ESC_ROPEN = 0xd0,
+	ESC_RCLOS = 0xd1,
+	ESC_RREAD = 0xd2,
+	ESC_RWRIT = 0xd3,
+	ESC_RSTAT = 0xd4,
+	ESC_RSPEC = 0xd5,
+	ESC_RINIT = 0xd6,
+#endif
+
+	/* H: device. */
+	ESC_HHOPEN = 0xc0,
+	ESC_HHCLOS = 0xc1,
+	ESC_HHREAD = 0xc2,
+	ESC_HHWRIT = 0xc3,
+	ESC_HHSTAT = 0xc4,
+	ESC_HHSPEC = 0xc5,
+	ESC_HHINIT = 0xc6
+};
+
+/* A function called to handle an escape sequence. */
+typedef void (*ESC_FunctionType)(void);
+
+/* Puts an escape sequence at the specified address. */
+void ESC_Add(UWORD address, UBYTE esc_code, ESC_FunctionType function);
+
+/* Puts an escape sequence followed by the RTS instruction. */
+void ESC_AddEscRts(UWORD address, UBYTE esc_code, ESC_FunctionType function);
+
+/* Puts an escape sequence with an integrated RTS. */
+void ESC_AddEscRts2(UWORD address, UBYTE esc_code, ESC_FunctionType function);
+
+/* Unregisters an escape sequence. You must cleanup the Atari memory yourself. */
+void ESC_Remove(UBYTE esc_code);
+
+/* Handles an escape sequence. */
+void ESC_Run(UBYTE esc_code);
+
+/* Installs SIO patch and disables ROM checksum test. */
+void ESC_PatchOS(void);
+
+/* Unregisters all escape sequences */
+void ESC_ClearAll(void);
+
+/* Reinitializes patches after enable_*_patch change. */
+void ESC_UpdatePatches(void);
+
+#endif /* ESC_H_ */
diff --git a/project/jni/application/atari800/src/gtia.c b/project/jni/application/atari800/src/gtia.c
new file mode 100644
index 000000000..c455de4e2
--- /dev/null
+++ b/project/jni/application/atari800/src/gtia.c
@@ -0,0 +1,1290 @@
+/*
+ * gtia.c - GTIA chip emulation
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <string.h>
+
+#include "antic.h"
+#include "cassette.h"
+#include "gtia.h"
+#ifndef BASIC
+#include "input.h"
+#include "statesav.h"
+#endif
+#include "pokeysnd.h"
+#include "screen.h"
+
+/* GTIA Registers ---------------------------------------------------------- */
+
+UBYTE GTIA_M0PL;
+UBYTE GTIA_M1PL;
+UBYTE GTIA_M2PL;
+UBYTE GTIA_M3PL;
+UBYTE GTIA_P0PL;
+UBYTE GTIA_P1PL;
+UBYTE GTIA_P2PL;
+UBYTE GTIA_P3PL;
+UBYTE GTIA_HPOSP0;
+UBYTE GTIA_HPOSP1;
+UBYTE GTIA_HPOSP2;
+UBYTE GTIA_HPOSP3;
+UBYTE GTIA_HPOSM0;
+UBYTE GTIA_HPOSM1;
+UBYTE GTIA_HPOSM2;
+UBYTE GTIA_HPOSM3;
+UBYTE GTIA_SIZEP0;
+UBYTE GTIA_SIZEP1;
+UBYTE GTIA_SIZEP2;
+UBYTE GTIA_SIZEP3;
+UBYTE GTIA_SIZEM;
+UBYTE GTIA_GRAFP0;
+UBYTE GTIA_GRAFP1;
+UBYTE GTIA_GRAFP2;
+UBYTE GTIA_GRAFP3;
+UBYTE GTIA_GRAFM;
+UBYTE GTIA_COLPM0;
+UBYTE GTIA_COLPM1;
+UBYTE GTIA_COLPM2;
+UBYTE GTIA_COLPM3;
+UBYTE GTIA_COLPF0;
+UBYTE GTIA_COLPF1;
+UBYTE GTIA_COLPF2;
+UBYTE GTIA_COLPF3;
+UBYTE GTIA_COLBK;
+UBYTE GTIA_PRIOR;
+UBYTE GTIA_VDELAY;
+UBYTE GTIA_GRACTL;
+
+/* Internal GTIA state ----------------------------------------------------- */
+
+int GTIA_speaker;
+int GTIA_consol_index = 0;
+UBYTE GTIA_consol_table[3];
+UBYTE consol_mask;
+UBYTE GTIA_TRIG[4];
+UBYTE GTIA_TRIG_latch[4];
+
+#if defined(BASIC) || defined(CURSES_BASIC)
+
+static UBYTE PF0PM = 0;
+static UBYTE PF1PM = 0;
+static UBYTE PF2PM = 0;
+static UBYTE PF3PM = 0;
+#define GTIA_collisions_mask_missile_playfield 0
+#define GTIA_collisions_mask_player_playfield 0
+#define GTIA_collisions_mask_missile_player 0
+#define GTIA_collisions_mask_player_player 0
+
+#else /* defined(BASIC) || defined(CURSES_BASIC) */
+
+void set_prior(UBYTE byte);			/* in antic.c */
+
+/* Player/Missile stuff ---------------------------------------------------- */
+
+/* change to 0x00 to disable collisions */
+UBYTE GTIA_collisions_mask_missile_playfield = 0x0f;
+UBYTE GTIA_collisions_mask_player_playfield = 0x0f;
+UBYTE GTIA_collisions_mask_missile_player = 0x0f;
+UBYTE GTIA_collisions_mask_player_player = 0x0f;
+
+#ifdef NEW_CYCLE_EXACT
+/* temporary collision registers for the current scanline only */
+UBYTE P1PL_T;
+UBYTE P2PL_T;
+UBYTE P3PL_T;
+UBYTE M0PL_T;
+UBYTE M1PL_T;
+UBYTE M2PL_T;
+UBYTE M3PL_T;
+/* If partial collisions have been generated during a scanline, this
+ * is the position of the up-to-date collision point , otherwise it is 0
+ */
+int collision_curpos;
+/* if hitclr has been written to during a scanline, this is the position
+ * within pm_scaline at which it was written to, and collisions should
+ * only be generated from this point on, otherwise it is 0
+ */
+int hitclr_pos;
+#else
+#define P1PL_T P1PL
+#define P2PL_T P2PL
+#define P3PL_T P3PL
+#define M0PL_T M0PL
+#define M1PL_T M1PL
+#define M2PL_T M2PL
+#define M3PL_T M3PL
+#endif /* NEW_CYCLE_EXACT */
+
+static UBYTE *hposp_ptr[4];
+static UBYTE *hposm_ptr[4];
+static ULONG hposp_mask[4];
+
+static ULONG grafp_lookup[4][256];
+static ULONG *grafp_ptr[4];
+static int global_sizem[4];
+
+static const int PM_Width[4] = {1, 2, 1, 4};
+
+/* Meaning of bits in GTIA_pm_scanline:
+bit 0 - Player 0
+bit 1 - Player 1
+bit 2 - Player 2
+bit 3 - Player 3
+bit 4 - Missile 0
+bit 5 - Missile 1
+bit 6 - Missile 2
+bit 7 - Missile 3
+*/
+
+UBYTE GTIA_pm_scanline[Screen_WIDTH / 2 + 8];	/* there's a byte for every *pair* of pixels */
+int GTIA_pm_dirty = TRUE;
+
+#define C_PM0	0x01
+#define C_PM1	0x02
+#define C_PM01	0x03
+#define C_PM2	0x04
+#define C_PM3	0x05
+#define C_PM23	0x06
+#define C_PM023	0x07
+#define C_PM123	0x08
+#define C_PM0123 0x09
+#define C_PM25	0x0a
+#define C_PM35	0x0b
+#define C_PM235	0x0c
+#define C_COLLS	0x0d
+#define C_BAK	0x00
+#define C_HI2	0x20
+#define C_HI3	0x30
+#define C_PF0	0x40
+#define C_PF1	0x50
+#define C_PF2	0x60
+#define C_PF3	0x70
+
+#define PF0PM (*(UBYTE *) &ANTIC_cl[C_PF0 | C_COLLS])
+#define PF1PM (*(UBYTE *) &ANTIC_cl[C_PF1 | C_COLLS])
+#define PF2PM (*(UBYTE *) &ANTIC_cl[C_PF2 | C_COLLS])
+#define PF3PM (*(UBYTE *) &ANTIC_cl[C_PF3 | C_COLLS])
+
+/* Colours ----------------------------------------------------------------- */
+
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+UWORD colour_translation_table[256];
+#endif /* USE_COLOUR_TRANSLATION_TABLE */
+
+static void setup_gtia9_11(void) {
+	int i;
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+	UWORD temp;
+	temp = colour_translation_table[GTIA_COLBK & 0xf0];
+	ANTIC_lookup_gtia11[0] = ((ULONG) temp << 16) + temp;
+	for (i = 1; i < 16; i++) {
+		temp = colour_translation_table[GTIA_COLBK | i];
+		ANTIC_lookup_gtia9[i] = ((ULONG) temp << 16) + temp;
+		temp = colour_translation_table[GTIA_COLBK | (i << 4)];
+		ANTIC_lookup_gtia11[i] = ((ULONG) temp << 16) + temp;
+	}
+#else
+	ULONG count9 = 0;
+	ULONG count11 = 0;
+	ANTIC_lookup_gtia11[0] = ANTIC_lookup_gtia9[0] & 0xf0f0f0f0;
+	for (i = 1; i < 16; i++) {
+		ANTIC_lookup_gtia9[i] = ANTIC_lookup_gtia9[0] | (count9 += 0x01010101);
+		ANTIC_lookup_gtia11[i] = ANTIC_lookup_gtia9[0] | (count11 += 0x10101010);
+	}
+#endif
+}
+
+#endif /* defined(BASIC) || defined(CURSES_BASIC) */
+
+/* Initialization ---------------------------------------------------------- */
+
+int GTIA_Initialise(int *argc, char *argv[])
+{
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+	int i;
+	for (i = 0; i < 256; i++) {
+		int tmp = i + 0x100;
+		ULONG grafp1 = 0;
+		ULONG grafp2 = 0;
+		ULONG grafp4 = 0;
+		do {
+			grafp1 <<= 1;
+			grafp2 <<= 2;
+			grafp4 <<= 4;
+			if (tmp & 1) {
+				grafp1++;
+				grafp2 += 3;
+				grafp4 += 15;
+			}
+			tmp >>= 1;
+		} while (tmp != 1);
+		grafp_lookup[2][i] = grafp_lookup[0][i] = grafp1;
+		grafp_lookup[1][i] = grafp2;
+		grafp_lookup[3][i] = grafp4;
+	}
+	memset(ANTIC_cl, GTIA_COLOUR_BLACK, sizeof(ANTIC_cl));
+	for (i = 0; i < 32; i++)
+		GTIA_PutByte((UWORD) i, 0);
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+	return TRUE;
+}
+
+#ifdef NEW_CYCLE_EXACT
+
+/* generate updated PxPL and MxPL for part of a scanline */
+/* slow, but should be called rarely */
+static void generate_partial_pmpl_colls(int l, int r)
+{
+	int i;
+	if (r < 0 || l >= (int) sizeof(GTIA_pm_scanline) / (int) sizeof(GTIA_pm_scanline[0]))
+		return;
+	if (r >= (int) sizeof(GTIA_pm_scanline) / (int) sizeof(GTIA_pm_scanline[0])) {
+		r = (int) sizeof(GTIA_pm_scanline) / (int) sizeof(GTIA_pm_scanline[0]);
+	}
+	if (l < 0)
+		l = 0;
+
+	for (i = l; i <= r; i++) {
+		UBYTE p = GTIA_pm_scanline[i];
+/* It is possible that some bits are set in PxPL/MxPL here, which would
+ * not otherwise be set ever in GTIA_NewPmScanline.  This is because the
+ * player collisions are always generated in order in GTIA_NewPmScanline.
+ * However this does not cause any problem because we never use those bits
+ * of PxPL/MxPL in the collision reading code.
+ */
+		GTIA_P1PL |= (p & (1 << 1)) ?  p : 0;
+		GTIA_P2PL |= (p & (1 << 2)) ?  p : 0;
+		GTIA_P3PL |= (p & (1 << 3)) ?  p : 0;
+		GTIA_M0PL |= (p & (0x10 << 0)) ?  p : 0;
+		GTIA_M1PL |= (p & (0x10 << 1)) ?  p : 0;
+		GTIA_M2PL |= (p & (0x10 << 2)) ?  p : 0;
+		GTIA_M3PL |= (p & (0x10 << 3)) ?  p : 0;
+	}
+
+}
+
+/* update pm->pl collisions for a partial scanline */
+static void update_partial_pmpl_colls(void)
+{
+	int l = collision_curpos;
+	int r = ANTIC_XPOS * 2 - 37;
+	generate_partial_pmpl_colls(l, r);
+	collision_curpos = r;
+}
+
+/* update pm-> pl collisions at the end of a scanline */
+void GTIA_UpdatePmplColls(void)
+{
+	if (hitclr_pos != 0){
+		generate_partial_pmpl_colls(hitclr_pos,
+				sizeof(GTIA_pm_scanline) / sizeof(GTIA_pm_scanline[0]) - 1);
+/* If hitclr was written to, then only part of GTIA_pm_scanline should be used
+ * for collisions */
+
+	}
+	else {
+/* otherwise the whole of pm_scaline can be used for collisions.  This will
+ * update the collision registers based on the generated collisions for the
+ * current line */
+		GTIA_P1PL |= P1PL_T;
+		GTIA_P2PL |= P2PL_T;
+		GTIA_P3PL |= P3PL_T;
+		GTIA_M0PL |= M0PL_T;
+		GTIA_M1PL |= M1PL_T;
+		GTIA_M2PL |= M2PL_T;
+		GTIA_M3PL |= M3PL_T;
+	}
+	collision_curpos = 0;
+	hitclr_pos = 0;
+}
+
+#else
+#define update_partial_pmpl_colls()
+#endif /* NEW_CYCLE_EXACT */
+
+/* Prepare PMG scanline ---------------------------------------------------- */
+
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+
+void GTIA_NewPmScanline(void)
+{
+#ifdef NEW_CYCLE_EXACT
+/* reset temporary pm->pl collisions */
+	P1PL_T = P2PL_T = P3PL_T = 0;
+	M0PL_T = M1PL_T = M2PL_T = M3PL_T = 0;
+#endif /* NEW_CYCLE_EXACT */
+/* Clear if necessary */
+	if (GTIA_pm_dirty) {
+		memset(GTIA_pm_scanline, 0, Screen_WIDTH / 2);
+		GTIA_pm_dirty = FALSE;
+	}
+
+/* Draw Players */
+
+#define DO_PLAYER(n)	if (GTIA_GRAFP##n) {						\
+	ULONG grafp = grafp_ptr[n][GTIA_GRAFP##n] & hposp_mask[n];	\
+	if (grafp) {											\
+		UBYTE *ptr = hposp_ptr[n];							\
+		GTIA_pm_dirty = TRUE;									\
+		do {												\
+			if (grafp & 1)									\
+				P##n##PL_T |= *ptr |= 1 << n;					\
+			ptr++;											\
+			grafp >>= 1;									\
+		} while (grafp);									\
+	}														\
+}
+
+	/* optimized DO_PLAYER(0): GTIA_pm_scanline is clear and P0PL is unused */
+	if (GTIA_GRAFP0) {
+		ULONG grafp = grafp_ptr[0][GTIA_GRAFP0] & hposp_mask[0];
+		if (grafp) {
+			UBYTE *ptr = hposp_ptr[0];
+			GTIA_pm_dirty = TRUE;
+			do {
+				if (grafp & 1)
+					*ptr = 1;
+				ptr++;
+				grafp >>= 1;
+			} while (grafp);
+		}
+	}
+
+	DO_PLAYER(1)
+	DO_PLAYER(2)
+	DO_PLAYER(3)
+
+/* Draw Missiles */
+
+#define DO_MISSILE(n,p,m,r,l)	if (GTIA_GRAFM & m) {	\
+	int j = global_sizem[n];						\
+	UBYTE *ptr = hposm_ptr[n];						\
+	if (GTIA_GRAFM & r) {								\
+		if (GTIA_GRAFM & l)								\
+			j <<= 1;								\
+	}												\
+	else											\
+		ptr += j;									\
+	if (ptr < GTIA_pm_scanline + 2) {					\
+		j += ptr - GTIA_pm_scanline - 2;					\
+		ptr = GTIA_pm_scanline + 2;						\
+	}												\
+	else if (ptr + j > GTIA_pm_scanline + Screen_WIDTH / 2 - 2)	\
+		j = GTIA_pm_scanline + Screen_WIDTH / 2 - 2 - ptr;		\
+	if (j > 0)										\
+		do											\
+			M##n##PL_T |= *ptr++ |= p;				\
+		while (--j);								\
+}
+
+	if (GTIA_GRAFM) {
+		GTIA_pm_dirty = TRUE;
+		DO_MISSILE(3, 0x80, 0xc0, 0x80, 0x40)
+		DO_MISSILE(2, 0x40, 0x30, 0x20, 0x10)
+		DO_MISSILE(1, 0x20, 0x0c, 0x08, 0x04)
+		DO_MISSILE(0, 0x10, 0x03, 0x02, 0x01)
+	}
+}
+
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+/* GTIA registers ---------------------------------------------------------- */
+
+void GTIA_Frame(void)
+{
+#ifdef BASIC
+	int consol = 0xf;
+#else
+	int consol = INPUT_key_consol | 0x08;
+#endif
+
+	GTIA_consol_table[0] = consol;
+	GTIA_consol_table[1] = GTIA_consol_table[2] &= consol;
+
+	if (GTIA_GRACTL & 4) {
+		GTIA_TRIG_latch[0] &= GTIA_TRIG[0];
+		GTIA_TRIG_latch[1] &= GTIA_TRIG[1];
+		GTIA_TRIG_latch[2] &= GTIA_TRIG[2];
+		GTIA_TRIG_latch[3] &= GTIA_TRIG[3];
+	}
+}
+
+UBYTE GTIA_GetByte(UWORD addr)
+{
+	switch (addr & 0x1f) {
+	case GTIA_OFFSET_M0PF:
+		return (((PF0PM & 0x10) >> 4)
+		      + ((PF1PM & 0x10) >> 3)
+		      + ((PF2PM & 0x10) >> 2)
+		      + ((PF3PM & 0x10) >> 1)) & GTIA_collisions_mask_missile_playfield;
+	case GTIA_OFFSET_M1PF:
+		return (((PF0PM & 0x20) >> 5)
+		      + ((PF1PM & 0x20) >> 4)
+		      + ((PF2PM & 0x20) >> 3)
+		      + ((PF3PM & 0x20) >> 2)) & GTIA_collisions_mask_missile_playfield;
+	case GTIA_OFFSET_M2PF:
+		return (((PF0PM & 0x40) >> 6)
+		      + ((PF1PM & 0x40) >> 5)
+		      + ((PF2PM & 0x40) >> 4)
+		      + ((PF3PM & 0x40) >> 3)) & GTIA_collisions_mask_missile_playfield;
+	case GTIA_OFFSET_M3PF:
+		return (((PF0PM & 0x80) >> 7)
+		      + ((PF1PM & 0x80) >> 6)
+		      + ((PF2PM & 0x80) >> 5)
+		      + ((PF3PM & 0x80) >> 4)) & GTIA_collisions_mask_missile_playfield;
+	case GTIA_OFFSET_P0PF:
+		return ((PF0PM & 0x01)
+		      + ((PF1PM & 0x01) << 1)
+		      + ((PF2PM & 0x01) << 2)
+		      + ((PF3PM & 0x01) << 3)) & GTIA_collisions_mask_player_playfield;
+	case GTIA_OFFSET_P1PF:
+		return (((PF0PM & 0x02) >> 1)
+		      + (PF1PM & 0x02)
+		      + ((PF2PM & 0x02) << 1)
+		      + ((PF3PM & 0x02) << 2)) & GTIA_collisions_mask_player_playfield;
+	case GTIA_OFFSET_P2PF:
+		return (((PF0PM & 0x04) >> 2)
+		      + ((PF1PM & 0x04) >> 1)
+		      + (PF2PM & 0x04)
+		      + ((PF3PM & 0x04) << 1)) & GTIA_collisions_mask_player_playfield;
+	case GTIA_OFFSET_P3PF:
+		return (((PF0PM & 0x08) >> 3)
+		      + ((PF1PM & 0x08) >> 2)
+		      + ((PF2PM & 0x08) >> 1)
+		      + (PF3PM & 0x08)) & GTIA_collisions_mask_player_playfield;
+	case GTIA_OFFSET_M0PL:
+		update_partial_pmpl_colls();
+		return GTIA_M0PL & GTIA_collisions_mask_missile_player;
+	case GTIA_OFFSET_M1PL:
+		update_partial_pmpl_colls();
+		return GTIA_M1PL & GTIA_collisions_mask_missile_player;
+	case GTIA_OFFSET_M2PL:
+		update_partial_pmpl_colls();
+		return GTIA_M2PL & GTIA_collisions_mask_missile_player;
+	case GTIA_OFFSET_M3PL:
+		update_partial_pmpl_colls();
+		return GTIA_M3PL & GTIA_collisions_mask_missile_player;
+	case GTIA_OFFSET_P0PL:
+		update_partial_pmpl_colls();
+		return (((GTIA_P1PL & 0x01) << 1)  /* mask in player 1 */
+		      + ((GTIA_P2PL & 0x01) << 2)  /* mask in player 2 */
+		      + ((GTIA_P3PL & 0x01) << 3)) /* mask in player 3 */
+		     & GTIA_collisions_mask_player_player;
+	case GTIA_OFFSET_P1PL:
+		update_partial_pmpl_colls();
+		return ((GTIA_P1PL & 0x01)         /* mask in player 0 */
+		      + ((GTIA_P2PL & 0x02) << 1)  /* mask in player 2 */
+		      + ((GTIA_P3PL & 0x02) << 2)) /* mask in player 3 */
+		     & GTIA_collisions_mask_player_player;
+	case GTIA_OFFSET_P2PL:
+		update_partial_pmpl_colls();
+		return ((GTIA_P2PL & 0x03)         /* mask in player 0 and 1 */
+		      + ((GTIA_P3PL & 0x04) << 1)) /* mask in player 3 */
+		     & GTIA_collisions_mask_player_player;
+	case GTIA_OFFSET_P3PL:
+		update_partial_pmpl_colls();
+		return (GTIA_P3PL & 0x07)          /* mask in player 0,1, and 2 */
+		     & GTIA_collisions_mask_player_player;
+	case GTIA_OFFSET_TRIG0:
+		return GTIA_TRIG[0] & GTIA_TRIG_latch[0];
+	case GTIA_OFFSET_TRIG1:
+		return GTIA_TRIG[1] & GTIA_TRIG_latch[1];
+	case GTIA_OFFSET_TRIG2:
+		return GTIA_TRIG[2] & GTIA_TRIG_latch[2];
+	case GTIA_OFFSET_TRIG3:
+		return GTIA_TRIG[3] & GTIA_TRIG_latch[3];
+	case GTIA_OFFSET_PAL:
+		return (Atari800_tv_mode == Atari800_TV_PAL) ? 0x01 : 0x0f;
+	case GTIA_OFFSET_CONSOL:
+		{
+			UBYTE byte = GTIA_consol_table[GTIA_consol_index] & consol_mask;
+			if (GTIA_consol_index > 0) {
+				GTIA_consol_index--;
+				if (GTIA_consol_index == 0 && CASSETTE_hold_start) {
+					/* press Space after Start to start cassette boot */
+					CASSETTE_press_space = 1;
+					CASSETTE_hold_start = CASSETTE_hold_start_on_reboot;
+				}
+			}
+			return byte;
+		}
+	default:
+		break;
+	}
+
+	return 0xf;
+}
+
+void GTIA_PutByte(UWORD addr, UBYTE byte)
+{
+#if !defined(BASIC) && !defined(CURSES_BASIC)
+	UWORD cword;
+	UWORD cword2;
+
+#ifdef NEW_CYCLE_EXACT
+	int x; /* the cycle-exact update position in GTIA_pm_scanline */
+	if (ANTIC_DRAWING_SCREEN) {
+		if ((addr & 0x1f) != GTIA_PRIOR) {
+			ANTIC_UpdateScanline();
+		} else {
+			ANTIC_UpdateScanlinePrior(byte);
+		}
+	}
+#define UPDATE_PM_CYCLE_EXACT if(ANTIC_DRAWING_SCREEN) GTIA_NewPmScanline();
+#else
+#define UPDATE_PM_CYCLE_EXACT
+#endif
+
+#endif /* !defined(BASIC) && !defined(CURSES_BASIC) */
+
+	switch (addr & 0x1f) {
+	case GTIA_OFFSET_CONSOL:
+		GTIA_speaker = !(byte & 0x08);
+#ifdef CONSOLE_SOUND
+		POKEYSND_UpdateConsol(1);
+#endif
+		consol_mask = (~byte) & 0x0f;
+		break;
+
+#if defined(BASIC) || defined(CURSES_BASIC)
+
+	/* We use these for Antic modes 6, 7 on Curses */
+	case GTIA_OFFSET_COLPF0:
+		GTIA_COLPF0 = byte;
+		break;
+	case GTIA_OFFSET_COLPF1:
+		GTIA_COLPF1 = byte;
+		break;
+	case GTIA_OFFSET_COLPF2:
+		GTIA_COLPF2 = byte;
+		break;
+	case GTIA_OFFSET_COLPF3:
+		GTIA_COLPF3 = byte;
+		break;
+
+#else
+
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+	case GTIA_OFFSET_COLBK:
+		GTIA_COLBK = byte &= 0xfe;
+		ANTIC_cl[C_BAK] = cword = colour_translation_table[byte];
+		if (cword != (UWORD) (ANTIC_lookup_gtia9[0]) ) {
+			ANTIC_lookup_gtia9[0] = cword + (cword << 16);
+			if (GTIA_PRIOR & 0x40)
+				setup_gtia9_11();
+		}
+		break;
+	case GTIA_OFFSET_COLPF0:
+		GTIA_COLPF0 = byte &= 0xfe;
+		ANTIC_cl[C_PF0] = cword = GTIA_colour_translation_table[byte];
+		if ((GTIA_PRIOR & 1) == 0) {
+			ANTIC_cl[C_PF0 | C_PM23] = ANTIC_cl[C_PF0 | C_PM3] = ANTIC_cl[C_PF0 | C_PM2] = cword;
+			if ((GTIA_PRIOR & 3) == 0) {
+				if (GTIA_PRIOR & 0xf) {
+					ANTIC_cl[C_PF0 | C_PM01] = ANTIC_cl[C_PF0 | C_PM1] = ANTIC_cl[C_PF0 | C_PM0] = cword;
+					if ((GTIA_PRIOR & 0xf) == 0xc)
+						ANTIC_cl[C_PF0 | C_PM0123] = ANTIC_cl[C_PF0 | C_PM123] = ANTIC_cl[C_PF0 | C_PM023] = cword;
+				}
+				else {
+					ANTIC_cl[C_PF0 | C_PM0] = colour_translation_table[byte | GTIA_COLPM0];
+					ANTIC_cl[C_PF0 | C_PM1] = colour_translation_table[byte | GTIA_COLPM1];
+					ANTIC_cl[C_PF0 | C_PM01] = colour_translation_table[byte | GTIA_COLPM0 | GTIA_COLPM1];
+				}
+			}
+			if ((GTIA_PRIOR & 0xf) >= 0xa)
+				ANTIC_cl[C_PF0 | C_PM25] = cword;
+		}
+		break;
+	case GTIA_OFFSET_COLPF1:
+		GTIA_COLPF1 = byte &= 0xfe;
+		ANTIC_cl[C_PF1] = cword = GTIA_colour_translation_table[byte];
+		if ((GTIA_PRIOR & 1) == 0) {
+			ANTIC_cl[C_PF1 | C_PM23] = ANTIC_cl[C_PF1 | C_PM3] = ANTIC_cl[C_PF1 | C_PM2] = cword;
+			if ((GTIA_PRIOR & 3) == 0) {
+				if (GTIA_PRIOR & 0xf) {
+					ANTIC_cl[C_PF1 | C_PM01] = ANTIC_cl[C_PF1 | C_PM1] = ANTIC_cl[C_PF1 | C_PM0] = cword;
+					if ((GTIA_PRIOR & 0xf) == 0xc)
+						ANTIC_cl[C_PF1 | C_PM0123] = ANTIC_cl[C_PF1 | C_PM123] = ANTIC_cl[C_PF1 | C_PM023] = cword;
+				}
+				else {
+					ANTIC_cl[C_PF1 | C_PM0] = colour_translation_table[byte | GTIA_COLPM0];
+					ANTIC_cl[C_PF1 | C_PM1] = colour_translation_table[byte | GTIA_COLPM1];
+					ANTIC_cl[C_PF1 | C_PM01] = colour_translation_table[byte | GTIA_COLPM0 | GTIA_COLPM1];
+				}
+			}
+		}
+		{
+			UBYTE byte2 = (GTIA_COLPF2 & 0xf0) + (byte & 0xf);
+			ANTIC_cl[C_HI2] = cword = colour_translation_table[byte2];
+			ANTIC_cl[C_HI3] = colour_translation_table[(GTIA_COLPF3 & 0xf0) | (byte & 0xf)];
+			if (GTIA_PRIOR & 4)
+				ANTIC_cl[C_HI2 | C_PM01] = ANTIC_cl[C_HI2 | C_PM1] = ANTIC_cl[C_HI2 | C_PM0] = cword;
+			if ((GTIA_PRIOR & 9) == 0) {
+				if (GTIA_PRIOR & 0xf)
+					ANTIC_cl[C_HI2 | C_PM23] = ANTIC_cl[C_HI2 | C_PM3] = ANTIC_cl[C_HI2 | C_PM2] = cword;
+				else {
+					ANTIC_cl[C_HI2 | C_PM2] = colour_translation_table[byte2 | (GTIA_COLPM2 & 0xf0)];
+					ANTIC_cl[C_HI2 | C_PM3] = colour_translation_table[byte2 | (GTIA_COLPM3 & 0xf0)];
+					ANTIC_cl[C_HI2 | C_PM23] = colour_translation_table[byte2 | ((GTIA_COLPM2 | GTIA_COLPM3) & 0xf0)];
+				}
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPF2:
+		GTIA_COLPF2 = byte &= 0xfe;
+		ANTIC_cl[C_PF2] = cword = GTIA_colour_translation_table[byte];
+		{
+			UBYTE byte2 = (byte & 0xf0) + (GTIA_COLPF1 & 0xf);
+			ANTIC_cl[C_HI2] = cword2 = colour_translation_table[byte2];
+			if (GTIA_PRIOR & 4) {
+				ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PF2 | C_PM1] = ANTIC_cl[C_PF2 | C_PM0] = cword;
+				ANTIC_cl[C_HI2 | C_PM01] = ANTIC_cl[C_HI2 | C_PM1] = ANTIC_cl[C_HI2 | C_PM0] = cword2;
+			}
+			if ((GTIA_PRIOR & 9) == 0) {
+				if (GTIA_PRIOR & 0xf) {
+					ANTIC_cl[C_PF2 | C_PM23] = ANTIC_cl[C_PF2 | C_PM3] = ANTIC_cl[C_PF2 | C_PM2] = cword;
+					ANTIC_cl[C_HI2 | C_PM23] = ANTIC_cl[C_HI2 | C_PM3] = ANTIC_cl[C_HI2 | C_PM2] = cword2;
+				}
+				else {
+					ANTIC_cl[C_PF2 | C_PM2] = colour_translation_table[byte | GTIA_COLPM2];
+					ANTIC_cl[C_PF2 | C_PM3] = colour_translation_table[byte | GTIA_COLPM3];
+					ANTIC_cl[C_PF2 | C_PM23] = colour_translation_table[byte | GTIA_COLPM2 | GTIA_COLPM3];
+					ANTIC_cl[C_HI2 | C_PM2] = colour_translation_table[byte2 | (GTIA_COLPM2 & 0xf0)];
+					ANTIC_cl[C_HI2 | C_PM3] = colour_translation_table[byte2 | (GTIA_COLPM3 & 0xf0)];
+					ANTIC_cl[C_HI2 | C_PM23] = colour_translation_table[byte2 | ((GTIA_COLPM2 | GTIA_COLPM3) & 0xf0)];
+				}
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPF3:
+		GTIA_COLPF3 = byte &= 0xfe;
+		ANTIC_cl[C_PF3] = cword = colour_translation_table[byte];
+		ANTIC_cl[C_HI3] = cword2 = colour_translation_table[(byte & 0xf0) | (GTIA_COLPF1 & 0xf)];
+		if (GTIA_PRIOR & 4)
+			ANTIC_cl[C_PF3 | C_PM01] = ANTIC_cl[C_PF3 | C_PM1] = ANTIC_cl[C_PF3 | C_PM0] = cword;
+		if ((GTIA_PRIOR & 9) == 0) {
+			if (GTIA_PRIOR & 0xf)
+				ANTIC_cl[C_PF3 | C_PM23] = ANTIC_cl[C_PF3 | C_PM3] = ANTIC_cl[C_PF3 | C_PM2] = cword;
+			else {
+				ANTIC_cl[C_PF3 | C_PM25] = ANTIC_cl[C_PF2 | C_PM25] = ANTIC_cl[C_PM25] = ANTIC_cl[C_PF3 | C_PM2] = colour_translation_table[byte | GTIA_COLPM2];
+				ANTIC_cl[C_PF3 | C_PM35] = ANTIC_cl[C_PF2 | C_PM35] = ANTIC_cl[C_PM35] = ANTIC_cl[C_PF3 | C_PM3] = colour_translation_table[byte | GTIA_COLPM3];
+				ANTIC_cl[C_PF3 | C_PM235] = ANTIC_cl[C_PF2 | C_PM235] = ANTIC_cl[C_PM235] = ANTIC_cl[C_PF3 | C_PM23] = colour_translation_table[byte | GTIA_COLPM2 | GTIA_COLPM3];
+				ANTIC_cl[C_PF0 | C_PM235] = ANTIC_cl[C_PF0 | C_PM35] = ANTIC_cl[C_PF0 | C_PM25] =
+				ANTIC_cl[C_PF1 | C_PM235] = ANTIC_cl[C_PF1 | C_PM35] = ANTIC_cl[C_PF1 | C_PM25] = cword;
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPM0:
+		GTIA_COLPM0 = byte &= 0xfe;
+		ANTIC_cl[C_PM023] = ANTIC_cl[C_PM0] = cword = colour_translation_table[byte];
+		{
+			UBYTE byte2 = byte | GTIA_COLPM1;
+			ANTIC_cl[C_PM0123] = ANTIC_cl[C_PM01] = cword2 = colour_translation_table[byte2];
+			if ((GTIA_PRIOR & 4) == 0) {
+				ANTIC_cl[C_PF2 | C_PM0] = ANTIC_cl[C_PF3 | C_PM0] = cword;
+				ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PF3 | C_PM01] = cword2;
+				ANTIC_cl[C_HI2 | C_PM0] = colour_translation_table[(byte & 0xf0) | (GTIA_COLPF1 & 0xf)];
+				ANTIC_cl[C_HI2 | C_PM01] = colour_translation_table[(byte2 & 0xf0) | (GTIA_COLPF1 & 0xf)];
+				if ((GTIA_PRIOR & 0xc) == 0) {
+					if (GTIA_PRIOR & 3) {
+						ANTIC_cl[C_PF0 | C_PM0] = ANTIC_cl[C_PF1 | C_PM0] = cword;
+						ANTIC_cl[C_PF0 | C_PM01] = ANTIC_cl[C_PF1 | C_PM01] = cword2;
+					}
+					else {
+						ANTIC_cl[C_PF0 | C_PM0] = colour_translation_table[byte | GTIA_COLPF0];
+						ANTIC_cl[C_PF1 | C_PM0] = colour_translation_table[byte | GTIA_COLPF1];
+						ANTIC_cl[C_PF0 | C_PM01] = colour_translation_table[byte2 | GTIA_COLPF0];
+						ANTIC_cl[C_PF1 | C_PM01] = colour_translation_table[byte2 | GTIA_COLPF1];
+					}
+				}
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPM1:
+		GTIA_COLPM1 = byte &= 0xfe;
+		ANTIC_cl[C_PM123] = ANTIC_cl[C_PM1] = cword = colour_translation_table[byte];
+		{
+			UBYTE byte2 = byte | GTIA_COLPM0;
+			ANTIC_cl[C_PM0123] = ANTIC_cl[C_PM01] = cword2 = colour_translation_table[byte2];
+			if ((GTIA_PRIOR & 4) == 0) {
+				ANTIC_cl[C_PF2 | C_PM1] = ANTIC_cl[C_PF3 | C_PM1] = cword;
+				ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PF3 | C_PM01] = cword2;
+				ANTIC_cl[C_HI2 | C_PM1] = colour_translation_table[(byte & 0xf0) | (GTIA_COLPF1 & 0xf)];
+				ANTIC_cl[C_HI2 | C_PM01] = colour_translation_table[(byte2 & 0xf0) | (GTIA_COLPF1 & 0xf)];
+				if ((GTIA_PRIOR & 0xc) == 0) {
+					if (GTIA_PRIOR & 3) {
+						ANTIC_cl[C_PF0 | C_PM1] = ANTIC_cl[C_PF1 | C_PM1] = cword;
+						ANTIC_cl[C_PF0 | C_PM01] = ANTIC_cl[C_PF1 | C_PM01] = cword2;
+					}
+					else {
+						ANTIC_cl[C_PF0 | C_PM1] = colour_translation_table[byte | GTIA_COLPF0];
+						ANTIC_cl[C_PF1 | C_PM1] = colour_translation_table[byte | GTIA_COLPF1];
+						ANTIC_cl[C_PF0 | C_PM01] = colour_translation_table[byte2 | GTIA_COLPF0];
+						ANTIC_cl[C_PF1 | C_PM01] = colour_translation_table[byte2 | GTIA_COLPF1];
+					}
+				}
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPM2:
+		GTIA_COLPM2 = byte &= 0xfe;
+		ANTIC_cl[C_PM2] = cword = colour_translation_table[byte];
+		{
+			UBYTE byte2 = byte | GTIA_COLPM3;
+			ANTIC_cl[C_PM23] = cword2 = colour_translation_table[byte2];
+			if (GTIA_PRIOR & 1) {
+				ANTIC_cl[C_PF0 | C_PM2] = ANTIC_cl[C_PF1 | C_PM2] = cword;
+				ANTIC_cl[C_PF0 | C_PM23] = ANTIC_cl[C_PF1 | C_PM23] = cword2;
+			}
+			if ((GTIA_PRIOR & 6) == 0) {
+				if (GTIA_PRIOR & 9) {
+					ANTIC_cl[C_PF2 | C_PM2] = ANTIC_cl[C_PF3 | C_PM2] = cword;
+					ANTIC_cl[C_PF2 | C_PM23] = ANTIC_cl[C_PF3 | C_PM23] = cword2;
+					ANTIC_cl[C_HI2 | C_PM2] = colour_translation_table[(byte & 0xf0) | (GTIA_COLPF1 & 0xf)];
+					ANTIC_cl[C_HI2 | C_PM23] = colour_translation_table[(byte2 & 0xf0) | (GTIA_COLPF1 & 0xf)];
+				}
+				else {
+					ANTIC_cl[C_PF2 | C_PM2] = colour_translation_table[byte | GTIA_COLPF2];
+					ANTIC_cl[C_PF3 | C_PM25] = ANTIC_cl[C_PF2 | C_PM25] = ANTIC_cl[C_PM25] = ANTIC_cl[C_PF3 | C_PM2] = colour_translation_table[byte | GTIA_COLPF3];
+					ANTIC_cl[C_PF2 | C_PM23] = colour_translation_table[byte2 | GTIA_COLPF2];
+					ANTIC_cl[C_PF3 | C_PM235] = ANTIC_cl[C_PF2 | C_PM235] = ANTIC_cl[C_PM235] = ANTIC_cl[C_PF3 | C_PM23] = colour_translation_table[byte2 | GTIA_COLPF3];
+					ANTIC_cl[C_HI2 | C_PM2] = colour_translation_table[((byte | GTIA_COLPF2) & 0xf0) | (GTIA_COLPF1 & 0xf)];
+					ANTIC_cl[C_HI2 | C_PM25] = colour_translation_table[((byte | GTIA_COLPF3) & 0xf0) | (GTIA_COLPF1 & 0xf)];
+					ANTIC_cl[C_HI2 | C_PM23] = colour_translation_table[((byte2 | GTIA_COLPF2) & 0xf0) | (GTIA_COLPF1 & 0xf)];
+					ANTIC_cl[C_HI2 | C_PM235] = colour_translation_table[((byte2 | GTIA_COLPF3) & 0xf0) | (GTIA_COLPF1 & 0xf)];
+				}
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPM3:
+		GTIA_COLPM3 = byte &= 0xfe;
+		ANTIC_cl[C_PM3] = cword = colour_translation_table[byte];
+		{
+			UBYTE byte2 = byte | GTIA_COLPM2;
+			ANTIC_cl[C_PM23] = cword2 = colour_translation_table[byte2];
+			if (GTIA_PRIOR & 1) {
+				ANTIC_cl[C_PF0 | C_PM3] = ANTIC_cl[C_PF1 | C_PM3] = cword;
+				ANTIC_cl[C_PF0 | C_PM23] = ANTIC_cl[C_PF1 | C_PM23] = cword2;
+			}
+			if ((GTIA_PRIOR & 6) == 0) {
+				if (GTIA_PRIOR & 9) {
+					ANTIC_cl[C_PF2 | C_PM3] = ANTIC_cl[C_PF3 | C_PM3] = cword;
+					ANTIC_cl[C_PF2 | C_PM23] = ANTIC_cl[C_PF3 | C_PM23] = cword2;
+				}
+				else {
+					ANTIC_cl[C_PF2 | C_PM3] = colour_translation_table[byte | GTIA_COLPF2];
+					ANTIC_cl[C_PF3 | C_PM35] = ANTIC_cl[C_PF2 | C_PM35] = ANTIC_cl[C_PM35] = ANTIC_cl[C_PF3 | C_PM3] = colour_translation_table[byte | GTIA_COLPF3];
+					ANTIC_cl[C_PF2 | C_PM23] = colour_translation_table[byte2 | GTIA_COLPF2];
+					ANTIC_cl[C_PF3 | C_PM235] = ANTIC_cl[C_PF2 | C_PM235] = ANTIC_cl[C_PM235] = ANTIC_cl[C_PF3 | C_PM23] = colour_translation_table[byte2 | GTIA_COLPF3];
+					ANTIC_cl[C_HI2 | C_PM3] = colour_translation_table[((byte | GTIA_COLPF2) & 0xf0) | (GTIA_COLPF1 & 0xf)];
+					ANTIC_cl[C_HI2 | C_PM23] = colour_translation_table[((byte2 | GTIA_COLPF2) & 0xf0) | (GTIA_COLPF1 & 0xf)];
+				}
+			}
+		}
+		break;
+#else /* USE_COLOUR_TRANSLATION_TABLE */
+	case GTIA_OFFSET_COLBK:
+		GTIA_COLBK = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_BAK] = cword;
+		if (cword != (UWORD) (ANTIC_lookup_gtia9[0]) ) {
+			ANTIC_lookup_gtia9[0] = cword + (cword << 16);
+			if (GTIA_PRIOR & 0x40)
+				setup_gtia9_11();
+		}
+		break;
+	case GTIA_OFFSET_COLPF0:
+		GTIA_COLPF0 = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_PF0] = cword;
+		if ((GTIA_PRIOR & 1) == 0) {
+			ANTIC_cl[C_PF0 | C_PM23] = ANTIC_cl[C_PF0 | C_PM3] = ANTIC_cl[C_PF0 | C_PM2] = cword;
+			if ((GTIA_PRIOR & 3) == 0) {
+				if (GTIA_PRIOR & 0xf) {
+					ANTIC_cl[C_PF0 | C_PM01] = ANTIC_cl[C_PF0 | C_PM1] = ANTIC_cl[C_PF0 | C_PM0] = cword;
+					if ((GTIA_PRIOR & 0xf) == 0xc)
+						ANTIC_cl[C_PF0 | C_PM0123] = ANTIC_cl[C_PF0 | C_PM123] = ANTIC_cl[C_PF0 | C_PM023] = cword;
+				}
+				else
+					ANTIC_cl[C_PF0 | C_PM01] = (ANTIC_cl[C_PF0 | C_PM0] = cword | ANTIC_cl[C_PM0]) | (ANTIC_cl[C_PF0 | C_PM1] = cword | ANTIC_cl[C_PM1]);
+			}
+			if ((GTIA_PRIOR & 0xf) >= 0xa)
+				ANTIC_cl[C_PF0 | C_PM25] = cword;
+		}
+		break;
+	case GTIA_OFFSET_COLPF1:
+		GTIA_COLPF1 = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_PF1] = cword;
+		if ((GTIA_PRIOR & 1) == 0) {
+			ANTIC_cl[C_PF1 | C_PM23] = ANTIC_cl[C_PF1 | C_PM3] = ANTIC_cl[C_PF1 | C_PM2] = cword;
+			if ((GTIA_PRIOR & 3) == 0) {
+				if (GTIA_PRIOR & 0xf) {
+					ANTIC_cl[C_PF1 | C_PM01] = ANTIC_cl[C_PF1 | C_PM1] = ANTIC_cl[C_PF1 | C_PM0] = cword;
+					if ((GTIA_PRIOR & 0xf) == 0xc)
+						ANTIC_cl[C_PF1 | C_PM0123] = ANTIC_cl[C_PF1 | C_PM123] = ANTIC_cl[C_PF1 | C_PM023] = cword;
+				}
+				else
+					ANTIC_cl[C_PF1 | C_PM01] = (ANTIC_cl[C_PF1 | C_PM0] = cword | ANTIC_cl[C_PM0]) | (ANTIC_cl[C_PF1 | C_PM1] = cword | ANTIC_cl[C_PM1]);
+			}
+		}
+		((UBYTE *)ANTIC_hires_lookup_l)[0x80] = ((UBYTE *)ANTIC_hires_lookup_l)[0x41] = (UBYTE)
+			(ANTIC_hires_lookup_l[0x60] = cword & 0xf0f);
+		break;
+	case GTIA_OFFSET_COLPF2:
+		GTIA_COLPF2 = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_PF2] = cword;
+		if (GTIA_PRIOR & 4)
+			ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PF2 | C_PM1] = ANTIC_cl[C_PF2 | C_PM0] = cword;
+		if ((GTIA_PRIOR & 9) == 0) {
+			if (GTIA_PRIOR & 0xf)
+				ANTIC_cl[C_PF2 | C_PM23] = ANTIC_cl[C_PF2 | C_PM3] = ANTIC_cl[C_PF2 | C_PM2] = cword;
+			else
+				ANTIC_cl[C_PF2 | C_PM23] = (ANTIC_cl[C_PF2 | C_PM2] = cword | ANTIC_cl[C_PM2]) | (ANTIC_cl[C_PF2 | C_PM3] = cword | ANTIC_cl[C_PM3]);
+		}
+		break;
+	case GTIA_OFFSET_COLPF3:
+		GTIA_COLPF3 = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_PF3] = cword;
+		if (GTIA_PRIOR & 4)
+			ANTIC_cl[C_PF3 | C_PM01] = ANTIC_cl[C_PF3 | C_PM1] = ANTIC_cl[C_PF3 | C_PM0] = cword;
+		if ((GTIA_PRIOR & 9) == 0) {
+			if (GTIA_PRIOR & 0xf)
+				ANTIC_cl[C_PF3 | C_PM23] = ANTIC_cl[C_PF3 | C_PM3] = ANTIC_cl[C_PF3 | C_PM2] = cword;
+			else {
+				ANTIC_cl[C_PF3 | C_PM25] = ANTIC_cl[C_PF2 | C_PM25] = ANTIC_cl[C_PM25] = ANTIC_cl[C_PF3 | C_PM2] = cword | ANTIC_cl[C_PM2];
+				ANTIC_cl[C_PF3 | C_PM35] = ANTIC_cl[C_PF2 | C_PM35] = ANTIC_cl[C_PM35] = ANTIC_cl[C_PF3 | C_PM3] = cword | ANTIC_cl[C_PM3];
+				ANTIC_cl[C_PF3 | C_PM235] = ANTIC_cl[C_PF2 | C_PM235] = ANTIC_cl[C_PM235] = ANTIC_cl[C_PF3 | C_PM23] = ANTIC_cl[C_PF3 | C_PM2] | ANTIC_cl[C_PF3 | C_PM3];
+				ANTIC_cl[C_PF0 | C_PM235] = ANTIC_cl[C_PF0 | C_PM35] = ANTIC_cl[C_PF0 | C_PM25] =
+				ANTIC_cl[C_PF1 | C_PM235] = ANTIC_cl[C_PF1 | C_PM35] = ANTIC_cl[C_PF1 | C_PM25] = cword;
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPM0:
+		GTIA_COLPM0 = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_PM023] = ANTIC_cl[C_PM0] = cword;
+		ANTIC_cl[C_PM0123] = ANTIC_cl[C_PM01] = cword2 = cword | ANTIC_cl[C_PM1];
+		if ((GTIA_PRIOR & 4) == 0) {
+			ANTIC_cl[C_PF2 | C_PM0] = ANTIC_cl[C_PF3 | C_PM0] = cword;
+			ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PF3 | C_PM01] = cword2;
+			if ((GTIA_PRIOR & 0xc) == 0) {
+				if (GTIA_PRIOR & 3) {
+					ANTIC_cl[C_PF0 | C_PM0] = ANTIC_cl[C_PF1 | C_PM0] = cword;
+					ANTIC_cl[C_PF0 | C_PM01] = ANTIC_cl[C_PF1 | C_PM01] = cword2;
+				}
+				else {
+					ANTIC_cl[C_PF0 | C_PM0] = cword | ANTIC_cl[C_PF0];
+					ANTIC_cl[C_PF1 | C_PM0] = cword | ANTIC_cl[C_PF1];
+					ANTIC_cl[C_PF0 | C_PM01] = cword2 | ANTIC_cl[C_PF0];
+					ANTIC_cl[C_PF1 | C_PM01] = cword2 | ANTIC_cl[C_PF1];
+				}
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPM1:
+		GTIA_COLPM1 = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_PM123] = ANTIC_cl[C_PM1] = cword;
+		ANTIC_cl[C_PM0123] = ANTIC_cl[C_PM01] = cword2 = cword | ANTIC_cl[C_PM0];
+		if ((GTIA_PRIOR & 4) == 0) {
+			ANTIC_cl[C_PF2 | C_PM1] = ANTIC_cl[C_PF3 | C_PM1] = cword;
+			ANTIC_cl[C_PF2 | C_PM01] = ANTIC_cl[C_PF3 | C_PM01] = cword2;
+			if ((GTIA_PRIOR & 0xc) == 0) {
+				if (GTIA_PRIOR & 3) {
+					ANTIC_cl[C_PF0 | C_PM1] = ANTIC_cl[C_PF1 | C_PM1] = cword;
+					ANTIC_cl[C_PF0 | C_PM01] = ANTIC_cl[C_PF1 | C_PM01] = cword2;
+				}
+				else {
+					ANTIC_cl[C_PF0 | C_PM1] = cword | ANTIC_cl[C_PF0];
+					ANTIC_cl[C_PF1 | C_PM1] = cword | ANTIC_cl[C_PF1];
+					ANTIC_cl[C_PF0 | C_PM01] = cword2 | ANTIC_cl[C_PF0];
+					ANTIC_cl[C_PF1 | C_PM01] = cword2 | ANTIC_cl[C_PF1];
+				}
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPM2:
+		GTIA_COLPM2 = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_PM2] = cword;
+		ANTIC_cl[C_PM23] = cword2 = cword | ANTIC_cl[C_PM3];
+		if (GTIA_PRIOR & 1) {
+			ANTIC_cl[C_PF0 | C_PM2] = ANTIC_cl[C_PF1 | C_PM2] = cword;
+			ANTIC_cl[C_PF0 | C_PM23] = ANTIC_cl[C_PF1 | C_PM23] = cword2;
+		}
+		if ((GTIA_PRIOR & 6) == 0) {
+			if (GTIA_PRIOR & 9) {
+				ANTIC_cl[C_PF2 | C_PM2] = ANTIC_cl[C_PF3 | C_PM2] = cword;
+				ANTIC_cl[C_PF2 | C_PM23] = ANTIC_cl[C_PF3 | C_PM23] = cword2;
+			}
+			else {
+				ANTIC_cl[C_PF2 | C_PM2] = cword | ANTIC_cl[C_PF2];
+				ANTIC_cl[C_PF3 | C_PM25] = ANTIC_cl[C_PF2 | C_PM25] = ANTIC_cl[C_PM25] = ANTIC_cl[C_PF3 | C_PM2] = cword | ANTIC_cl[C_PF3];
+				ANTIC_cl[C_PF2 | C_PM23] = cword2 | ANTIC_cl[C_PF2];
+				ANTIC_cl[C_PF3 | C_PM235] = ANTIC_cl[C_PF2 | C_PM235] = ANTIC_cl[C_PM235] = ANTIC_cl[C_PF3 | C_PM23] = cword2 | ANTIC_cl[C_PF3];
+			}
+		}
+		break;
+	case GTIA_OFFSET_COLPM3:
+		GTIA_COLPM3 = byte &= 0xfe;
+		GTIA_COLOUR_TO_WORD(cword,byte);
+		ANTIC_cl[C_PM3] = cword;
+		ANTIC_cl[C_PM23] = cword2 = cword | ANTIC_cl[C_PM2];
+		if (GTIA_PRIOR & 1) {
+			ANTIC_cl[C_PF0 | C_PM3] = ANTIC_cl[C_PF1 | C_PM3] = cword;
+			ANTIC_cl[C_PF0 | C_PM23] = ANTIC_cl[C_PF1 | C_PM23] = cword2;
+		}
+		if ((GTIA_PRIOR & 6) == 0) {
+			if (GTIA_PRIOR & 9) {
+				ANTIC_cl[C_PF2 | C_PM3] = ANTIC_cl[C_PF3 | C_PM3] = cword;
+				ANTIC_cl[C_PF2 | C_PM23] = ANTIC_cl[C_PF3 | C_PM23] = cword2;
+			}
+			else {
+				ANTIC_cl[C_PF2 | C_PM3] = cword | ANTIC_cl[C_PF2];
+				ANTIC_cl[C_PF3 | C_PM35] = ANTIC_cl[C_PF2 | C_PM35] = ANTIC_cl[C_PM35] = ANTIC_cl[C_PF3 | C_PM3] = cword | ANTIC_cl[C_PF3];
+				ANTIC_cl[C_PF2 | C_PM23] = cword2 | ANTIC_cl[C_PF2];
+				ANTIC_cl[C_PF3 | C_PM235] = ANTIC_cl[C_PF2 | C_PM235] = ANTIC_cl[C_PM235] = ANTIC_cl[C_PF3 | C_PM23] = cword2 | ANTIC_cl[C_PF3];
+			}
+		}
+		break;
+#endif /* USE_COLOUR_TRANSLATION_TABLE */
+	case GTIA_OFFSET_GRAFM:
+		GTIA_GRAFM = byte;
+		UPDATE_PM_CYCLE_EXACT
+		break;
+
+#ifdef NEW_CYCLE_EXACT
+#define CYCLE_EXACT_GRAFP(n) x = ANTIC_XPOS * 2 - 3;\
+	if (GTIA_HPOSP##n >= x) {\
+	/* hpos right of x */\
+		/* redraw */  \
+		UPDATE_PM_CYCLE_EXACT\
+	}
+#else
+#define CYCLE_EXACT_GRAFP(n)
+#endif /* NEW_CYCLE_EXACT */
+
+#define DO_GRAFP(n) case GTIA_OFFSET_GRAFP##n:\
+	GTIA_GRAFP##n = byte;\
+	CYCLE_EXACT_GRAFP(n);\
+	break;
+
+	DO_GRAFP(0)
+	DO_GRAFP(1)
+	DO_GRAFP(2)
+	DO_GRAFP(3)
+
+	case GTIA_OFFSET_HITCLR:
+		GTIA_M0PL = GTIA_M1PL = GTIA_M2PL = GTIA_M3PL = 0;
+		GTIA_P0PL = GTIA_P1PL = GTIA_P2PL = GTIA_P3PL = 0;
+		PF0PM = PF1PM = PF2PM = PF3PM = 0;
+#ifdef NEW_CYCLE_EXACT
+		hitclr_pos = ANTIC_XPOS * 2 - 37;
+		collision_curpos = hitclr_pos;
+#endif
+		break;
+/* TODO: cycle-exact missile HPOS, GRAF, SIZE */
+/* this is only an approximation */
+	case GTIA_OFFSET_HPOSM0:
+		GTIA_HPOSM0 = byte;
+		hposm_ptr[0] = GTIA_pm_scanline + byte - 0x20;
+		UPDATE_PM_CYCLE_EXACT
+		break;
+	case GTIA_OFFSET_HPOSM1:
+		GTIA_HPOSM1 = byte;
+		hposm_ptr[1] = GTIA_pm_scanline + byte - 0x20;
+		UPDATE_PM_CYCLE_EXACT
+		break;
+	case GTIA_OFFSET_HPOSM2:
+		GTIA_HPOSM2 = byte;
+		hposm_ptr[2] = GTIA_pm_scanline + byte - 0x20;
+		UPDATE_PM_CYCLE_EXACT
+		break;
+	case GTIA_OFFSET_HPOSM3:
+		GTIA_HPOSM3 = byte;
+		hposm_ptr[3] = GTIA_pm_scanline + byte - 0x20;
+		UPDATE_PM_CYCLE_EXACT
+		break;
+
+#ifdef NEW_CYCLE_EXACT
+#define CYCLE_EXACT_HPOSP(n) x = ANTIC_XPOS * 2 - 1;\
+	if (GTIA_HPOSP##n < x && byte < x) {\
+	/* case 1: both left of x */\
+		/* do nothing */\
+	}\
+	else if (GTIA_HPOSP##n >= x && byte >= x ) {\
+	/* case 2: both right of x */\
+		/* redraw, clearing first */\
+		UPDATE_PM_CYCLE_EXACT\
+	}\
+	else if (GTIA_HPOSP##n <x && byte >= x) {\
+	/* case 3: new value is right, old value is left */\
+		/* redraw without clearing first */\
+		/* note: a hack, we can get away with it unless another change occurs */\
+		/* before the original copy that wasn't erased due to changing */\
+		/* GTIA_pm_dirty is drawn */\
+		GTIA_pm_dirty = FALSE;\
+		UPDATE_PM_CYCLE_EXACT\
+		GTIA_pm_dirty = TRUE; /* can't trust that it was reset correctly */\
+	}\
+	else {\
+	/* case 4: new value is left, old value is right */\
+		/* remove old player and don't draw the new one */\
+		UBYTE save_graf = GTIA_GRAFP##n;\
+		GTIA_GRAFP##n = 0;\
+		UPDATE_PM_CYCLE_EXACT\
+		GTIA_GRAFP##n = save_graf;\
+	}
+#else
+#define CYCLE_EXACT_HPOSP(n)
+#endif /* NEW_CYCLE_EXACT */
+#define DO_HPOSP(n)	case GTIA_OFFSET_HPOSP##n:								\
+	hposp_ptr[n] = GTIA_pm_scanline + byte - 0x20;					\
+	if (byte >= 0x22) {											\
+		if (byte > 0xbe) {										\
+			if (byte >= 0xde)									\
+				hposp_mask[n] = 0;								\
+			else												\
+				hposp_mask[n] = 0xffffffff >> (byte - 0xbe);	\
+		}														\
+		else													\
+			hposp_mask[n] = 0xffffffff;							\
+	}															\
+	else if (byte > 2)											\
+		hposp_mask[n] = 0xffffffff << (0x22 - byte);			\
+	else														\
+		hposp_mask[n] = 0;										\
+	CYCLE_EXACT_HPOSP(n)\
+	GTIA_HPOSP##n = byte;											\
+	break;
+
+	DO_HPOSP(0)
+	DO_HPOSP(1)
+	DO_HPOSP(2)
+	DO_HPOSP(3)
+
+/* TODO: cycle-exact size changes */
+/* this is only an approximation */
+	case GTIA_OFFSET_SIZEM:
+		GTIA_SIZEM = byte;
+		global_sizem[0] = PM_Width[byte & 0x03];
+		global_sizem[1] = PM_Width[(byte & 0x0c) >> 2];
+		global_sizem[2] = PM_Width[(byte & 0x30) >> 4];
+		global_sizem[3] = PM_Width[(byte & 0xc0) >> 6];
+		UPDATE_PM_CYCLE_EXACT
+		break;
+	case GTIA_OFFSET_SIZEP0:
+		GTIA_SIZEP0 = byte;
+		grafp_ptr[0] = grafp_lookup[byte & 3];
+		UPDATE_PM_CYCLE_EXACT
+		break;
+	case GTIA_OFFSET_SIZEP1:
+		GTIA_SIZEP1 = byte;
+		grafp_ptr[1] = grafp_lookup[byte & 3];
+		UPDATE_PM_CYCLE_EXACT
+		break;
+	case GTIA_OFFSET_SIZEP2:
+		GTIA_SIZEP2 = byte;
+		grafp_ptr[2] = grafp_lookup[byte & 3];
+		UPDATE_PM_CYCLE_EXACT
+		break;
+	case GTIA_OFFSET_SIZEP3:
+		GTIA_SIZEP3 = byte;
+		grafp_ptr[3] = grafp_lookup[byte & 3];
+		UPDATE_PM_CYCLE_EXACT
+		break;
+	case GTIA_OFFSET_PRIOR:
+#ifdef NEW_CYCLE_EXACT
+#ifndef NO_GTIA11_DELAY
+		/* update prior change ring buffer */
+  		ANTIC_prior_curpos = (ANTIC_prior_curpos + 1) % ANTIC_PRIOR_BUF_SIZE;
+		ANTIC_prior_pos_buf[ANTIC_prior_curpos] = ANTIC_XPOS * 2 - 37 + 2;
+		ANTIC_prior_val_buf[ANTIC_prior_curpos] = byte;
+#endif
+#endif
+		ANTIC_SetPrior(byte);
+		GTIA_PRIOR = byte;
+		if (byte & 0x40)
+			setup_gtia9_11();
+		break;
+	case GTIA_OFFSET_VDELAY:
+		GTIA_VDELAY = byte;
+		break;
+	case GTIA_OFFSET_GRACTL:
+		GTIA_GRACTL = byte;
+		ANTIC_missile_gra_enabled = (byte & 0x01);
+		ANTIC_player_gra_enabled = (byte & 0x02);
+		ANTIC_player_flickering = ((ANTIC_player_dma_enabled | ANTIC_player_gra_enabled) == 0x02);
+		ANTIC_missile_flickering = ((ANTIC_missile_dma_enabled | ANTIC_missile_gra_enabled) == 0x01);
+		if ((byte & 4) == 0)
+			GTIA_TRIG_latch[0] = GTIA_TRIG_latch[1] = GTIA_TRIG_latch[2] = GTIA_TRIG_latch[3] = 1;
+		break;
+
+#endif /* defined(BASIC) || defined(CURSES_BASIC) */
+	}
+}
+
+/* State ------------------------------------------------------------------- */
+
+#ifndef BASIC
+
+void GTIA_StateSave(void)
+{
+	int next_console_value = 7;
+
+	StateSav_SaveUBYTE(&GTIA_HPOSP0, 1);
+	StateSav_SaveUBYTE(&GTIA_HPOSP1, 1);
+	StateSav_SaveUBYTE(&GTIA_HPOSP2, 1);
+	StateSav_SaveUBYTE(&GTIA_HPOSP3, 1);
+	StateSav_SaveUBYTE(&GTIA_HPOSM0, 1);
+	StateSav_SaveUBYTE(&GTIA_HPOSM1, 1);
+	StateSav_SaveUBYTE(&GTIA_HPOSM2, 1);
+	StateSav_SaveUBYTE(&GTIA_HPOSM3, 1);
+	StateSav_SaveUBYTE(&PF0PM, 1);
+	StateSav_SaveUBYTE(&PF1PM, 1);
+	StateSav_SaveUBYTE(&PF2PM, 1);
+	StateSav_SaveUBYTE(&PF3PM, 1);
+	StateSav_SaveUBYTE(&GTIA_M0PL, 1);
+	StateSav_SaveUBYTE(&GTIA_M1PL, 1);
+	StateSav_SaveUBYTE(&GTIA_M2PL, 1);
+	StateSav_SaveUBYTE(&GTIA_M3PL, 1);
+	StateSav_SaveUBYTE(&GTIA_P0PL, 1);
+	StateSav_SaveUBYTE(&GTIA_P1PL, 1);
+	StateSav_SaveUBYTE(&GTIA_P2PL, 1);
+	StateSav_SaveUBYTE(&GTIA_P3PL, 1);
+	StateSav_SaveUBYTE(&GTIA_SIZEP0, 1);
+	StateSav_SaveUBYTE(&GTIA_SIZEP1, 1);
+	StateSav_SaveUBYTE(&GTIA_SIZEP2, 1);
+	StateSav_SaveUBYTE(&GTIA_SIZEP3, 1);
+	StateSav_SaveUBYTE(&GTIA_SIZEM, 1);
+	StateSav_SaveUBYTE(&GTIA_GRAFP0, 1);
+	StateSav_SaveUBYTE(&GTIA_GRAFP1, 1);
+	StateSav_SaveUBYTE(&GTIA_GRAFP2, 1);
+	StateSav_SaveUBYTE(&GTIA_GRAFP3, 1);
+	StateSav_SaveUBYTE(&GTIA_GRAFM, 1);
+	StateSav_SaveUBYTE(&GTIA_COLPM0, 1);
+	StateSav_SaveUBYTE(&GTIA_COLPM1, 1);
+	StateSav_SaveUBYTE(&GTIA_COLPM2, 1);
+	StateSav_SaveUBYTE(&GTIA_COLPM3, 1);
+	StateSav_SaveUBYTE(&GTIA_COLPF0, 1);
+	StateSav_SaveUBYTE(&GTIA_COLPF1, 1);
+	StateSav_SaveUBYTE(&GTIA_COLPF2, 1);
+	StateSav_SaveUBYTE(&GTIA_COLPF3, 1);
+	StateSav_SaveUBYTE(&GTIA_COLBK, 1);
+	StateSav_SaveUBYTE(&GTIA_PRIOR, 1);
+	StateSav_SaveUBYTE(&GTIA_VDELAY, 1);
+	StateSav_SaveUBYTE(&GTIA_GRACTL, 1);
+
+	StateSav_SaveUBYTE(&consol_mask, 1);
+	StateSav_SaveINT(&GTIA_speaker, 1);
+	StateSav_SaveINT(&next_console_value, 1);
+}
+
+void GTIA_StateRead(void)
+{
+	int next_console_value;	/* ignored */
+
+	StateSav_ReadUBYTE(&GTIA_HPOSP0, 1);
+	StateSav_ReadUBYTE(&GTIA_HPOSP1, 1);
+	StateSav_ReadUBYTE(&GTIA_HPOSP2, 1);
+	StateSav_ReadUBYTE(&GTIA_HPOSP3, 1);
+	StateSav_ReadUBYTE(&GTIA_HPOSM0, 1);
+	StateSav_ReadUBYTE(&GTIA_HPOSM1, 1);
+	StateSav_ReadUBYTE(&GTIA_HPOSM2, 1);
+	StateSav_ReadUBYTE(&GTIA_HPOSM3, 1);
+	StateSav_ReadUBYTE(&PF0PM, 1);
+	StateSav_ReadUBYTE(&PF1PM, 1);
+	StateSav_ReadUBYTE(&PF2PM, 1);
+	StateSav_ReadUBYTE(&PF3PM, 1);
+	StateSav_ReadUBYTE(&GTIA_M0PL, 1);
+	StateSav_ReadUBYTE(&GTIA_M1PL, 1);
+	StateSav_ReadUBYTE(&GTIA_M2PL, 1);
+	StateSav_ReadUBYTE(&GTIA_M3PL, 1);
+	StateSav_ReadUBYTE(&GTIA_P0PL, 1);
+	StateSav_ReadUBYTE(&GTIA_P1PL, 1);
+	StateSav_ReadUBYTE(&GTIA_P2PL, 1);
+	StateSav_ReadUBYTE(&GTIA_P3PL, 1);
+	StateSav_ReadUBYTE(&GTIA_SIZEP0, 1);
+	StateSav_ReadUBYTE(&GTIA_SIZEP1, 1);
+	StateSav_ReadUBYTE(&GTIA_SIZEP2, 1);
+	StateSav_ReadUBYTE(&GTIA_SIZEP3, 1);
+	StateSav_ReadUBYTE(&GTIA_SIZEM, 1);
+	StateSav_ReadUBYTE(&GTIA_GRAFP0, 1);
+	StateSav_ReadUBYTE(&GTIA_GRAFP1, 1);
+	StateSav_ReadUBYTE(&GTIA_GRAFP2, 1);
+	StateSav_ReadUBYTE(&GTIA_GRAFP3, 1);
+	StateSav_ReadUBYTE(&GTIA_GRAFM, 1);
+	StateSav_ReadUBYTE(&GTIA_COLPM0, 1);
+	StateSav_ReadUBYTE(&GTIA_COLPM1, 1);
+	StateSav_ReadUBYTE(&GTIA_COLPM2, 1);
+	StateSav_ReadUBYTE(&GTIA_COLPM3, 1);
+	StateSav_ReadUBYTE(&GTIA_COLPF0, 1);
+	StateSav_ReadUBYTE(&GTIA_COLPF1, 1);
+	StateSav_ReadUBYTE(&GTIA_COLPF2, 1);
+	StateSav_ReadUBYTE(&GTIA_COLPF3, 1);
+	StateSav_ReadUBYTE(&GTIA_COLBK, 1);
+	StateSav_ReadUBYTE(&GTIA_PRIOR, 1);
+	StateSav_ReadUBYTE(&GTIA_VDELAY, 1);
+	StateSav_ReadUBYTE(&GTIA_GRACTL, 1);
+
+	StateSav_ReadUBYTE(&consol_mask, 1);
+	StateSav_ReadINT(&GTIA_speaker, 1);
+	StateSav_ReadINT(&next_console_value, 1);
+
+	GTIA_PutByte(GTIA_OFFSET_HPOSP0, GTIA_HPOSP0);
+	GTIA_PutByte(GTIA_OFFSET_HPOSP1, GTIA_HPOSP1);
+	GTIA_PutByte(GTIA_OFFSET_HPOSP2, GTIA_HPOSP2);
+	GTIA_PutByte(GTIA_OFFSET_HPOSP3, GTIA_HPOSP3);
+	GTIA_PutByte(GTIA_OFFSET_HPOSM0, GTIA_HPOSM0);
+	GTIA_PutByte(GTIA_OFFSET_HPOSM1, GTIA_HPOSM1);
+	GTIA_PutByte(GTIA_OFFSET_HPOSM2, GTIA_HPOSM2);
+	GTIA_PutByte(GTIA_OFFSET_HPOSM3, GTIA_HPOSM3);
+	GTIA_PutByte(GTIA_OFFSET_SIZEP0, GTIA_SIZEP0);
+	GTIA_PutByte(GTIA_OFFSET_SIZEP1, GTIA_SIZEP1);
+	GTIA_PutByte(GTIA_OFFSET_SIZEP2, GTIA_SIZEP2);
+	GTIA_PutByte(GTIA_OFFSET_SIZEP3, GTIA_SIZEP3);
+	GTIA_PutByte(GTIA_OFFSET_SIZEM, GTIA_SIZEM);
+	GTIA_PutByte(GTIA_OFFSET_GRAFP0, GTIA_GRAFP0);
+	GTIA_PutByte(GTIA_OFFSET_GRAFP1, GTIA_GRAFP1);
+	GTIA_PutByte(GTIA_OFFSET_GRAFP2, GTIA_GRAFP2);
+	GTIA_PutByte(GTIA_OFFSET_GRAFP3, GTIA_GRAFP3);
+	GTIA_PutByte(GTIA_OFFSET_GRAFM, GTIA_GRAFM);
+	GTIA_PutByte(GTIA_OFFSET_COLPM0, GTIA_COLPM0);
+	GTIA_PutByte(GTIA_OFFSET_COLPM1, GTIA_COLPM1);
+	GTIA_PutByte(GTIA_OFFSET_COLPM2, GTIA_COLPM2);
+	GTIA_PutByte(GTIA_OFFSET_COLPM3, GTIA_COLPM3);
+	GTIA_PutByte(GTIA_OFFSET_COLPF0, GTIA_COLPF0);
+	GTIA_PutByte(GTIA_OFFSET_COLPF1, GTIA_COLPF1);
+	GTIA_PutByte(GTIA_OFFSET_COLPF2, GTIA_COLPF2);
+	GTIA_PutByte(GTIA_OFFSET_COLPF3, GTIA_COLPF3);
+	GTIA_PutByte(GTIA_OFFSET_COLBK, GTIA_COLBK);
+	GTIA_PutByte(GTIA_OFFSET_PRIOR, GTIA_PRIOR);
+	GTIA_PutByte(GTIA_OFFSET_GRACTL, GTIA_GRACTL);
+}
+
+#endif /* BASIC */
diff --git a/project/jni/application/atari800/src/gtia.h b/project/jni/application/atari800/src/gtia.h
new file mode 100644
index 000000000..3486c8b9b
--- /dev/null
+++ b/project/jni/application/atari800/src/gtia.h
@@ -0,0 +1,139 @@
+#ifndef GTIA_H_
+#define GTIA_H_
+
+#include "atari.h"
+#include "screen.h"
+
+#define GTIA_OFFSET_HPOSP0 0x00
+#define GTIA_OFFSET_M0PF 0x00
+#define GTIA_OFFSET_HPOSP1 0x01
+#define GTIA_OFFSET_M1PF 0x01
+#define GTIA_OFFSET_HPOSP2 0x02
+#define GTIA_OFFSET_M2PF 0x02
+#define GTIA_OFFSET_HPOSP3 0x03
+#define GTIA_OFFSET_M3PF 0x03
+#define GTIA_OFFSET_HPOSM0 0x04
+#define GTIA_OFFSET_P0PF 0x04
+#define GTIA_OFFSET_HPOSM1 0x05
+#define GTIA_OFFSET_P1PF 0x05
+#define GTIA_OFFSET_HPOSM2 0x06
+#define GTIA_OFFSET_P2PF 0x06
+#define GTIA_OFFSET_HPOSM3 0x07
+#define GTIA_OFFSET_P3PF 0x07
+#define GTIA_OFFSET_SIZEP0 0x08
+#define GTIA_OFFSET_M0PL 0x08
+#define GTIA_OFFSET_SIZEP1 0x09
+#define GTIA_OFFSET_M1PL 0x09
+#define GTIA_OFFSET_SIZEP2 0x0a
+#define GTIA_OFFSET_M2PL 0x0a
+#define GTIA_OFFSET_SIZEP3 0x0b
+#define GTIA_OFFSET_M3PL 0x0b
+#define GTIA_OFFSET_SIZEM 0x0c
+#define GTIA_OFFSET_P0PL 0x0c
+#define GTIA_OFFSET_GRAFP0 0x0d
+#define GTIA_OFFSET_P1PL 0x0d
+#define GTIA_OFFSET_GRAFP1 0x0e
+#define GTIA_OFFSET_P2PL 0x0e
+#define GTIA_OFFSET_GRAFP2 0x0f
+#define GTIA_OFFSET_P3PL 0x0f
+#define GTIA_OFFSET_GRAFP3 0x10
+#define GTIA_OFFSET_TRIG0 0x10
+#define GTIA_OFFSET_GRAFM 0x11
+#define GTIA_OFFSET_TRIG1 0x11
+#define GTIA_OFFSET_COLPM0 0x12
+#define GTIA_OFFSET_TRIG2 0x12
+#define GTIA_OFFSET_COLPM1 0x13
+#define GTIA_OFFSET_TRIG3 0x13
+#define GTIA_OFFSET_COLPM2 0x14
+#define GTIA_OFFSET_PAL 0x14
+#define GTIA_OFFSET_COLPM3 0x15
+#define GTIA_OFFSET_COLPF0 0x16
+#define GTIA_OFFSET_COLPF1 0x17
+#define GTIA_OFFSET_COLPF2 0x18
+#define GTIA_OFFSET_COLPF3 0x19
+#define GTIA_OFFSET_COLBK 0x1a
+#define GTIA_OFFSET_PRIOR 0x1b
+#define GTIA_OFFSET_VDELAY 0x1c
+#define GTIA_OFFSET_GRACTL 0x1d
+#define GTIA_OFFSET_HITCLR 0x1e
+#define GTIA_OFFSET_CONSOL 0x1f
+
+extern UBYTE GTIA_GRAFM;
+extern UBYTE GTIA_GRAFP0;
+extern UBYTE GTIA_GRAFP1;
+extern UBYTE GTIA_GRAFP2;
+extern UBYTE GTIA_GRAFP3;
+extern UBYTE GTIA_HPOSP0;
+extern UBYTE GTIA_HPOSP1;
+extern UBYTE GTIA_HPOSP2;
+extern UBYTE GTIA_HPOSP3;
+extern UBYTE GTIA_HPOSM0;
+extern UBYTE GTIA_HPOSM1;
+extern UBYTE GTIA_HPOSM2;
+extern UBYTE GTIA_HPOSM3;
+extern UBYTE GTIA_SIZEP0;
+extern UBYTE GTIA_SIZEP1;
+extern UBYTE GTIA_SIZEP2;
+extern UBYTE GTIA_SIZEP3;
+extern UBYTE GTIA_SIZEM;
+extern UBYTE GTIA_COLPM0;
+extern UBYTE GTIA_COLPM1;
+extern UBYTE GTIA_COLPM2;
+extern UBYTE GTIA_COLPM3;
+extern UBYTE GTIA_COLPF0;
+extern UBYTE GTIA_COLPF1;
+extern UBYTE GTIA_COLPF2;
+extern UBYTE GTIA_COLPF3;
+extern UBYTE GTIA_COLBK;
+extern UBYTE GTIA_GRACTL;
+extern UBYTE GTIA_M0PL;
+extern UBYTE GTIA_M1PL;
+extern UBYTE GTIA_M2PL;
+extern UBYTE GTIA_M3PL;
+extern UBYTE GTIA_P0PL;
+extern UBYTE GTIA_P1PL;
+extern UBYTE GTIA_P2PL;
+extern UBYTE GTIA_P3PL;
+extern UBYTE GTIA_PRIOR;
+extern UBYTE GTIA_VDELAY;
+
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+
+extern UWORD GTIA_colour_translation_table[256];
+#define GTIA_COLOUR_BLACK GTIA_colour_translation_table[0]
+#define GTIA_COLOUR_TO_WORD(dest,src) dest = GTIA_colour_translation_table[src];
+
+#else
+
+#define GTIA_COLOUR_BLACK 0
+#define GTIA_COLOUR_TO_WORD(dest,src) dest = (((UWORD) (src)) << 8) | (src);
+
+#endif /* USE_COLOUR_TRANSLATION_TABLE */
+
+extern UBYTE GTIA_pm_scanline[Screen_WIDTH / 2 + 8];	/* there's a byte for every *pair* of pixels */
+extern int GTIA_pm_dirty;
+
+extern UBYTE GTIA_collisions_mask_missile_playfield;
+extern UBYTE GTIA_collisions_mask_player_playfield;
+extern UBYTE GTIA_collisions_mask_missile_player;
+extern UBYTE GTIA_collisions_mask_player_player;
+
+extern UBYTE GTIA_TRIG[4];
+extern UBYTE GTIA_TRIG_latch[4];
+
+extern int GTIA_consol_index;
+extern UBYTE GTIA_consol_table[3];
+extern int GTIA_speaker;
+
+int GTIA_Initialise(int *argc, char *argv[]);
+void GTIA_Frame(void);
+void GTIA_NewPmScanline(void);
+UBYTE GTIA_GetByte(UWORD addr);
+void GTIA_PutByte(UWORD addr, UBYTE byte);
+void GTIA_StateSave(void);
+void GTIA_StateRead(void);
+
+#ifdef NEW_CYCLE_EXACT
+void GTIA_UpdatePmplColls(void);
+#endif
+#endif /* GTIA_H_ */
diff --git a/project/jni/application/atari800/src/input.c b/project/jni/application/atari800/src/input.c
new file mode 100644
index 000000000..59cfe4feb
--- /dev/null
+++ b/project/jni/application/atari800/src/input.c
@@ -0,0 +1,1028 @@
+/*
+ * input.c - keyboard, joysticks and mouse emulation
+ *
+ * Copyright (C) 2001-2002 Piotr Fusik
+ * Copyright (C) 2001-2006 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <string.h>
+#include <stdlib.h> /* for exit() */
+#include "antic.h"
+#include "atari.h"
+#include "cassette.h"
+#include "cpu.h"
+#include "gtia.h"
+#include "input.h"
+#include "akey.h"
+#include "log.h"
+#include "memory.h"
+#include "pia.h"
+#include "platform.h"
+#include "pokey.h"
+#include "util.h"
+#ifndef CURSES_BASIC
+#include "screen.h" /* for Screen_atari */
+#endif
+#ifdef __PLUS
+#include "input_win.h"
+#endif
+#ifdef EVENT_RECORDING
+#include <zlib.h>
+#endif
+
+#ifdef DREAMCAST
+extern int Atari_POT(int);
+#else
+#define Atari_POT(x) 228
+#endif
+
+int INPUT_key_code = AKEY_NONE;
+int INPUT_key_shift = 0;
+int INPUT_key_consol = INPUT_CONSOL_NONE;
+
+int INPUT_joy_autofire[4] = {INPUT_AUTOFIRE_OFF, INPUT_AUTOFIRE_OFF, INPUT_AUTOFIRE_OFF, INPUT_AUTOFIRE_OFF};
+
+int INPUT_joy_block_opposite_directions = 1;
+
+int INPUT_joy_multijoy = 0;
+
+int INPUT_joy_5200_min = 6;
+int INPUT_joy_5200_center = 114;
+int INPUT_joy_5200_max = 220;
+
+int INPUT_cx85 = 0;
+
+int INPUT_mouse_mode = INPUT_MOUSE_OFF;
+int INPUT_mouse_port = 0;
+int INPUT_mouse_delta_x = 0;
+int INPUT_mouse_delta_y = 0;
+int INPUT_mouse_buttons = 0;
+int INPUT_mouse_speed = 3;
+int INPUT_mouse_pot_min = 1;		/* min. value of POKEY's POT register */
+int INPUT_mouse_pot_max = 228;		/* max. value of POKEY's POT register */
+/* There should be UI or options for light pen/gun offsets.
+   Below are best offsets for different programs:
+   AtariGraphics: H = 0..32, V = 0 (there's calibration in the program)
+   Bug Hunt: H = 44, V = 2
+   Barnyard Blaster: H = 40, V = 0
+   Operation Blood (light gun version): H = 40, V = 4
+ */
+int INPUT_mouse_pen_ofs_h = 42;
+int INPUT_mouse_pen_ofs_v = 2;
+int INPUT_mouse_joy_inertia = 10;
+int INPUT_direct_mouse = 0;
+
+#ifndef MOUSE_SHIFT
+#define MOUSE_SHIFT 4
+#endif
+static int mouse_x = 0;
+static int mouse_y = 0;
+static int mouse_move_x = 0;
+static int mouse_move_y = 0;
+static int mouse_pen_show_pointer = 0;
+
+static UBYTE mouse_amiga_codes[16] = {
+	0x00, 0x02, 0x0a, 0x08,
+	0x01, 0x03, 0x0b, 0x09,
+	0x05, 0x07, 0x0f, 0x0d,
+	0x04, 0x06, 0x0e, 0x0c
+};
+
+static UBYTE mouse_st_codes[16] = {
+	0x00, 0x02, 0x03, 0x01,
+	0x08, 0x0a, 0x0b, 0x09,
+	0x0c, 0x0e, 0x0f, 0x0d,
+	0x04, 0x06, 0x07, 0x05
+};
+
+static UBYTE STICK[4];
+static UBYTE TRIG_input[4];
+
+static int joy_multijoy_no = 0;	/* number of selected joy */
+
+static int cx85_port = 1;
+
+static int max_scanline_counter;
+static int scanline_counter;
+
+#ifdef EVENT_RECORDING
+static gzFile recordfp = NULL; /*output file for input recording*/
+static gzFile playbackfp = NULL; /*input file for playback*/
+static int recording = FALSE;
+static int playingback = FALSE;
+static void update_adler32_of_screen(void);
+static unsigned int compute_adler32_of_screen(void);
+static int recording_version;
+#define GZBUFSIZE 256
+static char gzbuf[GZBUFSIZE+1];
+#define EVENT_RECORDING_VERSION 1
+#endif
+
+int INPUT_Initialise(int *argc, char *argv[])
+{
+	int i;
+	int j;
+
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = FALSE;			/* error, argument missing! */
+
+		if (strcmp(argv[i], "-mouse") == 0) {
+			if (i_a) {
+				char *mode = argv[++i];
+				if (strcmp(mode, "off") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_OFF;
+				else if (strcmp(mode, "pad") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_PAD;
+				else if (strcmp(mode, "touch") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_TOUCH;
+				else if (strcmp(mode, "koala") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_KOALA;
+				else if (strcmp(mode, "pen") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_PEN;
+				else if (strcmp(mode, "gun") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_GUN;
+				else if (strcmp(mode, "amiga") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_AMIGA;
+				else if (strcmp(mode, "st") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_ST;
+				else if (strcmp(mode, "trak") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_TRAK;
+				else if (strcmp(mode, "joy") == 0)
+					INPUT_mouse_mode = INPUT_MOUSE_JOY;
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-mouseport") == 0) {
+			if (i_a) {
+				INPUT_mouse_port = Util_sscandec(argv[++i]) - 1;
+				if (INPUT_mouse_port < 0 || INPUT_mouse_port > 3) {
+					Log_print("Invalid mouse port number - should be between 0 and 3");
+					return FALSE;
+				}
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-mousespeed") == 0) {
+			if (i_a) {
+				INPUT_mouse_speed = Util_sscandec(argv[++i]);
+				if (INPUT_mouse_speed < 1 || INPUT_mouse_speed > 9) {
+					Log_print("Invalid mouse speed - should be between 1 and 9");
+					return FALSE;
+				}
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-multijoy") == 0) {
+			INPUT_joy_multijoy = 1;
+		}
+#ifdef EVENT_RECORDING
+		else if (strcmp(argv[i], "-record") == 0) {
+			if (i_a) {
+				char *recfilename = argv[++i];
+				if ((recordfp = gzopen(recfilename, "wb")) == NULL) {
+					Log_print("Cannot open record file");
+					return FALSE;
+				}
+				else {
+					recording = TRUE;
+					gzprintf(recordfp, "Atari800 event recording, version: %d\n", EVENT_RECORDING_VERSION);
+				}
+			}
+			else a_m = TRUE;
+		}
+		else if (strcmp(argv[i], "-playback") == 0) {
+			if (i_a) {
+				char *pbfilename = argv[++i];
+				if ((playbackfp = gzopen(pbfilename, "rb")) == NULL) {
+					Log_print("Cannot open playback file");
+					return FALSE;
+				}
+				else {
+					playingback = TRUE;
+					gzgets(playbackfp, gzbuf, GZBUFSIZE);
+					if (sscanf(gzbuf, "Atari800 event recording, version: %d\n", &recording_version) != 1) {
+						Log_print("Invalid playback file");
+						playingback = FALSE;
+						gzclose(playbackfp);
+						return FALSE;
+					}
+					else if (recording_version > EVENT_RECORDING_VERSION) {
+						Log_print("Newer version of playback file than this version of Atari800 can handle");
+						playingback = FALSE;
+						gzclose(playbackfp);
+						return FALSE;
+					}
+				}
+			}
+			else a_m = TRUE;
+		}
+#endif /* EVENT_RECORDING */
+ 		else if (strcmp(argv[i], "-directmouse") == 0) {
+			INPUT_direct_mouse = 1;
+		}
+		else if (strcmp(argv[i], "-cx85") == 0) {
+			if (i_a) {
+				INPUT_cx85 = 1;
+				cx85_port = Util_sscandec(argv[++i]) - 1;
+				if (cx85_port < 0 || cx85_port > 3) {
+					Log_print("Invalid cx85 port - should be between 0 and 3");
+					return FALSE;
+				}
+			}
+			else a_m = TRUE;
+		}
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-mouse off       Do not use mouse");
+				Log_print("\t-mouse pad       Emulate paddles");
+				Log_print("\t-mouse touch     Emulate Atari Touch Tablet");
+				Log_print("\t-mouse koala     Emulate Koala Pad");
+				Log_print("\t-mouse pen       Emulate Light Pen");
+				Log_print("\t-mouse gun       Emulate Light Gun");
+				Log_print("\t-mouse amiga     Emulate Amiga mouse");
+				Log_print("\t-mouse st        Emulate Atari ST mouse");
+				Log_print("\t-mouse trak      Emulate Atari Trak-Ball");
+				Log_print("\t-mouse joy       Emulate joystick using mouse");
+				Log_print("\t-mouseport <n>   Set mouse port 1-4 (default 1)");
+				Log_print("\t-mousespeed <n>  Set mouse speed 1-9 (default 3)");
+				Log_print("\t-directmouse     Use absolute X/Y mouse coords");
+				Log_print("\t-cx85 <n>        Emulate CX85 numeric keypad on port <n>");
+				Log_print("\t-multijoy        Emulate MultiJoy4 interface");
+				Log_print("\t-record <file>   Record input to <file>");
+				Log_print("\t-playback <file> Playback input from <file>");
+			}
+			argv[j++] = argv[i];
+		}
+
+		/* this is the end of the additional argument check */
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return FALSE;
+		}
+	}
+
+	if(INPUT_direct_mouse && !(
+				INPUT_mouse_mode == INPUT_MOUSE_PAD ||
+				INPUT_mouse_mode == INPUT_MOUSE_TOUCH ||
+				INPUT_mouse_mode == INPUT_MOUSE_KOALA)) {
+		Log_print("-directmouse only valid with -mouse pad|touch|koala");
+		return FALSE;
+	}
+
+	INPUT_CenterMousePointer();
+	*argc = j;
+
+	return TRUE;
+}
+
+/* For event recording */
+void INPUT_Exit(void) {
+#ifdef EVENT_RECORDING
+	if (recording) {
+		gzclose(recordfp);
+		recording = FALSE;
+	}
+#endif
+}
+
+/* mouse_step is used in Amiga, ST, trak-ball and joystick modes.
+   It moves mouse_x and mouse_y in the direction given by
+   mouse_move_x and mouse_move_y.
+   Bresenham's algorithm is used:
+   if (abs(deltaX) >= abs(deltaY)) {
+     if (deltaX == 0)
+       return;
+     MoveHorizontally();
+     e -= abs(deltaY);
+     if (e < 0) {
+       e += abs(deltaX);
+       MoveVertically();
+     }
+   }
+   else {
+     MoveVertically();
+     e -= abs(deltaX);
+     if (e < 0) {
+       e += abs(deltaY);
+       MoveHorizontally();
+     }
+   }
+   Returned is stick code for the movement direction.
+*/
+static UBYTE mouse_step(void)
+{
+	static int e = 0;
+	UBYTE r = INPUT_STICK_CENTRE;
+	int dx = mouse_move_x >= 0 ? mouse_move_x : -mouse_move_x;
+	int dy = mouse_move_y >= 0 ? mouse_move_y : -mouse_move_y;
+	if (dx >= dy) {
+		if (mouse_move_x == 0)
+			return r;
+		if (mouse_move_x < 0) {
+			r &= INPUT_STICK_LEFT;
+			mouse_x--;
+			mouse_move_x += 1 << MOUSE_SHIFT;
+			if (mouse_move_x > 0)
+				mouse_move_x = 0;
+		}
+		else {
+			r &= INPUT_STICK_RIGHT;
+			mouse_x++;
+			mouse_move_x -= 1 << MOUSE_SHIFT;
+			if (mouse_move_x < 0)
+				mouse_move_x = 0;
+		}
+		e -= dy;
+		if (e < 0) {
+			e += dx;
+			if (mouse_move_y < 0) {
+				r &= INPUT_STICK_FORWARD;
+				mouse_y--;
+				mouse_move_y += 1 << MOUSE_SHIFT;
+				if (mouse_move_y > 0)
+					mouse_move_y = 0;
+			}
+			else {
+				r &= INPUT_STICK_BACK;
+				mouse_y++;
+				mouse_move_y -= 1 << MOUSE_SHIFT;
+				if (mouse_move_y < 0)
+					mouse_move_y = 0;
+			}
+		}
+	}
+	else {
+		if (mouse_move_y < 0) {
+			r &= INPUT_STICK_FORWARD;
+			mouse_y--;
+			mouse_move_y += 1 << MOUSE_SHIFT;
+			if (mouse_move_y > 0)
+				mouse_move_y = 0;
+		}
+		else {
+			r &= INPUT_STICK_BACK;
+			mouse_y++;
+			mouse_move_y -= 1 << MOUSE_SHIFT;
+			if (mouse_move_y < 0)
+				mouse_move_y = 0;
+		}
+		e -= dx;
+		if (e < 0) {
+			e += dy;
+			if (mouse_move_x < 0) {
+				r &= INPUT_STICK_LEFT;
+				mouse_x--;
+				mouse_move_x += 1 << MOUSE_SHIFT;
+				if (mouse_move_x > 0)
+					mouse_move_x = 0;
+			}
+			else {
+				r &= INPUT_STICK_RIGHT;
+				mouse_x++;
+				mouse_move_x -= 1 << MOUSE_SHIFT;
+				if (mouse_move_x < 0)
+					mouse_move_x = 0;
+			}
+		}
+	}
+	return r;
+}
+
+void INPUT_Frame(void)
+{
+	int i;
+	static int last_key_code = AKEY_NONE;
+	static int last_key_break = 0;
+	static UBYTE last_stick[4] = {INPUT_STICK_CENTRE, INPUT_STICK_CENTRE, INPUT_STICK_CENTRE, INPUT_STICK_CENTRE};
+	static int last_mouse_buttons = 0;
+
+	scanline_counter = 10000;	/* do nothing in INPUT_Scanline() */
+
+	/* handle keyboard */
+
+	/* In Atari 5200 joystick there's a second fire button, which acts
+	   like the Shift key in 800/XL/XE (bit 3 in SKSTAT) and generates IRQ
+	   like the Break key (bit 7 in IRQST and IRQEN).
+	   Note that in 5200 the joystick position and first fire button are
+	   separate for each port, but the keypad and 2nd button are common.
+	   That is, if you press a key in the emulator, it's like you really pressed
+	   it in all the controllers simultaneously. Normally the port to read
+	   keypad & 2nd button is selected with the CONSOL register in GTIA
+	   (this is simply not emulated).
+	   INPUT_key_code is used for keypad keys and INPUT_key_shift is used for 2nd button.
+	*/
+#ifdef EVENT_RECORDING
+	if (playingback) {
+		gzgets(playbackfp, gzbuf, GZBUFSIZE);
+		sscanf(gzbuf, "%d %d %d ", &INPUT_key_code, &INPUT_key_shift, &INPUT_key_consol);
+	}
+	if (recording) {
+		gzprintf(recordfp, "%d %d %d \n", INPUT_key_code, INPUT_key_shift, INPUT_key_consol);
+	}
+#endif
+	i = Atari800_machine_type == Atari800_MACHINE_5200 ? INPUT_key_shift : (INPUT_key_code == AKEY_BREAK);
+	if (i && !last_key_break) {
+		if (POKEY_IRQEN & 0x80) {
+			POKEY_IRQST &= ~0x80;
+			CPU_GenerateIRQ();
+		}
+	}
+	last_key_break = i;
+
+	POKEY_SKSTAT |= 0xc;
+	if (INPUT_key_shift)
+		POKEY_SKSTAT &= ~8;
+
+	if (INPUT_key_code < 0) {
+		if (CASSETTE_press_space) {
+			INPUT_key_code = AKEY_SPACE;
+			CASSETTE_press_space = 0;
+		}
+		else {
+			last_key_code = AKEY_NONE;
+		}
+	}
+	/* Following keys cannot be read with both shift and control pressed:
+	   J K L ; + * Z X C V B F1 F2 F3 F4 HELP	 */
+	/* which are 0x00-0x07 and 0x10-0x17 */
+	/* This is caused by the keyboard itself, these keys generate 'ghost keys'
+	 * when pressed with shift and control */
+	if (Atari800_machine_type != Atari800_MACHINE_5200 && (INPUT_key_code&~0x17) == AKEY_SHFTCTRL) {
+		INPUT_key_code = AKEY_NONE;
+	}
+	if (INPUT_key_code >= 0) {
+		/* The 5200 has only 4 of the 6 keyboard scan lines connected */
+		/* Pressing one 5200 key is like pressing 4 Atari 800 keys. */
+		/* The LSB (bit 0) and bit 5 are the two missing lines. */
+		/* When debounce is enabled, multiple keys pressed generate
+		 * no results. */
+		/* When debounce is disabled, multiple keys pressed generate
+		 * results only when in numerical sequence. */
+		/* Thus the LSB being one of the missing lines is important
+		 * because that causes events to be generated. */
+		/* Two events are generated every 64 scan lines
+		 * but this code only does one every frame. */
+		/* Bit 5 is different for each keypress because it is one
+		 * of the missing lines. */
+		if (Atari800_machine_type == Atari800_MACHINE_5200) {
+			static int bit5_5200 = 0;
+			if (bit5_5200) {
+				INPUT_key_code &= ~0x20;
+			}
+			bit5_5200 = !bit5_5200;
+			/* 5200 2nd fire button generates CTRL as well */
+			if (INPUT_key_shift) {
+				INPUT_key_code |= AKEY_SHFTCTRL;
+			}
+		}
+		POKEY_SKSTAT &= ~4;
+		if ((INPUT_key_code ^ last_key_code) & ~AKEY_SHFTCTRL) {
+		/* ignore if only shift or control has changed its state */
+			last_key_code = INPUT_key_code;
+			POKEY_KBCODE = (UBYTE) INPUT_key_code;
+			if (POKEY_IRQEN & 0x40) {
+				if (POKEY_IRQST & 0x40) {
+					POKEY_IRQST &= ~0x40;
+					CPU_GenerateIRQ();
+				}
+				else {
+					/* keyboard over-run */
+					POKEY_SKSTAT &= ~0x40;
+					/* assert(CPU_IRQ != 0); */
+				}
+			}
+		}
+	}
+
+	/* handle joysticks */
+#ifdef EVENT_RECORDING
+	if (playingback) {
+		gzgets(playbackfp, gzbuf, GZBUFSIZE);
+		sscanf(gzbuf,"%d ",&i);
+	} else {
+#endif
+		i = PLATFORM_PORT(0);
+#ifdef EVENT_RECORDING
+	}
+	if (recording) {
+		gzprintf(recordfp,"%d \n",i);
+	}
+#endif
+
+	STICK[0] = i & 0x0f;
+	STICK[1] = (i >> 4) & 0x0f;
+#ifdef EVENT_RECORDING
+	if (playingback) {
+		gzgets(playbackfp, gzbuf, GZBUFSIZE);
+		sscanf(gzbuf,"%d ",&i);
+	} else {
+#endif
+		i = PLATFORM_PORT(1);
+#ifdef EVENT_RECORDING
+	}
+	if (recording) {
+		gzprintf(recordfp,"%d \n",i);
+	}
+#endif
+	STICK[2] = i & 0x0f;
+	STICK[3] = (i >> 4) & 0x0f;
+
+	for (i = 0; i < 4; i++) {
+		if (INPUT_joy_block_opposite_directions) {
+			if ((STICK[i] & 0x0c) == 0) {	/* right and left simultaneously */
+				if (last_stick[i] & 0x04)	/* if wasn't left before, move left */
+					STICK[i] |= 0x08;
+				else						/* else move right */
+					STICK[i] |= 0x04;
+			}
+			else {
+				last_stick[i] &= 0x03;
+				last_stick[i] |= STICK[i] & 0x0c;
+			}
+			if ((STICK[i] & 0x03) == 0) {	/* up and down simultaneously */
+				if (last_stick[i] & 0x01)	/* if wasn't up before, move up */
+					STICK[i] |= 0x02;
+				else						/* else move down */
+					STICK[i] |= 0x01;
+			}
+			else {
+				last_stick[i] &= 0x0c;
+				last_stick[i] |= STICK[i] & 0x03;
+			}
+		}
+		else
+			last_stick[i] = STICK[i];
+		/* Joystick Triggers */
+#ifdef EVENT_RECORDING
+		if(playingback){
+			int trigtemp;
+			gzgets(playbackfp, gzbuf, GZBUFSIZE);
+			sscanf(gzbuf,"%d ",&trigtemp);
+			TRIG_input[i] = trigtemp;
+
+		} else {
+#endif
+			TRIG_input[i] = PLATFORM_TRIG(i);
+#ifdef EVENT_RECORDING
+		}
+		if(recording){
+			gzprintf(recordfp,"%d \n",TRIG_input[i]);
+		}
+#endif
+		if ((INPUT_joy_autofire[i] == INPUT_AUTOFIRE_FIRE && !TRIG_input[i]) || (INPUT_joy_autofire[i] == INPUT_AUTOFIRE_CONT))
+			TRIG_input[i] = (Atari800_nframes & 2) ? 1 : 0;
+	}
+
+	/* handle analog joysticks in Atari 5200 */
+	if (Atari800_machine_type != Atari800_MACHINE_5200) {
+		if(!INPUT_direct_mouse)
+			for (i = 0; i < 8; i++)
+				POKEY_POT_input[i] = Atari_POT(i);
+	}
+	else {
+		for (i = 0; i < 4; i++) {
+#ifdef DREAMCAST
+			/* first get analog js data */
+			POKEY_POT_input[2 * i] = Atari_POT(2 * i);         /* x */
+			POKEY_POT_input[2 * i + 1] = Atari_POT(2 * i + 1); /* y */
+			if (POKEY_POT_input[2 * i] != INPUT_joy_5200_center
+			 || POKEY_POT_input[2 * i + 1] != INPUT_joy_5200_center)
+				continue;
+			/* if analog js is unused, alternatively try keypad */
+#endif
+			if ((STICK[i] & (INPUT_STICK_CENTRE ^ INPUT_STICK_LEFT)) == 0)
+				POKEY_POT_input[2 * i] = INPUT_joy_5200_min;
+			else if ((STICK[i] & (INPUT_STICK_CENTRE ^ INPUT_STICK_RIGHT)) == 0)
+				POKEY_POT_input[2 * i] = INPUT_joy_5200_max;
+			else
+				POKEY_POT_input[2 * i] = INPUT_joy_5200_center;
+			if ((STICK[i] & (INPUT_STICK_CENTRE ^ INPUT_STICK_FORWARD)) == 0)
+				POKEY_POT_input[2 * i + 1] = INPUT_joy_5200_min;
+			else if ((STICK[i] & (INPUT_STICK_CENTRE ^ INPUT_STICK_BACK)) == 0)
+				POKEY_POT_input[2 * i + 1] = INPUT_joy_5200_max;
+			else
+				POKEY_POT_input[2 * i + 1] = INPUT_joy_5200_center;
+		}
+	}
+
+	/* handle mouse */
+#ifdef __PLUS
+	if (g_Input.ulState & IS_CAPTURE_MOUSE)
+#endif
+	switch (INPUT_mouse_mode) {
+	case INPUT_MOUSE_PAD:
+	case INPUT_MOUSE_TOUCH:
+	case INPUT_MOUSE_KOALA:
+		if(!INPUT_direct_mouse) {
+			if (INPUT_mouse_mode != INPUT_MOUSE_PAD || Atari800_machine_type == Atari800_MACHINE_5200)
+				mouse_x += INPUT_mouse_delta_x * INPUT_mouse_speed;
+			else
+				mouse_x -= INPUT_mouse_delta_x * INPUT_mouse_speed;
+			if (mouse_x < INPUT_mouse_pot_min << MOUSE_SHIFT)
+				mouse_x = INPUT_mouse_pot_min << MOUSE_SHIFT;
+			else if (mouse_x > INPUT_mouse_pot_max << MOUSE_SHIFT)
+				mouse_x = INPUT_mouse_pot_max << MOUSE_SHIFT;
+			if (INPUT_mouse_mode == INPUT_MOUSE_KOALA || Atari800_machine_type == Atari800_MACHINE_5200)
+				mouse_y += INPUT_mouse_delta_y * INPUT_mouse_speed;
+			else
+				mouse_y -= INPUT_mouse_delta_y * INPUT_mouse_speed;
+			if (mouse_y < INPUT_mouse_pot_min << MOUSE_SHIFT)
+				mouse_y = INPUT_mouse_pot_min << MOUSE_SHIFT;
+			else if (mouse_y > INPUT_mouse_pot_max << MOUSE_SHIFT)
+				mouse_y = INPUT_mouse_pot_max << MOUSE_SHIFT;
+			POKEY_POT_input[INPUT_mouse_port << 1] = mouse_x >> MOUSE_SHIFT;
+			POKEY_POT_input[(INPUT_mouse_port << 1) + 1] = mouse_y >> MOUSE_SHIFT;
+		}
+		if (Atari800_machine_type == Atari800_MACHINE_5200) {
+			if (INPUT_mouse_buttons & 1)
+				TRIG_input[INPUT_mouse_port] = 0;
+			if (INPUT_mouse_buttons & 2)
+				POKEY_SKSTAT &= ~8;
+		}
+		else
+			STICK[INPUT_mouse_port] &= ~(INPUT_mouse_buttons << 2);
+		break;
+	case INPUT_MOUSE_PEN:
+	case INPUT_MOUSE_GUN:
+		mouse_x += INPUT_mouse_delta_x * INPUT_mouse_speed;
+		if (mouse_x < 0)
+			mouse_x = 0;
+		else if (mouse_x > 167 << MOUSE_SHIFT)
+			mouse_x = 167 << MOUSE_SHIFT;
+		mouse_y += INPUT_mouse_delta_y * INPUT_mouse_speed;
+		if (mouse_y < 0)
+			mouse_y = 0;
+		else if (mouse_y > 119 << MOUSE_SHIFT)
+			mouse_y = 119 << MOUSE_SHIFT;
+		ANTIC_PENH_input = 44 + INPUT_mouse_pen_ofs_h + (mouse_x >> MOUSE_SHIFT);
+		ANTIC_PENV_input = 4 + INPUT_mouse_pen_ofs_v + (mouse_y >> MOUSE_SHIFT);
+		if ((INPUT_mouse_buttons & 1) == (INPUT_mouse_mode == INPUT_MOUSE_PEN))
+			STICK[INPUT_mouse_port] &= ~1;
+		if ((INPUT_mouse_buttons & 2) && !(last_mouse_buttons & 2))
+			mouse_pen_show_pointer = !mouse_pen_show_pointer;
+		break;
+	case INPUT_MOUSE_AMIGA:
+	case INPUT_MOUSE_ST:
+	case INPUT_MOUSE_TRAK:
+		mouse_move_x += (INPUT_mouse_delta_x * INPUT_mouse_speed) >> 1;
+		mouse_move_y += (INPUT_mouse_delta_y * INPUT_mouse_speed) >> 1;
+
+		/* i = max(abs(mouse_move_x), abs(mouse_move_y)); */
+		i = mouse_move_x >= 0 ? mouse_move_x : -mouse_move_x;
+		if (mouse_move_y > i)
+			i = mouse_move_y;
+		else if (-mouse_move_y > i)
+			i = -mouse_move_y;
+
+		{
+			UBYTE stick = INPUT_STICK_CENTRE;
+			if (i > 0) {
+				i += (1 << MOUSE_SHIFT) - 1;
+				i >>= MOUSE_SHIFT;
+				if (i > 50)
+					max_scanline_counter = scanline_counter = 5;
+				else
+					max_scanline_counter = scanline_counter = Atari800_tv_mode / i;
+				stick = mouse_step();
+			}
+			if (INPUT_mouse_mode == INPUT_MOUSE_TRAK) {
+				/* bit 3 toggles - vertical movement, bit 2 = 0 - up */
+				/* bit 1 toggles - horizontal movement, bit 0 = 0 - left */
+				STICK[INPUT_mouse_port] = ((mouse_y & 1) << 3) | ((stick & 1) << 2)
+									| ((mouse_x & 1) << 1) | ((stick & 4) >> 2);
+			}
+			else {
+				STICK[INPUT_mouse_port] = (INPUT_mouse_mode == INPUT_MOUSE_AMIGA ? mouse_amiga_codes : mouse_st_codes)
+									[(mouse_y & 3) * 4 + (mouse_x & 3)];
+			}
+		}
+
+		if (INPUT_mouse_buttons & 1)
+			TRIG_input[INPUT_mouse_port] = 0;
+		if (INPUT_mouse_buttons & 2)
+			POKEY_POT_input[INPUT_mouse_port << 1] = 1;
+		if (INPUT_mouse_buttons & 4)
+			POKEY_POT_input[(INPUT_mouse_port << 1) + 1] = 1;
+		break;
+	case INPUT_MOUSE_JOY:
+		if (Atari800_machine_type == Atari800_MACHINE_5200) {
+			/* 2 * INPUT_mouse_speed is ok for Super Breakout, for Ballblazer you need more */
+			int val = INPUT_joy_5200_center + ((INPUT_mouse_delta_x * 2 * INPUT_mouse_speed) >> MOUSE_SHIFT);
+			if (val < INPUT_joy_5200_min)
+				val = INPUT_joy_5200_min;
+			else if (val > INPUT_joy_5200_max)
+				val = INPUT_joy_5200_max;
+			POKEY_POT_input[INPUT_mouse_port << 1] = val;
+			val = INPUT_joy_5200_center + ((INPUT_mouse_delta_y * 2 * INPUT_mouse_speed) >> MOUSE_SHIFT);
+			if (val < INPUT_joy_5200_min)
+				val = INPUT_joy_5200_min;
+			else if (val > INPUT_joy_5200_max)
+				val = INPUT_joy_5200_max;
+			POKEY_POT_input[(INPUT_mouse_port << 1) + 1] = val;
+			if (INPUT_mouse_buttons & 2)
+				POKEY_SKSTAT &= ~8;
+		}
+		else {
+			mouse_move_x += INPUT_mouse_delta_x * INPUT_mouse_speed;
+			mouse_move_y += INPUT_mouse_delta_y * INPUT_mouse_speed;
+			if (mouse_move_x < -INPUT_mouse_joy_inertia << MOUSE_SHIFT ||
+				mouse_move_x > INPUT_mouse_joy_inertia << MOUSE_SHIFT ||
+				mouse_move_y < -INPUT_mouse_joy_inertia << MOUSE_SHIFT ||
+				mouse_move_y > INPUT_mouse_joy_inertia << MOUSE_SHIFT) {
+				mouse_move_x >>= 1;
+				mouse_move_y >>= 1;
+			}
+			STICK[INPUT_mouse_port] &= mouse_step();
+		}
+		if (INPUT_mouse_buttons & 1)
+			TRIG_input[INPUT_mouse_port] = 0;
+		break;
+	default:
+		break;
+	}
+	last_mouse_buttons = INPUT_mouse_buttons;
+
+	/* CX85 numeric keypad */
+	if (INPUT_key_code <= AKEY_CX85_1 && INPUT_key_code >= AKEY_CX85_YES) {
+		int val = 0;
+		switch (INPUT_key_code) {
+			case AKEY_CX85_1:
+				val = 0x19;
+				break;
+			case AKEY_CX85_2:
+				val = 0x1a;
+				break;
+			case AKEY_CX85_3:
+				val = 0x1b;
+				break;
+			case AKEY_CX85_4:
+				val = 0x11;
+				break;
+			case AKEY_CX85_5:
+				val = 0x12;
+				break;
+			case AKEY_CX85_6:
+				val = 0x13;
+				break;
+			case AKEY_CX85_7:
+				val = 0x15;
+				break;
+			case AKEY_CX85_8:
+				val = 0x16;
+				break;
+			case AKEY_CX85_9:
+				val = 0x17;
+				break;
+			case AKEY_CX85_0:
+				val = 0x1c;
+				break;
+			case AKEY_CX85_PERIOD:
+				val = 0x1d;
+				break;
+			case AKEY_CX85_MINUS:
+				val = 0x1f;
+				break;
+			case AKEY_CX85_PLUS_ENTER:
+				val = 0x1e;
+				break;
+			case AKEY_CX85_ESCAPE:
+				val = 0x0c;
+				break;
+			case AKEY_CX85_NO:
+				val = 0x14;
+				break;
+			case AKEY_CX85_DELETE:
+				val = 0x10;
+				break;
+			case AKEY_CX85_YES:
+				val = 0x18;
+				break;
+		}
+		if (val > 0) {
+			STICK[cx85_port] = (val&0x0f);
+			POKEY_POT_input[cx85_port*2+1] = ((val&0x10) ? 0 : 228);
+			TRIG_input[cx85_port] = 0;
+		}
+	}
+
+	if (INPUT_joy_multijoy && Atari800_machine_type != Atari800_MACHINE_5200) {
+		PIA_PORT_input[0] = 0xf0 | STICK[joy_multijoy_no];
+		PIA_PORT_input[1] = 0xff;
+		GTIA_TRIG[0] = TRIG_input[joy_multijoy_no];
+		GTIA_TRIG[2] = GTIA_TRIG[1] = 1;
+		GTIA_TRIG[3] = Atari800_machine_type == Atari800_MACHINE_XLXE ? MEMORY_cartA0BF_enabled : 1;
+	}
+	else {
+		GTIA_TRIG[0] = TRIG_input[0];
+		GTIA_TRIG[1] = TRIG_input[1];
+		if (Atari800_machine_type == Atari800_MACHINE_XLXE) {
+			GTIA_TRIG[2] = 1;
+			GTIA_TRIG[3] = MEMORY_cartA0BF_enabled;
+		}
+		else {
+			GTIA_TRIG[2] = TRIG_input[2];
+			GTIA_TRIG[3] = TRIG_input[3];
+		}
+		PIA_PORT_input[0] = (STICK[1] << 4) | STICK[0];
+		PIA_PORT_input[1] = (STICK[3] << 4) | STICK[2];
+	}
+
+#ifdef EVENT_RECORDING
+	update_adler32_of_screen();
+#endif
+}
+
+#ifdef EVENT_RECORDING
+static void update_adler32_of_screen(void)
+{
+	unsigned int adler32val = 0;
+	static unsigned int adler32_errors = 0;
+	static int first = TRUE;
+	if (first) { /* don't calculate the first frame */
+		first = FALSE;
+		adler32val = 0;
+	}
+	else if (recording || playingback){
+		adler32val = compute_adler32_of_screen();
+	}
+
+	if (recording) {
+		gzprintf(recordfp, "%08X \n", adler32val);
+	}
+	if (playingback) {
+		unsigned int pb_adler32val;
+		gzgets(playbackfp, gzbuf, GZBUFSIZE);
+		sscanf(gzbuf, "%08X ", &pb_adler32val);
+		if (pb_adler32val != adler32val){
+			Log_print("adler32 does not match");
+			adler32_errors++;
+		}
+		
+	}
+	if (playingback && gzeof(playbackfp)) {
+		playingback = FALSE;
+		gzclose(playbackfp);
+		Atari800_Exit(FALSE);
+		exit(adler32_errors > 0 ? 1 : 0); /* return code indicates errors*/
+	}
+}
+/* Compute the adler32 value of the visible screen */
+/* Note that the visible portion is 24..360 on the horizontal and */
+/* 0..Screen_HEIGHT on the vertical */
+static unsigned int compute_adler32_of_screen(void)
+{
+	int y;
+	unsigned int adler = adler32(0L,Z_NULL,0);
+	for (y = 0; y < Screen_HEIGHT; y++) {
+		adler = adler32(adler, (unsigned char*)Screen_atari + 24 + Screen_WIDTH*y, 360 - 24);
+	}
+	return adler;
+}
+#endif /* EVENT_RECORDING */
+
+int INPUT_Recording(void)
+{
+#ifdef EVENT_RECORDING
+	return recording;
+#else
+	return 0;
+#endif
+}
+
+int INPUT_Playingback(void)
+{
+#ifdef EVENT_RECORDING
+	return playingback;
+#else
+	return 0;
+#endif
+}
+
+void INPUT_RecordInt(int i)
+{
+#ifdef EVENT_RECORDING
+	if (recording) gzprintf(recordfp, "%d\n", i);
+#endif
+}
+
+int INPUT_PlaybackInt(void)
+{
+#ifdef EVENT_RECORDING
+	int i;
+	if (playingback) {
+		gzgets(playbackfp, gzbuf, GZBUFSIZE);
+		sscanf(gzbuf, "%d", &i);
+	}
+	return i;
+#else
+	return 0;
+#endif
+}
+
+void INPUT_Scanline(void)
+{
+	if (--scanline_counter == 0) {
+		UBYTE stick = mouse_step();
+		if (INPUT_mouse_mode == INPUT_MOUSE_TRAK) {
+			/* bit 3 toggles - vertical movement, bit 2 = 0 - up */
+			/* bit 1 toggles - horizontal movement, bit 0 = 0 - left */
+			STICK[INPUT_mouse_port] = ((mouse_y & 1) << 3) | ((stick & 1) << 2)
+								| ((mouse_x & 1) << 1) | ((stick & 4) >> 2);
+		}
+		else {
+			STICK[INPUT_mouse_port] = (INPUT_mouse_mode == INPUT_MOUSE_AMIGA ? mouse_amiga_codes : mouse_st_codes)
+								[(mouse_y & 3) * 4 + (mouse_x & 3)];
+		}
+		PIA_PORT_input[0] = (STICK[1] << 4) | STICK[0];
+		PIA_PORT_input[1] = (STICK[3] << 4) | STICK[2];
+		scanline_counter = max_scanline_counter;
+	}
+}
+
+void INPUT_SelectMultiJoy(int no)
+{
+	no &= 3;
+	joy_multijoy_no = no;
+	if (INPUT_joy_multijoy && Atari800_machine_type != Atari800_MACHINE_5200) {
+		PIA_PORT_input[0] = 0xf0 | STICK[no];
+		GTIA_TRIG[0] = TRIG_input[no];
+	}
+}
+
+void INPUT_CenterMousePointer(void)
+{
+	switch (INPUT_mouse_mode) {
+	case INPUT_MOUSE_PAD:
+	case INPUT_MOUSE_TOUCH:
+	case INPUT_MOUSE_KOALA:
+		mouse_x = 114 << MOUSE_SHIFT;
+		mouse_y = 114 << MOUSE_SHIFT;
+		break;
+	case INPUT_MOUSE_PEN:
+	case INPUT_MOUSE_GUN:
+		mouse_x = 84 << MOUSE_SHIFT;
+		mouse_y = 60 << MOUSE_SHIFT;
+		break;
+	case INPUT_MOUSE_AMIGA:
+	case INPUT_MOUSE_ST:
+	case INPUT_MOUSE_TRAK:
+	case INPUT_MOUSE_JOY:
+		mouse_move_x = 0;
+		mouse_move_y = 0;
+		break;
+	}
+}
+
+#ifndef CURSES_BASIC
+
+#define PLOT(dx, dy)	do {\
+							ptr[(dx) + Screen_WIDTH * (dy)] ^= 0x0f0f;\
+							ptr[(dx) + Screen_WIDTH * (dy) + Screen_WIDTH / 2] ^= 0x0f0f;\
+						} while (0)
+
+/* draw light pen cursor */
+void INPUT_DrawMousePointer(void)
+{
+	if ((INPUT_mouse_mode == INPUT_MOUSE_PEN || INPUT_mouse_mode == INPUT_MOUSE_GUN) && mouse_pen_show_pointer) {
+		int x = mouse_x >> MOUSE_SHIFT;
+		int y = mouse_y >> MOUSE_SHIFT;
+		if (x >= 0 && x <= 167 && y >= 0 && y <= 119) {
+			UWORD *ptr = & ((UWORD *) Screen_atari)[12 + x + Screen_WIDTH * y];
+			PLOT(-2, 0);
+			PLOT(-1, 0);
+			PLOT(1, 0);
+			PLOT(2, 0);
+			if (y >= 1) {
+				PLOT(0, -1);
+				if (y >= 2)
+					PLOT(0, -2);
+			}
+			if (y <= 118) {
+				PLOT(0, 1);
+				if (y <= 117)
+					PLOT(0, 2);
+			}
+		}
+	}
+}
+
+#endif /* CURSES_BASIC */
diff --git a/project/jni/application/atari800/src/input.h b/project/jni/application/atari800/src/input.h
new file mode 100644
index 000000000..00cf781f4
--- /dev/null
+++ b/project/jni/application/atari800/src/input.h
@@ -0,0 +1,93 @@
+#ifndef INPUT_H_
+#define INPUT_H_
+
+/* Keyboard AKEY_* are in akey.h */
+
+/* INPUT_key_consol masks */
+/* Note: INPUT_key_consol should be INPUT_CONSOL_NONE if no consol key is pressed.
+   When a consol key is pressed, corresponding bit should be cleared.
+ */
+#define INPUT_CONSOL_NONE		0x07
+#define INPUT_CONSOL_START	0x01
+#define INPUT_CONSOL_SELECT	0x02
+#define INPUT_CONSOL_OPTION	0x04
+
+extern int INPUT_key_code;	/* regular Atari key code */
+extern int INPUT_key_shift;	/* Shift key pressed */
+extern int INPUT_key_consol;	/* Start, Select and Option keys */
+
+/* Joysticks ----------------------------------------------------------- */
+
+/* joystick position */
+#define	INPUT_STICK_LL		0x09
+#define	INPUT_STICK_BACK		0x0d
+#define	INPUT_STICK_LR		0x05
+#define	INPUT_STICK_LEFT		0x0b
+#define	INPUT_STICK_CENTRE	0x0f
+#define	INPUT_STICK_RIGHT		0x07
+#define	INPUT_STICK_UL		0x0a
+#define	INPUT_STICK_FORWARD	0x0e
+#define	INPUT_STICK_UR		0x06
+
+/* joy_autofire values */
+#define INPUT_AUTOFIRE_OFF	0
+#define INPUT_AUTOFIRE_FIRE	1	/* Fire dependent */
+#define INPUT_AUTOFIRE_CONT	2	/* Continuous */
+
+extern int INPUT_joy_autofire[4];		/* autofire mode for each Atari port */
+
+extern int INPUT_joy_block_opposite_directions;	/* can't move joystick left
+											   and right simultaneously */
+
+extern int INPUT_joy_multijoy;	/* emulate MultiJoy4 interface */
+
+/* 5200 joysticks values */
+extern int INPUT_joy_5200_min;
+extern int INPUT_joy_5200_center;
+extern int INPUT_joy_5200_max;
+
+/* Mouse --------------------------------------------------------------- */
+
+/* INPUT_mouse_mode values */
+#define INPUT_MOUSE_OFF		0
+#define INPUT_MOUSE_PAD		1	/* Paddles */
+#define INPUT_MOUSE_TOUCH	2	/* Atari touch tablet */
+#define INPUT_MOUSE_KOALA	3	/* Koala pad */
+#define INPUT_MOUSE_PEN		4	/* Light pen */
+#define INPUT_MOUSE_GUN		5	/* Light gun */
+#define INPUT_MOUSE_AMIGA	6	/* Amiga mouse */
+#define INPUT_MOUSE_ST		7	/* Atari ST mouse */
+#define INPUT_MOUSE_TRAK	8	/* Atari CX22 Trak-Ball */
+#define INPUT_MOUSE_JOY		9	/* Joystick */
+
+extern int INPUT_mouse_mode;			/* device emulated with mouse */
+extern int INPUT_mouse_port;			/* Atari port, to which the emulated device is attached */
+extern int INPUT_mouse_delta_x;		/* x motion since last frame */
+extern int INPUT_mouse_delta_y;		/* y motion since last frame */
+extern int INPUT_mouse_buttons;		/* buttons pressed (b0: left, b1: right, b2: middle */
+extern int INPUT_mouse_speed;			/* how fast the mouse pointer moves */
+extern int INPUT_mouse_pot_min;		/* min. value of POKEY's POT register */
+extern int INPUT_mouse_pot_max;		/* max. value of POKEY's POT register */
+extern int INPUT_mouse_pen_ofs_h;		/* light pen/gun horizontal offset (for calibration) */
+extern int INPUT_mouse_pen_ofs_v;		/* light pen/gun vertical offset (for calibration) */
+extern int INPUT_mouse_joy_inertia;	/* how long the mouse pointer can move (time in Atari frames)
+								   after a fast motion of mouse */
+extern int INPUT_direct_mouse;      /* When true, convert the mouse pointer
+													position directly into POKEY POT values */
+
+extern int INPUT_cx85;      /* emulate CX85 numeric keypad */
+/* Functions ----------------------------------------------------------- */
+
+int INPUT_Initialise(int *argc, char *argv[]);
+void INPUT_Exit(void);
+void INPUT_Frame(void);
+void INPUT_Scanline(void);
+void INPUT_SelectMultiJoy(int no);
+void INPUT_CenterMousePointer(void);
+void INPUT_DrawMousePointer(void);
+int INPUT_Recording(void);
+int INPUT_Playingback(void);
+void INPUT_RecordInt(int i);
+int INPUT_PlaybackInt(void);
+
+#endif /* INPUT_H_ */
diff --git a/project/jni/application/atari800/src/install-sh b/project/jni/application/atari800/src/install-sh
new file mode 100755
index 000000000..89fc9b098
--- /dev/null
+++ b/project/jni/application/atari800/src/install-sh
@@ -0,0 +1,238 @@
+#! /bin/sh
+#
+# install - install a program, script, or datafile
+# This comes from X11R5.
+#
+# Calling this script install-sh is preferred over install.sh, to prevent
+# `make' implicit rules from creating a file called install from it
+# when there is no Makefile.
+#
+# This script is compatible with the BSD install script, but was written
+# from scratch.
+#
+
+
+# set DOITPROG to echo to test this script
+
+# Don't use :- since 4.3BSD and earlier shells don't like it.
+doit="${DOITPROG-}"
+
+
+# put in absolute paths if you don't have them in your path; or use env. vars.
+
+mvprog="${MVPROG-mv}"
+cpprog="${CPPROG-cp}"
+chmodprog="${CHMODPROG-chmod}"
+chownprog="${CHOWNPROG-chown}"
+chgrpprog="${CHGRPPROG-chgrp}"
+stripprog="${STRIPPROG-strip}"
+rmprog="${RMPROG-rm}"
+mkdirprog="${MKDIRPROG-mkdir}"
+
+tranformbasename=""
+transform_arg=""
+instcmd="$mvprog"
+chmodcmd="$chmodprog 0755"
+chowncmd=""
+chgrpcmd=""
+stripcmd=""
+rmcmd="$rmprog -f"
+mvcmd="$mvprog"
+src=""
+dst=""
+dir_arg=""
+
+while [ x"$1" != x ]; do
+    case $1 in
+	-c) instcmd="$cpprog"
+	    shift
+	    continue;;
+
+	-d) dir_arg=true
+	    shift
+	    continue;;
+
+	-m) chmodcmd="$chmodprog $2"
+	    shift
+	    shift
+	    continue;;
+
+	-o) chowncmd="$chownprog $2"
+	    shift
+	    shift
+	    continue;;
+
+	-g) chgrpcmd="$chgrpprog $2"
+	    shift
+	    shift
+	    continue;;
+
+	-s) stripcmd="$stripprog"
+	    shift
+	    continue;;
+
+	-t=*) transformarg=`echo $1 | sed 's/-t=//'`
+	    shift
+	    continue;;
+
+	-b=*) transformbasename=`echo $1 | sed 's/-b=//'`
+	    shift
+	    continue;;
+
+	*)  if [ x"$src" = x ]
+	    then
+		src=$1
+	    else
+		# this colon is to work around a 386BSD /bin/sh bug
+		:
+		dst=$1
+	    fi
+	    shift
+	    continue;;
+    esac
+done
+
+if [ x"$src" = x ]
+then
+	echo "install:	no input file specified"
+	exit 1
+else
+	true
+fi
+
+if [ x"$dir_arg" != x ]; then
+	dst=$src
+	src=""
+	
+	if [ -d $dst ]; then
+		instcmd=:
+	else
+		instcmd=mkdir
+	fi
+else
+
+# Waiting for this to be detected by the "$instcmd $src $dsttmp" command
+# might cause directories to be created, which would be especially bad 
+# if $src (and thus $dsttmp) contains '*'.
+
+	if [ -f $src -o -d $src ]
+	then
+		true
+	else
+		echo "install:  $src does not exist"
+		exit 1
+	fi
+	
+	if [ x"$dst" = x ]
+	then
+		echo "install:	no destination specified"
+		exit 1
+	else
+		true
+	fi
+
+# If destination is a directory, append the input filename; if your system
+# does not like double slashes in filenames, you may need to add some logic
+
+	if [ -d $dst ]
+	then
+		dst="$dst"/`basename $src`
+	else
+		true
+	fi
+fi
+
+## this sed command emulates the dirname command
+dstdir=`echo $dst | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'`
+
+# Make sure that the destination directory exists.
+#  this part is taken from Noah Friedman's mkinstalldirs script
+
+# Skip lots of stat calls in the usual case.
+if [ ! -d "$dstdir" ]; then
+defaultIFS='	
+'
+IFS="${IFS-${defaultIFS}}"
+
+oIFS="${IFS}"
+# Some sh's can't handle IFS=/ for some reason.
+IFS='%'
+set - `echo ${dstdir} | sed -e 's@/@%@g' -e 's@^%@/@'`
+IFS="${oIFS}"
+
+pathcomp=''
+
+while [ $# -ne 0 ] ; do
+	pathcomp="${pathcomp}${1}"
+	shift
+
+	if [ ! -d "${pathcomp}" ] ;
+        then
+		$mkdirprog "${pathcomp}"
+	else
+		true
+	fi
+
+	pathcomp="${pathcomp}/"
+done
+fi
+
+if [ x"$dir_arg" != x ]
+then
+	$doit $instcmd $dst &&
+
+	if [ x"$chowncmd" != x ]; then $doit $chowncmd $dst; else true ; fi &&
+	if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dst; else true ; fi &&
+	if [ x"$stripcmd" != x ]; then $doit $stripcmd $dst; else true ; fi &&
+	if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dst; else true ; fi
+else
+
+# If we're going to rename the final executable, determine the name now.
+
+	if [ x"$transformarg" = x ] 
+	then
+		dstfile=`basename $dst`
+	else
+		dstfile=`basename $dst $transformbasename | 
+			sed $transformarg`$transformbasename
+	fi
+
+# don't allow the sed command to completely eliminate the filename
+
+	if [ x"$dstfile" = x ] 
+	then
+		dstfile=`basename $dst`
+	else
+		true
+	fi
+
+# Make a temp file name in the proper directory.
+
+	dsttmp=$dstdir/#inst.$$#
+
+# Move or copy the file name to the temp name
+
+	$doit $instcmd $src $dsttmp &&
+
+	trap "rm -f ${dsttmp}" 0 &&
+
+# and set any options; do chmod last to preserve setuid bits
+
+# If any of these fail, we abort the whole thing.  If we want to
+# ignore errors from any of these, just make sure not to ignore
+# errors from the above "$doit $instcmd $src $dsttmp" command.
+
+	if [ x"$chowncmd" != x ]; then $doit $chowncmd $dsttmp; else true;fi &&
+	if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dsttmp; else true;fi &&
+	if [ x"$stripcmd" != x ]; then $doit $stripcmd $dsttmp; else true;fi &&
+	if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dsttmp; else true;fi &&
+
+# Now rename the file to the real destination.
+
+	$doit $rmcmd -f $dstdir/$dstfile &&
+	$doit $mvcmd $dsttmp $dstdir/$dstfile 
+
+fi &&
+
+
+exit 0
diff --git a/project/jni/application/atari800/src/log.c b/project/jni/application/atari800/src/log.c
new file mode 100644
index 000000000..f167990bc
--- /dev/null
+++ b/project/jni/application/atari800/src/log.c
@@ -0,0 +1,90 @@
+/*
+ * log.c - A logging facility for debugging
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <stdarg.h>
+#include <string.h>
+#ifdef ANDROID
+#include <android/log.h>
+#endif
+
+
+#include "log.h"
+
+#ifdef MACOSX
+#  define PRINT(a) ControlManagerMessagePrint(a)
+#elif defined(ANDROID)
+#  define PRINT(a) __android_log_print(ANDROID_LOG_INFO, "atari800", a);
+#else
+#  define PRINT(a) printf("%s", a)
+#endif
+
+#ifdef BUFFERED_LOG
+char Log_buffer[Log_BUFFER_SIZE] = "";
+#endif
+
+void Log_print(char *format, ...)
+{
+	va_list args;
+	char buffer[8192];
+#ifdef BUFFERED_LOG
+	int buflen;
+#endif
+
+	va_start(args, format);
+#ifdef HAVE_VSNPRINTF
+	vsnprintf(buffer, sizeof(buffer) - 2 /* -2 for the strcat() */, format, args);
+#else
+	vsprintf(buffer, format, args);
+#endif
+	va_end(args);
+
+#ifdef __PLUS
+	strcat(buffer, "\r\n");
+#else
+	strcat(buffer, "\n");
+#endif
+
+#ifdef BUFFERED_LOG
+	buflen = strlen(buffer);
+
+	if ((strlen(Log_buffer) + strlen(buffer) + 1) > Log_BUFFER_SIZE)
+		*Log_buffer = 0;
+
+	strcat(Log_buffer, buffer);
+#else
+	PRINT(buffer);
+#endif
+}
+
+void Log_flushlog(void)
+{
+#ifdef BUFFERED_LOG
+	if (*Log_buffer) {
+		PRINT(Log_buffer);
+		*Log_buffer = 0;
+	}
+#endif
+}
diff --git a/project/jni/application/atari800/src/log.h b/project/jni/application/atari800/src/log.h
new file mode 100644
index 000000000..1bb70b457
--- /dev/null
+++ b/project/jni/application/atari800/src/log.h
@@ -0,0 +1,10 @@
+#ifndef LOG_H_
+#define LOG_H_
+
+#define Log_BUFFER_SIZE 8192
+extern char Log_buffer[Log_BUFFER_SIZE];
+
+void Log_print(char *format, ...);
+void Log_flushlog(void);
+
+#endif /* LOG_H_ */
diff --git a/project/jni/application/atari800/src/memory.c b/project/jni/application/atari800/src/memory.c
new file mode 100644
index 000000000..9fc3df064
--- /dev/null
+++ b/project/jni/application/atari800/src/memory.c
@@ -0,0 +1,1047 @@
+/*
+ * memory.c - memory emulation
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "atari.h"
+#include "antic.h"
+#include "cpu.h"
+#include "cartridge.h"
+#include "esc.h"
+#include "gtia.h"
+#include "log.h"
+#include "memory.h"
+#include "pbi.h"
+#include "pia.h"
+#include "pokey.h"
+#include "util.h"
+#ifndef BASIC
+#include "statesav.h"
+#endif
+
+UBYTE MEMORY_mem[65536 + 2];
+
+int MEMORY_ram_size = 64;
+
+#ifndef PAGED_ATTRIB
+
+UBYTE MEMORY_attrib[65536];
+
+#else /* PAGED_ATTRIB */
+
+MEMORY_rdfunc MEMORY_readmap[256];
+MEMORY_wrfunc MEMORY_writemap[256];
+
+typedef struct map_save {
+	int     code;
+	MEMORY_rdfunc  rdptr;
+	MEMORY_wrfunc  wrptr;
+} map_save;
+
+void MEMORY_ROM_PutByte(UWORD addr, UBYTE value)
+{
+}
+
+map_save save_map[2] = {
+	{0, NULL, NULL},          /* RAM */
+	{1, NULL, MEMORY_ROM_PutByte}    /* ROM */
+};
+
+#endif /* PAGED_ATTRIB */
+
+UBYTE MEMORY_basic[8192];
+UBYTE MEMORY_os[16384];
+
+int MEMORY_xe_bank = 0;
+int MEMORY_selftest_enabled = 0;
+
+static UBYTE under_atarixl_os[16384];
+static UBYTE under_atari_basic[8192];
+static UBYTE *atarixe_memory = NULL;
+static ULONG atarixe_memory_size = 0;
+
+int MEMORY_have_basic = FALSE; /* Atari BASIC image has been successfully read (Atari 800 only) */
+
+/* Axlon and Mosaic RAM expansions for Atari 400/800 only */
+static void MosaicPutByte(UWORD addr, UBYTE byte);
+static UBYTE MosaicGetByte(UWORD addr);
+static void AxlonPutByte(UWORD addr, UBYTE byte);
+static UBYTE AxlonGetByte(UWORD addr);
+static UBYTE *axlon_ram = NULL;
+static int axlon_ram_size = 0;
+int axlon_curbank = 0;
+int MEMORY_axlon_bankmask = 0x07;
+int MEMORY_axlon_enabled = FALSE;
+int MEMORY_axlon_0f_mirror = FALSE; /* The real Axlon had a mirror bank register at 0x0fc0-0x0fff, compatibles did not*/
+static UBYTE *mosaic_ram = NULL;
+static int mosaic_ram_size = 0;
+static int mosaic_curbank = 0x3f;
+int MEMORY_mosaic_maxbank = 0;
+int MEMORY_mosaic_enabled = FALSE;
+
+static void alloc_axlon_memory(void){
+	axlon_curbank = 0;
+	if (MEMORY_axlon_enabled && (Atari800_machine_type == Atari800_MACHINE_OSA || Atari800_machine_type == Atari800_MACHINE_OSB )) {
+		int new_axlon_ram_size = (MEMORY_axlon_bankmask+1)*0x4000;
+		if ((axlon_ram == NULL) || (axlon_ram_size != new_axlon_ram_size)) {
+			axlon_ram_size = new_axlon_ram_size;
+			if (axlon_ram != NULL) free(axlon_ram);
+			axlon_ram = (UBYTE *)Util_malloc(axlon_ram_size);
+		}
+		memset(axlon_ram, 0, axlon_ram_size);
+	} else {
+		if (axlon_ram != NULL) {
+			free(axlon_ram);
+			axlon_ram_size = 0;
+		}
+	}
+}
+
+static void alloc_mosaic_memory(void){
+	mosaic_curbank = 0x3f;
+	if (MEMORY_mosaic_enabled && (Atari800_machine_type == Atari800_MACHINE_OSA || Atari800_machine_type == Atari800_MACHINE_OSB)) {
+		int new_mosaic_ram_size = (MEMORY_mosaic_maxbank+1)*0x1000;
+		if ((mosaic_ram == NULL) || (mosaic_ram_size != new_mosaic_ram_size)) {
+			mosaic_ram_size = new_mosaic_ram_size;
+			if (mosaic_ram != NULL) free(mosaic_ram);
+			mosaic_ram = (UBYTE *)Util_malloc(mosaic_ram_size);
+		}
+		memset(mosaic_ram, 0, mosaic_ram_size);
+	} else {
+		if (mosaic_ram != NULL) {
+			free(mosaic_ram);
+			mosaic_ram_size = 0;
+		}
+	}
+
+}
+
+static void AllocXEMemory(void)
+{
+	if (MEMORY_ram_size > 64) {
+		/* don't count 64 KB of base memory */
+		/* count number of 16 KB banks, add 1 for saving base memory 0x4000-0x7fff */
+		ULONG size = (1 + (MEMORY_ram_size - 64) / 16) * 16384;
+		if (size != atarixe_memory_size) {
+			if (atarixe_memory != NULL)
+				free(atarixe_memory);
+			atarixe_memory = (UBYTE *) Util_malloc(size);
+			atarixe_memory_size = size;
+			memset(atarixe_memory, 0, size);
+		}
+	}
+	/* atarixe_memory not needed, free it */
+	else if (atarixe_memory != NULL) {
+		free(atarixe_memory);
+		atarixe_memory = NULL;
+		atarixe_memory_size = 0;
+	}
+}
+
+void MEMORY_InitialiseMachine(void)
+{
+	ANTIC_xe_ptr = NULL;
+	switch (Atari800_machine_type) {
+	case Atari800_MACHINE_OSA:
+	case Atari800_MACHINE_OSB:
+		memcpy(MEMORY_mem + 0xd800, MEMORY_os, 0x2800);
+		ESC_PatchOS();
+		MEMORY_dFillMem(0x0000, 0x00, MEMORY_ram_size * 1024 - 1);
+		MEMORY_SetRAM(0x0000, MEMORY_ram_size * 1024 - 1);
+		if (MEMORY_ram_size < 52) {
+			MEMORY_dFillMem(MEMORY_ram_size * 1024, 0xff, 0xd000 - MEMORY_ram_size * 1024);
+			MEMORY_SetROM(MEMORY_ram_size * 1024, 0xcfff);
+		}
+		MEMORY_SetROM(0xd800, 0xffff);
+#ifndef PAGED_ATTRIB
+		MEMORY_SetHARDWARE(0xd000, 0xd7ff);
+		if (MEMORY_mosaic_enabled) MEMORY_SetHARDWARE(0xff00, 0xffff); 
+		/* only 0xffc0-0xffff are used, but mark the whole  
+		 * page to make state saving easier */
+		if (MEMORY_axlon_enabled) { 
+		       	MEMORY_SetHARDWARE(0xcf00, 0xcfff);
+			if (MEMORY_axlon_0f_mirror) MEMORY_SetHARDWARE(0x0f00, 0x0fff);
+			/* only ?fc0-?fff are used, but mark the whole page*/
+		}
+#else
+		MEMORY_readmap[0xd0] = GTIA_GetByte;
+		MEMORY_readmap[0xd1] = PBI_D1GetByte;
+		MEMORY_readmap[0xd2] = POKEY_GetByte;
+		MEMORY_readmap[0xd3] = PIA_GetByte;
+		MEMORY_readmap[0xd4] = ANTIC_GetByte;
+		MEMORY_readmap[0xd5] = CARTRIDGE_GetByte;
+		MEMORY_readmap[0xd6] = PBI_D6GetByte;
+		MEMORY_readmap[0xd7] = PBI_D7GetByte;
+		MEMORY_writemap[0xd0] = GTIA_PutByte;
+		MEMORY_writemap[0xd1] = PBI_D1PutByte;
+		MEMORY_writemap[0xd2] = POKEY_PutByte;
+		MEMORY_writemap[0xd3] = PIA_PutByte;
+		MEMORY_writemap[0xd4] = ANTIC_PutByte;
+		MEMORY_writemap[0xd5] = CARTRIDGE_PutByte;
+		MEMORY_writemap[0xd6] = PBI_D6PutByte;
+		MEMORY_writemap[0xd7] = PBI_D7PutByte;
+		if (MEMORY_mosaic_enabled) MEMORY_writemap[0xff] = MosaicPutByte;
+		if (MEMORY_axlon_enabled) MEMORY_writemap[0xcf] = AxlonPutByte;
+		if (MEMORY_axlon_enabled && MEMORY_axlon_0f_mirror) MEMORY_writemap[0x0f] = AxlonPutByte;
+#endif
+		break;
+	case Atari800_MACHINE_XLXE:
+		memcpy(MEMORY_mem + 0xc000, MEMORY_os, 0x4000);
+		ESC_PatchOS();
+		if (MEMORY_ram_size == 16) {
+			MEMORY_dFillMem(0x0000, 0x00, 0x4000);
+			MEMORY_SetRAM(0x0000, 0x3fff);
+			MEMORY_dFillMem(0x4000, 0xff, 0x8000);
+			MEMORY_SetROM(0x4000, 0xcfff);
+		} else {
+			MEMORY_dFillMem(0x0000, 0x00, 0xc000);
+			MEMORY_SetRAM(0x0000, 0xbfff);
+			MEMORY_SetROM(0xc000, 0xcfff);
+		}
+#ifndef PAGED_ATTRIB
+		MEMORY_SetHARDWARE(0xd000, 0xd7ff);
+#else
+		MEMORY_readmap[0xd0] = GTIA_GetByte;
+		MEMORY_readmap[0xd1] = PBI_D1GetByte;
+		MEMORY_readmap[0xd2] = POKEY_GetByte;
+		MEMORY_readmap[0xd3] = PIA_GetByte;
+		MEMORY_readmap[0xd4] = ANTIC_GetByte;
+		MEMORY_readmap[0xd5] = CARTRIDGE_GetByte;
+		MEMORY_readmap[0xd6] = PBI_D6GetByte;
+		MEMORY_readmap[0xd7] = PBI_D7GetByte;
+		MEMORY_writemap[0xd0] = GTIA_PutByte;
+		MEMORY_writemap[0xd1] = PBI_D1PutByte;
+		MEMORY_writemap[0xd2] = POKEY_PutByte;
+		MEMORY_writemap[0xd3] = PIA_PutByte;
+		MEMORY_writemap[0xd4] = ANTIC_PutByte;
+		MEMORY_writemap[0xd5] = CARTRIDGE_PutByte;
+		MEMORY_writemap[0xd6] = PBI_D6PutByte;
+		MEMORY_writemap[0xd7] = PBI_D7PutByte;
+#endif
+		MEMORY_SetROM(0xd800, 0xffff);
+		break;
+	case Atari800_MACHINE_5200:
+		memcpy(MEMORY_mem + 0xf800, MEMORY_os, 0x800);
+		MEMORY_dFillMem(0x0000, 0x00, 0xf800);
+		MEMORY_SetRAM(0x0000, 0x3fff);
+		MEMORY_SetROM(0x4000, 0xffff);
+#ifndef PAGED_ATTRIB
+		MEMORY_SetHARDWARE(0xc000, 0xcfff);	/* 5200 GTIA Chip */
+		MEMORY_SetHARDWARE(0xd400, 0xd4ff);	/* 5200 ANTIC Chip */
+		MEMORY_SetHARDWARE(0xe800, 0xefff);	/* 5200 POKEY Chip */
+#else
+		MEMORY_readmap[0xc0] = GTIA_GetByte;
+		MEMORY_readmap[0xc1] = GTIA_GetByte;
+		MEMORY_readmap[0xc2] = GTIA_GetByte;
+		MEMORY_readmap[0xc3] = GTIA_GetByte;
+		MEMORY_readmap[0xc4] = GTIA_GetByte;
+		MEMORY_readmap[0xc5] = GTIA_GetByte;
+		MEMORY_readmap[0xc6] = GTIA_GetByte;
+		MEMORY_readmap[0xc7] = GTIA_GetByte;
+		MEMORY_readmap[0xc8] = GTIA_GetByte;
+		MEMORY_readmap[0xc9] = GTIA_GetByte;
+		MEMORY_readmap[0xca] = GTIA_GetByte;
+		MEMORY_readmap[0xcb] = GTIA_GetByte;
+		MEMORY_readmap[0xcc] = GTIA_GetByte;
+		MEMORY_readmap[0xcd] = GTIA_GetByte;
+		MEMORY_readmap[0xce] = GTIA_GetByte;
+		MEMORY_readmap[0xcf] = GTIA_GetByte;
+		MEMORY_readmap[0xd4] = ANTIC_GetByte;
+		MEMORY_readmap[0xe8] = POKEY_GetByte;
+		MEMORY_readmap[0xe9] = POKEY_GetByte;
+		MEMORY_readmap[0xea] = POKEY_GetByte;
+		MEMORY_readmap[0xeb] = POKEY_GetByte;
+		MEMORY_readmap[0xec] = POKEY_GetByte;
+		MEMORY_readmap[0xed] = POKEY_GetByte;
+		MEMORY_readmap[0xee] = POKEY_GetByte;
+		MEMORY_readmap[0xef] = POKEY_GetByte;
+
+		MEMORY_writemap[0xc0] = GTIA_PutByte;
+		MEMORY_writemap[0xc1] = GTIA_PutByte;
+		MEMORY_writemap[0xc2] = GTIA_PutByte;
+		MEMORY_writemap[0xc3] = GTIA_PutByte;
+		MEMORY_writemap[0xc4] = GTIA_PutByte;
+		MEMORY_writemap[0xc5] = GTIA_PutByte;
+		MEMORY_writemap[0xc6] = GTIA_PutByte;
+		MEMORY_writemap[0xc7] = GTIA_PutByte;
+		MEMORY_writemap[0xc8] = GTIA_PutByte;
+		MEMORY_writemap[0xc9] = GTIA_PutByte;
+		MEMORY_writemap[0xca] = GTIA_PutByte;
+		MEMORY_writemap[0xcb] = GTIA_PutByte;
+		MEMORY_writemap[0xcc] = GTIA_PutByte;
+		MEMORY_writemap[0xcd] = GTIA_PutByte;
+		MEMORY_writemap[0xce] = GTIA_PutByte;
+		MEMORY_writemap[0xcf] = GTIA_PutByte;
+		MEMORY_writemap[0xd4] = ANTIC_PutByte;
+		MEMORY_writemap[0xe8] = POKEY_PutByte;
+		MEMORY_writemap[0xe9] = POKEY_PutByte;
+		MEMORY_writemap[0xea] = POKEY_PutByte;
+		MEMORY_writemap[0xeb] = POKEY_PutByte;
+		MEMORY_writemap[0xec] = POKEY_PutByte;
+		MEMORY_writemap[0xed] = POKEY_PutByte;
+		MEMORY_writemap[0xee] = POKEY_PutByte;
+		MEMORY_writemap[0xef] = POKEY_PutByte;
+#endif
+		break;
+	}
+	AllocXEMemory();
+	alloc_axlon_memory();
+	alloc_mosaic_memory();
+	Atari800_Coldstart();
+}
+
+#ifndef BASIC
+
+void MEMORY_StateSave(UBYTE SaveVerbose)
+{
+	/* Axlon/Mosaic for 400/800 */
+	if (Atari800_machine_type == Atari800_MACHINE_OSA  || Atari800_machine_type == Atari800_MACHINE_OSB) {
+		StateSav_SaveINT(&MEMORY_axlon_enabled, 1);
+		if (MEMORY_axlon_enabled){
+			StateSav_SaveINT(&axlon_curbank, 1);
+			StateSav_SaveINT(&MEMORY_axlon_bankmask, 1);
+			StateSav_SaveINT(&MEMORY_axlon_0f_mirror, 1);
+			StateSav_SaveINT(&axlon_ram_size, 1);
+			StateSav_SaveUBYTE(&axlon_ram[0], axlon_ram_size);
+		}
+		StateSav_SaveINT(&MEMORY_mosaic_enabled, 1);
+		if (MEMORY_mosaic_enabled){
+			StateSav_SaveINT(&mosaic_curbank, 1);
+			StateSav_SaveINT(&MEMORY_mosaic_maxbank, 1);
+			StateSav_SaveINT(&mosaic_ram_size, 1);
+			StateSav_SaveUBYTE(&mosaic_ram[0], mosaic_ram_size);
+		}
+	}
+
+	StateSav_SaveUBYTE(&MEMORY_mem[0], 65536);
+#ifndef PAGED_ATTRIB
+	StateSav_SaveUBYTE(&MEMORY_attrib[0], 65536);
+#else
+	{
+		/* I assume here that consecutive calls to StateSav_SaveUBYTE()
+		   are equivalent to a single call with all the values
+		   (i.e. StateSav_SaveUBYTE() doesn't write any headers). */
+		UBYTE attrib_page[256];
+		int i;
+		for (i = 0; i < 256; i++) {
+			if (MEMORY_writemap[i] == NULL)
+				memset(attrib_page, MEMORY_RAM, 256);
+			else if (MEMORY_writemap[i] == MEMORY_ROM_PutByte)
+				memset(attrib_page, MEMORY_ROM, 256);
+			else if (i == 0x4f || i == 0x5f || i == 0x8f || i == 0x9f) {
+				/* special case: Bounty Bob bank switching registers */
+				memset(attrib_page, MEMORY_ROM, 256);
+				attrib_page[0xf6] = MEMORY_HARDWARE;
+				attrib_page[0xf7] = MEMORY_HARDWARE;
+				attrib_page[0xf8] = MEMORY_HARDWARE;
+				attrib_page[0xf9] = MEMORY_HARDWARE;
+			}
+			else {
+				memset(attrib_page, MEMORY_HARDWARE, 256);
+			}
+			StateSav_SaveUBYTE(&attrib_page[0], 256);
+		}
+	}
+#endif
+
+	if (Atari800_machine_type == Atari800_MACHINE_XLXE) {
+		if (SaveVerbose != 0)
+			StateSav_SaveUBYTE(&MEMORY_basic[0], 8192);
+		StateSav_SaveUBYTE(&under_atari_basic[0], 8192);
+
+		if (SaveVerbose != 0)
+			StateSav_SaveUBYTE(&MEMORY_os[0], 16384);
+		StateSav_SaveUBYTE(&under_atarixl_os[0], 16384);
+	}
+
+	if (MEMORY_ram_size > 64) {
+		StateSav_SaveUBYTE(&atarixe_memory[0], atarixe_memory_size);
+		/* a hack that makes state files compatible with previous versions:
+           for 130 XE there's written 192 KB of unused data */
+		if (MEMORY_ram_size == 128) {
+			UBYTE buffer[256];
+			int i;
+			memset(buffer, 0, 256);
+			for (i = 0; i < 192 * 4; i++)
+				StateSav_SaveUBYTE(&buffer[0], 256);
+		}
+	}
+}
+
+void MEMORY_StateRead(UBYTE SaveVerbose, UBYTE StateVersion)
+{
+	/* Axlon/Mosaic for 400/800 */
+	if ((Atari800_machine_type == Atari800_MACHINE_OSA  || Atari800_machine_type == Atari800_MACHINE_OSB) && StateVersion >= 5) {
+		StateSav_ReadINT(&MEMORY_axlon_enabled, 1);
+		if (MEMORY_axlon_enabled){
+			StateSav_ReadINT(&axlon_curbank, 1);
+			StateSav_ReadINT(&MEMORY_axlon_bankmask, 1);
+			StateSav_ReadINT(&MEMORY_axlon_0f_mirror, 1);
+			StateSav_ReadINT(&axlon_ram_size, 1);
+			alloc_axlon_memory();
+			StateSav_ReadUBYTE(&axlon_ram[0], axlon_ram_size);
+		}
+		StateSav_ReadINT(&MEMORY_mosaic_enabled, 1);
+		if (MEMORY_mosaic_enabled){
+			StateSav_ReadINT(&mosaic_curbank, 1);
+			StateSav_ReadINT(&MEMORY_mosaic_maxbank, 1);
+			StateSav_ReadINT(&mosaic_ram_size, 1);
+			alloc_mosaic_memory();
+			StateSav_ReadUBYTE(&mosaic_ram[0], mosaic_ram_size);
+		}
+	}
+
+	StateSav_ReadUBYTE(&MEMORY_mem[0], 65536);
+#ifndef PAGED_ATTRIB
+	StateSav_ReadUBYTE(&MEMORY_attrib[0], 65536);
+#else
+	{
+		UBYTE attrib_page[256];
+		int i;
+		for (i = 0; i < 256; i++) {
+			StateSav_ReadUBYTE(&attrib_page[0], 256);
+			/* note: 0x40 is intentional here:
+			   we want ROM on page 0xd1 if H: patches are enabled */
+			switch (attrib_page[0x40]) {
+			case MEMORY_RAM:
+				MEMORY_readmap[i] = NULL;
+				MEMORY_writemap[i] = NULL;
+				break;
+			case MEMORY_ROM:
+				if (i != 0xd1 && attrib_page[0xf6] == MEMORY_HARDWARE) {
+					if (i == 0x4f || i == 0x8f) {
+						MEMORY_readmap[i] = CARTRIDGE_BountyBob1GetByte;
+						MEMORY_writemap[i] = CARTRIDGE_BountyBob1PutByte;
+					}
+					else if (i == 0x5f || i == 0x9f) {
+						MEMORY_readmap[i] = CARTRIDGE_BountyBob2GetByte;
+						MEMORY_writemap[i] = CARTRIDGE_BountyBob2PutByte;
+					}
+					/* else something's wrong, so we keep current values */
+				}
+				else {
+					MEMORY_readmap[i] = NULL;
+					MEMORY_writemap[i] = MEMORY_ROM_PutByte;
+				}
+				break;
+			case MEMORY_HARDWARE:
+				switch (i) {
+				case 0xc0:
+				case 0xd0:
+					MEMORY_readmap[i] = GTIA_GetByte;
+					MEMORY_writemap[i] = GTIA_PutByte;
+					break;
+				case 0xd1:
+					MEMORY_readmap[i] = PBI_D1GetByte;
+					MEMORY_writemap[i] = PBI_D1PutByte;
+					break;
+				case 0xd2:
+				case 0xe8:
+				case 0xeb:
+					MEMORY_readmap[i] = POKEY_GetByte;
+					MEMORY_writemap[i] = POKEY_PutByte;
+					break;
+				case 0xd3:
+					MEMORY_readmap[i] = PIA_GetByte;
+					MEMORY_writemap[i] = PIA_PutByte;
+					break;
+				case 0xd4:
+					MEMORY_readmap[i] = ANTIC_GetByte;
+					MEMORY_writemap[i] = ANTIC_PutByte;
+					break;
+				case 0xd5:
+					MEMORY_readmap[i] = CARTRIDGE_GetByte;
+					MEMORY_writemap[i] = CARTRIDGE_PutByte;
+					break;
+				case 0xd6:
+					MEMORY_readmap[i] = PBI_D6GetByte;
+					MEMORY_writemap[i] = PBI_D6PutByte;
+					break;
+				case 0xd7:
+					MEMORY_readmap[i] = PBI_D7GetByte;
+					MEMORY_writemap[i] = PBI_D7PutByte;
+					break;
+				case 0xff:
+					if (MEMORY_mosaic_enabled) MEMORY_writemap[0xff] = MosaicPutByte;
+					break;
+				case 0xcf:
+					if (MEMORY_axlon_enabled) MEMORY_writemap[0xcf] = AxlonPutByte;
+					break;
+				case 0x0f:
+					if (MEMORY_axlon_enabled && MEMORY_axlon_0f_mirror) MEMORY_writemap[0x0f] = AxlonPutByte;
+					break;
+				default:
+					/* something's wrong, so we keep current values */
+					break;
+				}
+				break;
+			default:
+				/* something's wrong, so we keep current values */
+				break;
+			}
+		}
+	}
+#endif
+
+	if (Atari800_machine_type == Atari800_MACHINE_XLXE) {
+		if (SaveVerbose != 0)
+			StateSav_ReadUBYTE(&MEMORY_basic[0], 8192);
+		StateSav_ReadUBYTE(&under_atari_basic[0], 8192);
+
+		if (SaveVerbose != 0)
+			StateSav_ReadUBYTE(&MEMORY_os[0], 16384);
+		StateSav_ReadUBYTE(&under_atarixl_os[0], 16384);
+	}
+
+	ANTIC_xe_ptr = NULL;
+	AllocXEMemory();
+	if (MEMORY_ram_size > 64) {
+		StateSav_ReadUBYTE(&atarixe_memory[0], atarixe_memory_size);
+		/* a hack that makes state files compatible with previous versions:
+           for 130 XE there's written 192 KB of unused data */
+		if (MEMORY_ram_size == 128) {
+			UBYTE buffer[256];
+			int i;
+			for (i = 0; i < 192 * 4; i++)
+				StateSav_ReadUBYTE(&buffer[0], 256);
+		}
+	}
+}
+
+#endif /* BASIC */
+
+void MEMORY_CopyFromMem(UWORD from, UBYTE *to, int size)
+{
+	while (--size >= 0) {
+		*to++ = MEMORY_GetByte(from);
+		from++;
+	}
+}
+
+void MEMORY_CopyToMem(const UBYTE *from, UWORD to, int size)
+{
+	while (--size >= 0) {
+		MEMORY_PutByte(to, *from);
+		from++;
+		to++;
+	}
+}
+
+/*
+ * Returns non-zero, if Atari BASIC is disabled by given PORTB output.
+ * Normally BASIC is disabled by setting bit 1, but it's also disabled
+ * when using 576K and 1088K memory expansions, where bit 1 is used
+ * for selecting extended memory bank number.
+ */
+static int basic_disabled(UBYTE portb)
+{
+	return (portb & 0x02) != 0
+	 || ((portb & 0x10) == 0 && (MEMORY_ram_size == 576 || MEMORY_ram_size == 1088));
+}
+
+/* Note: this function is only for XL/XE! */
+void MEMORY_HandlePORTB(UBYTE byte, UBYTE oldval)
+{
+	/* Switch XE memory bank in 0x4000-0x7fff */
+	if (MEMORY_ram_size > 64) {
+		int bank = 0;
+		/* bank = 0 : base RAM */
+		/* bank = 1..64 : extended RAM */
+		if ((byte & 0x10) == 0)
+			switch (MEMORY_ram_size) {
+			case 128:
+				bank = ((byte & 0x0c) >> 2) + 1;
+				break;
+			case 192:
+				bank = (((byte & 0x0c) + ((byte & 0x40) >> 2)) >> 2) + 1;
+				break;
+			case MEMORY_RAM_320_RAMBO:
+				bank = (((byte & 0x0c) + ((byte & 0x60) >> 1)) >> 2) + 1;
+				break;
+			case MEMORY_RAM_320_COMPY_SHOP:
+				bank = (((byte & 0x0c) + ((byte & 0xc0) >> 2)) >> 2) + 1;
+				break;
+			case 576:
+				bank = (((byte & 0x0e) + ((byte & 0x60) >> 1)) >> 1) + 1;
+				break;
+			case 1088:
+				bank = (((byte & 0x0e) + ((byte & 0xe0) >> 1)) >> 1) + 1;
+				break;
+			}
+		/* Note: in Compy Shop bit 5 (ANTIC access) disables Self Test */
+		if (MEMORY_selftest_enabled && (bank != MEMORY_xe_bank || (MEMORY_ram_size == MEMORY_RAM_320_COMPY_SHOP && (byte & 0x20) == 0))) {
+			/* Disable Self Test ROM */
+			memcpy(MEMORY_mem + 0x5000, under_atarixl_os + 0x1000, 0x800);
+			MEMORY_SetRAM(0x5000, 0x57ff);
+			MEMORY_selftest_enabled = FALSE;
+		}
+		if (bank != MEMORY_xe_bank) {
+			memcpy(atarixe_memory + (MEMORY_xe_bank << 14), MEMORY_mem + 0x4000, 16384);
+			memcpy(MEMORY_mem + 0x4000, atarixe_memory + (bank << 14), 16384);
+			MEMORY_xe_bank = bank;
+		}
+		if (MEMORY_ram_size == 128 || MEMORY_ram_size == MEMORY_RAM_320_COMPY_SHOP)
+			switch (byte & 0x30) {
+			case 0x20:	/* ANTIC: base, CPU: extended */
+				ANTIC_xe_ptr = atarixe_memory;
+				break;
+			case 0x10:	/* ANTIC: extended, CPU: base */
+				if (MEMORY_ram_size == 128)
+					ANTIC_xe_ptr = atarixe_memory + ((((byte & 0x0c) >> 2) + 1) << 14);
+				else	/* 320 Compy Shop */
+					ANTIC_xe_ptr = atarixe_memory + (((((byte & 0x0c) + ((byte & 0xc0) >> 2)) >> 2) + 1) << 14);
+				break;
+			default:	/* ANTIC same as CPU */
+				ANTIC_xe_ptr = NULL;
+				break;
+			}
+	}
+
+	/* Enable/disable OS ROM in 0xc000-0xcfff and 0xd800-0xffff */
+	if ((oldval ^ byte) & 0x01) {
+		if (byte & 0x01) {
+			/* Enable OS ROM */
+			if (MEMORY_ram_size > 48) {
+				memcpy(under_atarixl_os, MEMORY_mem + 0xc000, 0x1000);
+				memcpy(under_atarixl_os + 0x1800, MEMORY_mem + 0xd800, 0x2800);
+				MEMORY_SetROM(0xc000, 0xcfff);
+				MEMORY_SetROM(0xd800, 0xffff);
+			}
+			memcpy(MEMORY_mem + 0xc000, MEMORY_os, 0x1000);
+			memcpy(MEMORY_mem + 0xd800, MEMORY_os + 0x1800, 0x2800);
+			ESC_PatchOS();
+		}
+		else {
+			/* Disable OS ROM */
+			if (MEMORY_ram_size > 48) {
+				memcpy(MEMORY_mem + 0xc000, under_atarixl_os, 0x1000);
+				memcpy(MEMORY_mem + 0xd800, under_atarixl_os + 0x1800, 0x2800);
+				MEMORY_SetRAM(0xc000, 0xcfff);
+				MEMORY_SetRAM(0xd800, 0xffff);
+			} else {
+				MEMORY_dFillMem(0xc000, 0xff, 0x1000);
+				MEMORY_dFillMem(0xd800, 0xff, 0x2800);
+			}
+			/* When OS ROM is disabled we also have to disable Self Test - Jindroush */
+			if (MEMORY_selftest_enabled) {
+				if (MEMORY_ram_size > 20) {
+					memcpy(MEMORY_mem + 0x5000, under_atarixl_os + 0x1000, 0x800);
+					MEMORY_SetRAM(0x5000, 0x57ff);
+				}
+				else
+					MEMORY_dFillMem(0x5000, 0xff, 0x800);
+				MEMORY_selftest_enabled = FALSE;
+			}
+		}
+	}
+
+	/* Enable/disable BASIC ROM in 0xa000-0xbfff */
+	if (!MEMORY_cartA0BF_enabled) {
+		/* BASIC is disabled if bit 1 set or accessing extended 576K or 1088K memory */
+		int now_disabled = basic_disabled(byte);
+		if (basic_disabled(oldval) != now_disabled) {
+			if (now_disabled) {
+				/* Disable BASIC ROM */
+				if (MEMORY_ram_size > 40) {
+					memcpy(MEMORY_mem + 0xa000, under_atari_basic, 0x2000);
+					MEMORY_SetRAM(0xa000, 0xbfff);
+				}
+				else
+					MEMORY_dFillMem(0xa000, 0xff, 0x2000);
+			}
+			else {
+				/* Enable BASIC ROM */
+				if (MEMORY_ram_size > 40) {
+					memcpy(under_atari_basic, MEMORY_mem + 0xa000, 0x2000);
+					MEMORY_SetROM(0xa000, 0xbfff);
+				}
+				memcpy(MEMORY_mem + 0xa000, MEMORY_basic, 0x2000);
+			}
+		}
+	}
+
+	/* Enable/disable Self Test ROM in 0x5000-0x57ff */
+	if (byte & 0x80) {
+		if (MEMORY_selftest_enabled) {
+			/* Disable Self Test ROM */
+			if (MEMORY_ram_size > 20) {
+				memcpy(MEMORY_mem + 0x5000, under_atarixl_os + 0x1000, 0x800);
+				MEMORY_SetRAM(0x5000, 0x57ff);
+			}
+			else
+				MEMORY_dFillMem(0x5000, 0xff, 0x800);
+			MEMORY_selftest_enabled = FALSE;
+		}
+	}
+	else {
+		/* We can enable Self Test only if the OS ROM is enabled */
+		/* and we're not accessing extended 320K Compy Shop or 1088K memory */
+		/* Note: in Compy Shop bit 5 (ANTIC access) disables Self Test */
+		if (!MEMORY_selftest_enabled && (byte & 0x01)
+		&& !((byte & 0x30) != 0x30 && MEMORY_ram_size == MEMORY_RAM_320_COMPY_SHOP)
+		&& !((byte & 0x10) == 0 && MEMORY_ram_size == 1088)) {
+			/* Enable Self Test ROM */
+			if (MEMORY_ram_size > 20) {
+				memcpy(under_atarixl_os + 0x1000, MEMORY_mem + 0x5000, 0x800);
+				MEMORY_SetROM(0x5000, 0x57ff);
+			}
+			memcpy(MEMORY_mem + 0x5000, MEMORY_os + 0x1000, 0x800);
+			MEMORY_selftest_enabled = TRUE;
+		}
+	}
+}
+
+/* Mosaic banking scheme: writing to 0xffc0+<n> selects ram bank <n>, if 
+ * that is past the last available bank, selects rom.  Banks are 4k, 
+ * located at 0xc000-0xcfff.  Tested: Rambrandt (drawing program), Topdos1.5.
+ * Reverse engineered from software that uses it.  May be incorrect in some
+ * details.  Unknown:  were there mirrors of the bank addresses?  Was the RAM
+ * enabled at coldstart? Did the Mosaic home-bank on reset?
+ * The Topdos 1.5 manual has some information.
+ */
+static void MosaicPutByte(UWORD addr, UBYTE byte)
+{
+	int newbank;
+	if (addr < 0xffc0) return;
+#ifdef DEBUG
+	Log_print("MosaicPutByte:%4X:%2X",addr,byte);
+#endif
+	newbank = addr - 0xffc0;
+	if (newbank == mosaic_curbank || (newbank > MEMORY_mosaic_maxbank && mosaic_curbank > MEMORY_mosaic_maxbank)) return; /*same bank or rom -> rom*/
+	if (newbank > MEMORY_mosaic_maxbank && mosaic_curbank <= MEMORY_mosaic_maxbank) {
+		/*ram ->rom*/
+		memcpy(mosaic_ram + mosaic_curbank*0x1000, MEMORY_mem + 0xc000,0x1000);
+		MEMORY_dFillMem(0xc000, 0xff, 0x1000);
+		MEMORY_SetROM(0xc000, 0xcfff);
+	}
+	else if (newbank <= MEMORY_mosaic_maxbank && mosaic_curbank > MEMORY_mosaic_maxbank) {
+		/*rom->ram*/
+		memcpy(MEMORY_mem + 0xc000, mosaic_ram+newbank*0x1000,0x1000);
+		MEMORY_SetRAM(0xc000, 0xcfff);
+	}
+	else {
+		/*ram -> ram*/
+		memcpy(mosaic_ram + mosaic_curbank*0x1000, MEMORY_mem + 0xc000, 0x1000);
+		memcpy(MEMORY_mem + 0xc000, mosaic_ram + newbank*0x1000, 0x1000);
+		MEMORY_SetRAM(0xc000, 0xcfff);
+	}
+	mosaic_curbank = newbank;
+}
+
+static UBYTE MosaicGetByte(UWORD addr)
+{
+#ifdef DEBUG
+	Log_print("MosaicGetByte%4X",addr);
+#endif
+	return MEMORY_mem[addr];
+}
+
+/* Axlon banking scheme: writing <n> to 0xcfc0-0xcfff selects a bank.  The Axlon
+ * used 3 bits, giving 8 banks.  Extended versions were constructed that
+ * used additional bits, for up to 256 banks.  Banks were 16k, at 0x4000-0x7fff.
+ * The total ram was 32+16*numbanks k.  The Axlon did homebank on reset,
+ * compatibles did not.  The Axlon had a shadow address at 0x0fc0-0x0fff.
+ * A possible explaination for the shadow address is that it allowed the
+ * Axlon to work in any 800 slot due to a hardware limitation.
+ * The shadow address could cause compatibility problems.  The compatibles
+ * did not implement that shadow address.
+ * Source: comp.sys.atari.8bit postings, Andreas Magenheimer's FAQ
+ */
+static void AxlonPutByte(UWORD addr, UBYTE byte)
+{
+	int newbank;
+	/*Write-through to RAM if it is the page 0x0f shadow*/
+	if ((addr&0xff00) == 0x0f00) MEMORY_mem[addr] = byte;
+	if ((addr&0xff) < 0xc0) return; /*0xffc0-0xffff and 0x0fc0-0x0fff only*/
+#ifdef DEBUG
+	Log_print("AxlonPutByte:%4X:%2X", addr, byte);
+#endif
+	newbank = (byte&MEMORY_axlon_bankmask);
+	if (newbank == axlon_curbank) return;
+	memcpy(axlon_ram + axlon_curbank*0x4000, MEMORY_mem + 0x4000, 0x4000);
+	memcpy(MEMORY_mem + 0x4000, axlon_ram + newbank*0x4000, 0x4000);
+	axlon_curbank = newbank;
+}
+
+static UBYTE AxlonGetByte(UWORD addr)
+{
+#ifdef DEBUG
+	Log_print("AxlonGetByte%4X",addr);
+#endif
+	return MEMORY_mem[addr];
+}
+
+static int cart809F_enabled = FALSE;
+int MEMORY_cartA0BF_enabled = FALSE;
+static UBYTE under_cart809F[8192];
+static UBYTE under_cartA0BF[8192];
+
+void MEMORY_Cart809fDisable(void)
+{
+	if (cart809F_enabled) {
+		if (MEMORY_ram_size > 32) {
+			memcpy(MEMORY_mem + 0x8000, under_cart809F, 0x2000);
+			MEMORY_SetRAM(0x8000, 0x9fff);
+		}
+		else
+			MEMORY_dFillMem(0x8000, 0xff, 0x2000);
+		cart809F_enabled = FALSE;
+	}
+}
+
+void MEMORY_Cart809fEnable(void)
+{
+	if (!cart809F_enabled) {
+		if (MEMORY_ram_size > 32) {
+			memcpy(under_cart809F, MEMORY_mem + 0x8000, 0x2000);
+			MEMORY_SetROM(0x8000, 0x9fff);
+		}
+		cart809F_enabled = TRUE;
+	}
+}
+
+void MEMORY_CartA0bfDisable(void)
+{
+	if (MEMORY_cartA0BF_enabled) {
+		/* No BASIC if not XL/XE or bit 1 of PORTB set */
+		/* or accessing extended 576K or 1088K memory */
+		if ((Atari800_machine_type != Atari800_MACHINE_XLXE) || basic_disabled((UBYTE) (PIA_PORTB | PIA_PORTB_mask))) {
+			if (MEMORY_ram_size > 40) {
+				memcpy(MEMORY_mem + 0xa000, under_cartA0BF, 0x2000);
+				MEMORY_SetRAM(0xa000, 0xbfff);
+			}
+			else
+				MEMORY_dFillMem(0xa000, 0xff, 0x2000);
+		}
+		else
+			memcpy(MEMORY_mem + 0xa000, MEMORY_basic, 0x2000);
+		MEMORY_cartA0BF_enabled = FALSE;
+		if (Atari800_machine_type == Atari800_MACHINE_XLXE) {
+			GTIA_TRIG[3] = 0;
+			if (GTIA_GRACTL & 4)
+				GTIA_TRIG_latch[3] = 0;
+		}
+	}
+}
+
+void MEMORY_CartA0bfEnable(void)
+{
+	if (!MEMORY_cartA0BF_enabled) {
+		/* No BASIC if not XL/XE or bit 1 of PORTB set */
+		/* or accessing extended 576K or 1088K memory */
+		if (MEMORY_ram_size > 40 && ((Atari800_machine_type != Atari800_MACHINE_XLXE) || (PIA_PORTB & 0x02)
+		|| ((PIA_PORTB & 0x10) == 0 && (MEMORY_ram_size == 576 || MEMORY_ram_size == 1088)))) {
+			/* Back-up 0xa000-0xbfff RAM */
+			memcpy(under_cartA0BF, MEMORY_mem + 0xa000, 0x2000);
+			MEMORY_SetROM(0xa000, 0xbfff);
+		}
+		MEMORY_cartA0BF_enabled = TRUE;
+		if (Atari800_machine_type == Atari800_MACHINE_XLXE)
+			GTIA_TRIG[3] = 1;
+	}
+}
+
+void MEMORY_GetCharset(UBYTE *cs)
+{
+	const UBYTE *p;
+	switch (Atari800_machine_type) {
+	case Atari800_MACHINE_OSA:
+	case Atari800_MACHINE_OSB:
+		p = MEMORY_mem + 0xe000;
+		break;
+	case Atari800_MACHINE_XLXE:
+		p = MEMORY_os + 0x2000;
+		break;
+	case Atari800_MACHINE_5200:
+		p = MEMORY_mem + 0xf800;
+		break;
+	default:
+		/* shouldn't happen */
+		return;
+	}
+	/* copy font, but change screencode order to ATASCII order */
+	memcpy(cs, p + 0x200, 0x100); /* control chars */
+	memcpy(cs + 0x100, p, 0x200); /* !"#$..., uppercase letters */
+	memcpy(cs + 0x300, p + 0x300, 0x100); /* lowercase letters */
+}
+
+#ifndef PAGED_MEM
+UBYTE MEMORY_HwGetByte(UWORD addr)
+{
+	UBYTE byte = 0xff;
+	switch (addr & 0xff00) {
+	case 0x4f00:
+	case 0x8f00:
+		CARTRIDGE_BountyBob1(addr);
+		byte = 0;
+		break;
+	case 0x5f00:
+	case 0x9f00:
+		CARTRIDGE_BountyBob2(addr);
+		byte = 0;
+		break;
+	case 0xd000:				/* GTIA */
+	case 0xc000:				/* GTIA - 5200 */
+	case 0xc100:				/* GTIA - 5200 */
+	case 0xc200:				/* GTIA - 5200 */
+	case 0xc300:				/* GTIA - 5200 */
+	case 0xc400:				/* GTIA - 5200 */
+	case 0xc500:				/* GTIA - 5200 */
+	case 0xc600:				/* GTIA - 5200 */
+	case 0xc700:				/* GTIA - 5200 */
+	case 0xc800:				/* GTIA - 5200 */
+	case 0xc900:				/* GTIA - 5200 */
+	case 0xca00:				/* GTIA - 5200 */
+	case 0xcb00:				/* GTIA - 5200 */
+	case 0xcc00:				/* GTIA - 5200 */
+	case 0xcd00:				/* GTIA - 5200 */
+	case 0xce00:				/* GTIA - 5200 */
+		byte = GTIA_GetByte(addr);
+		break;
+	case 0xd200:				/* POKEY */
+	case 0xe800:				/* POKEY - 5200 */
+	case 0xe900:				/* POKEY - 5200 */
+	case 0xea00:				/* POKEY - 5200 */
+	case 0xeb00:				/* POKEY - 5200 */
+	case 0xec00:				/* POKEY - 5200 */
+	case 0xed00:				/* POKEY - 5200 */
+	case 0xee00:				/* POKEY - 5200 */
+	case 0xef00:				/* POKEY - 5200 */
+		byte = POKEY_GetByte(addr);
+		break;
+	case 0xd300:				/* PIA */
+		byte = PIA_GetByte(addr);
+		break;
+	case 0xd400:				/* ANTIC */
+		byte = ANTIC_GetByte(addr);
+		break;
+	case 0xd500:				/* bank-switching cartridges, RTIME-8 */
+		byte = CARTRIDGE_GetByte(addr);
+		break;
+	case 0xff00:				/* Mosaic memory expansion for 400/800 */
+		byte = MosaicGetByte(addr);
+		break;
+	case 0xcf00:				/* Axlon memory expansion for 800 */
+	case 0x0f00:				/* Axlon shadow */
+		if (Atari800_machine_type == Atari800_MACHINE_5200) {
+			byte = GTIA_GetByte(addr); /* GTIA-5200 cfxx */
+		}
+		else {
+			byte = AxlonGetByte(addr);
+		}
+		break;
+	case 0xd100:				/* PBI page D1 */
+		byte = PBI_D1GetByte(addr);
+		break;
+	case 0xd600:				/* PBI page D6 */
+		byte = PBI_D6GetByte(addr);
+		break;
+	case 0xd700:				/* PBI page D7 */
+		byte = PBI_D7GetByte(addr);
+		break;
+	default:
+		break;
+	}
+
+	return byte;
+}
+
+void MEMORY_HwPutByte(UWORD addr, UBYTE byte)
+{
+	switch (addr & 0xff00) {
+	case 0x4f00:
+	case 0x8f00:
+		CARTRIDGE_BountyBob1(addr);
+		break;
+	case 0x5f00:
+	case 0x9f00:
+		CARTRIDGE_BountyBob2(addr);
+		break;
+	case 0xd000:				/* GTIA */
+	case 0xc000:				/* GTIA - 5200 */
+	case 0xc100:				/* GTIA - 5200 */
+	case 0xc200:				/* GTIA - 5200 */
+	case 0xc300:				/* GTIA - 5200 */
+	case 0xc400:				/* GTIA - 5200 */
+	case 0xc500:				/* GTIA - 5200 */
+	case 0xc600:				/* GTIA - 5200 */
+	case 0xc700:				/* GTIA - 5200 */
+	case 0xc800:				/* GTIA - 5200 */
+	case 0xc900:				/* GTIA - 5200 */
+	case 0xca00:				/* GTIA - 5200 */
+	case 0xcb00:				/* GTIA - 5200 */
+	case 0xcc00:				/* GTIA - 5200 */
+	case 0xcd00:				/* GTIA - 5200 */
+	case 0xce00:				/* GTIA - 5200 */
+		GTIA_PutByte(addr, byte);
+		break;
+	case 0xd200:				/* POKEY */
+	case 0xe800:				/* POKEY - 5200 */
+	case 0xe900:				/* POKEY - 5200 */
+	case 0xea00:				/* POKEY - 5200 */
+	case 0xeb00:				/* POKEY - 5200 */
+	case 0xec00:				/* POKEY - 5200 */
+	case 0xed00:				/* POKEY - 5200 */
+	case 0xee00:				/* POKEY - 5200 */
+	case 0xef00:				/* POKEY - 5200 */
+		POKEY_PutByte(addr, byte);
+		break;
+	case 0xd300:				/* PIA */
+		PIA_PutByte(addr, byte);
+		break;
+	case 0xd400:				/* ANTIC */
+		ANTIC_PutByte(addr, byte);
+		break;
+	case 0xd500:				/* bank-switching cartridges, RTIME-8 */
+		CARTRIDGE_PutByte(addr, byte);
+		break;
+	case 0xff00:				/* Mosaic memory expansion for 400/800 */
+		MosaicPutByte(addr,byte);
+		break;
+	case 0xcf00:				/* Axlon memory expansion for 800 */
+	case 0x0f00:				/* Axlon shadow */
+		if (Atari800_machine_type == Atari800_MACHINE_5200) {
+			GTIA_PutByte(addr, byte); /* GTIA-5200 cfxx */
+		}
+		else {
+			AxlonPutByte(addr,byte);
+		}
+		break;
+	case 0xd100:				/* PBI page D1 */
+		PBI_D1PutByte(addr, byte);
+		break;
+	case 0xd600:				/* PBI page D6 */
+		PBI_D6PutByte(addr, byte);
+		break;
+	case 0xd700:				/* PBI page D7 */
+		PBI_D7PutByte(addr, byte);
+		break;
+	default:
+		break;
+	}
+}
+#endif /* PAGED_MEM */
diff --git a/project/jni/application/atari800/src/memory.h b/project/jni/application/atari800/src/memory.h
new file mode 100644
index 000000000..db41ac498
--- /dev/null
+++ b/project/jni/application/atari800/src/memory.h
@@ -0,0 +1,125 @@
+#ifndef MEMORY_H_
+#define MEMORY_H_
+
+#include "config.h"
+#include <string.h>	/* memcpy, memset */
+
+#include "atari.h"
+
+#define MEMORY_dGetByte(x)				(MEMORY_mem[x])
+#define MEMORY_dPutByte(x, y)			(MEMORY_mem[x] = y)
+
+#ifndef WORDS_BIGENDIAN
+#ifdef WORDS_UNALIGNED_OK
+#define MEMORY_dGetWord(x)				UNALIGNED_GET_WORD(&MEMORY_mem[x], memory_read_word_stat)
+#define MEMORY_dPutWord(x, y)			UNALIGNED_PUT_WORD(&MEMORY_mem[x], (y), memory_write_word_stat)
+#define MEMORY_dGetWordAligned(x)		UNALIGNED_GET_WORD(&MEMORY_mem[x], memory_read_aligned_word_stat)
+#define MEMORY_dPutWordAligned(x, y)	UNALIGNED_PUT_WORD(&MEMORY_mem[x], (y), memory_write_aligned_word_stat)
+#else	/* WORDS_UNALIGNED_OK */
+#define MEMORY_dGetWord(x)				(MEMORY_mem[x] + (MEMORY_mem[(x) + 1] << 8))
+#define MEMORY_dPutWord(x, y)			(MEMORY_mem[x] = (UBYTE) (y), MEMORY_mem[(x) + 1] = (UBYTE) ((y) >> 8))
+/* faster versions of MEMORY_jdGetWord and MEMORY_dPutWord for even addresses */
+/* TODO: guarantee that memory is UWORD-aligned and use UWORD access */
+#define MEMORY_dGetWordAligned(x)		MEMORY_dGetWord(x)
+#define MEMORY_dPutWordAligned(x, y)	MEMORY_dPutWord(x, y)
+#endif	/* WORDS_UNALIGNED_OK */
+#else	/* WORDS_BIGENDIAN */
+/* can't do any word optimizations for big endian machines */
+#define MEMORY_dGetWord(x)				(MEMORY_mem[x] + (MEMORY_mem[(x) + 1] << 8))
+#define MEMORY_dPutWord(x, y)			(MEMORY_mem[x] = (UBYTE) (y), MEMORY_mem[(x) + 1] = (UBYTE) ((y) >> 8))
+#define MEMORY_dGetWordAligned(x)		MEMORY_dGetWord(x)
+#define MEMORY_dPutWordAligned(x, y)	MEMORY_dPutWord(x, y)
+#endif	/* WORDS_BIGENDIAN */
+
+#define MEMORY_dCopyFromMem(from, to, size)	memcpy(to, MEMORY_mem + (from), size)
+#define MEMORY_dCopyToMem(from, to, size)		memcpy(MEMORY_mem + (to), from, size)
+#define MEMORY_dFillMem(addr1, value, length)	memset(MEMORY_mem + (addr1), value, length)
+
+extern UBYTE MEMORY_mem[65536 + 2];
+
+/* RAM size in kilobytes.
+   Valid values for Atari800_MACHINE_OSA and Atari800_MACHINE_OSB are: 16, 48, 52.
+   Valid values for Atari800_MACHINE_XLXE are: 16, 64, 128, 192, RAM_320_RAMBO,
+   RAM_320_COMPY_SHOP, 576, 1088.
+   The only valid value for Atari800_MACHINE_5200 is 16. */
+#define MEMORY_RAM_320_RAMBO       320
+#define MEMORY_RAM_320_COMPY_SHOP  321
+extern int MEMORY_ram_size;
+
+#define MEMORY_RAM       0
+#define MEMORY_ROM       1
+#define MEMORY_HARDWARE  2
+
+#ifndef PAGED_ATTRIB
+
+extern UBYTE MEMORY_attrib[65536];
+#define MEMORY_GetByte(addr)		(MEMORY_attrib[addr] == MEMORY_HARDWARE ? MEMORY_HwGetByte(addr) : MEMORY_mem[addr])
+#define MEMORY_PutByte(addr, byte)	 do { if (MEMORY_attrib[addr] == MEMORY_RAM) MEMORY_mem[addr] = byte; else if (MEMORY_attrib[addr] == MEMORY_HARDWARE) MEMORY_HwPutByte(addr, byte); } while (0)
+#define MEMORY_SetRAM(addr1, addr2) memset(MEMORY_attrib + (addr1), MEMORY_RAM, (addr2) - (addr1) + 1)
+#define MEMORY_SetROM(addr1, addr2) memset(MEMORY_attrib + (addr1), MEMORY_ROM, (addr2) - (addr1) + 1)
+#define MEMORY_SetHARDWARE(addr1, addr2) memset(MEMORY_attrib + (addr1), MEMORY_HARDWARE, (addr2) - (addr1) + 1)
+
+#else /* PAGED_ATTRIB */
+
+typedef UBYTE (*MEMORY_rdfunc)(UWORD addr);
+typedef void (*MEMORY_wrfunc)(UWORD addr, UBYTE value);
+extern MEMORY_rdfunc MEMORY_readmap[256];
+extern MEMORY_wrfunc MEMORY_writemap[256];
+void MEMORY_ROM_PutByte(UWORD addr, UBYTE byte);
+#define MEMORY_GetByte(addr)		(MEMORY_readmap[(addr) >> 8] ? (*MEMORY_readmap[(addr) >> 8])(addr) : MEMORY_mem[addr])
+#define MEMORY_PutByte(addr,byte)	(MEMORY_writemap[(addr) >> 8] ? ((*MEMORY_writemap[(addr) >> 8])(addr, byte), 0) : (MEMORY_mem[addr] = byte))
+#define MEMORY_SetRAM(addr1, addr2) do { \
+		int i; \
+		for (i = (addr1) >> 8; i <= (addr2) >> 8; i++) { \
+			MEMORY_readmap[i] = NULL; \
+			MEMORY_writemap[i] = NULL; \
+		} \
+	} while (0)
+#define MEMORY_SetROM(addr1, addr2) do { \
+		int i; \
+		for (i = (addr1) >> 8; i <= (addr2) >> 8; i++) { \
+			MEMORY_readmap[i] = NULL; \
+			MEMORY_writemap[i] = MEMORY_ROM_PutByte; \
+		} \
+	} while (0)
+
+#endif /* PAGED_ATTRIB */
+
+extern UBYTE MEMORY_basic[8192];
+extern UBYTE MEMORY_os[16384];
+
+extern int MEMORY_xe_bank;
+extern int MEMORY_selftest_enabled;
+
+extern int MEMORY_have_basic;
+extern int MEMORY_cartA0BF_enabled;
+
+void MEMORY_InitialiseMachine(void);
+void MEMORY_StateSave(UBYTE SaveVerbose);
+void MEMORY_StateRead(UBYTE SaveVerbose, UBYTE StateVersion);
+void MEMORY_CopyFromMem(UWORD from, UBYTE *to, int size);
+void MEMORY_CopyToMem(const UBYTE *from, UWORD to, int size);
+void MEMORY_HandlePORTB(UBYTE byte, UBYTE oldval);
+void MEMORY_Cart809fDisable(void);
+void MEMORY_Cart809fEnable(void);
+void MEMORY_CartA0bfDisable(void);
+void MEMORY_CartA0bfEnable(void);
+#define MEMORY_CopyROM(addr1, addr2, src) memcpy(MEMORY_mem + (addr1), src, (addr2) - (addr1) + 1)
+void MEMORY_GetCharset(UBYTE *cs);
+
+/* Mosaic and Axlon 400/800 RAM extensions */
+extern int MEMORY_mosaic_maxbank;
+extern int MEMORY_mosaic_enabled;
+extern int MEMORY_axlon_enabled;
+extern int MEMORY_axlon_0f_mirror;
+extern int MEMORY_axlon_bankmask;
+
+#ifndef PAGED_MEM
+/* Reads a byte from the specified special address (not RAM or ROM). */
+UBYTE MEMORY_HwGetByte(UWORD addr);
+
+/* Stores a byte at the specified special address (not RAM or ROM). */
+void MEMORY_HwPutByte(UWORD addr, UBYTE byte);
+#endif /* PAGED_MEM */
+
+#endif /* MEMORY_H_ */
diff --git a/project/jni/application/atari800/src/mkimg.c b/project/jni/application/atari800/src/mkimg.c
new file mode 100644
index 000000000..afc5a63fc
--- /dev/null
+++ b/project/jni/application/atari800/src/mkimg.c
@@ -0,0 +1,208 @@
+/*
+ * mkimg.c - Make an image or .h file from a binary
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+/*
+ * Usage: mkimg -input filename
+ *              -image filename
+ *              -header filename
+ *              hexaddr1
+ *              hexaddr2
+ *
+ * Loads the input file into a 64K area of memory. The
+ * input file is in standard Atari Binary load format.
+ * The memory is initially filled with zeros. After the
+ * memory has been loaded the program creates either an
+ * image file or a standard C header file that contains
+ * the memory starting with hexaddr1 at going up to,
+ * but not including, hexaddr2.
+ */
+
+#include <stdio.h>
+#include <string.h>
+
+typedef enum {
+	Expect_Header1,
+	Expect_Header2,
+	Expect_StartLo,
+	Expect_StartHi,
+	Expect_FinishLo,
+	Expect_FinishHi,
+	Expect_Data
+} State;
+
+int main(int argc, char *argv[])
+{
+	unsigned char image[65536];
+	char *in_filename = NULL;
+	char *image_filename = NULL;
+	char *header_filename = NULL;
+	int error = 0;
+	int start_addr = 0;
+	int finish_addr = 0;
+	int addr1 = -1;
+	int addr2 = -1;
+	int addr;
+	FILE *f;
+	int i;
+
+	State state = Expect_Header1;
+
+	for (i = 1; i < argc; i++) {
+		if (strcmp(argv[i], "-input") == 0)
+			in_filename = argv[++i];
+		else if (strcmp(argv[i], "-image") == 0)
+			image_filename = argv[++i];
+		else if (strcmp(argv[i], "-header") == 0)
+			header_filename = argv[++i];
+		else if (addr1 == -1)
+			sscanf(argv[i], "%x", &addr1);
+		else if (addr2 == -1)
+			sscanf(argv[i], "%x", &addr2);
+		else
+			error = 1;
+	}
+
+	if (!in_filename || (!image_filename && !header_filename) ||
+		error || (addr1 == -1) || (addr2 == -1)) {
+		printf("Usage: %s -input in_fname {-image image_fname|-header header_fname} hexaddr1 hexaddr2\n",
+			   argv[0]);
+		return 0;
+	}
+	memset(image, 0, 65536);
+
+	f = fopen(in_filename, "rb");
+	if (!f) {
+		perror(in_filename);
+		return 1;
+	}
+	while (1) {
+		unsigned char byte;
+
+		if (fread(&byte, 1, 1, f) != 1)
+			break;
+
+		switch (state) {
+		case Expect_Header1:
+			if (byte == 0xff)
+				state = Expect_Header2;
+			else
+				printf("Error: Expecting Header1\n");
+			break;
+		case Expect_Header2:
+			if (byte == 0xff)
+				state = Expect_StartLo;
+			else
+				printf("Error: Expecting Header2\n");
+			break;
+		case Expect_StartLo:
+			start_addr = (start_addr & 0xff00) | byte;
+			state = Expect_StartHi;
+			break;
+		case Expect_StartHi:
+			start_addr = (start_addr & 0x00ff) | (byte << 8);
+			state = Expect_FinishLo;
+			printf("StartAddr = %x\n", start_addr);
+			if (start_addr == 0xffff) {
+				printf("Oops thats a header\n");
+				state = Expect_StartLo;
+			}
+			break;
+		case Expect_FinishLo:
+			finish_addr = (finish_addr & 0xff00) | byte;
+			state = Expect_FinishHi;
+			break;
+		case Expect_FinishHi:
+			finish_addr = (finish_addr & 0x00ff) | (byte << 8);
+			state = Expect_Data;
+			addr = start_addr;
+			printf("FinishAddr = %x\n", finish_addr);
+			break;
+		case Expect_Data:
+			image[addr++] = byte;
+			if (addr > finish_addr)
+				state = Expect_StartLo;
+			break;
+		default:
+			printf("Error: Invalid State\n");
+			return 1;
+		}
+	}
+
+	fclose(f);
+
+	/*
+	 * Write image to file
+	 */
+
+	if (image_filename) {
+		f = fopen(image_filename, "wb");
+		if (!f) {
+			perror(image_filename);
+			return 1;
+		}
+		fwrite(&image[addr1], 1, addr2 - addr1 + 1, f);
+
+		fclose(f);
+	}
+	if (header_filename) {
+		FILE *fp;
+		char *ptr;
+		int j;
+
+		fp = fopen(header_filename, "wb");
+		if (!fp) {
+			perror(header_filename);
+			return 1;
+		}
+
+		for (ptr = header_filename; *ptr; ptr++) {
+			if (!( (*ptr >= 'a' && *ptr <= 'z')
+			    || (*ptr >= 'A' && *ptr <= 'Z')
+			    || (*ptr >= '0' && *ptr <= '9') ))
+				*ptr = '_';
+		}
+
+		fprintf(fp, "#ifndef _%s_\n", header_filename);
+		fprintf(fp, "#define _%s_\n\n", header_filename);
+
+		fprintf(fp, "static unsigned char %s[] =\n{\n\t", header_filename);
+
+		for (i = addr1, j = 0; i < addr2; i++) {
+			fprintf(fp, "0x%02x,", image[i]);
+
+			if (++j == 8) {
+				fprintf(fp, "\n\t");
+				j = 0;
+			}
+		}
+
+		fprintf(fp, "0x%02x\n", image[addr2]);
+		fprintf(fp, "};\n");
+
+		fprintf(fp, "\n#endif\n");
+
+		fclose(fp);
+	}
+	return 0;
+}
diff --git a/project/jni/application/atari800/src/monitor.c b/project/jni/application/atari800/src/monitor.c
new file mode 100644
index 000000000..05c86fc5c
--- /dev/null
+++ b/project/jni/application/atari800/src/monitor.c
@@ -0,0 +1,2085 @@
+/*
+ * monitor.c - Implements a builtin system monitor for debugging
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+
+#include "antic.h"
+#include "atari.h"
+#include "cpu.h"
+#include "gtia.h"
+#include "memory.h"
+#include "monitor.h"
+#include "pia.h"
+#include "pokey.h"
+#include "util.h"
+#ifdef STEREO_SOUND
+#include "pokeysnd.h"
+#endif
+
+#ifdef MONITOR_READLINE
+#include <readline/readline.h>
+#include <readline/history.h>
+#endif
+
+#ifdef __PLUS
+
+#include <stdarg.h>
+#include "misc_win.h"
+
+FILE *mon_output, *mon_input;
+
+void monitor_printf(const char *format, ...)
+{
+	va_list args;
+	va_start(args, format);
+	vfprintf(mon_output, format, args);
+	va_end(args);
+}
+
+#define printf            monitor_printf
+#define puts(s)           fputs(s, mon_output)
+#define putchar(c)        fputc(c, mon_output)
+#define perror(filename)  printf("%s: %s\n", filename, strerror(errno))
+
+#undef stdout
+#define stdout mon_output
+
+#undef stdin
+#define stdin mon_input
+
+#define PLUS_EXIT_MONITOR Misc_FreeMonitorConsole(mon_output, mon_input)
+
+#else /* __PLUS */
+
+#define PLUS_EXIT_MONITOR
+
+#endif /* __PLUS */
+
+#ifdef MONITOR_TRACE
+FILE *MONITOR_trace_file = NULL;
+#endif
+
+#ifdef MONITOR_HINTS
+
+typedef struct {
+	char *name;
+	UWORD addr;
+} symtable_rec;
+
+ /* Symbol names taken from atari.equ - part of disassembler by Erich Bacher
+    and from antic.h, gtia.h, pia.h and pokey.h.
+    Symbols must be sorted by address. If the address has different names
+    when reading/writing to it, put the read name first. */
+
+static const symtable_rec symtable_builtin[] = {
+	{"NGFLAG",  0x0001}, {"CASINI",  0x0002}, {"CASINI+1",0x0003}, {"RAMLO",   0x0004},
+	{"RAMLO+1", 0x0005}, {"TRAMSZ",  0x0006}, {"CMCMD",   0x0007}, {"WARMST",  0x0008},
+	{"BOOT",    0x0009}, {"DOSVEC",  0x000a}, {"DOSVEC+1",0x000b}, {"DOSINI",  0x000c},
+	{"DOSINI+1",0x000d}, {"APPMHI",  0x000e}, {"APPMHI+1",0x000f}, {"POKMSK",  0x0010},
+	{"BRKKEY",  0x0011}, {"RTCLOK",  0x0012}, {"RTCLOK+1",0x0013}, {"RTCLOK+2",0x0014},
+	{"BUFADR",  0x0015}, {"BUFADR+1",0x0016}, {"ICCOMT",  0x0017}, {"DSKFMS",  0x0018},
+	{"DSKFMS+1",0x0019}, {"DSKUTL",  0x001a}, {"DSKUTL+1",0x001b}, {"ABUFPT",  0x001c},
+	{"ABUFPT+1",0x001d}, {"ABUFPT+2",0x001e}, {"ABUFPT+3",0x001f},
+	{"ICHIDZ",  0x0020}, {"ICDNOZ",  0x0021}, {"ICCOMZ",  0x0022}, {"ICSTAZ",  0x0023},
+	{"ICBALZ",  0x0024}, {"ICBAHZ",  0x0025}, {"ICPTLZ",  0x0026}, {"ICPTHZ",  0x0027},
+	{"ICBLLZ",  0x0028}, {"ICBLHZ",  0x0029}, {"ICAX1Z",  0x002a}, {"ICAX2Z",  0x002b},
+	{"ICAX3Z",  0x002c}, {"ICAX4Z",  0x002d}, {"ICAX5Z",  0x002e}, {"ICAX6Z",  0x002f},
+	{"STATUS",  0x0030}, {"CHKSUM",  0x0031}, {"BUFRLO",  0x0032}, {"BUFRHI",  0x0033},
+	{"BFENLO",  0x0034}, {"BFENHI",  0x0035}, {"LTEMP",   0x0036}, {"LTEMP+1", 0x0037},
+	{"BUFRFL",  0x0038}, {"RECVDN",  0x0039}, {"XMTDON",  0x003a}, {"CHKSNT",  0x003b},
+	{"NOCKSM",  0x003c}, {"BPTR",    0x003d}, {"FTYPE",   0x003e}, {"FEOF",    0x003f},
+	{"FREQ",    0x0040}, {"SOUNDR",  0x0041}, {"CRITIC",  0x0042}, {"FMSZPG",  0x0043},
+	{"FMSZPG+1",0x0044}, {"FMSZPG+2",0x0045}, {"FMSZPG+3",0x0046}, {"FMSZPG+4",0x0047},
+	{"FMSZPG+5",0x0048}, {"FMSZPG+6",0x0049}, {"ZCHAIN",  0x004a}, {"ZCHAIN+1",0x004b},
+	{"DSTAT",   0x004c}, {"ATRACT",  0x004d}, {"DRKMSK",  0x004e}, {"COLRSH",  0x004f},
+	{"TEMP",    0x0050}, {"HOLD1",   0x0051}, {"LMARGN",  0x0052}, {"RMARGN",  0x0053},
+	{"ROWCRS",  0x0054}, {"COLCRS",  0x0055}, {"COLCRS+1",0x0056}, {"DINDEX",  0x0057},
+	{"SAVMSC",  0x0058}, {"SAVMSC+1",0x0059}, {"OLDROW",  0x005a}, {"OLDCOL",  0x005b},
+	{"OLDCOL+1",0x005c}, {"OLDCHR",  0x005d}, {"OLDADR",  0x005e}, {"OLDADR+1",0x005f},
+	{"FKDEF",   0x0060}, {"FKDEF+1", 0x0061}, {"PALNTS",  0x0062}, {"LOGCOL",  0x0063},
+	{"ADRESS",  0x0064}, {"ADRESS+1",0x0065}, {"MLTTMP",  0x0066}, {"MLTTMP+1",0x0067},
+	{"SAVADR",  0x0068}, {"SAVADR+1",0x0069}, {"RAMTOP",  0x006a}, {"BUFCNT",  0x006b},
+	{"BUFSTR",  0x006c}, {"BUFSTR+1",0x006d}, {"BITMSK",  0x006e}, {"SHFAMT",  0x006f},
+	{"ROWAC",   0x0070}, {"ROWAC+1", 0x0071}, {"COLAC",   0x0072}, {"COLAC+1", 0x0073},
+	{"ENDPT",   0x0074}, {"ENDPT+1", 0x0075}, {"DELTAR",  0x0076}, {"DELTAC",  0x0077},
+	{"DELTAC+1",0x0078}, {"KEYDEF",  0x0079}, {"KEYDEF+1",0x007a}, {"SWPFLG",  0x007b},
+	{"HOLDCH",  0x007c}, {"INSDAT",  0x007d}, {"COUNTR",  0x007e}, {"COUNTR+1",0x007f},
+	{"LOMEM",   0x0080}, {"LOMEM+1", 0x0081}, {"VNTP",    0x0082}, {"VNTP+1",  0x0083},
+	{"VNTD",    0x0084}, {"VNTD+1",  0x0085}, {"VVTP",    0x0086}, {"VVTP+1",  0x0087},
+	{"STMTAB",  0x0088}, {"STMTAB+1",0x0089}, {"STMCUR",  0x008a}, {"STMCUR+1",0x008b},
+	{"STARP",   0x008c}, {"STARP+1", 0x008d}, {"RUNSTK",  0x008e}, {"RUNSTK+1",0x008f},
+	{"TOPSTK",  0x0090}, {"TOPSTK+1",0x0091}, {"MEOLFLG", 0x0092}, {"POKADR",  0x0095},
+	{"POKADR+1",0x0096}, {"DATAD",   0x00b6}, {"DATALN",  0x00b7}, {"DATALN+1",0x00b8},
+	{"STOPLN",  0x00ba}, {"STOPLN+1",0x00bb}, {"SAVCUR",  0x00be}, {"IOCMD",   0x00c0},
+	{"IODVC",   0x00c1}, {"PROMPT",  0x00c2}, {"ERRSAVE", 0x00c3}, {"COLOR",  0x00c8},
+	{"PTABW",   0x00c9}, {"LOADFLG", 0x00ca}, {"FR0",     0x00d4}, {"FR0+1",   0x00d5},
+	{"FR0+2",   0x00d6}, {"FR0+3",   0x00d7}, {"FR0+4",   0x00d8}, {"FR0+5",   0x00d9},
+	{"FRE",     0x00da}, {"FRE+1",   0x00db}, {"FRE+2",   0x00dc}, {"FRE+3",   0x00dd},
+	{"FRE+4",   0x00de}, {"FRE+5",   0x00df}, {"FR1",     0x00e0}, {"FR1+1",   0x00e1},
+	{"FR1+2",   0x00e2}, {"FR1+3",   0x00e3}, {"FR1+4",   0x00e4}, {"FR1+5",   0x00e5},
+	{"FR2",     0x00e6}, {"FR2+1",   0x00e7}, {"FR2+2",   0x00e8}, {"FR2+3",   0x00e9},
+	{"FR2+4",   0x00ea}, {"FR2+5",   0x00eb}, {"FRX",     0x00ec}, {"EEXP",    0x00ed},
+	{"NSIGN",   0x00ee}, {"ESIGN",   0x00ef}, {"FCHRFLG", 0x00f0}, {"DIGRT",   0x00f1},
+	{"CIX",     0x00f2}, {"INBUFF",  0x00f3}, {"INBUFF+1",0x00f4}, {"ZTEMP1",  0x00f5},
+	{"ZTEMP1+1",0x00f6}, {"ZTEMP4",  0x00f7}, {"ZTEMP4+1",0x00f8}, {"ZTEMP3",  0x00f9},
+	{"ZTEMP3+1",0x00fa}, {"RADFLG",  0x00fb}, {"FLPTR",   0x00fc}, {"FLPTR+1", 0x00fd},
+	{"FPTR2",   0x00fe}, {"FPTR2+1", 0x00ff},
+
+	{"VDSLST",  0x0200}, {"VDSLST+1",0x0201}, {"VPRCED",  0x0202}, {"VPRCED+1",0x0203},
+	{"VINTER",  0x0204}, {"VINTER+1",0x0205}, {"VBREAK",  0x0206}, {"VBREAK+1",0x0207},
+	{"VKEYBD",  0x0208}, {"VKEYBD+1",0x0209}, {"VSERIN",  0x020a}, {"VSERIN+1",0x020b},
+	{"VSEROR",  0x020c}, {"VSEROR+1",0x020d}, {"VSEROC",  0x020e}, {"VSEROC+1",0x020f},
+	{"VTIMR1",  0x0210}, {"VTIMR1+1",0x0211}, {"VTIMR2",  0x0212}, {"VTIMR2+1",0x0213},
+	{"VTIMR4",  0x0214}, {"VTIMR4+1",0x0215}, {"VIMIRQ",  0x0216}, {"VIMIRQ+1",0x0217},
+	{"CDTMV1",  0x0218}, {"CDTMV1+1",0x0219}, {"CDTMV2",  0x021a}, {"CDTMV2+1",0x021b},
+	{"CDTMV3",  0x021c}, {"CDTMV3+1",0x021d}, {"CDTMV4",  0x021e}, {"CDTMV4+1",0x021f},
+	{"CDTMV5",  0x0220}, {"CDTMV5+1",0x0221}, {"VVBLKI",  0x0222}, {"VVBLKI+1",0x0223},
+	{"VVBLKD",  0x0224}, {"VVBLKD+1",0x0225}, {"CDTMA1",  0x0226}, {"CDTMA1+1",0x0227},
+	{"CDTMA2",  0x0228}, {"CDTMA2+1",0x0229}, {"CDTMF3",  0x022a}, {"SRTIMR",  0x022b},
+	{"CDTMF4",  0x022c}, {"INTEMP",  0x022d}, {"CDTMF5",  0x022e}, {"SDMCTL",  0x022f},
+	{"SDLSTL",  0x0230}, {"SDLSTH",  0x0231}, {"SSKCTL",  0x0232}, {"SPARE",   0x0233},
+	{"LPENH",   0x0234}, {"LPENV",   0x0235}, {"BRKKY",   0x0236}, {"BRKKY+1", 0x0237},
+	{"VPIRQ",   0x0238}, {"VPIRQ+1", 0x0239}, {"CDEVIC",  0x023a}, {"CCOMND",  0x023b},
+	{"CAUX1",   0x023c}, {"CAUX2",   0x023d}, {"TMPSIO",  0x023e}, {"ERRFLG",  0x023f},
+	{"DFLAGS",  0x0240}, {"DBSECT",  0x0241}, {"BOOTAD",  0x0242}, {"BOOTAD+1",0x0243},
+	{"COLDST",  0x0244}, {"RECLEN",  0x0245}, {"DSKTIM",  0x0246}, {"PDVMSK",  0x0247},
+	{"SHPDVS",  0x0248}, {"PDMSK",   0x0249}, {"RELADR",  0x024a}, {"RELADR+1",0x024b},
+	{"PPTMPA",  0x024c}, {"PPTMPX",  0x024d}, {"CHSALT",  0x026b}, {"VSFLAG",  0x026c},
+	{"KEYDIS",  0x026d}, {"FINE",    0x026e}, {"GPRIOR",  0x026f}, {"PADDL0",  0x0270},
+	{"PADDL1",  0x0271}, {"PADDL2",  0x0272}, {"PADDL3",  0x0273}, {"PADDL4",  0x0274},
+	{"PADDL5",  0x0275}, {"PADDL6",  0x0276}, {"PADDL7",  0x0277}, {"STICK0",  0x0278},
+	{"STICK1",  0x0279}, {"STICK2",  0x027a}, {"STICK3",  0x027b}, {"PTRIG0",  0x027c},
+	{"PTRIG1",  0x027d}, {"PTRIG2",  0x027e}, {"PTRIG3",  0x027f}, {"PTRIG4",  0x0280},
+	{"PTRIG5",  0x0281}, {"PTRIG6",  0x0282}, {"PTRIG7",  0x0283}, {"STRIG0",  0x0284},
+	{"STRIG1",  0x0285}, {"STRIG2",  0x0286}, {"STRIG3",  0x0287}, {"HIBYTE",  0x0288},
+	{"WMODE",   0x0289}, {"BLIM",    0x028a}, {"IMASK",   0x028b}, {"JVECK",   0x028c},
+	{"NEWADR",  0x028e}, {"TXTROW",  0x0290}, {"TXTCOL",  0x0291}, {"TXTCOL+1",0x0292},
+	{"TINDEX",  0x0293}, {"TXTMSC",  0x0294}, {"TXTMSC+1",0x0295}, {"TXTOLD",  0x0296},
+	{"TXTOLD+1",0x0297}, {"TXTOLD+2",0x0298}, {"TXTOLD+3",0x0299}, {"TXTOLD+4",0x029a},
+	{"TXTOLD+5",0x029b}, {"CRETRY",  0x029c}, {"HOLD3",   0x029d}, {"SUBTMP",  0x029e},
+	{"HOLD2",   0x029f}, {"DMASK",   0x02a0}, {"TMPLBT",  0x02a1}, {"ESCFLG",  0x02a2},
+	{"TABMAP",  0x02a3}, {"TABMAP+1",0x02a4}, {"TABMAP+2",0x02a5}, {"TABMAP+3",0x02a6},
+	{"TABMAP+4",0x02a7}, {"TABMAP+5",0x02a8}, {"TABMAP+6",0x02a9}, {"TABMAP+7",0x02aa},
+	{"TABMAP+8",0x02ab}, {"TABMAP+9",0x02ac}, {"TABMAP+A",0x02ad}, {"TABMAP+B",0x02ae},
+	{"TABMAP+C",0x02af}, {"TABMAP+D",0x02b0}, {"TABMAP+E",0x02b1}, {"LOGMAP",  0x02b2},
+	{"LOGMAP+1",0x02b3}, {"LOGMAP+2",0x02b4}, {"LOGMAP+3",0x02b5}, {"INVFLG",  0x02b6},
+	{"FILFLG",  0x02b7}, {"TMPROW",  0x02b8}, {"TMPCOL",  0x02b9}, {"TMPCOL+1",0x02ba},
+	{"SCRFLG",  0x02bb}, {"HOLD4",   0x02bc}, {"DRETRY",  0x02bd}, {"SHFLOC",  0x02be},
+	{"BOTSCR",  0x02bf}, {"PCOLR0",  0x02c0}, {"PCOLR1",  0x02c1}, {"PCOLR2",  0x02c2},
+	{"PCOLR3",  0x02c3}, {"COLOR0",  0x02c4}, {"COLOR1",  0x02c5}, {"COLOR2",  0x02c6},
+	{"COLOR3",  0x02c7}, {"COLOR4",  0x02c8}, {"RUNADR",  0x02c9}, {"RUNADR+1",0x02ca},
+	{"HIUSED",  0x02cb}, {"HIUSED+1",0x02cc}, {"ZHIUSE",  0x02cd}, {"ZHIUSE+1",0x02ce},
+	{"GBYTEA",  0x02cf}, {"GBYTEA+1",0x02d0}, {"LOADAD",  0x02d1}, {"LOADAD+1",0x02d2},
+	{"ZLOADA",  0x02d3}, {"ZLOADA+1",0x02d4}, {"DSCTLN",  0x02d5}, {"DSCTLN+1",0x02d6},
+	{"ACMISR",  0x02d7}, {"ACMISR+1",0x02d8}, {"KRPDER",  0x02d9}, {"KEYREP",  0x02da},
+	{"NOCLIK",  0x02db}, {"HELPFG",  0x02dc}, {"DMASAV",  0x02dd}, {"PBPNT",   0x02de},
+	{"PBUFSZ",  0x02df}, {"RUNAD",   0x02e0}, {"RUNAD+1", 0x02e1}, {"INITAD",  0x02e2},
+	{"INITAD+1",0x02e3}, {"RAMSIZ",  0x02e4}, {"MEMTOP",  0x02e5}, {"MEMTOP+1",0x02e6},
+	{"MEMLO",   0x02e7}, {"MEMLO+1", 0x02e8}, {"HNDLOD",  0x02e9}, {"DVSTAT",  0x02ea},
+	{"DVSTAT+1",0x02eb}, {"DVSTAT+2",0x02ec}, {"DVSTAT+3",0x02ed}, {"CBAUDL",  0x02ee},
+	{"CBAUDH",  0x02ef}, {"CRSINH",  0x02f0}, {"KEYDEL",  0x02f1}, {"CH1",     0x02f2},
+	{"CHACT",   0x02f3}, {"CHBAS",   0x02f4}, {"NEWROW",  0x02f5}, {"NEWCOL",  0x02f6},
+	{"NEWCOL+1",0x02f7}, {"ROWINC",  0x02f8}, {"COLINC",  0x02f9}, {"CHAR",    0x02fa},
+	{"ATACHR",  0x02fb}, {"CH",      0x02fc}, {"FILDAT",  0x02fd}, {"DSPFLG",  0x02fe},
+	{"SSFLAG",  0x02ff},
+
+	{"DDEVIC",  0x0300}, {"DUNIT",   0x0301}, {"DCOMND",  0x0302}, {"DSTATS",  0x0303},
+	{"DBUFLO",  0x0304}, {"DBUFHI",  0x0305}, {"DTIMLO",  0x0306}, {"DUNUSE",  0x0307},
+	{"DBYTLO",  0x0308}, {"DBYTHI",  0x0309}, {"DAUX1",   0x030a}, {"DAUX2",   0x030b},
+	{"TIMER1",  0x030c}, {"TIMER1+1",0x030d}, {"ADDCOR",  0x030e}, {"CASFLG",  0x030f},
+	{"TIMER2",  0x0310}, {"TIMER2+1",0x0311}, {"TEMP1",   0x0312}, {"TEMP1+1", 0x0313},
+	{"TEMP2",   0x0314}, {"TEMP3",   0x0315}, {"SAVIO",   0x0316}, {"TIMFLG",  0x0317},
+	{"STACKP",  0x0318}, {"TSTAT",   0x0319}, {"HATABS",  0x031a}, /* HATABS 1-34 */
+	{"PUTBT1",  0x033d}, {"PUTBT2",  0x033e}, {"PUTBT3",  0x033f},
+	{"B0-ICHID",0x0340}, {"B0-ICDNO",0x0341}, {"B0-ICCOM",0x0342}, {"B0-ICSTA",0x0343},
+	{"B0-ICBAL",0x0344}, {"B0-ICBAH",0x0345}, {"B0-ICPTL",0x0346}, {"B0-ICPTH",0x0347},
+	{"B0-ICBLL",0x0348}, {"B0-ICBLH",0x0349}, {"B0-ICAX1",0x034a}, {"B0-ICAX2",0x034b},
+	{"B0-ICAX3",0x034c}, {"B0-ICAX4",0x034d}, {"B0-ICAX5",0x034e}, {"B0-ICAX6",0x034f},
+	{"B1-ICHID",0x0350}, {"B1-ICDNO",0x0351}, {"B1-ICCOM",0x0352}, {"B1-ICSTA",0x0353},
+	{"B1-ICBAL",0x0354}, {"B1-ICBAH",0x0355}, {"B1-ICPTL",0x0356}, {"B1-ICPTH",0x0357},
+	{"B1-ICBLL",0x0358}, {"B1-ICBLH",0x0359}, {"B1-ICAX1",0x035a}, {"B1-ICAX2",0x035b},
+	{"B1-ICAX3",0x035c}, {"B1-ICAX4",0x035d}, {"B1-ICAX5",0x035e}, {"B1-ICAX6",0x035f},
+	{"B2-ICHID",0x0360}, {"B2-ICDNO",0x0361}, {"B2-ICCOM",0x0362}, {"B2-ICSTA",0x0363},
+	{"B2-ICBAL",0x0364}, {"B2-ICBAH",0x0365}, {"B2-ICPTL",0x0366}, {"B2-ICPTH",0x0367},
+	{"B2-ICBLL",0x0368}, {"B2-ICBLH",0x0369}, {"B2-ICAX1",0x036a}, {"B2-ICAX2",0x036b},
+	{"B2-ICAX3",0x036c}, {"B2-ICAX4",0x036d}, {"B2-ICAX5",0x036e}, {"B2-ICAX6",0x036f},
+	{"B3-ICHID",0x0370}, {"B3-ICDNO",0x0371}, {"B3-ICCOM",0x0372}, {"B3-ICSTA",0x0373},
+	{"B3-ICBAL",0x0374}, {"B3-ICBAH",0x0375}, {"B3-ICPTL",0x0376}, {"B3-ICPTH",0x0377},
+	{"B3-ICBLL",0x0378}, {"B3-ICBLH",0x0379}, {"B3-ICAX1",0x037a}, {"B3-ICAX2",0x037b},
+	{"B3-ICAX3",0x037c}, {"B3-ICAX4",0x037d}, {"B3-ICAX5",0x037e}, {"B3-ICAX6",0x037f},
+	{"B4-ICHID",0x0380}, {"B4-ICDNO",0x0381}, {"B4-ICCOM",0x0382}, {"B4-ICSTA",0x0383},
+	{"B4-ICBAL",0x0384}, {"B4-ICBAH",0x0385}, {"B4-ICPTL",0x0386}, {"B4-ICPTH",0x0387},
+	{"B4-ICBLL",0x0388}, {"B4-ICBLH",0x0389}, {"B4-ICAX1",0x038a}, {"B4-ICAX2",0x038b},
+	{"B4-ICAX3",0x038c}, {"B4-ICAX4",0x038d}, {"B4-ICAX5",0x038e}, {"B4-ICAX6",0x038f},
+	{"B5-ICHID",0x0390}, {"B5-ICDNO",0x0391}, {"B5-ICCOM",0x0392}, {"B5-ICSTA",0x0393},
+	{"B5-ICBAL",0x0394}, {"B5-ICBAH",0x0395}, {"B5-ICPTL",0x0396}, {"B5-ICPTH",0x0397},
+	{"B5-ICBLL",0x0398}, {"B5-ICBLH",0x0399}, {"B5-ICAX1",0x039a}, {"B5-ICAX2",0x039b},
+	{"B5-ICAX3",0x039c}, {"B5-ICAX4",0x039d}, {"B5-ICAX5",0x039e}, {"B5-ICAX6",0x039f},
+	{"B6-ICHID",0x03a0}, {"B6-ICDNO",0x03a1}, {"B6-ICCOM",0x03a2}, {"B6-ICSTA",0x03a3},
+	{"B6-ICBAL",0x03a4}, {"B6-ICBAH",0x03a5}, {"B6-ICPTL",0x03a6}, {"B6-ICPTH",0x03a7},
+	{"B6-ICBLL",0x03a8}, {"B6-ICBLH",0x03a9}, {"B6-ICAX1",0x03aa}, {"B6-ICAX2",0x03ab},
+	{"B6-ICAX3",0x03ac}, {"B6-ICAX4",0x03ad}, {"B6-ICAX5",0x03ae}, {"B6-ICAX6",0x03af},
+	{"B7-ICHID",0x03b0}, {"B7-ICDNO",0x03b1}, {"B7-ICCOM",0x03b2}, {"B7-ICSTA",0x03b3},
+	{"B7-ICBAL",0x03b4}, {"B7-ICBAH",0x03b5}, {"B7-ICPTL",0x03b6}, {"B7-ICPTH",0x03b7},
+	{"B7-ICBLL",0x03b8}, {"B7-ICBLH",0x03b9}, {"B7-ICAX1",0x03ba}, {"B7-ICAX2",0x03bb},
+	{"B7-ICAX3",0x03bc}, {"B7-ICAX4",0x03bd}, {"B7-ICAX5",0x03be}, {"B7-ICAX6",0x03bf},
+	{"PRNBUF",  0x03c0}, /* PRNBUF 1-39 */
+	{"SUPERF",  0x03e8}, {"CKEY",    0x03e9}, {"CASSBT",  0x03ea}, {"CARTCK",  0x03eb},
+	{"DERRF",   0x03ec}, {"ACMVAR",  0x03ed}, /* ACMVAR 1-10 */
+	{"BASICF",  0x03f8}, {"MINTLK",  0x03f9}, {"GINTLK",  0x03fa}, {"CHLINK",  0x03fb},
+	{"CHLINK+1",0x03fc}, {"CASBUF",  0x03fd},
+
+	{"M0PF",  0xd000}, {"HPOSP0",0xd000}, {"M1PF",  0xd001}, {"HPOSP1",0xd001},
+	{"M2PF",  0xd002}, {"HPOSP2",0xd002}, {"M3PF",  0xd003}, {"HPOSP3",0xd003},
+	{"P0PF",  0xd004}, {"HPOSM0",0xd004}, {"P1PF",  0xd005}, {"HPOSM1",0xd005},
+	{"P2PF",  0xd006}, {"HPOSM2",0xd006}, {"P3PF",  0xd007}, {"HPOSM3",0xd007},
+	{"M0PL",  0xd008}, {"SIZEP0",0xd008}, {"M1PL",  0xd009}, {"SIZEP1",0xd009},
+	{"M2PL",  0xd00a}, {"SIZEP2",0xd00a}, {"M3PL",  0xd00b}, {"SIZEP3",0xd00b},
+	{"P0PL",  0xd00c}, {"SIZEM", 0xd00c}, {"P1PL",  0xd00d}, {"GRAFP0",0xd00d},
+	{"P2PL",  0xd00e}, {"GRAFP1",0xd00e}, {"P3PL",  0xd00f}, {"GRAFP2",0xd00f},
+	{"TRIG0", 0xd010}, {"GRAFP3",0xd010}, {"TRIG1", 0xd011}, {"GRAFM", 0xd011},
+	{"TRIG2", 0xd012}, {"COLPM0",0xd012}, {"TRIG3", 0xd013}, {"COLPM1",0xd013},
+	{"PAL",   0xd014}, {"COLPM2",0xd014}, {"COLPM3",0xd015}, {"COLPF0",0xd016},
+	{"COLPF1",0xd017},
+	{"COLPF2",0xd018}, {"COLPF3",0xd019}, {"COLBK", 0xd01a}, {"PRIOR", 0xd01b},
+	{"VDELAY",0xd01c}, {"GRACTL",0xd01d}, {"HITCLR",0xd01e}, {"CONSOL",0xd01f},
+
+	{"POT0",  0xd200}, {"AUDF1", 0xd200}, {"POT1",  0xd201}, {"AUDC1", 0xd201},
+	{"POT2",  0xd202}, {"AUDF2", 0xd202}, {"POT3",  0xd203}, {"AUDC2", 0xd203},
+	{"POT4",  0xd204}, {"AUDF3", 0xd204}, {"POT5",  0xd205}, {"AUDC3", 0xd205},
+	{"POT6",  0xd206}, {"AUDF4", 0xd206}, {"POT7",  0xd207}, {"AUDC4", 0xd207},
+	{"ALLPOT",0xd208}, {"AUDCTL",0xd208}, {"KBCODE",0xd209}, {"STIMER",0xd209},
+	{"RANDOM",0xd20a}, {"SKREST",0xd20a}, {"POTGO", 0xd20b},
+	{"SERIN", 0xd20d}, {"SEROUT",0xd20d}, {"IRQST", 0xd20e}, {"IRQEN", 0xd20e},
+	{"SKSTAT",0xd20f}, {"SKCTL", 0xd20f},
+
+	{"PORTA", 0xd300}, {"PORTB", 0xd301}, {"PACTL", 0xd302}, {"PBCTL", 0xd303},
+
+	{"DMACTL",0xd400}, {"CHACTL",0xd401}, {"DLISTL",0xd402}, {"DLISTH",0xd403},
+	{"HSCROL",0xd404}, {"VSCROL",0xd405}, {"PMBASE",0xd407}, {"CHBASE",0xd409},
+	{"WSYNC", 0xd40a}, {"VCOUNT",0xd40b}, {"PENH",  0xd40c}, {"PENV",  0xd40d},
+	{"NMIEN", 0xd40e}, {"NMIST", 0xd40f}, {"NMIRES",0xd40f},
+
+	{"AFP",   0xd800}, {"FASC",  0xd8e6}, {"IFP",   0xd9aa}, {"FPI",   0xd9d2},
+	{"ZPRO",  0xda44}, {"ZF1",   0xda46}, {"FSUB",  0xda60}, {"FADD",  0xda66},
+	{"FMUL",  0xdadb}, {"FDIV",  0xdb28}, {"PLYEVL",0xdd40}, {"FLD0R", 0xdd89},
+	{"FLD0R", 0xdd8d}, {"FLD1R", 0xdd98}, {"FLD1P", 0xdd9c}, {"FST0R", 0xdda7},
+	{"FST0P", 0xddab}, {"FMOVE", 0xddb6}, {"EXP",   0xddc0}, {"EXP10", 0xddcc},
+	{"LOG",   0xdecd}, {"LOG10", 0xded1},
+
+	{"DSKINV",0xe453}, {"CIOV",  0xe456}, {"SIOV",  0xe459}, {"SETVBV",0xe45c},
+	{"SYSVBV",0xe45f}, {"XITVBV",0xe462}, {"SIOINV",0xe465}, {"SENDEV",0xe468},
+	{"INTINV",0xe46b}, {"CIOINV",0xe46e}, {"SELFSV",0xe471}, {"WARMSV",0xe474},
+	{"COLDSV",0xe477}, {"RBLOKV",0xe47a}, {"CSOPIV",0xe47d}, {"PUPDIV",0xe480},
+	{"SELFTSV",0xe483},{"PENTV", 0xe486}, {"PHUNLV",0xe489}, {"PHINIV",0xe48c},
+	{"GPDVV", 0xe48f},
+
+	{NULL,    0x0000}
+};
+
+static const symtable_rec symtable_builtin_5200[] = {
+	{"POKMSK",  0x0000}, {"RTCLOKH",  0x0001}, {"RTCLOKL",0x0002}, {"CRITIC",   0x0003},
+	{"ATRACT", 0x0004}, {"SDLSTL",  0x0005}, {"SDLSTH",   0x0006}, {"SDMCTL",  0x0007},
+	{"PCOLR0",    0x0008}, {"PCOLR1",  0x0009}, {"PCOLR2",0x000a}, {"PCOLR3",  0x000b},
+	{"COLOR0",0x000c}, {"COLOR1",  0x000d}, {"COLOR2",0x000e}, {"COLOR3",  0x000f},
+	{"COLOR4",  0x0010}, {"PADDL0",  0x0011}, {"PADDL1",0x0012}, {"PADDL2",0x0013},
+	{"PADDL3",  0x0014}, {"PADDL4",0x0015}, {"PADDL5",  0x0016}, {"PADDL6",  0x0017},
+	{"PADDL7",0x0018},
+
+	{"VIMIRQ",  0x0200}, {"VIMIRQ+1",0x0201}, {"VVBLKI",  0x0202}, {"VVBLKI+1",0x0203},
+	{"VVBLKD",  0x0204}, {"VVBLKD+1",0x0205}, {"VDSLST",  0x0206}, {"VDSLST+1",0x0207},
+	{"VKEYBD",  0x0208}, {"VKEYBD+1",0x0209}, {"VKPD",  0x020a}, {"VKPD+1",0x020b},
+	{"BRKKY",  0x020c}, {"BRKKY+1",0x020d}, {"VBREAK",  0x020e}, {"VBREAK+1",0x020f},
+	{"VSERIN",  0x0210}, {"VSERIN+1",0x0211}, {"VSEROR",  0x0212}, {"VSEROR+1",0x0213},
+	{"VSEROC",  0x0214}, {"VSEROC+1",0x0215}, {"VTIMR1",  0x0216}, {"VTIMR1+1",0x0217},
+	{"VTIMR2",  0x0218}, {"VTIMR2+1",0x0219}, {"VTIMR4",  0x021a}, {"VTIMR4+1",0x021b},
+
+	{"M0PF",  0xc000}, {"HPOSP0",0xc000}, {"M1PF",  0xc001}, {"HPOSP1",0xc001},
+	{"M2PF",  0xc002}, {"HPOSP2",0xc002}, {"M3PF",  0xc003}, {"HPOSP3",0xc003},
+	{"P0PF",  0xc004}, {"HPOSM0",0xc004}, {"P1PF",  0xc005}, {"HPOSM1",0xc005},
+	{"P2PF",  0xc006}, {"HPOSM2",0xc006}, {"P3PF",  0xc007}, {"HPOSM3",0xc007},
+	{"M0PL",  0xc008}, {"SIZEP0",0xc008}, {"M1PL",  0xc009}, {"SIZEP1",0xc009},
+	{"M2PL",  0xc00a}, {"SIZEP2",0xc00a}, {"M3PL",  0xc00b}, {"SIZEP3",0xc00b},
+	{"P0PL",  0xc00c}, {"SIZEM", 0xc00c}, {"P1PL",  0xc00d}, {"GRAFP0",0xc00d},
+	{"P2PL",  0xc00e}, {"GRAFP1",0xc00e}, {"P3PL",  0xc00f}, {"GRAFP2",0xc00f},
+	{"TRIG0", 0xc010}, {"GRAFP3",0xc010}, {"TRIG1", 0xc011}, {"GRAFM", 0xc011},
+	{"TRIG2", 0xc012}, {"COLPM0",0xc012}, {"TRIG3", 0xc013}, {"COLPM1",0xc013},
+	{"PAL",   0xc014}, {"COLPM2",0xc014}, {"COLPM3",0xc015}, {"COLPF0",0xc016},
+	{"COLPF1",0xc017},
+	{"COLPF2",0xc018}, {"COLPF3",0xc019}, {"COLBK", 0xc01a}, {"PRIOR", 0xc01b},
+	{"VDELAY",0xc01c}, {"GRACTL",0xc01d}, {"HITCLR",0xc01e}, {"CONSOL",0xc01f},
+	{"DMACTL",0xd400}, {"CHACTL",0xd401}, {"DLISTL",0xd402}, {"DLISTH",0xd403},
+	{"HSCROL",0xd404}, {"VSCROL",0xd405}, {"PMBASE",0xd407}, {"CHBASE",0xd409},
+	{"WSYNC", 0xd40a}, {"VCOUNT",0xd40b}, {"PENH",  0xd40c}, {"PENV",  0xd40d},
+	{"NMIEN", 0xd40e}, {"NMIST", 0xd40f}, {"NMIRES",0xd40f},
+
+	{"POT0",  0xe800}, {"AUDF1", 0xe800}, {"POT1",  0xe801}, {"AUDC1", 0xe801},
+	{"POT2",  0xe802}, {"AUDF2", 0xe802}, {"POT3",  0xe803}, {"AUDC2", 0xe803},
+	{"POT4",  0xe804}, {"AUDF3", 0xe804}, {"POT5",  0xe805}, {"AUDC3", 0xe805},
+	{"POT6",  0xe806}, {"AUDF4", 0xe806}, {"POT7",  0xe807}, {"AUDC4", 0xe807},
+	{"ALLPOT",0xe808}, {"AUDCTL",0xe808}, {"KBCODE",0xe809}, {"STIMER",0xe809},
+	{"RANDOM",0xe80a}, {"SKREST",0xe80a}, {"POTGO", 0xe80b},
+	{"SERIN", 0xe80d}, {"SEROUT",0xe80d}, {"IRQST", 0xe80e}, {"IRQEN", 0xe80e},
+	{"SKSTAT",0xe80f}, {"SKCTL", 0xe80f},
+
+	{NULL,    0x0000}
+};
+
+static int symtable_builtin_enable = TRUE;
+
+static symtable_rec *symtable_user = NULL;
+static int symtable_user_size = 0;
+
+static const char *find_label_name(UWORD addr, int is_write)
+{
+	int i;
+	for (i = 0; i < symtable_user_size; i++) {
+		if (symtable_user[i].addr == addr)
+			return symtable_user[i].name;
+	}
+	if (symtable_builtin_enable) {
+		const symtable_rec *p;
+		for (p = (Atari800_machine_type == Atari800_MACHINE_5200 ? symtable_builtin_5200 : symtable_builtin); p->name != NULL; p++) {
+			if (p->addr == addr) {
+				if (is_write && p[1].addr == addr)
+					p++;
+				return p->name;
+			}
+		}
+	}
+	return NULL;
+}
+
+static symtable_rec *find_user_label(const char *name)
+{
+	int i;
+	for (i = 0; i < symtable_user_size; i++) {
+		if (Util_stricmp(symtable_user[i].name, name) == 0)
+			return &symtable_user[i];
+	}
+	return NULL;
+}
+
+static int find_label_value(const char *name)
+{
+	const symtable_rec *p = find_user_label(name);
+	if (p != NULL)
+		return p->addr;
+	if (symtable_builtin_enable) {
+		for (p = (Atari800_machine_type == Atari800_MACHINE_5200 ? symtable_builtin_5200 : symtable_builtin); p->name != NULL; p++) {
+			if (Util_stricmp(p->name, name) == 0)
+				return p->addr;
+		}
+	}
+	return -1;
+}
+
+static void free_user_labels(void)
+{
+	if (symtable_user != NULL) {
+		while (symtable_user_size > 0)
+			free(symtable_user[--symtable_user_size].name);
+		free(symtable_user);
+		symtable_user = NULL;
+	}
+}
+
+static void add_user_label(const char *name, UWORD addr)
+{
+#define SYMTABLE_USER_INITIAL_SIZE 128
+	if (symtable_user == NULL)
+		symtable_user = (symtable_rec *) Util_malloc(SYMTABLE_USER_INITIAL_SIZE * sizeof(symtable_rec));
+	else if (symtable_user_size >= SYMTABLE_USER_INITIAL_SIZE
+	      && (symtable_user_size & (symtable_user_size - 1)) == 0) {
+		/* symtable_user_size is a power of two: allocate twice as much */
+		symtable_user = (symtable_rec *) Util_realloc(symtable_user,
+			2 * symtable_user_size * sizeof(symtable_rec));
+	}
+	symtable_user[symtable_user_size].name = Util_strdup(name);
+	symtable_user[symtable_user_size].addr = addr;
+	symtable_user_size++;
+}
+
+static void load_user_labels(const char *filename)
+{
+	FILE *fp;
+	char line[256];
+	if (filename == NULL) {
+		printf("You must specify a filename\n");
+		return;
+	}
+	/* "rb" and not "r", because we strip EOLs ourselves
+	   - this is better, because we can use CR/LF files on Unix */
+	fp = fopen(filename, "rb");
+	if (fp == NULL) {
+		perror(filename);
+		return;
+	}
+	free_user_labels();
+	while (fgets(line, sizeof(line), fp)) {
+		char *p;
+		unsigned int value = 0;
+		int digits = 0;
+		/* Find first 4 hex digits or more. */
+		/* We don't support "Cafe Assembler", "Dead Assembler" or "C0de Assembler". ;-) */
+		for (p = line; *p != '\0'; p++) {
+			if (*p >= '0' && *p <= '9') {
+				value = (value << 4) + *p - '0';
+				digits++;
+			}
+			else if (*p >= 'A' && *p <= 'F') {
+				value = (value << 4) + *p - 'A' + 10;
+				digits++;
+			}
+			else if (*p >= 'a' && *p <= 'f') {
+				value = (value << 4) + *p - 'a' + 10;
+				digits++;
+			}
+			else if (digits >= 4)
+				break;
+			else if (*p == '-')
+				break; /* ignore labels with negative values */
+			else {
+				/* note that xasm can put "2" before the label value and mads puts "00" */
+				value = 0;
+				digits = 0;
+			}
+		}
+		if (*p != ' ' && *p != '\t')
+			continue;
+		if (value > 0xffff || digits > 8)
+			continue;
+		do
+			p++;
+		while (*p == ' ' || *p == '\t');
+		Util_chomp(p);
+		if (*p == '\0')
+			continue;
+		add_user_label(p, (UWORD) value);
+	}
+	fclose(fp);
+	printf("Loaded %d labels\n", symtable_user_size);
+}
+
+#endif /* MONITOR_HINTS */
+
+static const char instr6502[256][10] = {
+	"BRK", "ORA (1,X)", "CIM", "ASO (1,X)", "NOP 1", "ORA 1", "ASL 1", "ASO 1",
+	"PHP", "ORA #1", "ASL", "ANC #1", "NOP 2", "ORA 2", "ASL 2", "ASO 2",
+
+	"BPL 0", "ORA (1),Y", "CIM", "ASO (1),Y", "NOP 1,X", "ORA 1,X", "ASL 1,X", "ASO 1,X",
+	"CLC", "ORA 2,Y", "NOP !", "ASO 2,Y", "NOP 2,X", "ORA 2,X", "ASL 2,X", "ASO 2,X",
+
+	"JSR 2", "AND (1,X)", "CIM", "RLA (1,X)", "BIT 1", "AND 1", "ROL 1", "RLA 1",
+	"PLP", "AND #1", "ROL", "ANC #1", "BIT 2", "AND 2", "ROL 2", "RLA 2",
+
+	"BMI 0", "AND (1),Y", "CIM", "RLA (1),Y", "NOP 1,X", "AND 1,X", "ROL 1,X", "RLA 1,X",
+	"SEC", "AND 2,Y", "NOP !", "RLA 2,Y", "NOP 2,X", "AND 2,X", "ROL 2,X", "RLA 2,X",
+
+
+	"RTI", "EOR (1,X)", "CIM", "LSE (1,X)", "NOP 1", "EOR 1", "LSR 1", "LSE 1",
+	"PHA", "EOR #1", "LSR", "ALR #1", "JMP 2", "EOR 2", "LSR 2", "LSE 2",
+
+	"BVC 0", "EOR (1),Y", "CIM", "LSE (1),Y", "NOP 1,X", "EOR 1,X", "LSR 1,X", "LSE 1,X",
+	"CLI", "EOR 2,Y", "NOP !", "LSE 2,Y", "NOP 2,X", "EOR 2,X", "LSR 2,X", "LSE 2,X",
+
+	"RTS", "ADC (1,X)", "CIM", "RRA (1,X)", "NOP 1", "ADC 1", "ROR 1", "RRA 1",
+	"PLA", "ADC #1", "ROR", "ARR #1", "JMP (2)", "ADC 2", "ROR 2", "RRA 2",
+
+	"BVS 0", "ADC (1),Y", "CIM", "RRA (1),Y", "NOP 1,X", "ADC 1,X", "ROR 1,X", "RRA 1,X",
+	"SEI", "ADC 2,Y", "NOP !", "RRA 2,Y", "NOP 2,X", "ADC 2,X", "ROR 2,X", "RRA 2,X",
+
+
+	"NOP #1", "STA (1,X)", "NOP #1", "SAX (1,X)", "STY 1", "STA 1", "STX 1", "SAX 1",
+	"DEY", "NOP #1", "TXA", "ANE #1", "STY 2", "STA 2", "STX 2", "SAX 2",
+
+	"BCC 0", "STA (1),Y", "CIM", "SHA (1),Y", "STY 1,X", "STA 1,X", "STX 1,Y", "SAX 1,Y",
+	"TYA", "STA 2,Y", "TXS", "SHS 2,Y", "SHY 2,X", "STA 2,X", "SHX 2,Y", "SHA 2,Y",
+
+	"LDY #1", "LDA (1,X)", "LDX #1", "LAX (1,X)", "LDY 1", "LDA 1", "LDX 1", "LAX 1",
+	"TAY", "LDA #1", "TAX", "ANX #1", "LDY 2", "LDA 2", "LDX 2", "LAX 2",
+
+	"BCS 0", "LDA (1),Y", "CIM", "LAX (1),Y", "LDY 1,X", "LDA 1,X", "LDX 1,Y", "LAX 1,X",
+	"CLV", "LDA 2,Y", "TSX", "LAS 2,Y", "LDY 2,X", "LDA 2,X", "LDX 2,Y", "LAX 2,Y",
+
+
+	"CPY #1", "CMP (1,X)", "NOP #1", "DCM (1,X)", "CPY 1", "CMP 1", "DEC 1", "DCM 1",
+	"INY", "CMP #1", "DEX", "SBX #1", "CPY 2", "CMP 2", "DEC 2", "DCM 2",
+
+	"BNE 0", "CMP (1),Y", "ESCRTS #1", "DCM (1),Y", "NOP 1,X", "CMP 1,X", "DEC 1,X", "DCM 1,X",
+	"CLD", "CMP 2,Y", "NOP !", "DCM 2,Y", "NOP 2,X", "CMP 2,X", "DEC 2,X", "DCM 2,X",
+
+
+	"CPX #1", "SBC (1,X)", "NOP #1", "INS (1,X)", "CPX 1", "SBC 1", "INC 1", "INS 1",
+	"INX", "SBC #1", "NOP", "SBC #1 !", "CPX 2", "SBC 2", "INC 2", "INS 2",
+
+	"BEQ 0", "SBC (1),Y", "ESCAPE #1", "INS (1),Y", "NOP 1,X", "SBC 1,X", "INC 1,X", "INS 1,X",
+	"SED", "SBC 2,Y", "NOP !", "INS 2,Y", "NOP 2,X", "SBC 2,X", "INC 2,X", "INS 2,X"
+};
+
+/* Opcode type:
+   bits 1-0 = instruction length
+   bit 2    = instruction reads from memory (without stack-manipulating instructions)
+   bit 3    = instruction writes to memory (without stack-manipulating instructions)
+   bits 7-4 = adressing type:
+     0 = NONE (implicit)
+     1 = ABSOLUTE
+     2 = ZPAGE
+     3 = ABSOLUTE_X
+     4 = ABSOLUTE_Y
+     5 = INDIRECT_X
+     6 = INDIRECT_Y
+     7 = ZPAGE_X
+     8 = ZPAGE_Y
+     9 = RELATIVE
+     A = IMMEDIATE
+     B = STACK 2 (RTS)
+     C = STACK 3 (RTI)
+     D = INDIRECT (JMP () )
+     E = ESCRTS
+     F = ESCAPE */
+const UBYTE MONITOR_optype6502[256] = {
+	0x01, 0x56, 0x01, 0x5e, 0x22, 0x26, 0x2e, 0x2e, 0x01, 0xa2, 0x01, 0xa2, 0x13, 0x17, 0x1f, 0x1f,
+	0x92, 0x66, 0x01, 0x6e, 0x72, 0x76, 0x7e, 0x7e, 0x01, 0x47, 0x01, 0x4f, 0x33, 0x37, 0x3f, 0x3f,
+	0x13, 0x56, 0x01, 0x5e, 0x26, 0x26, 0x2e, 0x2e, 0x01, 0xa2, 0x01, 0xa2, 0x17, 0x17, 0x1f, 0x1f,
+	0x92, 0x66, 0x01, 0x6e, 0x72, 0x76, 0x7e, 0x7e, 0x01, 0x47, 0x01, 0x4f, 0x33, 0x37, 0x3f, 0x3f,
+	0xc1, 0x56, 0x01, 0x5e, 0x22, 0x26, 0x2e, 0x2e, 0x01, 0xa2, 0x01, 0xa2, 0x13, 0x17, 0x1f, 0x1f,
+	0x92, 0x66, 0x01, 0x6e, 0x72, 0x76, 0x7e, 0x7e, 0x01, 0x47, 0x01, 0x4f, 0x33, 0x37, 0x3f, 0x3f,
+	0xb1, 0x56, 0x01, 0x5e, 0x22, 0x26, 0x2e, 0x2e, 0x01, 0xa2, 0x01, 0xa2, 0xd3, 0x17, 0x1f, 0x1f,
+	0x92, 0x66, 0x01, 0x6e, 0x72, 0x76, 0x7e, 0x7e, 0x01, 0x47, 0x01, 0x4f, 0x33, 0x37, 0x3f, 0x3f,
+	0xa2, 0x5a, 0x01, 0x5a, 0x2a, 0x2a, 0x2a, 0x2a, 0x01, 0xa2, 0x01, 0xa2, 0x1b, 0x1b, 0x1b, 0x1b,
+	0x92, 0x6a, 0x01, 0x6a, 0x7a, 0x7a, 0x8a, 0x8a, 0x01, 0x4b, 0x01, 0x4b, 0x3b, 0x3b, 0x4b, 0x4b,
+	0xa2, 0x56, 0xa2, 0x56, 0x26, 0x26, 0x26, 0x26, 0x01, 0xa2, 0x01, 0xa2, 0x17, 0x17, 0x17, 0x17,
+	0x92, 0x66, 0x01, 0x66, 0x76, 0x76, 0x86, 0x86, 0x01, 0x47, 0x01, 0x47, 0x37, 0x37, 0x47, 0x47,
+	0xa2, 0x56, 0xa2, 0x5e, 0x26, 0x26, 0x2e, 0x2e, 0x01, 0xa2, 0x01, 0xa2, 0x17, 0x17, 0x1f, 0x1f,
+	0x92, 0x66, 0xe2, 0x6e, 0x72, 0x76, 0x7e, 0x7e, 0x01, 0x47, 0x01, 0x4f, 0x33, 0x37, 0x3f, 0x3f,
+	0xa2, 0x56, 0xa2, 0x5e, 0x26, 0x26, 0x2e, 0x2e, 0x01, 0xa2, 0x01, 0xa2, 0x17, 0x17, 0x1f, 0x1f,
+	0x92, 0x66, 0xf2, 0x6e, 0x72, 0x76, 0x7e, 0x7e, 0x01, 0x47, 0x01, 0x4f, 0x33, 0x37, 0x3f, 0x3f
+};
+
+
+static void safe_gets(char *buffer, size_t size)
+{
+#ifdef HAVE_FFLUSH
+	fflush(stdout);
+#endif
+
+#ifdef MONITOR_READLINE
+	{
+		char *got = readline("");
+		if (got) {
+			strncpy(buffer, got, size);
+			if (*got)
+				add_history(got);
+		}
+	}
+#else
+	fgets(buffer, size, stdin);
+#endif
+	Util_chomp(buffer);
+}
+
+static int pager(void)
+{
+	char buf[100];
+	printf("Press Return to continue ('q' to quit): ");
+	safe_gets(buf, sizeof(buf));
+	return buf[0] == 'q' || buf[0] == 'Q';
+}
+
+static char *token_ptr;
+
+static char *get_token(void)
+{
+	char *p = token_ptr;
+	while (*p == ' ')
+		p++;
+	if (*p == '\0')
+		return NULL;
+	token_ptr = p;
+	do {
+		token_ptr++;
+		if (*token_ptr == ' ') {
+			*token_ptr++ = '\0';
+			break;
+		}
+	} while (*token_ptr != '\0');
+	return p;
+}
+
+#if defined(MONITOR_BREAK) || !defined(NO_YPOS_BREAK_FLICKER)
+static int get_dec(int *decval)
+{
+	const char *t;
+	t = get_token();
+	if (t != NULL) {
+		int x = Util_sscandec(t);
+		if (x < 0)
+			return FALSE;
+		*decval = x;
+		return TRUE;
+	}
+	return FALSE;
+}
+#endif
+
+static int parse_hex(const char *s, UWORD *hexval)
+{
+	int x = Util_sscanhex(s);
+#ifdef MONITOR_HINTS
+	int y = find_label_value(s);
+	if (y >= 0) {
+		if (x < 0 || x > 0xffff || x == y) {
+			*hexval = (UWORD) y;
+			return TRUE;
+		}
+		/* s can be a hex number or a label name */
+		printf("%s is ambiguous. Use 0%X or %X instead.\n", s, x, y);
+		return FALSE;
+	}
+#endif
+	if (x < 0 || x > 0xffff)
+		return FALSE;
+	*hexval = (UWORD) x;
+	return TRUE;
+}
+
+static int get_hex(UWORD *hexval)
+{
+	const char *t;
+	t = get_token();
+	if (t != NULL)
+		return parse_hex(t, hexval);
+	return FALSE;
+}
+
+static int get_hex2(UWORD *hexval1, UWORD *hexval2)
+{
+	return get_hex(hexval1) && get_hex(hexval2);
+}
+
+static int get_hex3(UWORD *hexval1, UWORD *hexval2, UWORD *hexval3)
+{
+	return get_hex(hexval1) && get_hex(hexval2) && get_hex(hexval3);
+}
+
+static void get_uword(UWORD *val)
+{
+	if (!get_hex(val))
+		printf("Invalid argument!\n");
+}
+
+static void get_ubyte(UBYTE *val)
+{
+	UWORD uword;
+	if (!get_hex(&uword) || uword > 0xff)
+		printf("Invalid argument!\n");
+	else
+		*val = (UBYTE) uword;
+}
+
+static int get_bool(void)
+{
+	const char *t;
+	t = get_token();
+	if (t != NULL) {
+		int result = Util_sscanbool(t);
+		if (result >= 0)
+			return result;
+	}
+	printf("Invalid argument (should be 0 or 1)!\n");
+	return -1;
+}
+
+static int get_attrib_range(UWORD *addr1, UWORD *addr2)
+{
+	if (get_hex2(addr1, addr2) && *addr1 <= *addr2) {
+#ifdef PAGED_ATTRIB
+		if ((*addr1 & 0xff) != 0 || (*addr2 & 0xff) != 0xff) {
+			printf("This is PAGED_ATTRIB version of Atari800.\n"
+			       "You can only change attributes of full memory pages.\n");
+			return FALSE;
+		}
+#endif
+		return TRUE;
+	}
+	printf("Missing or bad argument!\n");
+	return FALSE;
+}
+
+static UWORD show_instruction(FILE *fp, UWORD pc)
+{
+	UWORD addr = pc;
+	UBYTE insn;
+	const char *mnemonic;
+	const char *p;
+	int value = 0;
+	int nchars = 0;
+
+	insn = MEMORY_dGetByte(pc++);
+	mnemonic = instr6502[insn];
+	for (p = mnemonic + 3; *p != '\0'; p++) {
+		if (*p == '1') {
+			value = MEMORY_dGetByte(pc++);
+			nchars = fprintf(fp, "%04X: %02X %02X     " /*"%Xcyc  "*/ "%.*s$%02X%s",
+			                 addr, insn, value, /*cycles[insn],*/ (int) (p - mnemonic), mnemonic, value, p + 1);
+			break;
+		}
+		if (*p == '2') {
+			value = MEMORY_dGetWord(pc);
+			nchars = fprintf(fp, "%04X: %02X %02X %02X  " /*"%Xcyc  "*/ "%.*s$%04X%s",
+			                 addr, insn, value & 0xff, value >> 8, /*cycles[insn],*/ (int) (p - mnemonic), mnemonic, value, p + 1);
+			pc += 2;
+			break;
+		}
+		if (*p == '0') {
+			UBYTE op = MEMORY_dGetByte(pc++);
+			value = (UWORD) (pc + (SBYTE) op);
+			nchars = fprintf(fp, "%04X: %02X %02X     " /*"3cyc  "*/ "%.4s$%04X", addr, insn, op, mnemonic, value);
+			break;
+		}
+	}
+	if (*p == '\0') {
+		fprintf(fp, "%04X: %02X        " /*"%Xcyc  "*/ "%s\n", addr, insn, /*cycles[insn],*/ mnemonic);
+		return pc;
+	}
+#ifdef MONITOR_HINTS
+	if (p[-1] != '#') {
+		/* different names when reading/writing memory */
+		const char *label = find_label_name((UWORD) value, (MONITOR_optype6502[insn] & 0x08) != 0);
+		if (label != NULL) {
+			fprintf(fp, "%*s;%s\n", 28 - nchars, "", label);
+			return pc;
+		}
+	}
+#endif
+	fputc('\n', fp);
+	return pc;
+}
+
+void MONITOR_ShowState(FILE *fp, UWORD pc, UBYTE a, UBYTE x, UBYTE y, UBYTE s,
+                char n, char v, char z, char c)
+{
+	fprintf(fp, "%3d %3d A=%02X X=%02X Y=%02X S=%02X P=%c%c*-%c%c%c%c PC=",
+		ANTIC_ypos, ANTIC_xpos, a, x, y, s,
+		n, v, (CPU_regP & CPU_D_FLAG) ? 'D' : '-', (CPU_regP & CPU_I_FLAG) ? 'I' : '-', z, c);
+	show_instruction(fp, pc);
+}
+
+static void show_state(void)
+{
+	MONITOR_ShowState(stdout, CPU_regPC, CPU_regA, CPU_regX, CPU_regY, CPU_regS,
+		(char) ((CPU_regP & CPU_N_FLAG) ? 'N' : '-'), (char) ((CPU_regP & CPU_V_FLAG) ? 'V' : '-'),
+		(char) ((CPU_regP & CPU_Z_FLAG) ? 'Z' : '-'), (char) ((CPU_regP & CPU_C_FLAG) ? 'C' : '-'));
+}
+
+static UWORD disassemble(UWORD addr)
+{
+	int count = 24;
+	do
+		addr = show_instruction(stdout, addr);
+	while (--count > 0);
+	return addr;
+}
+
+#ifdef MONITOR_ASSEMBLER
+static UWORD assembler(UWORD addr)
+{
+	printf("Simple assembler (enter empty line to exit)\n");
+	for (;;) {
+		char s[128];  /* input string */
+		char c[128];  /* converted input */
+		char *sp;     /* input pointer */
+		char *cp;     /* converted input pointer */
+		char *vp;     /* value pointer (the value is stored in s) */
+		char *tp;     /* type pointer (points at type character '0', '1' or '2' in converted input) */
+		int i;
+		int isa;      /* the operand is "A" */
+		UWORD value = 0;
+
+		printf("%04X: ", (int) addr);
+		safe_gets(s, sizeof(s));
+		if (s[0] == '\0')
+			return addr;
+
+		Util_strupper(s);
+
+		sp = s;
+		cp = c;
+		/* copy first three characters */
+		for (i = 0; i < 3 && *sp != '\0'; i++)
+			*cp++ = *sp++;
+		/* insert space before operands */
+		*cp++ = ' ';
+
+		tp = NULL;
+		isa = FALSE;
+
+		/* convert input to format of instr6502[] table */
+		while (*sp != '\0') {
+			switch (*sp) {
+			case ' ':
+			case '\t':
+			case '$':
+			case '@':
+				sp++;
+				break;
+			case '#':
+			case '(':
+			case ')':
+			case ',':
+				isa = FALSE;
+				*cp++ = *sp++;
+				break;
+			default:
+				if (tp != NULL) {
+					if (*sp == 'X' || *sp == 'Y') {
+						*cp++ = *sp++;
+						break;
+					}
+					goto invalid_instr;
+				}
+				vp = s;
+				do
+					*vp++ = *sp++;
+				while (strchr(" \t$@#(),", *sp) == NULL && *sp != '\0');
+				/* If *sp=='\0', strchr() should return non-NULL,
+				   but we do an extra check to be on safe side. */
+				*vp++ = '\0';
+				tp = cp++;
+				*tp = '0';
+				isa = (s[0] == 'A' && s[1] == '\0');
+				break;
+			}
+		}
+		if (cp[-1] == ' ')
+			cp--;    /* no arguments (e.g. NOP or ASL @) */
+		*cp = '\0';
+
+		/* if there's an operand, get its value */
+		if (tp != NULL && !parse_hex(s, &value)) {
+			printf("Invalid operand!\n");
+			continue;
+		}
+
+		for (;;) {
+			/* search table for instruction */
+			for (i = 0; i < 256; i++) {
+				if (strcmp(instr6502[i], c) == 0) {
+					if (tp == NULL) {
+						MEMORY_dPutByte(addr, (UBYTE) i);
+						addr++;
+					}
+					else if (*tp == '0') {
+						value -= (addr + 2);
+						if ((SWORD) value < -128 || (SWORD) value > 127)
+							printf("Branch out of range!\n");
+						else {
+							MEMORY_dPutByte(addr, (UBYTE) i);
+							addr++;
+							MEMORY_dPutByte(addr, (UBYTE) value);
+							addr++;
+						}
+					}
+					else if (*tp == '1') {
+						c[3] = '\0';
+						if (isa && (strcmp(c, "ASL") == 0 || strcmp(c, "LSR") == 0 ||
+						            strcmp(c, "ROL") == 0 || strcmp(c, "ROR") == 0)) {
+							printf("\"%s A\" is ambiguous.\n"
+							       "Use \"%s\" for accumulator mode or \"%s 0A\" for zeropage mode.\n", c, c, c);
+						}
+						else {
+							MEMORY_dPutByte(addr, (UBYTE) i);
+							addr++;
+							MEMORY_dPutByte(addr, (UBYTE) value);
+							addr++;
+						}
+					}
+					else { /* *tp == '2' */
+						MEMORY_dPutByte(addr, (UBYTE) i);
+						addr++;
+						MEMORY_dPutWord(addr, value);
+						addr += 2;
+					}
+					goto next_instr;
+				}
+			}
+			/* not found */
+			if (tp == NULL || *tp == '2')
+				break;
+			if (++*tp == '1' && value > 0xff)
+				*tp = '2';
+		}
+	invalid_instr:
+		printf("Invalid instruction!\n");
+	next_instr:
+		;
+	}
+}
+#endif /* MONITOR_ASSEMBLER */
+
+#ifdef MONITOR_BREAK
+UWORD MONITOR_break_addr = 0xd000;
+UBYTE MONITOR_break_step = FALSE;
+static UBYTE break_over = FALSE;
+UBYTE MONITOR_break_ret = FALSE;
+UBYTE MONITOR_break_brk = FALSE;
+int MONITOR_ret_nesting = 0;
+#endif
+
+#ifdef MONITOR_BREAKPOINTS
+
+MONITOR_breakpoint_cond MONITOR_breakpoint_table[MONITOR_BREAKPOINT_TABLE_MAX];
+int MONITOR_breakpoint_table_size = 0;
+int MONITOR_breakpoints_enabled = TRUE;
+
+static void breakpoint_print_flag(int flagmask)
+{
+	switch (flagmask) {
+	case CPU_N_FLAG:
+		putchar('N');
+		break;
+	case CPU_V_FLAG:
+		putchar('V');
+		break;
+	case CPU_D_FLAG:
+		putchar('D');
+		break;
+	case CPU_I_FLAG:
+		putchar('I');
+		break;
+	case CPU_Z_FLAG:
+		putchar('Z');
+		break;
+	case CPU_C_FLAG:
+		putchar('C');
+		break;
+	}
+}
+
+static int breakpoint_scan_flag(char c)
+{
+	switch (c) {
+	case 'N':
+		return CPU_N_FLAG;
+	case 'V':
+		return CPU_V_FLAG;
+	case 'D':
+		return CPU_D_FLAG;
+	case 'I':
+		return CPU_I_FLAG;
+	case 'Z':
+		return CPU_Z_FLAG;
+	case 'C':
+		return CPU_C_FLAG;
+	default:
+		return -1;
+	}
+}
+
+static void breakpoints_set(int enabled)
+{
+	int i;
+	if (get_dec(&i)) {
+		do {
+			if (/*i >= 0 &&*/ i < MONITOR_breakpoint_table_size)
+				MONITOR_breakpoint_table[i].enabled = (UBYTE) enabled;
+		} while (get_dec(&i));
+	}
+	else
+		MONITOR_breakpoints_enabled = enabled;
+}
+
+static void monitor_breakpoints(void)
+{
+	char *t = get_token();
+	if (t == NULL) {
+		int i;
+		if (MONITOR_breakpoint_table_size == 0) {
+			printf("No breakpoints defined\n");
+			return;
+		}
+		printf("Breakpoints are %sabled\n", MONITOR_breakpoints_enabled ? "en" : "dis");
+		for (i = 0; i < MONITOR_breakpoint_table_size; i++) {
+			printf("%2d: ", i);
+			if (!MONITOR_breakpoint_table[i].enabled)
+				printf("OFF ");
+			switch (MONITOR_breakpoint_table[i].condition) {
+			case MONITOR_BREAKPOINT_OR:
+				printf("OR");
+				break;
+			case MONITOR_BREAKPOINT_FLAG_CLEAR:
+				printf("CLR");
+				breakpoint_print_flag(MONITOR_breakpoint_table[i].value);
+				break;
+			case MONITOR_BREAKPOINT_FLAG_SET:
+				printf("SET");
+				breakpoint_print_flag(MONITOR_breakpoint_table[i].value);
+				break;
+			default:
+				{
+					const char *op;
+					switch (MONITOR_breakpoint_table[i].condition & 7) {
+					case MONITOR_BREAKPOINT_LESS:
+						op = "<";
+						break;
+					case MONITOR_BREAKPOINT_EQUAL:
+						op = "=";
+						break;
+					case MONITOR_BREAKPOINT_LESS | MONITOR_BREAKPOINT_EQUAL:
+						op = "<=";
+						break;
+					case MONITOR_BREAKPOINT_GREATER:
+						op = ">";
+						break;
+					case MONITOR_BREAKPOINT_GREATER | MONITOR_BREAKPOINT_EQUAL:
+						op = ">=";
+						break;
+					case MONITOR_BREAKPOINT_LESS | MONITOR_BREAKPOINT_GREATER:
+						op = "!=";
+						break;
+					default:
+						op = "?";
+						break;
+					}
+					switch (MONITOR_breakpoint_table[i].condition >> 3) {
+					case MONITOR_BREAKPOINT_PC >> 3:
+						printf("PC%s%04X", op, MONITOR_breakpoint_table[i].value);
+						break;
+					case MONITOR_BREAKPOINT_A >> 3:
+						printf("A%s%02X", op, MONITOR_breakpoint_table[i].value);
+						break;
+					case MONITOR_BREAKPOINT_X >> 3:
+						printf("X%s%02X", op, MONITOR_breakpoint_table[i].value);
+						break;
+					case MONITOR_BREAKPOINT_Y >> 3:
+						printf("A%s%02X", op, MONITOR_breakpoint_table[i].value);
+						break;
+					case MONITOR_BREAKPOINT_S >> 3:
+						printf("S%s%02X", op, MONITOR_breakpoint_table[i].value);
+						break;
+					case MONITOR_BREAKPOINT_READ >> 3:
+						printf("READ%s%04X", op, MONITOR_breakpoint_table[i].value);
+						break;
+					case MONITOR_BREAKPOINT_WRITE >> 3:
+						printf("WRITE%s%04X", op, MONITOR_breakpoint_table[i].value);
+						break;
+					case MONITOR_BREAKPOINT_ACCESS >> 3:
+						printf("ACCESS%s%04X", op, MONITOR_breakpoint_table[i].value);
+						break;
+					default:
+						printf("???");
+						break;
+					}
+				}
+			}
+			putchar('\n');
+		}
+		return;
+	}
+	if (strcmp(t, "?") == 0) {
+		printf(
+			"B                - print breakpoint table\n"
+			"B ?              - this help\n"
+			"B C              - clear breakpoint table\n"
+			"B D pos          - delete one entry\n"
+			"B ON             - enable breakpoints\n"
+			"B OFF            - disable breakpoints\n"
+			"B ON pos1...     - enable specified breakpoints\n"
+			"B OFF pos1...    - disable specified breakpoints\n"
+			"B [pos] cond1... - insert breakpoints (at the specified position)\n"
+			"    cond is: TYPE OPERATOR VALUE (without spaces)\n"
+			"         or: SETFLAG, CLRFLAG where FLAG is: N, V, D, I, Z, C\n");
+		printf(
+			"    TYPE is: PC, A, X, Y, S, READ, WRITE, ACCESS (read or write)\n"
+			"OPERATOR is: <, <=, =, ==, >, >=, !=, <>\n"
+			"   VALUE is a hex number\n"
+			"Breakpoint conditions are connected by AND operator\n"
+			"unless you explicitly use OR.\n"
+			"Examples:\n"
+			"B PC>=203f A<3a OR PC=3a7f X<>0 - creates 5 new entries\n"
+			"B 2 Y<5                         - adds a new entry at position 2\n"
+			"B D 1                           - deletes the entry at position 1\n"
+			"B OR SETD                       - appends 2 new entries\n");
+		return;
+	}
+	Util_strupper(t);
+	if (strcmp(t, "C") == 0) {
+		MONITOR_breakpoint_table_size = 0;
+		printf("Breakpoint table cleared\n");
+	}
+	else if (strcmp(t, "D") == 0) {
+		int i;
+		if (get_dec(&i) && /*i >= 0 &&*/ i < MONITOR_breakpoint_table_size) {
+			MONITOR_breakpoint_table_size--;
+			while (i < MONITOR_breakpoint_table_size) {
+				MONITOR_breakpoint_table[i] = MONITOR_breakpoint_table[i + 1];
+				i++;
+			}
+			printf("Entry deleted\n");
+		}
+		else
+			printf("Missing or bad argument\n");
+	}
+	else if (strcmp(t, "ON") == 0) {
+		breakpoints_set(TRUE);
+	}
+	else if (strcmp(t, "OFF") == 0) {
+		breakpoints_set(FALSE);
+	}
+	else {
+		int i;
+		if (t[0] >= '0' && t[0] <= '9') {
+			i = Util_sscandec(t);
+			if (i < 0 || i > MONITOR_breakpoint_table_size) {
+				printf("Bad argument\n");
+				return;
+			}
+			t = get_token();
+			if (t == NULL) {
+				printf("Missing arguments\n");
+				return;
+			}
+		}
+		else
+			i = MONITOR_breakpoint_table_size;
+		while (MONITOR_breakpoint_table_size < MONITOR_BREAKPOINT_TABLE_MAX) {
+			UBYTE condition;
+			int value;
+			int j;
+			if (strcmp(t, "OR") == 0) {
+				condition = MONITOR_BREAKPOINT_OR;
+				value = 0;
+			}
+			else if (strncmp(t, "CLR", 3) == 0) {
+				condition = MONITOR_BREAKPOINT_FLAG_CLEAR;
+				value = breakpoint_scan_flag(t[3]);
+			}
+			else if (strncmp(t, "SET", 3) == 0) {
+				condition = MONITOR_BREAKPOINT_FLAG_SET;
+				value = breakpoint_scan_flag(t[3]);
+			}
+			else {
+				condition = 0;
+				switch (t[0]) {
+				case 'A':
+					if (strncmp(t, "ACCESS", 6) == 0) {
+						condition = MONITOR_BREAKPOINT_ACCESS;
+						t += 6;
+					}
+					else {
+						condition = MONITOR_BREAKPOINT_A;
+						t++;
+					}
+					break;
+				case 'X':
+					condition = MONITOR_BREAKPOINT_X;
+					t++;
+					break;
+				case 'Y':
+					condition = MONITOR_BREAKPOINT_Y;
+					t++;
+					break;
+				case 'P':
+					if (t[1] == 'C') {
+						condition = MONITOR_BREAKPOINT_PC;
+						t += 2;
+					}
+					break;
+				case 'R':
+					if (strncmp(t, "READ", 4) == 0) {
+						condition = MONITOR_BREAKPOINT_READ;
+						t += 4;
+					}
+					break;
+				case 'S':
+					condition = MONITOR_BREAKPOINT_S;
+					t++;
+					break;
+				case 'W':
+					if (strncmp(t, "WRITE", 5) == 0) {
+						condition = MONITOR_BREAKPOINT_WRITE;
+						t += 5;
+					}
+					break;
+				default:
+					break;
+				}
+				if (t[0] == '!' && t[1] == '=') {
+					condition += MONITOR_BREAKPOINT_LESS | MONITOR_BREAKPOINT_GREATER;
+					t += 2;
+				}
+				else {
+					if (*t == '<') {
+						condition += MONITOR_BREAKPOINT_LESS;
+						t++;
+					}
+					if (*t == '>') {
+						condition += MONITOR_BREAKPOINT_GREATER;
+						t++;
+					}
+					if (*t == '=') {
+						condition += MONITOR_BREAKPOINT_EQUAL;
+						t++;
+						if (*t == '=')
+							t++;
+					}
+				}
+				if ((condition >> 3) == 0 || (condition & 7) == 0) {
+					printf("Bad argument\n");
+					return;
+				}
+				{
+					UWORD tmp;
+					if (parse_hex(t, &tmp))
+						value = tmp;
+					else
+						value = -1;
+				}
+			}
+			if (value < 0 || value > 0xffff) {
+				printf("Bad argument\n");
+				return;
+			}
+			for (j = MONITOR_breakpoint_table_size; j > i; j--)
+				MONITOR_breakpoint_table[j] = MONITOR_breakpoint_table[j - 1];
+			MONITOR_breakpoint_table[i].enabled = TRUE;
+			MONITOR_breakpoint_table[i].condition = condition;
+			MONITOR_breakpoint_table[i].value = (UWORD) value;
+			i++;
+			MONITOR_breakpoint_table_size++;
+			t = get_token();
+			if (t == NULL) {
+				printf("Breakpoint(s) added\n");
+				return;
+			}
+			Util_strupper(t);
+		}
+		printf("Breakpoint table full\n");
+	}
+}
+
+#endif /* MONITOR_BREAKPOINTS */
+
+int MONITOR_Run(void)
+{
+	UWORD addr;
+
+#ifdef __PLUS
+	if (!Misc_AllocMonitorConsole(&mon_output, &mon_input))
+		return TRUE;
+#endif
+
+	addr = CPU_regPC;
+
+	CPU_GetStatus();
+
+	if (CPU_cim_encountered) {
+		printf("(CIM encountered)\n");
+		CPU_cim_encountered = FALSE;
+	}
+
+#ifdef MONITOR_BREAK
+	if (break_over) {
+		/* "O" command was active */
+		MONITOR_break_addr = 0xd000;
+		break_over = FALSE;
+	}
+	else if (CPU_regPC == MONITOR_break_addr)
+		printf("(breakpoint at %04X)\n", (unsigned int) MONITOR_break_addr);
+	else if (ANTIC_ypos == ANTIC_break_ypos)
+		printf("(breakpoint at scanline %d)\n", ANTIC_break_ypos);
+	else if (MONITOR_break_ret && MONITOR_ret_nesting <= 0)
+		printf("(returned)\n");
+	MONITOR_break_step = FALSE;
+	MONITOR_break_ret = FALSE;
+#endif /* MONITOR_BREAK */
+
+	show_state();
+
+	for (;;) {
+		char s[128];
+		static char old_s[128] = "";
+		char *t;
+
+		printf("> ");
+		safe_gets(s, sizeof(s));
+		if (s[0] != '\0')
+			strcpy(old_s, s);
+		else {
+			/* if no command is given, restart the last one, but remove all
+			 * arguments, so after a 'm 600' we will see 'm 700' ... */
+			int i;
+			strcpy(s, old_s);
+			for (i = 0; i < (int) sizeof(s); i++)
+				if (s[i] == ' ') {
+					s[i] = '\0';
+					break;
+				}
+		}
+#ifdef HAVE_SYSTEM
+		if (s[0] == '!') {
+			system(s + 1);
+			continue;
+		}
+#endif
+		token_ptr = s;
+		t = get_token();
+		if (t == NULL)
+			continue;
+
+		/* uppercase the command */
+		Util_strupper(t);
+
+		if (strcmp(t, "CONT") == 0) {
+#ifdef MONITOR_PROFILE
+			memset(CPU_instruction_count, 0, sizeof(CPU_instruction_count));
+#endif
+			PLUS_EXIT_MONITOR;
+			return TRUE;
+		}
+#ifdef MONITOR_BREAK
+		else if (strcmp(t, "BBRK") == 0) {
+			t = get_token();
+			if (t == NULL)
+				printf("Break on BRK is %sabled\n", MONITOR_break_brk ? "en" : "dis");
+			else if (Util_stricmp(t, "ON") == 0)
+				MONITOR_break_brk = TRUE;
+			else if (Util_stricmp(t, "OFF") == 0)
+				MONITOR_break_brk = FALSE;
+			else
+				printf("Invalid argument. Usage: BBRK ON or OFF\n");
+		}
+		else if (strcmp(t, "BPC") == 0) {
+			get_hex(&MONITOR_break_addr);
+			if (MONITOR_break_addr >= 0xd000 && MONITOR_break_addr <= 0xd7ff)
+				printf("PC breakpoint disabled\n");
+			else
+				printf("Breakpoint at PC=%04X\n", MONITOR_break_addr);
+		}
+		else if (strcmp(t, "HISTORY") == 0 || strcmp(t, "H") == 0) {
+			int i;
+			for (i = 0; i < CPU_REMEMBER_PC_STEPS; i++) {
+				int j;
+				j = CPU_remember_xpos[(CPU_remember_PC_curpos + i) % CPU_REMEMBER_PC_STEPS];
+				printf("%3d %3d ", j >> 8, j & 0xff);
+				show_instruction(stdout, CPU_remember_PC[(CPU_remember_PC_curpos + i) % CPU_REMEMBER_PC_STEPS]);
+			}
+		}
+		else if (strcmp(t, "JUMPS") == 0) {
+			int i;
+			for (i = 0; i < CPU_REMEMBER_JMP_STEPS; i++)
+				show_instruction(stdout, CPU_remember_JMP[(CPU_remember_jmp_curpos + i) % CPU_REMEMBER_JMP_STEPS]);
+		}
+#endif
+#if defined(MONITOR_BREAK) || !defined(NO_YPOS_BREAK_FLICKER)
+		else if (strcmp(t, "BLINE") == 0) {
+			get_dec(&ANTIC_break_ypos);
+			if (ANTIC_break_ypos >= 1008 && ANTIC_break_ypos <= 1247)
+				printf("Blinking scanline %d\n", ANTIC_break_ypos - 1000);
+#ifdef MONITOR_BREAK
+			else if (ANTIC_break_ypos >= 0 && ANTIC_break_ypos <= 311)
+				printf("Breakpoint set at scanline %d\n", ANTIC_break_ypos);
+#endif
+			else
+				printf("BLINE disabled\n");
+		}
+#endif
+		else if (strcmp(t, "DLIST") == 0) {
+#if 0
+/* one instruction per line */
+			UWORD tdlist = dlist;
+			int nlines = 0;
+			get_hex(&tdlist);
+			for (;;) {
+				UBYTE IR;
+
+				printf("%04X: ", tdlist);
+				IR = ANTIC_GetDLByte(&tdlist);
+
+				if (IR & 0x80)
+					printf("DLI ");
+
+				if ((IR & 0x0f) == 0)
+					printf("%c BLANK\n", ((IR >> 4) & 0x07) + '1');
+				else if ((IR & 0x0f) == 1) {
+					tdlist = ANTIC_GetDLWord(&tdlist);
+					if (IR & 0x40) {
+						printf("JVB %04X\n", tdlist);
+						break;
+					}
+					printf("JMP %04X\n", tdlist);
+				}
+				else {
+					if (IR & 0x40)
+						printf("LMS %04X ", ANTIC_GetDLWord(&tdlist));
+					if (IR & 0x20)
+						printf("VSCROL ");
+					if (IR & 0x10)
+						printf("HSCROL ");
+					printf("MODE %X\n", IR & 0x0f);
+				}
+
+				if (++nlines == 24) {
+					if (pager())
+						break;
+					nlines = 0;
+				}
+			}
+#else
+/* group identical instructions */
+			UWORD tdlist = ANTIC_dlist;
+			UWORD new_tdlist;
+			UBYTE IR;
+			int scrnaddr = -1;
+			int nlines = 0;
+			get_hex(&tdlist);
+			new_tdlist = tdlist;
+			IR = ANTIC_GetDLByte(&new_tdlist);
+			for (;;) {
+				printf("%04X: ", tdlist);
+				if ((IR & 0x0f) == 0) {
+					UBYTE new_IR;
+					tdlist = new_tdlist;
+					new_IR = ANTIC_GetDLByte(&new_tdlist);
+					if (new_IR == IR) {
+						int count = 1;
+						do {
+							count++;
+							tdlist = new_tdlist;
+							new_IR = ANTIC_GetDLByte(&new_tdlist);
+						} while (new_IR == IR && count < 240);
+						printf("%dx ", count);
+					}
+					if (IR & 0x80)
+						printf("DLI ");
+					printf("%c BLANK\n", ((IR >> 4) & 0x07) + '1');
+					IR = new_IR;
+				}
+				else if ((IR & 0x0f) == 1) {
+					tdlist = ANTIC_GetDLWord(&new_tdlist);
+					if (IR & 0x80)
+						printf("DLI ");
+					if (IR & 0x40) {
+						printf("JVB %04X\n", tdlist);
+						break;
+					}
+					printf("JMP %04X\n", tdlist);
+					new_tdlist = tdlist;
+					IR = ANTIC_GetDLByte(&new_tdlist);
+				}
+				else {
+					UBYTE new_IR;
+					int new_scrnaddr;
+					int count;
+					if ((IR & 0x40) && scrnaddr < 0)
+						scrnaddr = ANTIC_GetDLWord(&new_tdlist);
+					for (count = 1; ; count++) {
+						tdlist = new_tdlist;
+						new_IR = ANTIC_GetDLByte(&new_tdlist);
+						if (new_IR != IR || count >= 240) {
+							new_scrnaddr = -1;
+							break;
+						}
+						if (IR & 0x40) {
+							new_scrnaddr = ANTIC_GetDLWord(&new_tdlist);
+							if (new_scrnaddr != scrnaddr)
+								break;
+						}
+					}
+					if (count > 1)
+						printf("%dx ", count);
+					if (IR & 0x80)
+						printf("DLI ");
+					if (IR & 0x40)
+						printf("LMS %04X ", scrnaddr);
+					if (IR & 0x20)
+						printf("VSCROL ");
+					if (IR & 0x10)
+						printf("HSCROL ");
+					printf("MODE %X\n", IR & 0x0f);
+					scrnaddr = new_scrnaddr;
+					IR = new_IR;
+				}
+
+				if (++nlines == 24) {
+					if (pager())
+						break;
+					nlines = 0;
+				}
+			}
+#endif
+		}
+		else if (strcmp(t, "SETPC") == 0)
+			get_uword(&CPU_regPC);
+		else if (strcmp(t, "SETS") == 0)
+			get_ubyte(&CPU_regS);
+		else if (strcmp(t, "SETA") == 0)
+			get_ubyte(&CPU_regA);
+		else if (strcmp(t, "SETX") == 0)
+			get_ubyte(&CPU_regX);
+		else if (strcmp(t, "SETY") == 0)
+			get_ubyte(&CPU_regY);
+		else if (strcmp(t, "SETN") == 0) {
+			int val = get_bool();
+			if (val == 0)
+				CPU_ClrN;
+			else if (val == 1)
+				CPU_SetN;
+		}
+		else if (strcmp(t, "SETV") == 0) {
+			int val = get_bool();
+			if (val == 0)
+				CPU_ClrV;
+			else if (val == 1)
+				CPU_SetV;
+		}
+		else if (strcmp(t, "SETD") == 0) {
+			int val = get_bool();
+			if (val == 0)
+				CPU_ClrD;
+			else if (val == 1)
+				CPU_SetD;
+		}
+		else if (strcmp(t, "SETI") == 0) {
+			int val = get_bool();
+			if (val == 0)
+				CPU_ClrI;
+			else if (val == 1)
+				CPU_SetI;
+		}
+		else if (strcmp(t, "SETZ") == 0) {
+			int val = get_bool();
+			if (val == 0)
+				CPU_ClrZ;
+			else if (val == 1)
+				CPU_SetZ;
+		}
+		else if (strcmp(t, "SETC") == 0) {
+			int val = get_bool();
+			if (val == 0)
+				CPU_ClrC;
+			else if (val == 1)
+				CPU_SetC;
+		}
+#ifdef MONITOR_TRACE
+		else if (strcmp(t, "TRACE") == 0) {
+			const char *filename = get_token();
+			if (MONITOR_trace_file != NULL) {
+				fclose(MONITOR_trace_file);
+				printf("Trace file closed\n");
+				MONITOR_trace_file = NULL;
+			}
+			if (filename != NULL) {
+				MONITOR_trace_file = fopen(filename, "w");
+				if (MONITOR_trace_file != NULL)
+					printf("Trace file open\n");
+				else
+					perror(filename);
+			}
+		}
+#endif /* MONITOR_TRACE */
+#ifdef MONITOR_PROFILE
+		else if (strcmp(t, "PROFILE") == 0) {
+			int i;
+			for (i = 0; i < 24; i++) {
+				int max, instr;
+				int j;
+				max = CPU_instruction_count[0];
+				instr = 0;
+				for (j = 1; j < 256; j++) {
+					if (CPU_instruction_count[j] > max) {
+						max = CPU_instruction_count[j];
+						instr = j;
+					}
+				}
+				if (max <= 0)
+					break;
+				CPU_instruction_count[instr] = 0;
+				printf("Opcode %02X: %-9s has been executed %d times\n",
+					   instr, instr6502[instr], max);
+			}
+		}
+#endif /* MONITOR_PROFILE */
+		else if (strcmp(t, "SHOW") == 0)
+			show_state();
+		else if (strcmp(t, "STACK") == 0) {
+			int ts;
+			for (ts = 0x101 + CPU_regS; ts < 0x200; ) {
+				if (ts < 0x1ff) {
+					UWORD ta = (UWORD) (MEMORY_dGetWord(ts) - 2);
+					if (MEMORY_dGetByte(ta) == 0x20) {
+						printf("%04X: %02X %02X  %04X: JSR %04X\n",
+							ts, MEMORY_dGetByte(ts), MEMORY_dGetByte(ts + 1), ta,
+							MEMORY_dGetWord(ta + 1));
+						ts += 2;
+						continue;
+					}
+				}
+				printf("%04X: %02X\n", ts, MEMORY_dGetByte(ts));
+				ts++;
+			}
+		}
+		else if (strcmp(t, "ROM") == 0) {
+			UWORD addr1;
+			UWORD addr2;
+			if (get_attrib_range(&addr1, &addr2)) {
+				MEMORY_SetROM(addr1, addr2);
+				printf("Changed memory from %04X to %04X into ROM\n",
+					   addr1, addr2);
+			}
+		}
+		else if (strcmp(t, "RAM") == 0) {
+			UWORD addr1;
+			UWORD addr2;
+			if (get_attrib_range(&addr1, &addr2)) {
+				MEMORY_SetRAM(addr1, addr2);
+				printf("Changed memory from %04X to %04X into RAM\n",
+					   addr1, addr2);
+			}
+		}
+#ifndef PAGED_ATTRIB
+		else if (strcmp(t, "HARDWARE") == 0) {
+			UWORD addr1;
+			UWORD addr2;
+			if (get_attrib_range(&addr1, &addr2)) {
+				MEMORY_SetHARDWARE(addr1, addr2);
+				printf("Changed memory from %04X to %04X into HARDWARE\n",
+					   addr1, addr2);
+			}
+		}
+#endif
+		else if (strcmp(t, "COLDSTART") == 0) {
+			Atari800_Coldstart();
+			PLUS_EXIT_MONITOR;
+			return TRUE;	/* perform reboot immediately */
+		}
+		else if (strcmp(t, "WARMSTART") == 0) {
+			Atari800_Warmstart();
+			PLUS_EXIT_MONITOR;
+			return TRUE;	/* perform reboot immediately */
+		}
+#ifndef PAGED_MEM
+		else if (strcmp(t, "READ") == 0) {
+			const char *filename;
+			filename = get_token();
+			if (filename != NULL) {
+				UWORD nbytes;
+				if (get_hex2(&addr, &nbytes) && addr + nbytes <= 0x10000) {
+					FILE *f = fopen(filename, "rb");
+					if (f == NULL)
+						perror(filename);
+					else {
+						if (fread(&MEMORY_mem[addr], 1, nbytes, f) == 0)
+							perror(filename);
+						fclose(f);
+					}
+				}
+			}
+		}
+		else if (strcmp(t, "WRITE") == 0) {
+			UWORD addr1;
+			UWORD addr2;
+			if (get_hex2(&addr1, &addr2) && addr1 <= addr2) {
+				const char *filename;
+				FILE *f;
+				filename = get_token();
+				if (filename == NULL)
+					filename = "memdump.dat";
+				f = fopen(filename, "wb");
+				if (f == NULL)
+					perror(filename);
+				else {
+					size_t nbytes = addr2 - addr1 + 1;
+					if (fwrite(&MEMORY_mem[addr1], 1, addr2 - addr1 + 1, f) < nbytes)
+						perror(filename);
+					fclose(f);
+				}
+			}
+		}
+#endif
+		else if (strcmp(t, "SUM") == 0) {
+			UWORD addr1;
+			UWORD addr2;
+			if (get_hex2(&addr1, &addr2)) {
+				int sum = 0;
+				int i;
+				for (i = addr1; i <= addr2; i++)
+					sum += MEMORY_dGetByte(i);
+				printf("SUM: %X\n", sum);
+			}
+		}
+		else if (strcmp(t, "M") == 0) {
+			int count = 16;
+			get_hex(&addr);
+			do {
+				int i;
+				printf("%04X: ", addr);
+				for (i = 0; i < 16; i++)
+					printf("%02X ", MEMORY_GetByte((UWORD) (addr + i)));
+				putchar(' ');
+				for (i = 0; i < 16; i++) {
+					UBYTE c;
+					c = MEMORY_GetByte(addr);
+					addr++;
+					putchar((c >= ' ' && c <= 'z' && c != '\x60') ? c : '.');
+				}
+				putchar('\n');
+			} while (--count > 0);
+		}
+#ifndef PAGED_MEM
+		else if (strcmp(t, "F") == 0) {
+			UWORD addr1;
+			UWORD addr2;
+			UWORD hexval;
+			if (get_hex3(&addr1, &addr2, &hexval)) {
+				/* use int to avoid endless loop with addr2==0xffff */
+				int a;
+				for (a = addr1; a <= addr2; a++)
+					MEMORY_dPutByte(a, (UBYTE) hexval);
+			}
+		}
+#endif
+		else if (strcmp(t, "S") == 0) {
+			/* static, so "S" without arguments repeats last search */
+			static int n = 0;
+			static UWORD addr1;
+			static UWORD addr2;
+			static UBYTE tab[64];
+			UWORD hexval;
+			if (get_hex3(&addr1, &addr2, &hexval)) {
+				n = 0;
+				do {
+					tab[n++] = (UBYTE) hexval;
+					if (hexval > 0xff && n < 64)
+						tab[n++] = (UBYTE) (hexval >> 8);
+				} while (n < 64 && get_hex(&hexval));
+			}
+			if (n > 0) {
+				int a;
+				for (a = addr1; a <= addr2; a++) {
+					int i = 0;
+					while (MEMORY_GetByte((UWORD) (a + i)) == tab[i]) {
+						i++;
+						if (i >= n) {
+							printf("Found at %04X\n", a);
+							break;
+						}
+					}
+				}
+			}
+		}
+#ifndef PAGED_MEM
+		else if (strcmp(t, "C") == 0) {
+			UWORD temp = 0;
+			get_hex(&addr);
+			while (get_hex(&temp)) {
+#ifdef PAGED_ATTRIB
+				if (MEMORY_writemap[addr >> 8] != NULL && MEMORY_writemap[addr >> 8] != MEMORY_ROM_PutByte)
+					(*MEMORY_writemap[addr >> 8])(addr, (UBYTE) temp);
+#else
+				if (MEMORY_attrib[addr] == MEMORY_HARDWARE)
+					MEMORY_HwPutByte(addr, (UBYTE) temp);
+#endif
+				else /* RAM, ROM */
+					MEMORY_dPutByte(addr, (UBYTE) temp);
+				addr++;
+				if (temp > 0xff) {
+#ifdef PAGED_ATTRIB
+					if (MEMORY_writemap[addr >> 8] != NULL && MEMORY_writemap[addr >> 8] != MEMORY_ROM_PutByte)
+						(*MEMORY_writemap[addr >> 8])(addr, (UBYTE) (temp >> 8));
+#else
+					if (MEMORY_attrib[addr] == MEMORY_HARDWARE)
+						MEMORY_HwPutByte(addr, (UBYTE) (temp >> 8));
+#endif
+					else /* RAM, ROM */
+						MEMORY_dPutByte(addr, (UBYTE) (temp >> 8));
+					addr++;
+				}
+			}
+		}
+#endif
+#ifdef MONITOR_BREAK
+		else if (strcmp(t, "G") == 0) {
+			MONITOR_break_step = TRUE;
+			PLUS_EXIT_MONITOR;
+			return TRUE;
+		}
+		else if (strcmp(t, "R") == 0 ) {
+			MONITOR_break_ret = TRUE;
+			MONITOR_ret_nesting = 1;
+			PLUS_EXIT_MONITOR;
+			return TRUE;
+		}
+		else if (strcmp(t, "O") == 0) {
+			UBYTE opcode = MEMORY_dGetByte(CPU_regPC);
+			if ((opcode & 0x1f) == 0x10 || opcode == 0x20) {
+				/* branch or JSR: set breakpoint after it */
+				MONITOR_break_addr = CPU_regPC + (MONITOR_optype6502[MEMORY_dGetByte(CPU_regPC)] & 0x3);
+				break_over = TRUE;
+			}
+			else
+				MONITOR_break_step = TRUE;
+			PLUS_EXIT_MONITOR;
+			return TRUE;
+		}
+#endif /* MONITOR_BREAK */
+#ifdef MONITOR_BREAKPOINTS
+		else if (strcmp(t, "B") == 0)
+			monitor_breakpoints();
+#endif
+		else if (strcmp(t, "D") == 0) {
+			get_hex(&addr);
+			addr = disassemble(addr);
+		}
+		else if (strcmp(t, "LOOP") == 0) {
+			int caddr;
+			get_hex(&addr);
+			caddr = addr;
+			for (;;) {
+				UBYTE opcode;
+				if (caddr > (UWORD) (addr + 0x7e)) {
+					printf("Conditional loop containing instruction at %04X not detected\n", addr);
+					break;
+				}
+				opcode = MEMORY_dGetByte(caddr);
+				if ((opcode & 0x1f) == 0x10) {
+					/* branch */
+					UWORD target = caddr + 2 + (SBYTE) MEMORY_dGetByte(caddr + 1);
+					if (target <= addr) {
+						addr = disassemble(target);
+						break;
+					}
+				}
+				caddr += MONITOR_optype6502[opcode] & 3;
+			}
+		}
+#ifdef MONITOR_HINTS
+		else if (strcmp(t, "LABELS") == 0) {
+			char *cmd = get_token();
+			if (cmd == NULL) {
+				printf("Built-in labels are %sabled.\n", symtable_builtin_enable ? "en" : "dis");
+				if (symtable_user_size > 0)
+					printf("Using %d user-defined label%s.\n",
+						symtable_user_size, (symtable_user_size > 1) ? "s" : "");
+				else
+					printf("There are no user-defined labels.\n");
+				printf(
+					"Labels are displayed in disassembly listings.\n"
+					"You may also use them as command arguments"
+#ifdef MONITOR_ASSEMBLER
+						" and in the built-in assembler"
+#endif
+						".\n"
+					"Usage:\n"
+					"LABELS OFF            - no labels\n"
+					"LABELS BUILTIN        - use only built-in labels\n"
+					"LABELS LOAD filename  - use only labels loaded from file\n"
+					"LABELS ADD filename   - use built-in and loaded labels\n"
+					"LABELS SET name value - define a label\n"
+					"LABELS LIST           - list user-defined labels\n"
+				);
+			}
+			else {
+				Util_strupper(cmd);
+				if (strcmp(cmd, "OFF") == 0) {
+					symtable_builtin_enable = FALSE;
+					free_user_labels();
+				}
+				else if (strcmp(cmd, "BUILTIN") == 0) {
+					symtable_builtin_enable = TRUE;
+					free_user_labels();
+				}
+				else if (strcmp(cmd, "LOAD") == 0) {
+					symtable_builtin_enable = FALSE;
+					load_user_labels(get_token());
+				}
+				else if (strcmp(cmd, "ADD") == 0) {
+					symtable_builtin_enable = TRUE;
+					load_user_labels(get_token());
+				}
+				else if (strcmp(cmd, "SET") == 0) {
+					const char *name = get_token();
+					if (name != NULL && get_hex(&addr)) {
+						symtable_rec *p = find_user_label(name);
+						if (p != NULL) {
+							if (p->addr != addr) {
+								printf("%s redefined (previous value: %04X)\n", name, p->addr);
+								p->addr = addr;
+							}
+						}
+						else
+							add_user_label(name, addr);
+					}
+					else
+						printf("Missing or bad arguments\n");
+				}
+				else if (strcmp(cmd, "LIST") == 0) {
+					int i;
+					int nlines = 0;
+					for (i = 0; i < symtable_user_size; i++) {
+						if (++nlines == 24) {
+							if (pager())
+								break;
+							nlines = 0;
+						}
+						printf("%04X %s\n", symtable_user[i].addr, symtable_user[i].name);
+					}
+				}
+				else
+					printf("Invalid command, type \"LABELS\" for help\n");
+			}
+		}
+#endif
+		else if (strcmp(t, "ANTIC") == 0) {
+			printf("DMACTL=%02X    CHACTL=%02X    DLISTL=%02X    "
+				   "DLISTH=%02X    HSCROL=%02X    VSCROL=%02X\n",
+				   ANTIC_DMACTL, ANTIC_CHACTL, ANTIC_dlist & 0xff, ANTIC_dlist >> 8, ANTIC_HSCROL, ANTIC_VSCROL);
+			printf("PMBASE=%02X    CHBASE=%02X    VCOUNT=%02X    "
+				   "NMIEN= %02X    ypos=%4d\n",
+				   ANTIC_PMBASE, ANTIC_CHBASE, ANTIC_GetByte(ANTIC_OFFSET_VCOUNT), ANTIC_NMIEN, ANTIC_ypos);
+		}
+		else if (strcmp(t, "PIA") == 0) {
+			printf("PACTL= %02X    PBCTL= %02X    PORTA= %02X    "
+				   "PORTB= %02X\n", PIA_PACTL, PIA_PBCTL, PIA_PORTA, PIA_PORTB);
+		}
+		else if (strcmp(t, "GTIA") == 0) {
+			printf("HPOSP0=%02X    HPOSP1=%02X    HPOSP2=%02X    HPOSP3=%02X\n",
+				   GTIA_HPOSP0, GTIA_HPOSP1, GTIA_HPOSP2, GTIA_HPOSP3);
+			printf("HPOSM0=%02X    HPOSM1=%02X    HPOSM2=%02X    HPOSM3=%02X\n",
+				   GTIA_HPOSM0, GTIA_HPOSM1, GTIA_HPOSM2, GTIA_HPOSM3);
+			printf("SIZEP0=%02X    SIZEP1=%02X    SIZEP2=%02X    SIZEP3=%02X    SIZEM= %02X\n",
+				   GTIA_SIZEP0, GTIA_SIZEP1, GTIA_SIZEP2, GTIA_SIZEP3, GTIA_SIZEM);
+			printf("GRAFP0=%02X    GRAFP1=%02X    GRAFP2=%02X    GRAFP3=%02X    GRAFM= %02X\n",
+				   GTIA_GRAFP0, GTIA_GRAFP1, GTIA_GRAFP2, GTIA_GRAFP3, GTIA_GRAFM);
+			printf("COLPM0=%02X    COLPM1=%02X    COLPM2=%02X    COLPM3=%02X\n",
+				   GTIA_COLPM0, GTIA_COLPM1, GTIA_COLPM2, GTIA_COLPM3);
+			printf("COLPF0=%02X    COLPF1=%02X    COLPF2=%02X    COLPF3=%02X    COLBK= %02X\n",
+				   GTIA_COLPF0, GTIA_COLPF1, GTIA_COLPF2, GTIA_COLPF3, GTIA_COLBK);
+			printf("PRIOR= %02X    VDELAY=%02X    GRACTL=%02X\n",
+				   GTIA_PRIOR, GTIA_VDELAY, GTIA_GRACTL);
+		}
+		else if (strcmp(t, "POKEY") == 0) {
+			printf("AUDF1= %02X    AUDF2= %02X    AUDF3= %02X    AUDF4= %02X    AUDCTL=%02X    KBCODE=%02X\n",
+				   POKEY_AUDF[POKEY_CHAN1], POKEY_AUDF[POKEY_CHAN2], POKEY_AUDF[POKEY_CHAN3], POKEY_AUDF[POKEY_CHAN4], POKEY_AUDCTL[0], POKEY_KBCODE);
+			printf("AUDC1= %02X    AUDC2= %02X    AUDC3= %02X    AUDC4= %02X    IRQEN= %02X    IRQST= %02X\n",
+				   POKEY_AUDC[POKEY_CHAN1], POKEY_AUDC[POKEY_CHAN2], POKEY_AUDC[POKEY_CHAN3], POKEY_AUDC[POKEY_CHAN4], POKEY_IRQEN, POKEY_IRQST);
+			printf("SKSTAT=%02X    SKCTL= %02X\n", POKEY_SKSTAT, POKEY_SKCTL);
+#ifdef STEREO_SOUND
+			if (POKEYSND_stereo_enabled) {
+				printf("Second chip:\n");
+				printf("AUDF1= %02X    AUDF2= %02X    AUDF3= %02X    AUDF4= %02X    AUDCTL=%02X\n",
+					   POKEY_AUDF[POKEY_CHAN1 + POKEY_CHIP2], POKEY_AUDF[POKEY_CHAN2 + POKEY_CHIP2], POKEY_AUDF[POKEY_CHAN3 + POKEY_CHIP2], POKEY_AUDF[POKEY_CHAN4 + POKEY_CHIP2], POKEY_AUDCTL[1]);
+				printf("AUDC1= %02X    AUDC2= %02X    AUDC3= %02X    AUDC4= %02X\n",
+					   POKEY_AUDC[POKEY_CHAN1 + POKEY_CHIP2], POKEY_AUDC[POKEY_CHAN2 + POKEY_CHIP2], POKEY_AUDC[POKEY_CHAN3 + POKEY_CHIP2], POKEY_AUDC[POKEY_CHAN4 + POKEY_CHIP2]);
+			}
+#endif
+		}
+#ifdef MONITOR_ASSEMBLER
+		else if (strcmp(t, "A") == 0) {
+			get_hex(&addr);
+			addr = assembler(addr);
+		}
+#endif
+		else if (strcmp(t, "HELP") == 0 || strcmp(t, "?") == 0) {
+			printf(
+				"CONT                           - Continue emulation\n"
+				"SHOW                           - Show registers\n"
+				"STACK                          - Show stack\n"
+				"SET{PC,A,X,Y,S} hexval         - Set register value\n"
+				"SET{N,V,D,I,Z,C} 0 or 1        - Set flag value\n"
+				"C startaddr hexval...          - Change memory\n"
+				"D [startaddr]                  - Disassemble memory\n"
+				"F startaddr endaddr hexval     - Fill memory\n"
+				"M [startaddr]                  - Memory list\n"
+				"S startaddr endaddr hexval...  - Search memory\n");
+			/* split into several printfs to avoid gcc -pedantic warning: "string length 'xxx'
+			   is greater than the length '509' ISO C89 compilers are required to support" */
+			printf(
+				"LOOP [inneraddr]               - Disassemble a loop that contains inneraddr\n"
+				"RAM startaddr endaddr          - Convert memory block into RAM\n"
+				"ROM startaddr endaddr          - Convert memory block into ROM\n"
+				"HARDWARE startaddr endaddr     - Convert memory block into HARDWARE\n"
+				"READ filename startaddr nbytes - Read file into memory\n"
+				"WRITE startaddr endaddr [file] - Write memory block to a file (memdump.dat)\n"
+				"SUM startaddr endaddr          - Print sum of specified memory range\n");
+#ifdef MONITOR_TRACE
+			printf(
+				"TRACE [filename]               - Output 6502 trace on/off\n");
+#endif
+#ifdef MONITOR_BREAK
+			printf(
+				"BPC [addr]                     - Set breakpoint at address\n"
+				"BLINE [ypos] or [1000+ypos]    - Break at scanline or blink scanline\n"
+				"BBRK ON or OFF                 - Breakpoint on BRK on/off\n"
+				"HISTORY or H                   - List last %d executed instructions\n", CPU_REMEMBER_PC_STEPS);
+			printf(
+				"JUMPS                          - List last %d executed JMP/JSR\n", CPU_REMEMBER_JMP_STEPS);
+			printf("Press return to continue: ");
+			{
+				char buf[100];
+				safe_gets(buf, sizeof(buf));
+			}
+			printf(
+				"G                              - Execute one instruction\n"
+				"O                              - Step over the instruction\n"
+				"R                              - Execute until return\n");
+#elif !defined(NO_YPOS_BREAK_FLICKER)
+			printf(
+				"BLINE [1000+ypos]              - Blink scanline (8<=ypos<=247)\n");
+#endif
+			printf(
+#ifdef MONITOR_BREAKPOINTS
+				"B [argument...]                - Manage breakpoints (\"B ?\" for help)\n"
+#endif
+#ifdef MONITOR_ASSEMBLER
+				"A [startaddr]                  - Start simple assembler\n"
+#endif
+				"ANTIC, GTIA, PIA, POKEY        - Display hardware registers\n"
+				"DLIST [startaddr]              - Show Display List\n");
+			printf(
+#ifdef MONITOR_PROFILE
+				"PROFILE                        - Display profiling statistics\n"
+#endif
+#ifdef MONITOR_HINTS
+				"LABELS [command] [filename]    - Configure labels\n"
+#endif
+				"COLDSTART, WARMSTART           - Perform system coldstart/warmstart\n"
+#ifdef HAVE_SYSTEM
+				"!command                       - Execute shell command\n"
+#endif
+				"QUIT or EXIT                   - Quit emulator\n"
+				"HELP or ?                      - This text\n");
+		}
+		else if (strcmp(t, "QUIT") == 0 || strcmp(t, "EXIT") == 0) {
+			PLUS_EXIT_MONITOR;
+			return FALSE;
+		}
+		else
+			printf("Invalid command!\n");
+	}
+}
diff --git a/project/jni/application/atari800/src/monitor.h b/project/jni/application/atari800/src/monitor.h
new file mode 100644
index 000000000..98a132429
--- /dev/null
+++ b/project/jni/application/atari800/src/monitor.h
@@ -0,0 +1,63 @@
+#ifndef MONITOR_H_
+#define MONITOR_H_
+
+#include "config.h"
+#include <stdio.h>
+
+#include "atari.h"
+
+int MONITOR_Run(void);
+
+#ifdef MONITOR_TRACE
+extern FILE *MONITOR_trace_file;
+#endif
+
+#ifdef MONITOR_BREAK
+extern UWORD MONITOR_break_addr;
+extern UBYTE MONITOR_break_step;
+extern UBYTE MONITOR_break_ret;
+extern UBYTE MONITOR_break_brk;
+extern int MONITOR_ret_nesting;
+#endif
+
+extern const UBYTE MONITOR_optype6502[256];
+
+void MONITOR_ShowState(FILE *fp, UWORD pc, UBYTE a, UBYTE x, UBYTE y, UBYTE s,
+                char n, char v, char z, char c);
+
+#ifdef MONITOR_BREAKPOINTS
+
+/* Breakpoint conditions */
+
+#define MONITOR_BREAKPOINT_OR          1
+#define MONITOR_BREAKPOINT_FLAG_CLEAR  2
+#define MONITOR_BREAKPOINT_FLAG_SET    3
+
+/* these three may be ORed together and must be ORed with MONITOR_BREAKPOINT_PC .. MONITOR_BREAKPOINT_WRITE */
+#define MONITOR_BREAKPOINT_LESS        1
+#define MONITOR_BREAKPOINT_EQUAL       2
+#define MONITOR_BREAKPOINT_GREATER     4
+
+#define MONITOR_BREAKPOINT_PC          8
+#define MONITOR_BREAKPOINT_A           16
+#define MONITOR_BREAKPOINT_X           32
+#define MONITOR_BREAKPOINT_Y           40
+#define MONITOR_BREAKPOINT_S           48
+#define MONITOR_BREAKPOINT_READ        64
+#define MONITOR_BREAKPOINT_WRITE       128
+#define MONITOR_BREAKPOINT_ACCESS      (MONITOR_BREAKPOINT_READ | MONITOR_BREAKPOINT_WRITE)
+
+typedef struct {
+	UBYTE enabled;
+	UBYTE condition;
+	UWORD value;
+} MONITOR_breakpoint_cond;
+
+#define MONITOR_BREAKPOINT_TABLE_MAX  20
+extern MONITOR_breakpoint_cond MONITOR_breakpoint_table[MONITOR_BREAKPOINT_TABLE_MAX];
+extern int MONITOR_breakpoint_table_size;
+extern int MONITOR_breakpoints_enabled;
+
+#endif /* MONITOR_BREAKPOINTS */
+
+#endif /* MONITOR_H_ */
diff --git a/project/jni/application/atari800/src/mzpokeysnd.c b/project/jni/application/atari800/src/mzpokeysnd.c
new file mode 100644
index 000000000..a3eff106a
--- /dev/null
+++ b/project/jni/application/atari800/src/mzpokeysnd.c
@@ -0,0 +1,2379 @@
+/*
+ * mzpokeysnd.c - POKEY sound chip emulation, v1.6
+ *
+ * Copyright (C) 2002 Michael Borisov
+ * Copyright (C) 2002-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdlib.h>
+#include <math.h>
+
+#ifdef ASAP /* external project, see http://asap.sf.net */
+#include "asap_internal.h"
+#else
+#include "atari.h"
+#endif
+#include "mzpokeysnd.h"
+#include "pokeysnd.h"
+#include "remez.h"
+#include "antic.h"
+#include "gtia.h"
+
+#ifdef NONLINEAR_MIXING
+static const double pokeymix[61] = { /* Nonlinear POKEY mixing array */
+0.000000, 5.169146, 10.157015, 15.166247,
+20.073793, 24.927443, 29.728237, 34.495266,
+39.181262, 43.839780, 48.429508, 52.932530,
+57.327319, 61.586304, 65.673220, 69.547672,
+73.207846, 76.594474, 79.739231, 82.631161,
+85.300361, 87.750638, 90.020656, 92.108334,
+94.051256, 95.848478, 97.521287, 99.080719,
+100.540674, 101.902750, 103.185339, 104.375596,
+105.491149, 106.523735, 107.473511, 108.361458,
+109.185669, 109.962251, 110.685574, 111.367150,
+112.008476, 112.612760, 113.185603, 113.722735,
+114.227904, 114.712206, 115.171007, 115.605730,
+116.024396, 116.416097, 116.803169, 117.155108,
+117.532921, 117.835494, 118.196180, 118.502785,
+118.825177, 119.138170, 119.421378, 119.734493,
+120.000000};
+#endif
+
+#define SND_FILTER_SIZE  2048
+
+#define NPOKEYS 2
+
+
+/* M_PI was not defined in MSVC headers */
+#ifndef M_PI
+# define M_PI 3.141592653589793
+#endif
+
+static unsigned int num_cur_pokeys = 0;
+
+/* Filter */
+static unsigned sample_rate; /* Hz */
+static unsigned pokey_frq; /* Hz - for easier resampling */
+static int filter_size;
+static double filter_data[SND_FILTER_SIZE];
+static unsigned audible_frq;
+
+static const unsigned long pokey_frq_ideal =  1789790; /* Hz - True */
+#if 0
+static const int filter_size_44 = 1274;
+static const int filter_size_44_8 = 884;
+static const int filter_size_22 = 1239;
+static const int filter_size_22_8 = 893;
+static const int filter_size_11 = 1305;
+static const int filter_size_11_8 = 937;
+static const int filter_size_48 = 898;
+static const int filter_size_48_8 = 626;
+static const int filter_size_8  = 1322;
+static const int filter_size_8_8 = 1214;
+#endif
+
+/* Flags and quality */
+static int snd_flags = 0;
+static int snd_quality = 0;
+
+/* Poly tables */
+static unsigned char poly4tbl[15];
+static unsigned char poly5tbl[31];
+static unsigned char poly17tbl[131071];
+static unsigned char poly9tbl[511];
+
+
+struct stPokeyState;
+
+typedef int (*readout_t)(struct stPokeyState* ps);
+typedef void (*event_t)(struct stPokeyState* ps, char p5v, char p4v, char p917v);
+
+#ifdef NONLINEAR_MIXING
+/* Change queue event value type */
+typedef double qev_t;
+#else
+typedef unsigned char qev_t;
+#endif
+
+/* State variables for single Pokey Chip */
+typedef struct stPokeyState
+{
+    /* Poly positions */
+    unsigned int poly4pos;
+    unsigned int poly5pos;
+    unsigned int poly17pos;
+    unsigned int poly9pos;
+
+    /* Change queue */
+    qev_t ovola;
+    int qet[1322]; /* maximal length of filter */
+    qev_t qev[1322];
+    int qebeg;
+    int qeend;
+
+    /* Main divider (64khz/15khz) */
+    unsigned char mdivk;    /* 28 for 64khz, 114 for 15khz */
+
+    /* Main switches */
+    unsigned char selpoly9;
+    unsigned char c0_hf;
+    unsigned char c1_f0;
+    unsigned char c2_hf;
+    unsigned char c3_f2;
+
+    /* SKCTL for two-tone mode */
+    int skctl;
+
+    /* Main output state */
+    qev_t outvol_all;
+    unsigned char forcero; /* Force readout */
+
+    /* channel 0 state */
+
+    readout_t readout_0;
+    event_t event_0;
+
+    unsigned long c0divpos;
+    unsigned long c0divstart;   /* AUDF0 recalculated */
+    unsigned long c0divstart_p; /* start value when c1_f0 */
+    unsigned short c0diva;      /* AUDF0 register */
+    unsigned char c0ctl;        /* AUDC0 register */
+
+    unsigned char c0t1;         /* D - 5bit, Q goes to sw3 */
+    unsigned char c0t2;         /* D - out sw2, Q goes to sw4 and t3 */
+    unsigned char c0t3;         /* D - out t2, q goes to xor */
+
+    unsigned char c0sw1;        /* in1 - 4bit, in2 - 17bit, out goes to sw2 */
+    unsigned char c0sw2;        /* in1 - /Q t2, in2 - out sw1, out goes to t2 */
+    unsigned char c0sw3;        /* in1 - +5, in2 - Q t1, out goes to C t2 */
+    unsigned char c0sw4;        /* hi-pass sw */
+    unsigned char c0vo;         /* volume only */
+
+#ifndef NONLINEAR_MIXING
+    unsigned char c0stop;       /* channel counter stopped */
+#endif
+
+    int vol0;
+
+    int outvol_0;
+
+    /* channel 1 state */
+
+    readout_t readout_1;
+    event_t event_1;
+
+    unsigned long c1divpos;
+    unsigned long c1divstart;
+    unsigned short c1diva;
+    unsigned char c1ctl;
+
+    unsigned char c1t1;
+    unsigned char c1t2;
+    unsigned char c1t3;
+
+    unsigned char c1sw1;
+    unsigned char c1sw2;
+    unsigned char c1sw3;
+    unsigned char c1sw4;
+    unsigned char c1vo;
+
+#ifndef NONLINEAR_MIXING
+    unsigned char c1stop;      /* channel counter stopped */
+#endif
+
+    int vol1;
+
+    int outvol_1;
+
+    /* channel 2 state */
+
+    readout_t readout_2;
+    event_t event_2;
+
+    unsigned long c2divpos;
+    unsigned long c2divstart;
+    unsigned long c2divstart_p;     /* start value when c1_f0 */
+    unsigned short c2diva;
+    unsigned char c2ctl;
+
+    unsigned char c2t1;
+    unsigned char c2t2;
+
+    unsigned char c2sw1;
+    unsigned char c2sw2;
+    unsigned char c2sw3;
+    unsigned char c2vo;
+
+#ifndef NONLINEAR_MIXING
+    unsigned char c2stop;          /* channel counter stopped */
+#endif
+
+    int vol2;
+
+    int outvol_2;
+
+    /* channel 3 state */
+
+    readout_t readout_3;
+    event_t event_3;
+
+    unsigned long c3divpos;
+    unsigned long c3divstart;
+    unsigned short c3diva;
+    unsigned char c3ctl;
+
+    unsigned char c3t1;
+    unsigned char c3t2;
+
+    unsigned char c3sw1;
+    unsigned char c3sw2;
+    unsigned char c3sw3;
+    unsigned char c3vo;
+
+#ifndef NONLINEAR_MIXING
+    unsigned char c3stop;          /* channel counter stopped */
+#endif
+
+    int vol3;
+
+    int outvol_3;
+
+} PokeyState;
+
+PokeyState pokey_states[NPOKEYS];
+
+/* Forward declarations for ResetPokeyState */
+
+static int readout0_normal(PokeyState* ps);
+static void event0_pure(PokeyState* ps, char p5v, char p4v, char p917v);
+
+static int readout1_normal(PokeyState* ps);
+static void event1_pure(PokeyState* ps, char p5v, char p4v, char p917v);
+
+static int readout2_normal(PokeyState* ps);
+static void event2_pure(PokeyState* ps, char p5v, char p4v, char p917v);
+
+static int readout3_normal(PokeyState* ps);
+static void event3_pure(PokeyState* ps, char p5v, char p4v, char p917v);
+
+
+
+
+static void ResetPokeyState(PokeyState* ps)
+{
+    /* Poly positions */
+    ps->poly4pos = 0;
+    ps->poly5pos = 0;
+    ps->poly9pos = 0;
+    ps->poly17pos = 0;
+
+    /* Change queue */
+    ps->ovola = 0;
+    ps->qebeg = 0;
+    ps->qeend = 0;
+
+    /* Global Pokey controls */
+    ps->mdivk = 28;
+
+    ps->selpoly9 = 0;
+    ps->c0_hf = 0;
+    ps->c1_f0 = 0;
+    ps->c2_hf = 0;
+    ps->c3_f2 = 0;
+
+    /* SKCTL for two-tone mode */
+    ps->skctl = 0;
+
+    ps->outvol_all = 0;
+    ps->forcero = 0;
+
+    /* Channel 0 state */
+    ps->readout_0 = readout0_normal;
+    ps->event_0 = event0_pure;
+
+    ps->c0divpos = 1000;
+    ps->c0divstart = 1000;
+    ps->c0divstart_p = 1000;
+    ps->c0diva = 255;
+    ps->c0ctl = 0;
+
+    ps->c0t1 = 0;
+    ps->c0t2 = 0;
+    ps->c0t3 = 0;
+
+    ps->c0sw1 = 0;
+    ps->c0sw2 = 0;
+    ps->c0sw3 = 0;
+    ps->c0sw4 = 0;
+    ps->c0vo = 1;
+
+#ifndef NONLINEAR_MIXING
+    ps->c0stop = 1;
+#endif
+
+    ps->vol0 = 0;
+
+    ps->outvol_0 = 0;
+
+
+    /* Channel 1 state */
+    ps->readout_1 = readout1_normal;
+    ps->event_1 = event1_pure;
+
+    ps->c1divpos = 1000;
+    ps->c1divstart = 1000;
+    ps->c1diva = 255;
+    ps->c1ctl = 0;
+
+    ps->c1t1 = 0;
+    ps->c1t2 = 0;
+    ps->c1t3 = 0;
+
+    ps->c1sw1 = 0;
+    ps->c1sw2 = 0;
+    ps->c1sw3 = 0;
+    ps->c1sw4 = 0;
+    ps->c1vo = 1;
+
+#ifndef NONLINEAR_MIXING
+    ps->c1stop = 1;
+#endif
+
+    ps->vol1 = 0;
+
+    ps->outvol_1 = 0;
+
+    /* Channel 2 state */
+    ps->readout_2 = readout2_normal;
+    ps->event_2 = event2_pure;
+
+    ps->c2divpos = 1000;
+    ps->c2divstart = 1000;
+    ps->c2divstart_p = 1000;
+    ps->c2diva = 255;
+    ps->c2ctl = 0;
+
+    ps->c2t1 = 0;
+    ps->c2t2 = 0;
+
+    ps->c2sw1 = 0;
+    ps->c2sw2 = 0;
+    ps->c2sw3 = 0;
+
+    ps->c2vo = 0;
+
+#ifndef NONLINEAR_MIXING
+    ps->c2stop = 1;
+#endif
+
+    ps->vol2 = 0;
+
+    ps->outvol_2 = 0;
+
+    /* Channel 3 state */
+    ps->readout_3 = readout3_normal;
+    ps->event_3 = event3_pure;
+
+    ps->c3divpos = 1000;
+    ps->c3divstart = 1000;
+    ps->c3diva = 255;
+    ps->c3ctl = 0;
+
+    ps->c3t1 = 0;
+    ps->c3t2 = 0;
+
+    ps->c3sw1 = 0;
+    ps->c3sw2 = 0;
+    ps->c3sw3 = 0;
+
+    ps->c3vo = 0;
+
+#ifndef NONLINEAR_MIXING
+    ps->c3stop = 1;
+#endif
+
+    ps->vol3 = 0;
+
+    ps->outvol_3 = 0;
+}
+
+
+static double read_resam_all(PokeyState* ps)
+{
+    int i = ps->qebeg;
+    qev_t avol,bvol;
+    double sum;
+
+    if(ps->qebeg == ps->qeend)
+    {
+        return ps->ovola * filter_data[0]; /* if no events in the queue */
+    }
+
+    avol = ps->ovola;
+    sum = 0;
+
+    /* Separate two loop cases, for wrap-around and without */
+    if(ps->qeend < ps->qebeg) /* With wrap */
+    {
+        while(i<filter_size)
+        {
+            bvol = ps->qev[i];
+            sum += (avol-bvol)*filter_data[ps->qet[i]];
+            avol = bvol;
+            ++i;
+        }
+        i=0;
+    }
+
+    /* without wrap */
+    while(i<ps->qeend)
+    {
+        bvol = ps->qev[i];
+        sum += (avol-bvol)*filter_data[ps->qet[i]];
+        avol = bvol;
+        ++i;
+    }
+
+    sum += avol*filter_data[0];
+    return sum;
+}
+
+static void add_change(PokeyState* ps, qev_t a)
+{
+    ps->qev[ps->qeend] = a;
+    ps->qet[ps->qeend] = 0;
+    ++ps->qeend;
+    if(ps->qeend >= filter_size)
+        ps->qeend = 0;
+}
+
+static void bump_qe_subticks(PokeyState* ps, int subticks)
+{
+    /* Remove too old events from the queue while bumping */
+    int i = ps->qebeg;
+    if(ps->qeend < ps->qebeg) /* Loop with wrap */
+    {
+        while(i<filter_size)
+        {
+            ps->qet[i] += subticks;
+            if(ps->qet[i] >= filter_size - 1)
+            {
+                ps->ovola = ps->qev[i];
+                ++ps->qebeg;
+                if(ps->qebeg >= filter_size)
+                    ps->qebeg = 0;
+            }
+            ++i;
+        }
+        i=0;
+    }
+    /* loop without wrap */
+    while(i<ps->qeend)
+    {
+        ps->qet[i] += subticks;
+        if(ps->qet[i] >= filter_size - 1)
+        {
+            ps->ovola = ps->qev[i];
+            ++ps->qebeg;
+            if(ps->qebeg >= filter_size)
+                ps->qebeg = 0;
+        }
+        ++i;
+    }
+}
+
+
+
+static void build_poly4(void)
+{
+    unsigned char c;
+    unsigned char i;
+    unsigned char poly4=1;
+
+    for(i=0; i<15; i++)
+    {
+        poly4tbl[i] = ~poly4;
+        c = ((poly4>>2)&1) ^ ((poly4>>3)&1);
+        poly4 = ((poly4<<1)&15) + c;
+    }
+}
+
+static void build_poly5(void)
+{
+	unsigned char c;
+	unsigned char i;
+	unsigned char poly5 = 1;
+
+	for(i = 0; i < 31; i++) {
+		poly5tbl[i] = ~poly5; /* Inversion! Attention! */
+		c = ((poly5 >> 2) ^ (poly5 >> 4)) & 1;
+		poly5 = ((poly5 << 1) & 31) + c;
+	}
+}
+
+static void build_poly17(void)
+{
+	unsigned int c;
+	unsigned int i;
+	unsigned int poly17 = 1;
+
+	for(i = 0; i < 131071; i++) {
+		poly17tbl[i] = (unsigned char) poly17;
+		c = ((poly17 >> 11) ^ (poly17 >> 16)) & 1;
+		poly17 = ((poly17 << 1) & 131071) + c;
+	}
+}
+
+static void build_poly9(void)
+{
+	unsigned int c;
+	unsigned int i;
+	unsigned int poly9 = 1;
+
+	for(i = 0; i < 511; i++) {
+		poly9tbl[i] = (unsigned char) poly9;
+		c = ((poly9 >> 3) ^ (poly9 >> 8)) & 1;
+		poly9 = ((poly9 << 1) & 511) + c;
+	}
+}
+
+static void advance_polies(PokeyState* ps, unsigned long tacts)
+{
+    ps->poly4pos = (tacts + ps->poly4pos) % 15;
+    ps->poly5pos = (tacts + ps->poly5pos) % 31;
+    ps->poly17pos = (tacts + ps->poly17pos) % 131071;
+    ps->poly9pos = (tacts + ps->poly9pos) % 511;
+}
+
+/***********************************
+
+   READ OUTPUT 0
+
+  ************************************/
+
+static int readout0_vo(PokeyState* ps)
+{
+    return ps->vol0;
+}
+
+static int readout0_hipass(PokeyState* ps)
+{
+    if(ps->c0t2 ^ ps->c0t3)
+        return ps->vol0;
+    else return 0;
+}
+
+static int readout0_normal(PokeyState* ps)
+{
+    if(ps->c0t2)
+        return ps->vol0;
+    else return 0;
+}
+
+/***********************************
+
+   READ OUTPUT 1
+
+  ************************************/
+
+static int readout1_vo(PokeyState* ps)
+{
+    return ps->vol1;
+}
+
+static int readout1_hipass(PokeyState* ps)
+{
+    if(ps->c1t2 ^ ps->c1t3)
+        return ps->vol1;
+    else return 0;
+}
+
+static int readout1_normal(PokeyState* ps)
+{
+    if(ps->c1t2)
+        return ps->vol1;
+    else return 0;
+}
+
+/***********************************
+
+   READ OUTPUT 2
+
+  ************************************/
+
+static int readout2_vo(PokeyState* ps)
+{
+    return ps->vol2;
+}
+
+static int readout2_normal(PokeyState* ps)
+{
+    if(ps->c2t2)
+        return ps->vol2;
+    else return 0;
+}
+
+/***********************************
+
+   READ OUTPUT 3
+
+  ************************************/
+
+static int readout3_vo(PokeyState* ps)
+{
+    return ps->vol3;
+}
+
+static int readout3_normal(PokeyState* ps)
+{
+    if(ps->c3t2)
+        return ps->vol3;
+    else return 0;
+}
+
+
+/***********************************
+
+   EVENT CHANNEL 0
+
+  ************************************/
+
+static void event0_pure(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c0t2 = !ps->c0t2;
+    ps->c0t1 = p5v;
+}
+
+static void event0_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c0t1)
+        ps->c0t2 = !ps->c0t2;
+    ps->c0t1 = p5v;
+}
+
+static void event0_p4(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c0t2 = p4v;
+    ps->c0t1 = p5v;
+}
+
+static void event0_p917(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c0t2 = p917v;
+    ps->c0t1 = p5v;
+}
+
+static void event0_p4_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c0t1)
+        ps->c0t2 = p4v;
+    ps->c0t1 = p5v;
+}
+
+static void event0_p917_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c0t1)
+        ps->c0t2 = p917v;
+    ps->c0t1 = p5v;
+}
+
+/***********************************
+
+   EVENT CHANNEL 1
+
+  ************************************/
+
+static void event1_pure(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c1t2 = !ps->c1t2;
+    ps->c1t1 = p5v;
+}
+
+static void event1_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c1t1)
+        ps->c1t2 = !ps->c1t2;
+    ps->c1t1 = p5v;
+}
+
+static void event1_p4(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c1t2 = p4v;
+    ps->c1t1 = p5v;
+}
+
+static void event1_p917(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c1t2 = p917v;
+    ps->c1t1 = p5v;
+}
+
+static void event1_p4_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c1t1)
+        ps->c1t2 = p4v;
+    ps->c1t1 = p5v;
+}
+
+static void event1_p917_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c1t1)
+        ps->c1t2 = p917v;
+    ps->c1t1 = p5v;
+}
+
+/***********************************
+
+   EVENT CHANNEL 2
+
+  ************************************/
+
+static void event2_pure(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c2t2 = !ps->c2t2;
+    ps->c2t1 = p5v;
+    /* high-pass clock for channel 0 */
+    ps->c0t3 = ps->c0t2;
+}
+
+static void event2_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c2t1)
+        ps->c2t2 = !ps->c2t2;
+    ps->c2t1 = p5v;
+    /* high-pass clock for channel 0 */
+    ps->c0t3 = ps->c0t2;
+}
+
+static void event2_p4(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c2t2 = p4v;
+    ps->c2t1 = p5v;
+    /* high-pass clock for channel 0 */
+    ps->c0t3 = ps->c0t2;
+}
+
+static void event2_p917(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c2t2 = p917v;
+    ps->c2t1 = p5v;
+    /* high-pass clock for channel 0 */
+    ps->c0t3 = ps->c0t2;
+}
+
+static void event2_p4_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c2t1)
+        ps->c2t2 = p4v;
+    ps->c2t1 = p5v;
+    /* high-pass clock for channel 0 */
+    ps->c0t3 = ps->c0t2;
+}
+
+static void event2_p917_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c2t1)
+        ps->c2t2 = p917v;
+    ps->c2t1 = p5v;
+    /* high-pass clock for channel 0 */
+    ps->c0t3 = ps->c0t2;
+}
+
+/***********************************
+
+   EVENT CHANNEL 3
+
+  ************************************/
+
+static void event3_pure(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c3t2 = !ps->c3t2;
+    ps->c3t1 = p5v;
+    /* high-pass clock for channel 1 */
+    ps->c1t3 = ps->c1t2;
+}
+
+static void event3_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c3t1)
+        ps->c3t2 = !ps->c3t2;
+    ps->c3t1 = p5v;
+    /* high-pass clock for channel 1 */
+    ps->c1t3 = ps->c1t2;
+}
+
+static void event3_p4(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c3t2 = p4v;
+    ps->c3t1 = p5v;
+    /* high-pass clock for channel 1 */
+    ps->c1t3 = ps->c1t2;
+}
+
+static void event3_p917(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    ps->c3t2 = p917v;
+    ps->c3t1 = p5v;
+    /* high-pass clock for channel 1 */
+    ps->c1t3 = ps->c1t2;
+}
+
+static void event3_p4_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c3t1)
+        ps->c3t2 = p4v;
+    ps->c3t1 = p5v;
+    /* high-pass clock for channel 1 */
+    ps->c1t3 = ps->c1t2;
+}
+
+static void event3_p917_p5(PokeyState* ps, char p5v, char p4v, char p917v)
+{
+    if(ps->c3t1)
+        ps->c3t2 = p917v;
+    ps->c3t1 = p5v;
+    /* high-pass clock for channel 1 */
+    ps->c1t3 = ps->c1t2;
+}
+
+static void advance_ticks(PokeyState* ps, unsigned long ticks)
+{
+    unsigned long ta,tbe, tbe0, tbe1, tbe2, tbe3;
+    char p5v,p4v,p917v;
+
+    qev_t outvol_new;
+    unsigned char need0=0;
+    unsigned char need1=0;
+    unsigned char need2=0;
+    unsigned char need3=0;
+
+    unsigned char need=0;
+
+    if(ps->forcero)
+    {
+        ps->forcero = 0;
+#ifdef NONLINEAR_MIXING
+        outvol_new = pokeymix[ps->outvol_0 + ps->outvol_1 + ps->outvol_2 + ps->outvol_3];
+#else
+        outvol_new = ps->outvol_0 + ps->outvol_1 + ps->outvol_2 + ps->outvol_3;
+#endif
+        if(outvol_new != ps->outvol_all)
+        {
+            ps->outvol_all = outvol_new;
+            add_change(ps, outvol_new);
+        }
+    }
+
+    while(ticks>0)
+    {
+        tbe0 = ps->c0divpos;
+        tbe1 = ps->c1divpos;
+        tbe2 = ps->c2divpos;
+        tbe3 = ps->c3divpos;
+
+        tbe = ticks+1;
+
+#ifdef NONLINEAR_MIXING
+        if(tbe0 < tbe)
+            tbe = tbe0;
+        if(tbe1 < tbe)
+            tbe = tbe1;
+        if(tbe2 < tbe)
+            tbe = tbe2;
+        if(tbe3 < tbe)
+            tbe = tbe3;
+#else
+        if(!ps->c0stop && tbe0 < tbe)
+            tbe = tbe0;
+        if(!ps->c1stop && tbe1 < tbe)
+            tbe = tbe1;
+        if(!ps->c2stop && tbe2 < tbe)
+            tbe = tbe2;
+        if(!ps->c3stop && tbe3 < tbe)
+            tbe = tbe3;
+#endif
+
+        if(tbe>ticks)
+            ta = ticks;
+        else
+        {
+            ta = tbe;
+            need = 1;
+        }
+
+        ticks -= ta;
+
+#ifdef NONLINEAR_MIXING
+        ps->c0divpos -= ta;
+        ps->c1divpos -= ta;
+        ps->c2divpos -= ta;
+        ps->c3divpos -= ta;
+#else
+        if(!ps->c0stop) ps->c0divpos -= ta;
+        if(!ps->c1stop) ps->c1divpos -= ta;
+        if(!ps->c2stop) ps->c2divpos -= ta;
+        if(!ps->c3stop) ps->c3divpos -= ta;
+#endif
+
+        advance_polies(ps,ta);
+        bump_qe_subticks(ps,ta);
+
+        if(need)
+        {
+            p5v = poly5tbl[ps->poly5pos] & 1;
+            p4v = poly4tbl[ps->poly4pos] & 1;
+            if(ps->selpoly9)
+                p917v = poly9tbl[ps->poly9pos] & 1;
+            else
+                p917v = poly17tbl[ps->poly17pos] & 1;
+
+#ifdef NONLINEAR_MIXING
+            if(ta == tbe0)
+#else
+            if(!ps->c0stop && ta == tbe0)
+#endif
+            {
+                ps->event_0(ps,p5v,p4v,p917v);
+                ps->c0divpos = ps->c0divstart;
+                need0 = 1;
+            }
+#ifdef NONLINEAR_MIXING
+            if(ta == tbe1)
+#else
+            if(!ps->c1stop && ta == tbe1)
+#endif
+            {
+                ps->event_1(ps,p5v,p4v,p917v);
+                ps->c1divpos = ps->c1divstart;
+                if(ps->c1_f0)
+                    ps->c0divpos = ps->c0divstart_p;
+                need1 = 1;
+                /*two-tone filter*/
+                /*use if send break is on and two-tone mode is on*/
+                /*reset channel 1 if channel 2 changed*/
+                if((ps->skctl & 0x88) == 0x88) {
+                    ps->c0divpos = ps->c0divstart;
+                    /* it doesn't change the output state */
+                    /*need0 = 1;*/
+                }
+            }
+#ifdef NONLINEAR_MIXING
+            if(ta == tbe2)
+#else
+            if(!ps->c2stop && ta == tbe2)
+#endif
+            {
+                ps->event_2(ps,p5v,p4v,p917v);
+                ps->c2divpos = ps->c2divstart;
+                need2 = 1;
+                if(ps->c0sw4)
+                    need0 = 1;
+            }
+#ifdef NONLINEAR_MIXING
+            if(ta == tbe3)
+#else
+            if(!ps->c3stop && ta == tbe3)
+#endif
+            {
+                ps->event_3(ps,p5v,p4v,p917v);
+                ps->c3divpos = ps->c3divstart;
+                if(ps->c3_f2)
+                    ps->c2divpos = ps->c2divstart_p;
+                need3 = 1;
+                if(ps->c1sw4)
+                    need1 = 1;
+            }
+
+            if(need0)
+            {
+#ifdef NONLINEAR_MIXING
+                ps->outvol_0 = ps->readout_0(ps);
+#else
+                ps->outvol_0 = 2*ps->readout_0(ps);
+#endif
+            }
+            if(need1)
+            {
+#ifdef NONLINEAR_MIXING
+                ps->outvol_1 = ps->readout_1(ps);
+#else
+                ps->outvol_1 = 2*ps->readout_1(ps);
+#endif
+            }
+            if(need2)
+            {
+#ifdef NONLINEAR_MIXING
+                ps->outvol_2 = ps->readout_2(ps);
+#else
+                ps->outvol_2 = 2*ps->readout_2(ps);
+#endif
+            }
+            if(need3)
+            {
+#ifdef NONLINEAR_MIXING
+                ps->outvol_3 = ps->readout_3(ps);
+#else
+                ps->outvol_3 = 2*ps->readout_3(ps);
+#endif
+            }
+
+#ifdef NONLINEAR_MIXING
+            outvol_new = pokeymix[ps->outvol_0 + ps->outvol_1 + ps->outvol_2 + ps->outvol_3];
+#else
+            outvol_new = ps->outvol_0 + ps->outvol_1 + ps->outvol_2 + ps->outvol_3;
+#endif
+            if(outvol_new != ps->outvol_all)
+            {
+                ps->outvol_all = outvol_new;
+                add_change(ps, outvol_new);
+            }
+        }
+    }
+}
+
+static double generate_sample(PokeyState* ps)
+{
+    /*unsigned long ta = (subticks+pokey_frq)/sample_rate;
+    subticks = (subticks+pokey_frq)%sample_rate;*/
+
+    advance_ticks(ps, pokey_frq/sample_rate);
+    return read_resam_all(ps);
+}
+
+/******************************************
+ filter table generator by Krzysztof Nikiel
+ ******************************************/
+
+static int remez_filter_table(double resamp_rate, /* output_rate/input_rate */
+                              double *cutoff, int quality)
+{
+  int i;
+  static const int orders[] = {600, 800, 1000, 1200};
+  static const struct {
+    int stop;		/* stopband ripple */
+    double weight;	/* stopband weight */
+    double twidth[sizeof(orders)/sizeof(orders[0])];
+  } paramtab[] =
+  {
+    {70, 90, {4.9e-3, 3.45e-3, 2.65e-3, 2.2e-3}},
+    {55, 25, {3.4e-3, 2.7e-3, 2.05e-3, 1.7e-3}},
+    {40, 6.0, {2.6e-3, 1.8e-3, 1.5e-3, 1.2e-3}},
+    {-1, 0, {0, 0, 0, 0}}
+  };
+  static const double passtab[] = {0.5, 0.6, 0.7};
+  int ripple = 0, order = 0;
+  int size;
+  double weights[2], desired[2], bands[4];
+  static const int interlevel = 5;
+  double step = 1.0 / interlevel;
+
+  *cutoff = 0.95 * 0.5 * resamp_rate;
+
+  if (quality >= (int) (sizeof(passtab) / sizeof(passtab[0])))
+    quality = (int) (sizeof(passtab) / sizeof(passtab[0])) - 1;
+
+  for (ripple = 0; paramtab[ripple].stop > 0; ripple++)
+  {
+    for (order = 0; order < (int) (sizeof(orders)/sizeof(orders[0])); order++)
+    {
+      if ((*cutoff - paramtab[ripple].twidth[order])
+	  > passtab[quality] * 0.5 * resamp_rate)
+	/* transition width OK */
+	goto found;
+    }
+  }
+
+  /* not found -- use shortest transition */
+  ripple--;
+  order--;
+
+found:
+
+#if 0
+  printf("order: %d, cutoff: %g\tstopband:%d\ttranswidth:%f\n",
+         orders[order],
+	 1789790 * *cutoff,
+	 paramtab[ripple].stop,
+	 1789790 * paramtab[ripple].twidth[order]);
+  exit(1);
+#endif
+
+  size = orders[order] + 1;
+
+  if (size > SND_FILTER_SIZE) /* static table too short */
+    return 0;
+
+  desired[0] = 1;
+  desired[1] = 0;
+
+  weights[0] = 1;
+  weights[1] = paramtab[ripple].weight;
+
+  bands[0] = 0;
+  bands[2] = *cutoff;
+  bands[1] = bands[2] - paramtab[ripple].twidth[order];
+  bands[3] = 0.5;
+
+  bands[1] *= (double)interlevel;
+  bands[2] *= (double)interlevel;
+  REMEZ_CreateFilter(filter_data, (size / interlevel) + 1, 2, bands, desired, weights, REMEZ_BANDPASS);
+  for (i = size - interlevel; i >= 0; i -= interlevel)
+  {
+    int s;
+    double h1 = filter_data[i/interlevel];
+    double h2 = filter_data[i/interlevel+1];
+
+    for (s = 0; s < interlevel; s++)
+    {
+      double d = (double)s * step;
+      filter_data[i+s] = (h1*(1.0 - d) + h2 * d) * step;
+    }
+  }
+
+  /* compute reversed cumulative sum table */
+  for (i = size - 2; i >= 0; i--)
+    filter_data[i] += filter_data[i + 1];
+
+#if 0
+  for (i = 0; i < size; i++)
+    printf("%.15f,\n", filter_data[i]);
+  fflush(stdout);
+  exit(1);
+#endif
+
+  return size;
+}
+
+static void mzpokeysnd_process_8(void* sndbuffer, int sndn);
+static void mzpokeysnd_process_16(void* sndbuffer, int sndn);
+static void Update_pokey_sound_mz(UWORD addr, UBYTE val, UBYTE chip, UBYTE gain);
+#ifdef SERIO_SOUND
+static void Update_serio_sound_mz(int out, UBYTE data);
+#endif
+#ifdef CONSOLE_SOUND
+static void Update_consol_sound_mz( int set );
+#endif
+#ifdef VOL_ONLY_SOUND
+static void Update_vol_only_sound_mz( void );
+#endif
+
+/*****************************************************************************/
+/* Module:  MZPOKEYSND_Init()                                                */
+/* Purpose: to handle the power-up initialization functions                  */
+/*          these functions should only be executed on a cold-restart        */
+/*                                                                           */
+/* Authors: Michael Borisov, Krzystof Nikiel                                 */
+/*                                                                           */
+/* Inputs:  freq17 - the value for the '1.79MHz' Pokey audio clock           */
+/*          playback_freq - the playback frequency in samples per second     */
+/*          num_pokeys - specifies the number of pokey chips to be emulated  */
+/*                                                                           */
+/* Outputs: Adjusts local globals - no return value                          */
+/*                                                                           */
+/*****************************************************************************/
+
+int MZPOKEYSND_Init(ULONG freq17, int playback_freq, UBYTE num_pokeys,
+                        int flags, int quality
+#ifdef __PLUS
+                        , int clear_regs
+#endif
+                       )
+{
+    double cutoff;
+
+    sample_rate = playback_freq;
+    snd_flags = flags;
+    snd_quality = quality;
+
+    POKEYSND_Update = Update_pokey_sound_mz;
+#ifdef SERIO_SOUND
+    POKEYSND_UpdateSerio = Update_serio_sound_mz;
+#endif
+#ifdef CONSOLE_SOUND
+    POKEYSND_UpdateConsol = Update_consol_sound_mz;
+#endif
+#ifdef VOL_ONLY_SOUND
+    POKEYSND_UpdateVolOnly = Update_vol_only_sound_mz;
+#endif
+
+#ifdef VOL_ONLY_SOUND
+	POKEYSND_samp_freq=playback_freq;
+#endif  /* VOL_ONLY_SOUND */
+
+	POKEYSND_Process_ptr = (flags & POKEYSND_BIT16) ? mzpokeysnd_process_16 : mzpokeysnd_process_8;
+
+    switch(playback_freq)
+    {
+#if 0
+    case 44100:
+        if(flags & POKEYSND_BIT16)
+        {
+            filter_data = filter_44;
+            filter_size = filter_size_44;
+        }
+        else
+        {
+            filter_data = filter_44_8;
+            filter_size = filter_size_44_8;
+        }
+        pokey_frq = 1808100; /* 1.02% off ideal */
+        audible_frq = 20000; /* ultrasound */
+        break;
+    case 22050:
+        if(flags & POKEYSND_BIT16)
+        {
+            filter_data = filter_22;
+            filter_size = filter_size_22;
+        }
+        else
+        {
+            filter_data = filter_22_8;
+            filter_size = filter_size_22_8;
+        }
+        pokey_frq = 1786050; /* 0.2% off ideal */
+        audible_frq = 10000; /* 30db filter attenuation */
+        break;
+    case 11025:
+        if(flags & POKEYSND_BIT16)
+        {
+            filter_data = filter_11;
+            filter_size = filter_size_11;
+        }
+        else
+        {
+            filter_data = filter_11_8;
+            filter_size = filter_size_11_8;
+        }
+        pokey_frq = 1786050; /* 0.2% off ideal */
+        audible_frq = 4500; /* 30db filter attenuation */
+        break;
+    case 48000:
+        if(flags & POKEYSND_BIT16)
+        {
+            filter_data = filter_48;
+            filter_size = filter_size_48;
+        }
+        else
+        {
+            filter_data = filter_48_8;
+            filter_size = filter_size_48_8;
+        }
+        pokey_frq = 1776000; /* 0.7% off ideal */
+        audible_frq = 20000; /* ultrasound */
+        break;
+    case 8000:
+        if(flags & POKEYSND_BIT16)
+        {
+            filter_data = filter_8;
+            filter_size = filter_size_8;
+        }
+        else
+        {
+            filter_data = filter_8_8;
+            filter_size = filter_size_8_8;
+        }
+        pokey_frq = 1792000; /* 0.1% off ideal */
+        audible_frq = 4000; /* Nyquist, also 30db attn, should be 50 */
+        break;
+#endif
+    default:
+        pokey_frq = (int)(((double)pokey_frq_ideal/sample_rate) + 0.5)
+          * sample_rate;
+	filter_size = remez_filter_table((double)sample_rate/pokey_frq,
+					 &cutoff, quality);
+	audible_frq = (unsigned) (cutoff * pokey_frq);
+    }
+
+    build_poly4();
+    build_poly5();
+    build_poly9();
+    build_poly17();
+
+#ifdef __PLUS
+	if (clear_regs)
+#endif
+	{
+		ResetPokeyState(pokey_states);
+		ResetPokeyState(pokey_states + 1);
+	}
+	num_cur_pokeys = num_pokeys;
+
+	return 0; /* OK */
+}
+
+
+static void Update_readout_0(PokeyState* ps)
+{
+    if(ps->c0vo)
+        ps->readout_0 = readout0_vo;
+    else if(ps->c0sw4)
+        ps->readout_0 = readout0_hipass;
+    else
+        ps->readout_0 = readout0_normal;
+}
+
+static void Update_readout_1(PokeyState* ps)
+{
+    if(ps->c1vo)
+        ps->readout_1 = readout1_vo;
+    else if(ps->c1sw4)
+        ps->readout_1 = readout1_hipass;
+    else
+        ps->readout_1 = readout1_normal;
+}
+
+static void Update_readout_2(PokeyState* ps)
+{
+    if(ps->c2vo)
+        ps->readout_2 = readout2_vo;
+    else
+        ps->readout_2 = readout2_normal;
+}
+
+static void Update_readout_3(PokeyState* ps)
+{
+    if(ps->c3vo)
+        ps->readout_3 = readout3_vo;
+    else
+        ps->readout_3 = readout3_normal;
+}
+
+static void Update_event0(PokeyState* ps)
+{
+    if(ps->c0sw3)
+    {
+        if(ps->c0sw2)
+            ps->event_0 = event0_pure;
+        else
+        {
+            if(ps->c0sw1)
+                ps->event_0 = event0_p4;
+            else
+                ps->event_0 = event0_p917;
+        }
+    }
+    else
+    {
+        if(ps->c0sw2)
+            ps->event_0 = event0_p5;
+        else
+        {
+            if(ps->c0sw1)
+                ps->event_0 = event0_p4_p5;
+            else
+                ps->event_0 = event0_p917_p5;
+        }
+    }
+}
+
+static void Update_event1(PokeyState* ps)
+{
+    if(ps->c1sw3)
+    {
+        if(ps->c1sw2)
+            ps->event_1 = event1_pure;
+        else
+        {
+            if(ps->c1sw1)
+                ps->event_1 = event1_p4;
+            else
+                ps->event_1 = event1_p917;
+        }
+    }
+    else
+    {
+        if(ps->c1sw2)
+            ps->event_1 = event1_p5;
+        else
+        {
+            if(ps->c1sw1)
+                ps->event_1 = event1_p4_p5;
+            else
+                ps->event_1 = event1_p917_p5;
+        }
+    }
+}
+
+static void Update_event2(PokeyState* ps)
+{
+    if(ps->c2sw3)
+    {
+        if(ps->c2sw2)
+            ps->event_2 = event2_pure;
+        else
+        {
+            if(ps->c2sw1)
+                ps->event_2 = event2_p4;
+            else
+                ps->event_2 = event2_p917;
+        }
+    }
+    else
+    {
+        if(ps->c2sw2)
+            ps->event_2 = event2_p5;
+        else
+        {
+            if(ps->c2sw1)
+                ps->event_2 = event2_p4_p5;
+            else
+                ps->event_2 = event2_p917_p5;
+        }
+    }
+}
+
+static void Update_event3(PokeyState* ps)
+{
+    if(ps->c3sw3)
+    {
+        if(ps->c3sw2)
+            ps->event_3 = event3_pure;
+        else
+        {
+            if(ps->c3sw1)
+                ps->event_3 = event3_p4;
+            else
+                ps->event_3 = event3_p917;
+        }
+    }
+    else
+    {
+        if(ps->c3sw2)
+            ps->event_3 = event3_p5;
+        else
+        {
+            if(ps->c3sw1)
+                ps->event_3 = event3_p4_p5;
+            else
+                ps->event_3 = event3_p917_p5;
+        }
+    }
+}
+
+static void Update_c0divstart(PokeyState* ps)
+{
+    if(ps->c1_f0)
+    {
+        if(ps->c0_hf)
+        {
+            ps->c0divstart = 256;
+            ps->c0divstart_p = ps->c0diva + 7;
+        }
+        else
+        {
+            ps->c0divstart = 256 * ps->mdivk;
+            ps->c0divstart_p = (ps->c0diva+1)*ps->mdivk;
+        }
+    }
+    else
+    {
+        if(ps->c0_hf)
+            ps->c0divstart = ps->c0diva + 4;
+        else
+            ps->c0divstart = (ps->c0diva+1) * ps->mdivk;
+    }
+}
+
+static void Update_c1divstart(PokeyState* ps)
+{
+    if(ps->c1_f0)
+    {
+        if(ps->c0_hf)
+            ps->c1divstart = ps->c0diva + 256*ps->c1diva + 7;
+        else
+            ps->c1divstart = (ps->c0diva + 256*ps->c1diva + 1) * ps->mdivk;
+    }
+    else
+        ps->c1divstart = (ps->c1diva + 1) * ps->mdivk;
+}
+
+static void Update_c2divstart(PokeyState* ps)
+{
+    if(ps->c3_f2)
+    {
+        if(ps->c2_hf)
+        {
+            ps->c2divstart = 256;
+            ps->c2divstart_p = ps->c2diva + 7;
+        }
+        else
+        {
+            ps->c2divstart = 256 * ps->mdivk;
+            ps->c2divstart_p = (ps->c2diva+1)*ps->mdivk;
+        }
+    }
+    else
+    {
+        if(ps->c2_hf)
+            ps->c2divstart = ps->c2diva + 4;
+        else
+            ps->c2divstart = (ps->c2diva+1) * ps->mdivk;
+    }
+}
+
+static void Update_c3divstart(PokeyState* ps)
+{
+    if(ps->c3_f2)
+    {
+        if(ps->c2_hf)
+            ps->c3divstart = ps->c2diva + 256*ps->c3diva + 7;
+        else
+            ps->c3divstart = (ps->c2diva + 256*ps->c3diva + 1) * ps->mdivk;
+    }
+    else
+        ps->c3divstart = (ps->c3diva + 1) * ps->mdivk;
+}
+
+static void Update_audctl(PokeyState* ps, unsigned char val)
+{
+    unsigned char nc0_hf,nc2_hf,nc1_f0,nc3_f2,nc0sw4,nc1sw4,new_divk;
+    unsigned char recalc0=0;
+    unsigned char recalc1=0;
+    unsigned char recalc2=0;
+    unsigned char recalc3=0;
+
+    unsigned int cnt0 = 0;
+    unsigned int cnt1 = 0;
+    unsigned int cnt2 = 0;
+    unsigned int cnt3 = 0;
+
+    nc0_hf = (val & 0x40) != 0;
+    nc2_hf = (val & 0x20) != 0;
+    nc1_f0 = (val & 0x10) != 0;
+    nc3_f2 = (val & 0x08) != 0;
+    nc0sw4 = (val & 0x04) != 0;
+    nc1sw4 = (val & 0x02) != 0;
+    if(val & 0x01)
+        new_divk = 114;
+    else
+        new_divk = 28;
+
+    if(new_divk != ps->mdivk)
+    {
+        recalc0 = recalc1 = recalc2 = recalc3 = 1;
+    }
+    if(nc1_f0 != ps->c1_f0)
+    {
+        recalc0 = recalc1 = 1;
+    }
+    if(nc3_f2 != ps->c3_f2)
+    {
+        recalc2 = recalc3 = 1;
+    }
+    if(nc0_hf != ps->c0_hf)
+    {
+        recalc0 = 1;
+        if(nc1_f0)
+            recalc1 = 1;
+    }
+    if(nc2_hf != ps->c2_hf)
+    {
+        recalc2 = 1;
+        if(nc3_f2)
+            recalc3 = 1;
+    }
+
+    if(recalc0)
+    {
+        if(ps->c0_hf)
+            cnt0 = ps->c0divpos;
+        else
+            cnt0 = ps->c0divpos/ps->mdivk;
+    }
+    if(recalc1)
+    {
+        if(ps->c1_f0)
+        {
+            if(ps->c0_hf)
+                cnt1 = ps->c1divpos/256;
+            else
+                cnt1 = ps->c1divpos/256/ps->mdivk;
+        }
+        else
+        {
+            cnt1 = ps->c1divpos/ps->mdivk;
+        }
+    }
+    if(recalc2)
+    {
+        if(ps->c2_hf)
+            cnt2 = ps->c2divpos;
+        else
+            cnt2 = ps->c2divpos/ps->mdivk;
+    }
+    if(recalc3)
+    {
+        if(ps->c3_f2)
+        {
+            if(ps->c2_hf)
+                cnt3 = ps->c3divpos/256;
+            else
+                cnt3 = ps->c3divpos/256/ps->mdivk;
+        }
+    }
+
+    if(recalc0)
+    {
+        if(nc0_hf)
+            ps->c0divpos = cnt0;
+        else
+            ps->c0divpos = cnt0*new_divk;
+    }
+    if(recalc1)
+    {
+        if(nc1_f0)
+        {
+            if(nc0_hf)
+                ps->c1divpos = cnt1*256+cnt0;
+            else
+                ps->c1divpos = (cnt1*256+cnt0)*new_divk;
+        }
+        else
+        {
+            ps->c1divpos = cnt1*new_divk;
+        }
+    }
+
+    if(recalc2)
+    {
+        if(nc2_hf)
+            ps->c2divpos = cnt2;
+        else
+            ps->c2divpos = cnt2*new_divk;
+    }
+    if(recalc3)
+    {
+        if(nc3_f2)
+        {
+            if(nc2_hf)
+                ps->c3divpos = cnt3*256+cnt2;
+            else
+                ps->c3divpos = (cnt3*256+cnt2)*new_divk;
+        }
+    }
+
+    ps->c0_hf = nc0_hf;
+    ps->c2_hf = nc2_hf;
+    ps->c1_f0 = nc1_f0;
+    ps->c3_f2 = nc3_f2;
+    ps->c0sw4 = nc0sw4;
+    ps->c1sw4 = nc1sw4;
+    ps->mdivk = new_divk;
+}
+
+/* SKCTL for two-tone mode */
+static void Update_skctl(PokeyState* ps, unsigned char val)
+{
+    ps->skctl = val;
+}
+
+/* if using nonlinear mixing, don't stop ultrasounds */
+#ifdef NONLINEAR_MIXING
+#define Update_c0stop(a) do{}while(0)
+#define Update_c1stop(a) do{}while(0)
+#define Update_c2stop(a) do{}while(0)
+#define Update_c3stop(a) do{}while(0)
+#else
+static void Update_c0stop(PokeyState* ps)
+{
+    unsigned long lim = pokey_frq/2/audible_frq;
+
+    unsigned char hfa = 0;
+    ps->c0stop = 0;
+
+    if(ps->c0vo || ps->vol0 == 0)
+        ps->c0stop = 1;
+    else if(!ps->c0sw4 && ps->c0sw3 && ps->c0sw2) /* If channel 0 is a pure tone... */
+    {
+        if(ps->c1_f0)
+        {
+            if(ps->c1divstart <= lim)
+            {
+                ps->c0stop = 1;
+                hfa = 1;
+            }
+        }
+        else
+        {
+            if(ps->c0divstart <= lim)
+            {
+                ps->c0stop = 1;
+                hfa = 1;
+            }
+        }
+    }
+    else if(!ps->c0sw4 && ps->c0sw3 && !ps->c0sw2 && ps->c0sw1) /* if channel 0 is poly4... */
+    {
+        /* period for poly4 signal is 15 cycles */
+        if(ps->c1_f0)
+        {
+            if(ps->c1divstart <= lim*2/15) /* all poly4 signal is above Nyquist */
+            {
+                ps->c0stop = 1;
+                hfa = 1;
+            }
+        }
+        else
+        {
+            if(ps->c0divstart <= lim*2/15)
+            {
+                ps->c0stop = 1;
+                hfa = 1;
+            }
+        }
+    }
+
+    ps->outvol_0 = 2*ps->readout_0(ps);
+    if(hfa)
+        ps->outvol_0 = ps->vol0;
+}
+
+static void Update_c1stop(PokeyState* ps)
+{
+    unsigned long lim = pokey_frq/2/audible_frq;
+
+    unsigned char hfa = 0;
+    ps->c1stop = 0;
+
+    if(!ps->c1_f0 && (ps->c1vo || ps->vol1 == 0))
+        ps->c1stop = 1;
+    else if(!ps->c1sw4 && ps->c1sw3 && ps->c1sw2 && ps->c1divstart <= lim) /* If channel 1 is a pure tone */
+    {
+        ps->c1stop = 1;
+        hfa = 1;
+    }
+    else if(!ps->c1sw4 && ps->c1sw3 && !ps->c1sw2 && ps->c1sw1 && ps->c1divstart <= lim*2/15)  /* all poly4 signal is above Nyquist */
+    {
+        ps->c1stop = 1;
+        hfa = 1;
+    }
+
+    ps->outvol_1 = 2*ps->readout_1(ps);
+    if(hfa)
+        ps->outvol_1 = ps->vol1;
+}
+
+static void Update_c2stop(PokeyState* ps)
+{
+    unsigned long lim = pokey_frq/2/audible_frq;
+
+    unsigned char hfa = 0;
+    ps->c2stop = 0;
+
+    if(!ps->c0sw4 && (ps->c2vo || ps->vol2 == 0))
+        ps->c2stop = 1;
+    /* If channel 2 is a pure tone and no filter for c0... */
+    else if(ps->c2sw3 && ps->c2sw2 && !ps->c0sw4)
+    {
+        if(ps->c3_f2)
+        {
+            if(ps->c3divstart <= lim)
+            {
+                ps->c2stop = 1;
+                hfa = 1;
+            }
+        }
+        else
+        {
+            if(ps->c2divstart <= lim)
+            {
+                ps->c2stop = 1;
+                hfa = 1;
+            }
+        }
+    }
+    else if(ps->c2sw3 && !ps->c2sw2 && ps->c2sw1 && !ps->c0sw4) /* if channel 2 is poly4 and no filter for c0... */
+    {
+        /* period for poly4 signal is 15 cycles */
+        if(ps->c3_f2)
+        {
+            if(ps->c3divstart <= lim*2/15) /* all poly4 signal is above Nyquist */
+            {
+                ps->c2stop = 1;
+                hfa = 1;
+            }
+        }
+        else
+        {
+            if(ps->c2divstart <= lim*2/15)
+            {
+                ps->c2stop = 1;
+                hfa = 1;
+            }
+        }
+    }
+
+    ps->outvol_2 = 2*ps->readout_2(ps);
+    if(hfa)
+        ps->outvol_2 = ps->vol2;
+}
+
+static void Update_c3stop(PokeyState* ps)
+{
+    unsigned long lim = pokey_frq/2/audible_frq;
+    unsigned char hfa = 0;
+    ps->c3stop = 0;
+
+    if(!ps->c1sw4 && !ps->c3_f2 && (ps->c3vo || ps->vol3 == 0))
+        ps->c3stop = 1;
+    /* If channel 3 is a pure tone */
+    else if(ps->c3sw3 && ps->c3sw2 && !ps->c1sw4 && ps->c3divstart <= lim)
+    {
+        ps->c3stop = 1;
+        hfa = 1;
+    }
+    else if(ps->c3sw3 && !ps->c3sw2 && ps->c3sw1 && !ps->c1sw4 && ps->c3divstart <= lim*2/15)  /* all poly4 signal is above Nyquist */
+    {
+        ps->c3stop = 1;
+        hfa = 1;
+    }
+
+    ps->outvol_3 = 2*ps->readout_3(ps);
+    if(hfa)
+        ps->outvol_3 = ps->vol3;
+}
+#endif /*NONLINEAR_MIXING*/
+
+/*****************************************************************************/
+/* Function: Update_pokey_sound_mz()                                         */
+/*                                                                           */
+/* Inputs:  addr - the address of the parameter to be changed                */
+/*          val - the new value to be placed in the specified address        */
+/*          chip - chip # for stereo                                         */
+/*          gain - specified as an 8-bit fixed point number - use 1 for no   */
+/*                 amplification (output is multiplied by gain)              */
+/*                                                                           */
+/* Outputs: Adjusts local globals - no return value                          */
+/*                                                                           */
+/*****************************************************************************/
+static void Update_pokey_sound_mz(UWORD addr, UBYTE val, UBYTE chip, UBYTE gain)
+{
+    PokeyState* ps = pokey_states+chip;
+
+    switch(addr & 0x0f)
+    {
+    case POKEY_OFFSET_AUDF1:
+        ps->c0diva = val;
+        Update_c0divstart(ps);
+        if(ps->c1_f0)
+        {
+            Update_c1divstart(ps);
+            Update_c1stop(ps);
+        }
+        Update_c0stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_AUDC1:
+        ps->c0sw1 = (val & 0x40) != 0;
+        ps->c0sw2 = (val & 0x20) != 0;
+        ps->c0sw3 = (val & 0x80) != 0;
+        ps->vol0 = (val & 0xF);
+        ps->c0vo = (val & 0x10) != 0;
+        Update_readout_0(ps);
+        Update_event0(ps);
+        Update_c0stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_AUDF2:
+        ps->c1diva = val;
+        Update_c1divstart(ps);
+        if(ps->c1_f0)
+        {
+            Update_c0divstart(ps);
+            Update_c0stop(ps);
+        }
+        Update_c1stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_AUDC2:
+        ps->c1sw1 = (val & 0x40) != 0;
+        ps->c1sw2 = (val & 0x20) != 0;
+        ps->c1sw3 = (val & 0x80) != 0;
+        ps->vol1 = (val & 0xF);
+        ps->c1vo = (val & 0x10) != 0;
+        Update_readout_1(ps);
+        Update_event1(ps);
+        Update_c1stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_AUDF3:
+        ps->c2diva = val;
+        Update_c2divstart(ps);
+        if(ps->c3_f2)
+        {
+            Update_c3divstart(ps);
+            Update_c3stop(ps);
+        }
+        Update_c2stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_AUDC3:
+        ps->c2sw1 = (val & 0x40) != 0;
+        ps->c2sw2 = (val & 0x20) != 0;
+        ps->c2sw3 = (val & 0x80) != 0;
+        ps->vol2 = (val & 0xF);
+        ps->c2vo = (val & 0x10) != 0;
+        Update_readout_2(ps);
+        Update_event2(ps);
+        Update_c2stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_AUDF4:
+        ps->c3diva = val;
+        Update_c3divstart(ps);
+        if(ps->c3_f2)
+        {
+            Update_c2divstart(ps);
+            Update_c2stop(ps);
+        }
+        Update_c3stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_AUDC4:
+        ps->c3sw1 = (val & 0x40) != 0;
+        ps->c3sw2 = (val & 0x20) != 0;
+        ps->c3sw3 = (val & 0x80) != 0;
+        ps->vol3 = val & 0xF;
+        ps->c3vo = (val & 0x10) != 0;
+        Update_readout_3(ps);
+        Update_event3(ps);
+        Update_c3stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_AUDCTL:
+        ps->selpoly9 = (val & 0x80) != 0;
+        Update_audctl(ps,val);
+        Update_readout_0(ps);
+        Update_readout_1(ps);
+        Update_readout_2(ps);
+        Update_readout_3(ps);
+        Update_c0divstart(ps);
+        Update_c1divstart(ps);
+        Update_c2divstart(ps);
+        Update_c3divstart(ps);
+        Update_c0stop(ps);
+        Update_c1stop(ps);
+        Update_c2stop(ps);
+        Update_c3stop(ps);
+        ps->forcero = 1;
+        break;
+    case POKEY_OFFSET_STIMER:
+        if(ps->c1_f0)
+            ps->c0divpos = ps->c0divstart_p;
+        else
+            ps->c0divpos = ps->c0divstart;
+        ps->c1divpos = ps->c1divstart;
+        if(ps->c3_f2)
+            ps->c2divpos = ps->c2divstart_p;
+        else
+            ps->c2divpos = ps->c2divstart;
+
+        ps->c3divpos = ps->c3divstart;
+        /*Documentation is wrong about which voices are on after STIMER*/
+        /*It is 3&4 which are on, tested on a real atari*/
+        ps->c0t2 = 0;
+        ps->c1t2 = 0;
+        ps->c2t2 = 1;
+        ps->c3t2 = 1;
+        break;
+    case POKEY_OFFSET_SKCTL:
+        Update_skctl(ps,val);
+        break;
+    }
+}
+
+#if 0
+void mzpokeysnd_debugreset(UBYTE chip)
+{
+    PokeyState* ps = pokey_states+chip;
+
+    if(ps->c1_f0)
+        ps->c0divpos = ps->c0divstart_p;
+    else
+        ps->c0divpos = ps->c0divstart;
+    ps->c1divpos = ps->c1divstart;
+    if(ps->c3_f2)
+        ps->c2divpos = ps->c2divstart_p;
+    else
+        ps->c2divpos = ps->c2divstart;
+    ps->c3divpos = ps->c3divstart;
+
+    ps->c0t2 = 1;
+    ps->c1t2 = 1;
+    ps->c2t2 = 1;
+    ps->c3t2 = 1;
+}
+#endif
+
+/**************************************************************
+
+           Master gain and DC offset calculation
+                 by Michael Borisov
+
+ In order to use the available 8-bit or 16-bit dynamic range
+ to full extent, reducing the influence of quantization
+ noise while simultaneously avoiding overflows, gain
+ and DC offset should be set to appropriate value.
+
+ All Pokey-generated sounds have maximal amplitude of 15.
+ When all four channels sound simultaneously and in the
+ same phase, amplidudes would add up to 60.
+
+ If Pokey is generating a 'pure tone', it always has a DC
+ offset of half its amplitude. For other signals (produced
+ by poly generators) DC offset varies, but it is always near
+ to half amplitude and never exceeds this value.
+
+ In case that pure tone base frequency is outside of audible
+ range (ultrasound frequency for high sample rates and above-
+ Nyquist frequency for low sample rates), to speed up the engine,
+ the generator is stopped while having only DC offset on the
+ output (half of corresponding AUDV value). In order that this
+ DC offset can be always represented as integer, AUDV values
+ are multiplied by 2 when the generator works.
+
+ Therefore maximum integer value before resampling filters
+ would be 60*2 = 120 while having maximum DC offset of 60.
+ Resampling does not change the DC offset, therefore we may
+ subtract it from the signal either before or after resampling.
+ In mzpokeysnd, DC offset is subtracted after resampling, however
+ for better understanding in further measurements I assume
+ subtracting DC before. So, input range for the resampler
+ becomes [-60 .. 60].
+
+ Resampling filter removes some harmonics from the signal as if
+ the rectangular wave was Fourier transformed forth-and-back,
+ while zeroing all harmonics above cutoff frequency. In case
+ of high-frequency pure tone (above samplerate/8), only first
+ harmonic of the Fourier transofm will remain. As it
+ is known, Fourier-transform of the rectangular function of
+ amplitude 1 has first oscillation component of amplitude 4/M_PI.
+ Therefore, maximum sample values for filtered rectangular
+ signal may exceed the amplitude  of rectangular signal
+ by up to 4/M_PI times.
+
+ Since our range before resampler is -60 .. 60, taking into
+ account mentioned effect with band limiting, range of values
+ on the resampler output appears to be in the following bounds:
+ [-60*4/M_PI .. 60*4/M_PI]
+
+ In order to map this into signed 8-bit range [-128 .. 127], we
+ should multiply the resampler output by 127/60/4*M_PI.
+
+ As it is common for sound hardware to have 8-bit sound unsigned,
+ additional DC offset of 128 must be added.
+
+ For 16-bit case the output range is [-32768 .. 32767], and
+ we should multiply the resampler output by 32767/60/4*M_PI
+
+ To make some room for numerical errors, filter ripples and
+ quantization noise, so that they do not cause overflows in
+ quantization, dynamic range is reduced in mzpokeysnd by
+ multiplying the output amplitude with 0.95, reserving 5%
+ of the total range for such effects, which is about 0.51db.
+
+ Mentioned gain and DC values were tested with 17kHz audio
+ playing synchronously on 4 channels, which showed to be
+ utilizing 95% of the sample values range.
+
+ Since any other gain value will be not optimal, I removed
+ user gain setting and hard-coded the gain into mzpokeysnd
+
+ ---
+
+ A note from Piotr Fusik:
+ I've added support for the key click sound generated by GTIA. Its
+ volume seems to be pretty much like 8 on single POKEY's channel.
+ So, the volumes now can sum up to 136 (4 channels * 15 * 2
+ + 8 * 2 for GTIA), not 120.
+
+ A note from Mark Grebe:
+ I've added back in the console and sio sounds from the old
+ pokey version.  So, now the volumes can sum up to 152
+ (4 channesl * 15 * 2 + 8 * 4 for old sound), not 120 or 136.
+
+ ******************************************************************/
+
+
+/******************************************************************
+
+          Quantization effects and dithering
+              by Michael Borisov
+
+ Quantization error in the signal has an expectation value of half
+ the LSB, when the rounding is performed properly. Sometimes they
+ express quantization error as a random function with even
+ distribution over the range [-0.5 to 0.5]. Spectrum of this function
+ is flat, because it's a white noise.
+
+ Power of a discrete signal (including noise) is calculated as
+ mean square of its samples. For the mentioned above noise
+ this is approximately 0.33. Therefore, in decibels for 8-bit case,
+ our noise will have power of 10*log10(0.33/256/256) = -53dB
+
+ Because noise is white, this power of -53dB will be evenly
+ distributed over the whole signal band upto Nyquist frequency.
+ The larger the band is (higher sampling frequency), less
+ is the quantisation noise floor. For 8000Hz noise floor is
+ 10*log10(0.33/256/256/4000) = -89dB/Hz, and for 44100Hz noise
+ floor is 10*log10(0.33/256/256/22050) = -96.4dB/Hz.
+ This shows that higher sampling rates are better in sense of
+ quantization noise. Moreover, as large part of quantization noise
+ in case of 44100Hz will fall into ultrasound and hi-frequency
+ area 10-20kHz where human ear is less sensitive, this will
+ show up as great improvement in quantization noise performance
+ compared to 8000Hz.
+
+ I was plotting spectral analysis for sounds produced by mzpokeysnd
+ to check these measures. And it showed up that in 8-bit case
+ there is no expected flat noise floor of -89db/Hz for 8000Hz,
+ but some distortion spectral peaks had higher amplitude than
+ the aliasing peaks in 16-bit case. This was a proof to another
+ statement which says that quantization noise tends to become
+ correlated with the signal. Correlation is especially strong
+ for simple signals generated by Pokey. Correlation means that
+ the noise power of -53db is no longer evenly distributed
+ across the whole frequency range, but concentrates in larger
+ peaks at locations which depend on the Pokey signal.
+
+ To decorrelate quantization distortion and make it again
+ white noise, which would improve the sound spectrum, since
+ the maximum distortion peaks will have less amplitude,
+ dithering is used. Another white noise is added to the signal
+ before quantization. Since this added noise is not correlated
+ with the signal, it shows itself as a flat noise floor.
+ Quantization noise now tries to correlate with the dithering
+ noise, but this does not lead to appearance of sharp
+ spectral peaks any more :)
+
+ Another thing is that for listening, white noise is better than
+ distortion. This is because human hearing has some 'noise
+ reduction' system which makes it easier to percept sounds
+ on the white noise background.
+
+ From the other point of view, if a signal has high and low
+ spectral peaks, it is desirable that there is no distortion
+ component with peaks of amplitude comparable to those of
+ the true signal. Otherwise, perception of background low-
+ amplitude signals will be disrupted. That's why they say
+ that dithering extends dynamic range.
+
+ Dithering does not eliminate correlation of quantization noise
+ completely. Degree of reduction of this effect depends on
+ the dithering noise power. The higher is dithering noise,
+ the more quantization noise is decorrelated. But this also
+ leads to increase of noise percepted by the listener. So, an
+ optimum value should be selected. My experiments show that
+ unbiased rand() noise of amplitude 0.25 LSB is doing well.
+
+ Test spectral pictures for 8-bit sound, 8kHz sampling rate,
+ dithered, show a noise floor of approx. -87dB/Hz.
+
+ ******************************************************************/
+
+#define MAX_SAMPLE 152
+
+static void mzpokeysnd_process_8(void* sndbuffer, int sndn)
+{
+    unsigned short i;
+    int nsam = sndn;
+    UBYTE *buffer = (UBYTE *) sndbuffer;
+
+    if(num_cur_pokeys<1)
+        return; /* module was not initialized */
+
+    /* if there are two pokeys, then the signal is stereo
+       we assume even sndn */
+    while(nsam >= (int) num_cur_pokeys)
+    {
+#ifdef VOL_ONLY_SOUND
+        if( POKEYSND_sampbuf_rptr!=POKEYSND_sampbuf_ptr )
+            { int l;
+            if( POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr]>0 )
+                POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr]-=1280;
+            while(  (l=POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr])<=0 )
+                {	POKEYSND_sampout=POKEYSND_sampbuf_val[POKEYSND_sampbuf_rptr];
+                        POKEYSND_sampbuf_rptr++;
+                        if( POKEYSND_sampbuf_rptr>=POKEYSND_SAMPBUF_MAX )
+                                POKEYSND_sampbuf_rptr=0;
+                        if( POKEYSND_sampbuf_rptr!=POKEYSND_sampbuf_ptr )
+                            {
+                            POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr]+=l;
+                            }
+                        else	break;
+                }
+            }
+#endif
+
+#ifdef VOL_ONLY_SOUND
+        buffer[0] = (UBYTE)floor((generate_sample(pokey_states) + POKEYSND_sampout - MAX_SAMPLE / 2.0)
+         * (255.0 / MAX_SAMPLE / 4 * M_PI * 0.95) + 128 + 0.5 + 0.5 * rand() / RAND_MAX - 0.25);
+#else
+        buffer[0] = (UBYTE)floor((generate_sample(pokey_states) - MAX_SAMPLE / 2.0)
+         * (255.0 / MAX_SAMPLE / 4 * M_PI * 0.95) + 128 + 0.5 + 0.5 * rand() / RAND_MAX - 0.25);
+#endif
+        for(i=1; i<num_cur_pokeys; i++)
+        {
+            buffer[i] = (UBYTE)floor((generate_sample(pokey_states + i) - MAX_SAMPLE / 2.0)
+             * (255.0 / MAX_SAMPLE / 4 * M_PI * 0.95) + 128 + 0.5 + 0.5 * rand() / RAND_MAX - 0.25);
+        }
+        buffer += num_cur_pokeys;
+        nsam -= num_cur_pokeys;
+    }
+}
+
+static void mzpokeysnd_process_16(void* sndbuffer, int sndn)
+{
+    unsigned short i;
+    int nsam = sndn;
+    SWORD *buffer = (SWORD *) sndbuffer;
+
+    if(num_cur_pokeys<1)
+        return; /* module was not initialized */
+
+    /* if there are two pokeys, then the signal is stereo
+       we assume even sndn */
+    while(nsam >= (int) num_cur_pokeys)
+    {
+#ifdef VOL_ONLY_SOUND
+        if( POKEYSND_sampbuf_rptr!=POKEYSND_sampbuf_ptr )
+            { int l;
+            if( POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr]>0 )
+                POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr]-=1280;
+            while(  (l=POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr])<=0 )
+                {	POKEYSND_sampout=POKEYSND_sampbuf_val[POKEYSND_sampbuf_rptr];
+                        POKEYSND_sampbuf_rptr++;
+                        if( POKEYSND_sampbuf_rptr>=POKEYSND_SAMPBUF_MAX )
+                                POKEYSND_sampbuf_rptr=0;
+                        if( POKEYSND_sampbuf_rptr!=POKEYSND_sampbuf_ptr )
+                            {
+                            POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr]+=l;
+                            }
+                        else	break;
+                }
+            }
+#endif
+#ifdef VOL_ONLY_SOUND
+        buffer[0] = (SWORD)floor((generate_sample(pokey_states) + POKEYSND_sampout - MAX_SAMPLE / 2.0)
+         * (65535.0 / MAX_SAMPLE / 4 * M_PI * 0.95) + 0.5 + 0.5 * rand() / RAND_MAX - 0.25);
+#else
+        buffer[0] = (SWORD)floor((generate_sample(pokey_states) - MAX_SAMPLE / 2.0)
+         * (65535.0 / MAX_SAMPLE / 4 * M_PI * 0.95) + 0.5 + 0.5 * rand() / RAND_MAX - 0.25);
+#endif
+        for(i=1; i<num_cur_pokeys; i++)
+        {
+            buffer[i] = (SWORD)floor((generate_sample(pokey_states + i) - MAX_SAMPLE / 2.0)
+             * (65535.0 / MAX_SAMPLE / 4 * M_PI * 0.95) + 0.5 + 0.5 * rand() / RAND_MAX - 0.25);
+        }
+        buffer += num_cur_pokeys;
+        nsam -= num_cur_pokeys;
+    }
+}
+
+#ifdef SERIO_SOUND
+static void Update_serio_sound_mz( int out, UBYTE data )
+{
+#ifdef VOL_ONLY_SOUND
+   int bits,pv,future;
+        if (!POKEYSND_serio_sound_enabled) return;
+
+	pv=0;
+	future=0;
+	bits= (data<<1) | 0x200;
+	while( bits )
+	{
+		POKEYSND_sampbuf_lastval-=pv;
+		pv=(bits&0x01)*pokey_states[0].vol3;
+		POKEYSND_sampbuf_lastval+=pv;
+
+	POKEYSND_sampbuf_val[POKEYSND_sampbuf_ptr]=POKEYSND_sampbuf_lastval;
+	POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_ptr]=
+		(ANTIC_CPU_CLOCK+future-POKEYSND_sampbuf_last)*128*POKEYSND_samp_freq/178979;
+	POKEYSND_sampbuf_last=ANTIC_CPU_CLOCK+future;
+	POKEYSND_sampbuf_ptr++;
+	if( POKEYSND_sampbuf_ptr>=POKEYSND_SAMPBUF_MAX )
+		POKEYSND_sampbuf_ptr=0;
+	if( POKEYSND_sampbuf_ptr==POKEYSND_sampbuf_rptr )
+	{	POKEYSND_sampbuf_rptr++;
+		if( POKEYSND_sampbuf_rptr>=POKEYSND_SAMPBUF_MAX )
+			POKEYSND_sampbuf_rptr=0;
+	}
+			/* 1789790/19200 = 93 */
+		future+=93;	/* ~ 19200 bit/s - FIXME!!! set speed form AUDF [2] ??? */
+		bits>>=1;
+	}
+	POKEYSND_sampbuf_lastval-=pv;
+#endif  /* VOL_ONLY_SOUND */
+}
+#endif /* SERIO_SOUND */
+
+#ifdef CONSOLE_SOUND
+static void Update_consol_sound_mz( int set )
+{
+#ifdef VOL_ONLY_SOUND
+  static int prev_atari_speaker=0;
+  static unsigned int prev_cpu_clock=0;
+  int d;
+        if (!POKEYSND_console_sound_enabled) return;
+
+	if( !set && POKEYSND_samp_consol_val==0 )	return;
+	POKEYSND_sampbuf_lastval-=POKEYSND_samp_consol_val;
+	if( prev_atari_speaker!=GTIA_speaker )
+	{	POKEYSND_samp_consol_val=GTIA_speaker*8*4;	/* gain */
+		prev_cpu_clock=ANTIC_CPU_CLOCK;
+	}
+	else if( !set )
+	{	d=ANTIC_CPU_CLOCK - prev_cpu_clock;
+		if( d<114 )
+		{	POKEYSND_sampbuf_lastval+=POKEYSND_samp_consol_val;   return;	}
+		while( d>=114 /* CPUL */ )
+		{	POKEYSND_samp_consol_val=POKEYSND_samp_consol_val*99/100;
+			d-=114;
+		}
+		prev_cpu_clock=ANTIC_CPU_CLOCK-d;
+	}
+	POKEYSND_sampbuf_lastval+=POKEYSND_samp_consol_val;
+	prev_atari_speaker=GTIA_speaker;
+
+	POKEYSND_sampbuf_val[POKEYSND_sampbuf_ptr]=POKEYSND_sampbuf_lastval;
+	POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_ptr]=
+		(ANTIC_CPU_CLOCK-POKEYSND_sampbuf_last)*128*POKEYSND_samp_freq/178979;
+	POKEYSND_sampbuf_last=ANTIC_CPU_CLOCK;
+	POKEYSND_sampbuf_ptr++;
+	if( POKEYSND_sampbuf_ptr>=POKEYSND_SAMPBUF_MAX )
+		POKEYSND_sampbuf_ptr=0;
+	if( POKEYSND_sampbuf_ptr==POKEYSND_sampbuf_rptr )
+	{	POKEYSND_sampbuf_rptr++;
+		if( POKEYSND_sampbuf_rptr>=POKEYSND_SAMPBUF_MAX )
+			POKEYSND_sampbuf_rptr=0;
+	}
+#endif  /* VOL_ONLY_SOUND */
+}
+#endif
+
+#ifdef VOL_ONLY_SOUND
+static void Update_vol_only_sound_mz( void )
+{
+#ifdef CONSOLE_SOUND
+	POKEYSND_UpdateConsol(0);	/* mmm */
+#endif /* CONSOLE_SOUND */
+}
+#endif
diff --git a/project/jni/application/atari800/src/mzpokeysnd.h b/project/jni/application/atari800/src/mzpokeysnd.h
new file mode 100644
index 000000000..f2fbfb01f
--- /dev/null
+++ b/project/jni/application/atari800/src/mzpokeysnd.h
@@ -0,0 +1,18 @@
+#ifndef MZPOKEYSND_H_
+#define MZPOKEYSND_H_
+
+#include "config.h"
+#include "pokeysnd.h"
+#include "atari.h"
+
+int MZPOKEYSND_Init(ULONG freq17,
+                        int playback_freq,
+                        UBYTE num_pokeys,
+                        int flags,
+                        int quality
+#ifdef __PLUS
+                        , int clear_regs
+#endif
+                       );
+
+#endif /* MZPOKEYSND_H_ */
diff --git a/project/jni/application/atari800/src/pbi.c b/project/jni/application/atari800/src/pbi.c
new file mode 100644
index 000000000..0359f86ba
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi.c
@@ -0,0 +1,301 @@
+/*
+ * pbi.c - Parallel bus emulation
+ *
+ * Copyright (C) 2002 Jason Duerstock <jason@cluephone.com>
+ * Copyright (C) 2007-2008 Perry McFarlane
+ * Copyright (C) 2002-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "atari.h"
+#include "pbi.h"
+#include "memory.h"
+#include "pia.h"
+#include "cpu.h"
+#include "log.h"
+#include "util.h"
+#include "statesav.h"
+#include <stdlib.h>
+#ifdef PBI_MIO
+#include "pbi_mio.h"
+#endif
+#ifdef PBI_BB
+#include "pbi_bb.h"
+#endif
+#ifdef PBI_XLD
+#include "pbi_xld.h"
+#endif
+#ifdef PBI_PROTO80
+#include "pbi_proto80.h"
+#endif
+
+/* stores the current state of the D1FF register, real hardware has 1
+ * bit per device, the bits are on the devices themselves */
+static UBYTE D1FF_LATCH = 0;
+
+/* 1400XL/1450XLD and 1090 have ram here */
+int PBI_D6D7ram = FALSE;
+
+/* So far as is currently implemented: PBI_IRQ can be generated by the 1400/1450 Votrax and the Black Box button */
+/* Each emulated PBI device will set a bit in this variable to indicate IRQ status */
+/* The actual hardware has only one common line.  The device driver rom has to
+ * figure it out*/
+int PBI_IRQ = 0;
+
+#ifdef PBI_DEBUG
+#define D(a) a
+#else
+#define D(a) do{}while(0)
+#endif
+
+int PBI_Initialise(int *argc, char *argv[])
+{
+	return TRUE
+#ifdef PBI_XLD
+		&& PBI_XLD_Initialise(argc, argv)
+#endif
+#ifdef PBI_BB
+		&& PBI_BB_Initialise(argc, argv)
+#endif
+#ifdef PBI_MIO
+		&& PBI_MIO_Initialise(argc, argv)
+#endif
+#ifdef PBI_PROTO80
+		&& PBI_PROTO80_Initialise(argc, argv)
+#endif
+	;
+}
+
+int PBI_ReadConfig(char *string, char *ptr)
+{
+	if (0) {
+	}
+#ifdef PBI_XLD
+	else if (PBI_XLD_ReadConfig(string, ptr)) {
+	}
+#endif
+#ifdef PBI_MIO
+	else if (PBI_MIO_ReadConfig(string, ptr)) {
+	}
+#endif
+#ifdef PBI_BB
+	else if (PBI_BB_ReadConfig(string, ptr)) {
+	}
+#endif
+#ifdef PBI_PROTO80
+	else if (PBI_PROTO80_ReadConfig(string, ptr)) {
+	}
+#endif
+	else return FALSE; /* no match */
+	return TRUE; /* matched something */
+}
+
+void PBI_WriteConfig(FILE *fp)
+{
+#ifdef PBI_MIO
+	PBI_MIO_WriteConfig(fp);
+#endif
+#ifdef PBI_BB
+	PBI_BB_WriteConfig(fp);
+#endif
+#ifdef PBI_XLD
+	PBI_XLD_WriteConfig(fp);
+#endif
+#ifdef PBI_PROTO80
+	PBI_PROTO80_WriteConfig(fp);
+#endif
+}
+
+void PBI_Reset(void)
+{
+	/* Reset all PBI ROMs */
+	PBI_D1PutByte(0xd1ff, 0);
+#ifdef PBI_XLD
+	if (PBI_XLD_enabled) PBI_XLD_Reset();
+#endif
+	PBI_IRQ = 0;
+}
+
+UBYTE PBI_D1GetByte(UWORD addr)
+{
+	int result = 0xff;
+	/* MIO and BB do not follow the spec, they take over the bus: */
+#ifdef PBI_MIO
+	if (PBI_MIO_enabled) return PBI_MIO_D1GetByte(addr);
+#endif
+#ifdef PBI_BB
+	if (PBI_BB_enabled) return PBI_BB_D1GetByte(addr);
+#endif
+	/* Remaining PBI devices cooperate, following spec */
+#ifdef PBI_XLD
+	if (PBI_XLD_enabled) result = PBI_XLD_D1GetByte(addr);
+#endif
+#ifdef PBI_PROTO80
+	if (result == PBI_NOT_HANDLED && PBI_PROTO80_enabled) result = PBI_PROTO80_D1GetByte(addr);
+#endif
+	if(result != PBI_NOT_HANDLED) return (UBYTE)result;
+	/* Each bit of D1FF is set by one of the 8 PBI devices to signal IRQ */
+	/* The XLD devices have been combined into a single handler */
+	if (addr == 0xd1ff) {
+	/* D1FF IRQ status: */
+		result = 0;
+#ifdef PBI_XLD
+		if (PBI_XLD_enabled) result |= PBI_XLD_D1ffGetByte();
+#endif
+		/* add more devices here... */
+		return result;
+	}
+	/* addr was not handled: */
+	D(printf("PBI_GetByte:%4x:%2x PC:%4x IRQ:%d\n",addr,result,CPU_regPC,IRQ));
+	return result; /* 0xff */
+}
+
+void PBI_D1PutByte(UWORD addr, UBYTE byte)
+{
+	static int fp_active = TRUE;
+#ifdef PBI_MIO
+	if (PBI_MIO_enabled) {
+		PBI_MIO_D1PutByte(addr, byte);
+		return;
+	}
+#endif
+#ifdef PBI_BB
+	if (PBI_BB_enabled) {
+		PBI_BB_D1PutByte(addr, byte);
+		return;
+	}
+#endif
+	/* Remaining PBI devices cooperate, following spec */
+	if (addr != 0xd1ff) {
+		D(printf("PBI_PutByte:%4x <- %2x\n", addr, byte));
+#ifdef PBI_XLD
+		if (PBI_XLD_enabled) PBI_XLD_D1PutByte(addr, byte);
+#endif
+#ifdef PBI_PROTO_80
+		if (PBI_PROTO80_enabled) PBI_PROTO80_D1PutByte(addr, byte);
+#endif
+		/* add more devices here... */
+	}
+	else if (addr == 0xd1ff) {
+		/* D1FF pbi rom bank select */
+		D(printf("D1FF write:%x\n", byte));
+		if (D1FF_LATCH != byte) {
+			/* if it's not valid, ignore it */
+			if (byte != 0 && byte != 1 && byte != 2 && byte != 4 && byte != 8 && byte != 0x10 && byte !=0x20 && byte != 0x40 && byte != 0x80){
+				D(printf("*****INVALID d1ff write:%2x********\n",byte));
+				return;
+			}
+			/* otherwise, update the latch */
+			D1FF_LATCH = byte;
+#ifdef PBI_XLD
+			if (PBI_XLD_enabled && PBI_XLD_D1ffPutByte(byte) != PBI_NOT_HANDLED) {
+				/* handled */
+				fp_active = FALSE;
+				return;
+			}
+#endif
+#ifdef PBI_PROTO80
+			if (PBI_PROTO80_enabled && PBI_PROTO80_D1ffPutByte(byte) != PBI_NOT_HANDLED) {
+				/* handled */
+				fp_active = FALSE;
+				return;
+			}
+#endif
+		    /* add more devices here... */
+			/* reactivate the floating point rom */
+			if (!fp_active) {
+				memcpy(MEMORY_mem + 0xd800, MEMORY_os + 0x1800, 0x800);
+				D(printf("Floating point rom activated\n"));
+				fp_active = TRUE;
+			}
+		}
+	}
+}
+
+/* $D6xx */
+UBYTE PBI_D6GetByte(UWORD addr)
+{
+#ifdef PBI_MIO
+	if (PBI_MIO_enabled) return PBI_MIO_D6GetByte(addr);
+#endif
+#ifdef PBI_BB
+	if(PBI_BB_enabled) return PBI_BB_D6GetByte(addr);
+#endif
+	/* XLD/1090 has ram here */
+	if (PBI_D6D7ram) return MEMORY_mem[addr];
+	else return 0xff;
+}
+
+/* $D6xx */
+void PBI_D6PutByte(UWORD addr, UBYTE byte)
+{
+#ifdef PBI_MIO
+	if (PBI_MIO_enabled) {
+		PBI_MIO_D6PutByte(addr,byte);
+		return;
+	}
+#endif
+#ifdef PBI_BB
+	if(PBI_BB_enabled) {
+		PBI_BB_D6PutByte(addr,byte);
+		return;
+	}
+#endif
+	/* XLD/1090 has ram here */
+	if (PBI_D6D7ram) MEMORY_mem[addr]=byte;
+}
+
+/* read page $D7xx */
+/* XLD/1090 has ram here */
+UBYTE PBI_D7GetByte(UWORD addr)
+{
+	D(printf("PBI_D7GetByte:%4x\n",addr));
+	if (PBI_D6D7ram) return MEMORY_mem[addr];
+	else return 0xff;
+}
+
+/* write page $D7xx */
+/* XLD/1090 has ram here */
+void PBI_D7PutByte(UWORD addr, UBYTE byte)
+{
+	D(printf("PBI_D7PutByte:%4x <- %2x\n",addr,byte));
+	if (PBI_D6D7ram) MEMORY_mem[addr]=byte;
+}
+
+#ifndef BASIC
+
+void PBI_StateSave(void)
+{
+	StateSav_SaveUBYTE(&D1FF_LATCH, 1);
+	StateSav_SaveINT(&PBI_D6D7ram, 1);
+	StateSav_SaveINT(&PBI_IRQ, 1);
+}
+
+void PBI_StateRead(void)
+{
+	StateSav_ReadUBYTE(&D1FF_LATCH, 1);
+	StateSav_ReadINT(&PBI_D6D7ram, 1);
+	StateSav_ReadINT(&PBI_IRQ, 1);
+}
+
+#endif /* #ifndef BASIC */
+
+/*
+vim:ts=4:sw=4:
+*/
diff --git a/project/jni/application/atari800/src/pbi.h b/project/jni/application/atari800/src/pbi.h
new file mode 100644
index 000000000..717dbc2cf
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi.h
@@ -0,0 +1,23 @@
+#ifndef PBI_H_
+#define PBI_H_
+
+#include "atari.h"
+#include <stdio.h>
+
+int PBI_Initialise(int *argc, char *argv[]);
+int PBI_ReadConfig(char *string, char *ptr);
+void PBI_WriteConfig(FILE *fp);
+void PBI_Reset(void);
+UBYTE PBI_D1GetByte(UWORD addr);
+void PBI_D1PutByte(UWORD addr, UBYTE byte);
+UBYTE PBI_D6GetByte(UWORD addr);
+void PBI_D6PutByte(UWORD addr, UBYTE byte);
+UBYTE PBI_D7GetByte(UWORD addr);
+void PBI_D7PutByte(UWORD addr, UBYTE byte);
+extern int PBI_IRQ;
+extern int PBI_D6D7ram;
+void PBI_StateSave(void);
+void PBI_StateRead(void);
+#define PBI_NOT_HANDLED -1
+/* #define PBI_DEBUG */
+#endif /* PBI_H_ */
diff --git a/project/jni/application/atari800/src/pbi_bb.c b/project/jni/application/atari800/src/pbi_bb.c
new file mode 100755
index 000000000..85f4574ec
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_bb.c
@@ -0,0 +1,314 @@
+/*
+ * pbi_bb.c - CSS Black Box emulation
+ *
+ * Copyright (C) 2007-2008 Perry McFarlane
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "atari.h"
+#include "pbi_bb.h"
+#include "util.h"
+#include "log.h"
+#include "pbi.h"
+#include "memory.h"
+#include "pia.h"
+#include "pokey.h"
+#include "cpu.h"
+#include "pbi_scsi.h"
+#include "statesav.h"
+#include "util.h"
+#include <stdlib.h>
+
+#ifdef PBI_DEBUG
+#define D(a) a
+#else
+#define D(a) do{}while(0)
+#endif
+
+/* CSS Black Box emulation */
+/* information source: http://www.mathyvannisselroy.nl/bbdoku.txt*/
+#define BB_BUTTON_IRQ_MASK 1
+
+int PBI_BB_enabled = FALSE;
+
+static UBYTE *bb_rom;
+static int bb_ram_bank_offset = 0;
+static UBYTE *bb_ram;
+#define BB_RAM_SIZE 0x10000
+static UBYTE bb_rom_bank = 0;
+static int bb_rom_size;
+static int bb_rom_high_bit = 0x00;/*0x10*/
+static char bb_rom_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+static UBYTE bb_PCR = 0; /* VIA Peripheral control register*/
+static int bb_scsi_enabled = FALSE;
+static char bb_scsi_disk_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+
+static void init_bb(void)
+{
+	FILE *bbfp;
+	bbfp = fopen(bb_rom_filename,"rb");
+	bb_rom_size = Util_flen(bbfp);
+	fclose(bbfp);
+	if (bb_rom_size != 0x10000 && bb_rom_size != 0x4000) {
+		Log_print("Invalid black box rom size\n");
+		return;
+	}
+	bb_rom = (UBYTE *)Util_malloc(bb_rom_size);
+	if (!Atari800_LoadImage(bb_rom_filename, bb_rom, bb_rom_size)) {
+		free(bb_rom);
+		return;
+	}
+	D(printf("loaded black box rom image\n"));
+	PBI_BB_enabled = TRUE;
+	if (PBI_SCSI_disk != NULL) fclose(PBI_SCSI_disk);
+	if (!Util_filenamenotset(bb_scsi_disk_filename)) {
+		PBI_SCSI_disk = fopen(bb_scsi_disk_filename, "rb+");
+		if (PBI_SCSI_disk == NULL) {
+			Log_print("Error opening BB SCSI disk image:%s", bb_scsi_disk_filename);
+		}
+		else {
+			D(printf("Opened BB SCSI disk image\n"));
+			bb_scsi_enabled = TRUE;
+		}
+	}
+	if (!bb_scsi_enabled) {
+		PBI_SCSI_BSY = TRUE; /* makes BB give up easier? */
+	}
+	bb_ram = (UBYTE *)Util_malloc(BB_RAM_SIZE);
+	memset(bb_ram,0,BB_RAM_SIZE);
+}
+
+int PBI_BB_Initialise(int *argc, char *argv[])
+{
+	int i, j;
+	for (i = j = 1; i < *argc; i++) {
+		if (strcmp(argv[i], "-bb") == 0) {
+			init_bb();
+		}
+		else {
+		 	if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-bb              Emulate the CSS Black Box");
+			}
+			argv[j++] = argv[i];
+		}
+	}
+	*argc = j;
+
+	return TRUE;
+}
+
+int PBI_BB_ReadConfig(char *string, char *ptr) 
+{
+	if (strcmp(string, "BLACK_BOX_ROM") == 0)
+		Util_strlcpy(bb_rom_filename, ptr, sizeof(bb_rom_filename));
+	else if (strcmp(string, "BB_SCSI_DISK") == 0)
+		Util_strlcpy(bb_scsi_disk_filename, ptr, sizeof(bb_scsi_disk_filename));
+	else return FALSE; /* no match */
+	return TRUE; /* matched something */
+}
+
+void PBI_BB_WriteConfig(FILE *fp)
+{
+	fprintf(fp, "BLACK_BOX_ROM=%s\n", bb_rom_filename);
+	if (!Util_filenamenotset(bb_scsi_disk_filename)) {
+		fprintf(fp, "BB_SCSI_DISK=%s\n", bb_scsi_disk_filename);
+	}
+}
+
+UBYTE PBI_BB_D1GetByte(UWORD addr)
+{
+	UBYTE result = 0x00;/*ff;*/
+	if (addr == 0xd1be) result = 0xff;
+	else if (addr == 0xd170) {
+		/* status */
+		result = ((!(PBI_SCSI_REQ))<<7)|((!PBI_SCSI_BSY)<<6)|((!PBI_SCSI_SEL)<<2)|((!PBI_SCSI_CD)<<1)|(!PBI_SCSI_IO);
+	}
+	else if (addr == 0xd171) {
+		if (bb_scsi_enabled) {
+			result = PBI_SCSI_GetByte();
+			if (((bb_PCR & 0x0e)>>1) == 0x04) {
+				/* handshake output */
+				PBI_SCSI_PutACK(1);
+				PBI_SCSI_PutACK(0);
+			}
+		}
+	}
+	else if (addr == 0xd1bc) result = (bb_ram_bank_offset >> 8);/*RAMPAGE*/
+	else if (addr == 0xd1be) {
+		/* SWITCH */
+		result = 0x02;
+	}
+	else if (addr == 0xd1ff) result = PBI_IRQ ? (0x08 | 0x02) : 0 ;
+	D(if (addr!=0xd1ff) printf("BB Read:%4x  PC:%4x byte=%2x\n", addr, CPU_remember_PC[(CPU_remember_PC_curpos-1)%CPU_REMEMBER_PC_STEPS], result));
+	return result;
+}
+
+void PBI_BB_D1PutByte(UWORD addr, UBYTE byte)
+{
+	D(printf("BB Write addr:%4x byte:%2x, cpu:%4x\n", addr, byte, CPU_remember_PC[(CPU_remember_PC_curpos-1)%CPU_REMEMBER_PC_STEPS]));
+	if (addr == 0xd170) {
+		if (bb_scsi_enabled) PBI_SCSI_PutSEL(!(byte&0x04));
+	}
+	else if (addr == 0xd171) {
+		if (bb_scsi_enabled) {
+			PBI_SCSI_PutByte(byte);
+			if (((bb_PCR & 0x0e)>>1) == 0x04) {
+				/* handshake output */
+				PBI_SCSI_PutACK(1);
+				PBI_SCSI_PutACK(0);
+			}
+		}
+	}
+	else if (addr == 0xd17c) { /* PCR */
+		bb_PCR = byte;
+		if (((bb_PCR & 0x0e)>>1) == 0x06) {
+			/* low output */
+			if (bb_scsi_enabled) PBI_SCSI_PutACK(1);
+		}
+		else if (((bb_PCR & 0x0e)>>1) == 0x07) {
+			/* high output */
+			if (bb_scsi_enabled) PBI_SCSI_PutACK(0);
+		}
+	}
+	else if (addr == 0xd1bc) {
+		/* RAMPAGE */
+		/* Copy old page to buffer, Copy new page from buffer */
+		memcpy(bb_ram+bb_ram_bank_offset,MEMORY_mem + 0xd600,0x100);
+		bb_ram_bank_offset = (byte << 8);
+		memcpy(MEMORY_mem + 0xd600, bb_ram+bb_ram_bank_offset, 0x100);
+	} 
+	else if (addr  == 0xd1be) {
+		/* high rom bit */
+		if (bb_rom_high_bit != ((byte & 0x04) << 2) && bb_rom_size == 0x10000) {
+			/* high bit has changed */
+			bb_rom_high_bit = ((byte & 0x04) << 2);
+			if (bb_rom_bank > 0 && bb_rom_bank < 8) {
+					memcpy(MEMORY_mem + 0xd800, bb_rom + (bb_rom_bank + bb_rom_high_bit)*0x800, 0x800);
+					D(printf("black box bank:%2x activated\n", bb_rom_bank+bb_rom_high_bit));
+			}
+		}
+	}
+	else if ((addr & 0xffc0) == 0xd1c0) {
+		/* byte &= 0x0f; */
+		if (bb_rom_bank != byte) {
+			/* PDVS (d1ff) rom bank */
+			int offset = -1;
+			if (bb_rom_size == 0x4000) {
+				if (byte >= 8 && byte <= 0x0f) offset = (byte - 8)*0x800;
+				else if (byte > 0 && byte < 0x08) offset = byte*0x800;
+			}
+			else { /* bb_rom_size == 0x10000 */
+				if (byte > 0 && byte < 0x10) offset = (byte + bb_rom_high_bit)*0x800;
+			}
+
+			if (offset != -1) {
+					memcpy(MEMORY_mem + 0xd800, bb_rom + offset, 0x800);
+					D(printf("black box bank:%2x activated\n", byte + bb_rom_high_bit));
+			}
+			else {
+					memcpy(MEMORY_mem + 0xd800, MEMORY_os + 0x1800, 0x800);
+					if (byte != 0) D(printf("d1ff ERROR: byte=%2x\n", byte));
+					D(printf("Floating point rom activated\n"));
+			}
+			bb_rom_bank = byte;	
+		}
+	}
+}
+
+/* Black Box RAM page at D600-D6ff*/
+/* Possible to put code in this ram, so we can't avoid using MEMORY_mem[]
+ * because opcode fetch doesn't call this function*/
+UBYTE PBI_BB_D6GetByte(UWORD addr)
+{
+	return MEMORY_mem[addr];
+}
+
+/* $D6xx */
+void PBI_BB_D6PutByte(UWORD addr, UBYTE byte)
+{
+	MEMORY_mem[addr]=byte;
+}
+
+static int buttondown;
+
+void PBI_BB_Menu(void)
+{
+	if (!PBI_BB_enabled) return;
+	if (buttondown == FALSE) {
+		D(printf("blackbox button down interrupt generated\n"));
+		CPU_GenerateIRQ();
+		PBI_IRQ |= BB_BUTTON_IRQ_MASK;
+		buttondown = TRUE;
+	}
+}
+
+void PBI_BB_Frame(void)
+{
+	static int count = 0;
+	if (buttondown) {
+	 	if (count < 1) count++;
+		else {
+			D(printf("blackbox button up\n"));
+			PBI_IRQ &= ~BB_BUTTON_IRQ_MASK;
+			/* update pokey IRQ status */
+			POKEY_PutByte(POKEY_OFFSET_IRQEN, POKEY_IRQEN);
+			buttondown = FALSE;
+			count = 0;
+		}
+	}
+}
+
+#ifndef BASIC
+
+void PBI_BB_StateSave(void)
+{
+	StateSav_SaveINT(&PBI_BB_enabled, 1);
+	if (PBI_BB_enabled) {
+		StateSav_SaveFNAME(bb_scsi_disk_filename);
+		StateSav_SaveFNAME(bb_rom_filename);
+
+		StateSav_SaveINT(&bb_ram_bank_offset, 1);
+		StateSav_SaveUBYTE(bb_ram, BB_RAM_SIZE);
+		StateSav_SaveUBYTE(&bb_rom_bank, 1);
+		StateSav_SaveINT(&bb_rom_high_bit, 1);
+		StateSav_SaveUBYTE(&bb_PCR, 1);
+	}
+}
+
+void PBI_BB_StateRead(void)
+{
+	StateSav_ReadINT(&PBI_BB_enabled, 1);
+	if (PBI_BB_enabled) {
+		StateSav_ReadFNAME(bb_scsi_disk_filename);
+		StateSav_ReadFNAME(bb_rom_filename);
+		init_bb();
+		StateSav_ReadINT(&bb_ram_bank_offset, 1);
+		StateSav_ReadUBYTE(bb_ram, BB_RAM_SIZE);
+		StateSav_ReadUBYTE(&bb_rom_bank, 1);
+		StateSav_ReadINT(&bb_rom_high_bit, 1);
+		StateSav_ReadUBYTE(&bb_PCR, 1);
+	}
+}
+
+#endif /* #ifndef BASIC */
+
+/*
+vim:ts=4:sw=4:
+*/
diff --git a/project/jni/application/atari800/src/pbi_bb.h b/project/jni/application/atari800/src/pbi_bb.h
new file mode 100755
index 000000000..abfb7ac2e
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_bb.h
@@ -0,0 +1,20 @@
+#ifndef PBI_BB_H_
+#define PBI_BB_H_
+
+#include "atari.h"
+#include <stdio.h>
+
+extern int PBI_BB_enabled;
+void PBI_BB_Menu(void);
+void PBI_BB_Frame(void);
+int PBI_BB_Initialise(int *argc, char *argv[]);
+UBYTE PBI_BB_D1GetByte(UWORD addr);
+void PBI_BB_D1PutByte(UWORD addr, UBYTE byte);
+UBYTE PBI_BB_D6GetByte(UWORD addr);
+void PBI_BB_D6PutByte(UWORD addr, UBYTE byte);
+int PBI_BB_ReadConfig(char *string, char *ptr);
+void PBI_BB_WriteConfig(FILE *fp);
+void PBI_BB_StateSave(void);
+void PBI_BB_StateRead(void);
+
+#endif /* PBI_BB_H_ */
diff --git a/project/jni/application/atari800/src/pbi_mio.c b/project/jni/application/atari800/src/pbi_mio.c
new file mode 100755
index 000000000..3e841b058
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_mio.c
@@ -0,0 +1,258 @@
+/*
+ * pbi_mio.c - ICD MIO board emulation
+ *
+ * Copyright (C) 2007-2008 Perry McFarlane
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "atari.h"
+#include "pbi_mio.h"
+#include "util.h"
+#include "log.h"
+#include "memory.h"
+#include "pia.h"
+#include "pbi.h"
+#include "cpu.h"
+#include "stdlib.h"
+#include "pbi_scsi.h"
+#include "statesav.h"
+
+#ifdef PBI_DEBUG
+#define D(a) a
+#else
+#define D(a) do{}while(0)
+#endif
+
+int PBI_MIO_enabled = FALSE;
+
+static UBYTE *mio_rom;
+static int mio_rom_size = 0x4000;
+static int mio_ram_bank_offset = 0;
+static UBYTE *mio_ram;
+static int mio_ram_size = 0x100000;
+static UBYTE mio_rom_bank = 0;
+static int mio_ram_enabled = FALSE;
+static char mio_rom_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+static char mio_scsi_disk_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+static int mio_scsi_enabled = FALSE;
+
+static void init_mio(void)
+{
+	free(mio_rom);
+	mio_rom = (UBYTE *)Util_malloc(mio_rom_size);
+	if (!Atari800_LoadImage(mio_rom_filename, mio_rom, mio_rom_size)) {
+		free(mio_rom);
+		return;
+	}
+	D(printf("Loaded mio rom image\n"));
+	PBI_MIO_enabled = TRUE;
+	if (PBI_SCSI_disk != NULL) fclose(PBI_SCSI_disk);
+	if (!Util_filenamenotset(mio_scsi_disk_filename)) {
+		PBI_SCSI_disk = fopen(mio_scsi_disk_filename, "rb+");
+		if (PBI_SCSI_disk == NULL) {
+			Log_print("Error opening SCSI disk image:%s", mio_scsi_disk_filename);
+		}
+		else {
+			D(printf("Opened SCSI disk image\n"));
+			mio_scsi_enabled = TRUE;
+		}
+	}
+	if (!mio_scsi_enabled) {
+		PBI_SCSI_BSY = TRUE; /* makes MIO give up easier */
+	}
+	free(mio_ram);
+	mio_ram = (UBYTE *)Util_malloc(mio_ram_size);
+	memset(mio_ram, 0, mio_ram_size);
+}
+
+
+int PBI_MIO_Initialise(int *argc, char *argv[])
+{
+	int i, j;
+	for (i = j = 1; i < *argc; i++) {
+		if (strcmp(argv[i], "-mio") == 0) {
+			init_mio();
+		}
+		else {
+		 	if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-mio             Emulate the ICD MIO board");
+			}
+			argv[j++] = argv[i];
+		}
+	}
+	*argc = j;
+
+	return TRUE;
+}
+
+int PBI_MIO_ReadConfig(char *string, char *ptr) 
+{
+	if (strcmp(string, "MIO_ROM") == 0)
+		Util_strlcpy(mio_rom_filename, ptr, sizeof(mio_rom_filename));
+	else if (strcmp(string, "MIO_SCSI_DISK") == 0)
+		Util_strlcpy(mio_scsi_disk_filename, ptr, sizeof(mio_scsi_disk_filename));
+	else return FALSE; /* no match */
+	return TRUE; /* matched something */
+}
+
+void PBI_MIO_WriteConfig(FILE *fp)
+{
+	fprintf(fp, "MIO_ROM=%s\n", mio_rom_filename);
+	if (!Util_filenamenotset(mio_scsi_disk_filename)) {
+		fprintf(fp, "MIO_SCSI_DISK=%s\n", mio_scsi_disk_filename);
+	}
+}
+
+/* $D1xx */
+UBYTE PBI_MIO_D1GetByte(UWORD addr)
+{
+	UBYTE result = 0x00;/*ff*/;
+	addr &= 0xffe3; /* 7 mirrors */
+	D(printf("MIO Read:%4x  PC:%4x\n", addr, CPU_remember_PC[(CPU_remember_PC_curpos-1)%CPU_REMEMBER_PC_STEPS]));
+	if (addr == 0xd1e2) {
+		result = ((!PBI_SCSI_CD) | (!PBI_SCSI_MSG<<1) | (!PBI_SCSI_IO<<2) | (!PBI_SCSI_BSY<<5) | (!PBI_SCSI_REQ<<7));
+	}
+	else if (addr == 0xd1e1) {
+		if (mio_scsi_enabled) {
+			result = PBI_SCSI_GetByte()^0xff;
+			PBI_SCSI_PutACK(1);
+			PBI_SCSI_PutACK(0);
+		}
+	}
+	return result;
+}
+
+/* $D1xx */
+void PBI_MIO_D1PutByte(UWORD addr, UBYTE byte)
+{
+	int old_mio_ram_bank_offset = mio_ram_bank_offset;
+	int old_mio_ram_enabled = mio_ram_enabled;
+	int offset_changed;
+	int ram_enabled_changed;
+	addr &= 0xffe3; /* 7 mirrors */
+	if (addr == 0xd1e0) {
+		/* ram bank A15-A8 */
+		mio_ram_bank_offset &= 0xf0000;
+		mio_ram_bank_offset |= (byte << 8);
+	}
+	else if (addr == 0xd1e1) {
+		if (mio_scsi_enabled) {
+			PBI_SCSI_PutByte(byte^0xff);
+			PBI_SCSI_PutACK(1);
+			PBI_SCSI_PutACK(0);
+		}
+	}
+	else if (addr == 0xd1e2) {
+		/* ram bank A19-A16, ram enable, other stuff */
+		mio_ram_bank_offset &= 0x0ffff;
+		mio_ram_bank_offset |= ( (byte & 0x0f) <<  16);
+		mio_ram_enabled = (byte & 0x20);
+		if (mio_scsi_enabled) PBI_SCSI_PutSEL(!!(byte & 0x10));
+	}
+	else if (addr == 0xd1e3) {
+		/* or 0xd1ff. rom bank. */
+		if (mio_rom_bank != byte){
+			int offset = -1;
+			if (byte == 4) offset = 0x2000;
+			else if (byte == 8) offset = 0x2800;
+			else if (byte == 0x10) offset = 0x3000;
+			else if (byte == 0x20) offset = 0x3800;
+			if (offset != -1) {
+				memcpy(MEMORY_mem + 0xd800, mio_rom+offset, 0x800);
+				D(printf("mio bank:%2x activated\n", byte));
+			}else{
+				memcpy(MEMORY_mem + 0xd800, MEMORY_os + 0x1800, 0x800);
+				D(printf("Floating point rom activated\n"));
+
+			}
+			mio_rom_bank = byte;	
+		}
+		
+	}
+	offset_changed = (old_mio_ram_bank_offset != mio_ram_bank_offset);
+	ram_enabled_changed = (old_mio_ram_enabled != mio_ram_enabled);
+	if (mio_ram_enabled && ram_enabled_changed) {
+		/* Copy new page from buffer, overwrite ff page */
+		memcpy(MEMORY_mem + 0xd600, mio_ram + mio_ram_bank_offset, 0x100);
+	} else if (mio_ram_enabled && offset_changed) {
+		/* Copy old page to buffer, copy new page from buffer */
+		memcpy(mio_ram + old_mio_ram_bank_offset,MEMORY_mem + 0xd600, 0x100);
+		memcpy(MEMORY_mem + 0xd600, mio_ram + mio_ram_bank_offset, 0x100);
+	} else if (!mio_ram_enabled && ram_enabled_changed) {
+		/* Copy old page to buffer, set new page to ff */
+		memcpy(mio_ram + old_mio_ram_bank_offset, MEMORY_mem + 0xd600, 0x100);
+		memset(MEMORY_mem + 0xd600, 0xff, 0x100);
+	}
+	D(printf("MIO Write addr:%4x byte:%2x, cpu:%4x\n", addr, byte,CPU_remember_PC[(CPU_remember_PC_curpos-1)%CPU_REMEMBER_PC_STEPS]));
+}
+
+/* MIO RAM page at D600-D6ff */
+/* Possible to put code in this ram, so we can't avoid using MEMORY_mem[] */
+/* because opcode fetch doesn't call this function */
+UBYTE PBI_MIO_D6GetByte(UWORD addr)
+{
+	if (!mio_ram_enabled) return 0xff;
+	return MEMORY_mem[addr];
+}
+
+/* $D6xx */
+void PBI_MIO_D6PutByte(UWORD addr, UBYTE byte)
+{
+	if (!mio_ram_enabled) return;
+	MEMORY_mem[addr]=byte;
+}
+
+#ifndef BASIC
+
+void PBI_MIO_StateSave(void)
+{
+	StateSav_SaveINT(&PBI_MIO_enabled, 1);
+	if (PBI_MIO_enabled) {
+		StateSav_SaveFNAME(mio_scsi_disk_filename);
+		StateSav_SaveFNAME(mio_rom_filename);
+		StateSav_SaveINT(&mio_ram_size, 1);
+
+		StateSav_SaveINT(&mio_ram_bank_offset, 1);
+		StateSav_SaveUBYTE(mio_ram, mio_ram_size);
+		StateSav_SaveUBYTE(&mio_rom_bank, 1);
+		StateSav_SaveINT(&mio_ram_enabled, 1);
+	}
+}
+
+void PBI_MIO_StateRead(void)
+{
+	StateSav_ReadINT(&PBI_MIO_enabled, 1);
+	if (PBI_MIO_enabled) {
+		StateSav_ReadFNAME(mio_scsi_disk_filename);
+		StateSav_ReadFNAME(mio_rom_filename);
+		StateSav_ReadINT(&mio_ram_size, 1);
+		init_mio();
+		StateSav_ReadINT(&mio_ram_bank_offset, 1);
+		StateSav_ReadUBYTE(mio_ram, mio_ram_size);
+		StateSav_ReadUBYTE(&mio_rom_bank, 1);
+		StateSav_ReadINT(&mio_ram_enabled, 1);
+	}
+}
+
+#endif /* #ifndef BASIC */
+
+/*
+vim:ts=4:sw=4:
+*/
diff --git a/project/jni/application/atari800/src/pbi_mio.h b/project/jni/application/atari800/src/pbi_mio.h
new file mode 100755
index 000000000..701433ef2
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_mio.h
@@ -0,0 +1,19 @@
+#ifndef PBI_MIO_H_
+#define PBI_MIO_H_
+
+#include "atari.h"
+#include <stdio.h>
+
+extern int PBI_MIO_enabled;
+
+int PBI_MIO_Initialise(int *argc, char *argv[]);
+UBYTE PBI_MIO_D1GetByte(UWORD addr);
+void PBI_MIO_D1PutByte(UWORD addr, UBYTE byte);
+UBYTE PBI_MIO_D6GetByte(UWORD addr);
+void PBI_MIO_D6PutByte(UWORD addr, UBYTE byte);
+int PBI_MIO_ReadConfig(char *string, char *ptr);
+void PBI_MIO_WriteConfig(FILE *fp);
+void PBI_MIO_StateSave(void);
+void PBI_MIO_StateRead(void);
+
+#endif /* PBI_MIO_H_ */
diff --git a/project/jni/application/atari800/src/pbi_proto80.c b/project/jni/application/atari800/src/pbi_proto80.c
new file mode 100755
index 000000000..853a778db
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_proto80.c
@@ -0,0 +1,144 @@
+/*
+ * pbi_proto.c - Emulation of a prototype 80 column board for the
+ * Atari 1090 expansion interface.
+ *
+ * Copyright (C) 2007-2008 Perry McFarlane
+ * Copyright (C) 2002-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "atari.h"
+#include "pbi.h"
+#include "pbi_proto80.h"
+#include "util.h"
+#include "log.h"
+#include "memory.h"
+#include <stdlib.h>
+
+#define PROTO80_PBI_NUM 2
+#define PROTO80_MASK (1 << PROTO80_PBI_NUM)
+
+static UBYTE *proto80rom;
+static char proto80_rom_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+
+int PBI_PROTO80_enabled = FALSE;
+
+#ifdef PBI_DEBUG
+#define D(a) a
+#else
+#define D(a) do{}while(0)
+#endif
+
+int PBI_PROTO80_Initialise(int *argc, char *argv[])
+{
+	int i, j;
+	for (i = j = 1; i < *argc; i++) {
+		if (strcmp(argv[i], "-proto80") == 0) {
+			Log_print("proto80 enabled");
+			PBI_PROTO80_enabled = TRUE;
+		}
+		else {
+		 	if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-proto80         Emulate a prototype 80 column board for the 1090");
+			}
+			argv[j++] = argv[i];
+		}
+	}
+	*argc = j;
+
+	if (PBI_PROTO80_enabled) {
+		proto80rom = (UBYTE *)Util_malloc(0x800);
+		if (!Atari800_LoadImage(proto80_rom_filename, proto80rom, 0x800)) {
+			free(proto80rom);
+			PBI_PROTO80_enabled = FALSE;
+			Log_print("Couldn't load proto80 rom image");
+			return FALSE;
+		}
+		else {
+			Log_print("loaded proto80 rom image");
+			PBI_D6D7ram = TRUE;
+		}
+	}
+
+	return TRUE;
+}
+
+int PBI_PROTO80_ReadConfig(char *string, char *ptr)
+{
+	if (strcmp(string, "PROTO80_ROM") == 0)
+		Util_strlcpy(proto80_rom_filename, ptr, sizeof(proto80_rom_filename));
+	else return FALSE; /* no match */
+	return TRUE; /* matched something */
+}
+
+void PBI_PROTO80_WriteConfig(FILE *fp)
+{
+	fprintf(fp, "PROTO80_ROM=%s\n", proto80_rom_filename);
+}
+
+int PBI_PROTO80_D1GetByte(UWORD addr)
+{
+	int result = PBI_NOT_HANDLED;
+	if (PBI_PROTO80_enabled) {
+	}
+	return result;
+}
+
+void PBI_PROTO80_D1PutByte(UWORD addr, UBYTE byte)
+{
+
+}
+
+int PBI_PROTO80_D1ffPutByte(UBYTE byte)
+{
+	int result = 0; /* handled */
+	if (PBI_PROTO80_enabled && byte == PROTO80_MASK) {
+		memcpy(MEMORY_mem + 0xd800, proto80rom, 0x800);
+		D(printf("PROTO80 rom activated\n"));
+	}
+	else result = PBI_NOT_HANDLED;
+	return result;
+}
+
+UBYTE PBI_PROTO80_GetPixels(int scanline, int column)
+{
+#define PROTO80_ROWS 24
+#define PROTO80_CELL_HEIGHT 8
+	UBYTE character;
+	UBYTE invert;
+	UBYTE font_data;
+	int row = scanline / PROTO80_CELL_HEIGHT;
+	int line = scanline % PROTO80_CELL_HEIGHT;
+	if (row  >= PROTO80_ROWS) {
+		return 0;
+	}
+	character = MEMORY_mem[0x9800 + row*80 + column];
+	invert = 0x00;
+	if (character & 0x80) {
+		invert = 0xff;
+		character &= 0x7f;
+	}
+	font_data = MEMORY_mem[0xe000 + character*8 + line];
+	font_data ^= invert;
+	return font_data;
+}
+
+/*
+vim:ts=4:sw=4:
+*/
diff --git a/project/jni/application/atari800/src/pbi_proto80.h b/project/jni/application/atari800/src/pbi_proto80.h
new file mode 100755
index 000000000..8534f0cc9
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_proto80.h
@@ -0,0 +1,14 @@
+#ifndef PBI_PROTO80_H_
+#define PBI_PROTO80_H_
+
+#include "atari.h"
+int PBI_PROTO80_Initialise(int *argc, char *argv[]);
+int PBI_PROTO80_ReadConfig(char *string, char *ptr);
+void PBI_PROTO80_WriteConfig(FILE *fp);
+int PBI_PROTO80_D1GetByte(UWORD addr);
+void PBI_PROTO80_D1PutByte(UWORD addr, UBYTE byte);
+int PBI_PROTO80_D1ffPutByte(UBYTE byte);
+UBYTE PBI_PROTO80_GetPixels(int scanline, int column);
+extern int PBI_PROTO80_enabled;
+
+#endif /* PBI_PROTO80_H_ */
diff --git a/project/jni/application/atari800/src/pbi_scsi.c b/project/jni/application/atari800/src/pbi_scsi.c
new file mode 100755
index 000000000..32914e310
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_scsi.c
@@ -0,0 +1,241 @@
+/*
+ * pbi_scsi.c - SCSI emulation for the MIO and Black Box
+ *
+ * Copyright (C) 2007-2008 Perry McFarlane
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "atari.h"
+#include "util.h"
+#include "log.h"
+#include "pbi_scsi.h"
+
+#ifdef PBI_DEBUG
+#define D(a) a
+#else
+#define D(a) do{}while(0)
+#endif
+
+int PBI_SCSI_CD = FALSE;
+int PBI_SCSI_MSG = FALSE;
+int PBI_SCSI_IO = FALSE;
+int PBI_SCSI_BSY = FALSE;
+int PBI_SCSI_REQ = FALSE;
+int PBI_SCSI_ACK = FALSE;
+
+int PBI_SCSI_SEL = FALSE;
+
+static UBYTE scsi_byte;
+
+#define SCSI_PHASE_SELECTION 0
+#define SCSI_PHASE_DATAIN 1
+#define SCSI_PHASE_DATAOUT 2
+#define SCSI_PHASE_COMMAND 3
+#define SCSI_PHASE_STATUS 4 
+#define SCSI_PHASE_MSGIN 5
+
+static int scsi_phase = SCSI_PHASE_SELECTION;
+static int scsi_bufpos = 0;
+static UBYTE scsi_buffer[256];
+static int scsi_count = 0;
+
+FILE *PBI_SCSI_disk = NULL;
+
+static void scsi_changephase(int phase)
+{
+	D(printf("scsi_changephase:%d\n",phase));
+	switch(phase) {
+		case SCSI_PHASE_SELECTION:
+				PBI_SCSI_REQ = FALSE;
+				PBI_SCSI_BSY = FALSE;
+				PBI_SCSI_CD = FALSE;
+				PBI_SCSI_IO = FALSE;
+				PBI_SCSI_MSG = FALSE;
+				break;
+		case SCSI_PHASE_DATAOUT:
+				PBI_SCSI_REQ = TRUE;
+				PBI_SCSI_BSY = TRUE;
+				PBI_SCSI_CD = FALSE;
+				PBI_SCSI_IO = FALSE;
+				PBI_SCSI_MSG = FALSE;
+				break;
+		case SCSI_PHASE_DATAIN:
+				PBI_SCSI_REQ = TRUE;
+				PBI_SCSI_BSY = TRUE;
+				PBI_SCSI_CD = FALSE;
+				PBI_SCSI_IO = TRUE;
+				PBI_SCSI_MSG = FALSE;
+				break;
+		case SCSI_PHASE_COMMAND:
+				PBI_SCSI_REQ = TRUE;
+				PBI_SCSI_BSY = TRUE;
+				PBI_SCSI_CD = TRUE;
+				PBI_SCSI_IO = FALSE;
+				PBI_SCSI_MSG = FALSE;
+				break;
+		case SCSI_PHASE_STATUS:
+				PBI_SCSI_REQ = TRUE;
+				PBI_SCSI_BSY = TRUE;
+				PBI_SCSI_CD = TRUE;
+				PBI_SCSI_IO = TRUE;
+				PBI_SCSI_MSG = FALSE;
+				break;
+		case SCSI_PHASE_MSGIN:
+				PBI_SCSI_REQ = TRUE;
+				PBI_SCSI_BSY = TRUE;
+				PBI_SCSI_CD = TRUE;
+				PBI_SCSI_IO = FALSE;
+				PBI_SCSI_MSG = TRUE;
+				break;
+	}
+	scsi_bufpos = 0;
+	scsi_phase = phase;
+}
+
+static void scsi_process_command(void)
+{
+	int i;
+	int lba;
+	int lun;
+	D(printf("SCSI command:"));
+	for (i = 0; i < 6; i++) {
+		D(printf(" %02x",scsi_buffer[i]));
+	}
+	D(printf("\n"));
+	switch (scsi_buffer[0]) {
+		case 0x00:
+			/* test unit ready */
+			D(printf("SCSI: test unit ready\n"));
+			scsi_changephase(SCSI_PHASE_STATUS);
+			scsi_buffer[0] = 0;
+			break;
+		case 0x03:
+			/* request sense */
+			D(printf("SCSI: request sense\n"));
+			scsi_changephase(SCSI_PHASE_DATAIN);
+			memset(scsi_buffer,0,1);
+			scsi_count = 4;
+			break;
+		case 0x08:
+			/* read */
+			lun = ((scsi_buffer[1]&0xe0)>>5);
+			lba = (((scsi_buffer[1]&0x1f)<<16)|(scsi_buffer[2]<<8)|(scsi_buffer[3]));
+			D(printf("SCSI: read lun:%d lba:%d\n",lun,lba));
+			fseek(PBI_SCSI_disk, lba*256, SEEK_SET);
+			fread(scsi_buffer, 1, 256, PBI_SCSI_disk);
+			scsi_changephase(SCSI_PHASE_DATAIN);
+			scsi_count = 256;
+			break;
+		case 0x0a:
+			/* write */
+			lun = ((scsi_buffer[1]&0xe0)>>5);
+			lba = (((scsi_buffer[1]&0x1f)<<16)|(scsi_buffer[2]<<8)|(scsi_buffer[3]));
+			D(printf("SCSI: write lun:%d lba:%d\n",lun,lba));
+			fseek(PBI_SCSI_disk, lba*256, SEEK_SET);
+			scsi_changephase(SCSI_PHASE_DATAOUT);
+			scsi_count = 256;
+			break;
+		default:
+			D(printf("SCSI: unknown command:%2x\n", scsi_buffer[0]));
+			scsi_changephase(SCSI_PHASE_SELECTION);
+			break;
+	}
+}
+
+static void scsi_nextbyte(void)
+{
+	if (scsi_phase == SCSI_PHASE_DATAIN) {
+		scsi_bufpos++;
+		if (scsi_bufpos >= scsi_count) {
+			scsi_changephase(SCSI_PHASE_STATUS);
+			scsi_buffer[0] = 0;
+		}
+	}
+	else if (scsi_phase == SCSI_PHASE_STATUS) {
+		D(printf("SCSI status\n"));
+		scsi_changephase(SCSI_PHASE_MSGIN);
+		scsi_buffer[0] = 0;
+	}
+	else if (scsi_phase == SCSI_PHASE_MSGIN) {
+		D(printf("SCSI msg\n"));
+		scsi_changephase(SCSI_PHASE_SELECTION);
+	}
+	else if (scsi_phase == SCSI_PHASE_COMMAND) {
+		scsi_buffer[scsi_bufpos++] = scsi_byte;
+		if (scsi_bufpos >= 0x06) {
+			scsi_process_command();
+			scsi_bufpos = 0;
+		}
+	}
+	else if (scsi_phase == SCSI_PHASE_DATAOUT) {
+		D(printf("SCSI data out:%2x\n", scsi_byte));
+		scsi_buffer[scsi_bufpos++] = scsi_byte;
+		if (scsi_bufpos >= scsi_count) {
+			fwrite(scsi_buffer, 1, 256, PBI_SCSI_disk);
+			scsi_changephase(SCSI_PHASE_STATUS);
+			scsi_buffer[0] = 0;
+		}
+	}
+}
+
+void PBI_SCSI_PutSEL(int newsel)
+{
+	if (newsel != PBI_SCSI_SEL) {
+		/* SEL changed state */
+		PBI_SCSI_SEL = newsel;
+		if (PBI_SCSI_SEL && scsi_phase == SCSI_PHASE_SELECTION && scsi_byte == 0x01) {
+			scsi_changephase(SCSI_PHASE_COMMAND);
+		}
+		D(printf("changed SEL:%d  scsi_byte:%2x\n",PBI_SCSI_SEL, scsi_byte));
+	}
+}
+
+void PBI_SCSI_PutACK(int newack)
+{
+	if (newack != PBI_SCSI_ACK) {
+		/* ACK changed state */
+		PBI_SCSI_ACK = newack;
+		if (PBI_SCSI_ACK) {
+			/* REQ goes false when ACK goes true */
+			PBI_SCSI_REQ = FALSE;
+		}
+		else {
+			/* falling ACK triggers next byte */
+			if (scsi_phase != SCSI_PHASE_SELECTION) {
+				PBI_SCSI_REQ = TRUE;
+				scsi_nextbyte();
+			}
+		}
+	}
+}
+
+UBYTE PBI_SCSI_GetByte(void)
+{
+	return (scsi_buffer[scsi_bufpos]);
+}
+
+void PBI_SCSI_PutByte(UBYTE byte)
+{
+	scsi_byte = byte;
+}
+
+/*
+vim:ts=4:sw=4:
+*/
diff --git a/project/jni/application/atari800/src/pbi_scsi.h b/project/jni/application/atari800/src/pbi_scsi.h
new file mode 100755
index 000000000..9e5f8a9aa
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_scsi.h
@@ -0,0 +1,21 @@
+#ifndef PBI_SCSI_H_
+#define PBI_SCSI_H_
+
+#include "atari.h"
+#include <stdio.h>
+
+extern int PBI_SCSI_CD;
+extern int PBI_SCSI_MSG;
+extern int PBI_SCSI_IO;
+extern int PBI_SCSI_BSY;
+extern int PBI_SCSI_REQ;
+extern int PBI_SCSI_SEL;
+extern int PBI_SCSI_ACK;
+extern FILE *PBI_SCSI_disk;
+
+void PBI_SCSI_PutByte(UBYTE byte);
+UBYTE PBI_SCSI_GetByte(void);
+void PBI_SCSI_PutSEL(int newsel);
+void PBI_SCSI_PutACK(int newack);
+
+#endif /* PBI_MIO_H_ */
diff --git a/project/jni/application/atari800/src/pbi_xld.c b/project/jni/application/atari800/src/pbi_xld.c
new file mode 100755
index 000000000..66056ac1d
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_xld.c
@@ -0,0 +1,921 @@
+/*
+ * pbi_xld.c - 1450XLD and 1400XL emulation
+ *
+ * Copyright (C) 2007-2008 Perry McFarlane
+ * Copyright (C) 2002-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "atari.h"
+#include "votrax.h"
+#include "pbi_xld.h"
+#include "pbi.h"
+#include "util.h"
+#include "sio.h"
+#include "log.h"
+#include "pokey.h"
+#include "cpu.h"
+#include "memory.h"
+#include "statesav.h"
+#include <stdlib.h>
+
+#define DISK_PBI_NUM 0
+#define MODEM_PBI_NUM 1
+#define VOICE_PBI_NUM 7
+
+#define DISK_MASK (1 << DISK_PBI_NUM)
+#define MODEM_MASK (1 << MODEM_PBI_NUM)
+#define VOICE_MASK (1 << VOICE_PBI_NUM)
+
+static UBYTE *voicerom;
+static UBYTE *diskrom;
+static char xld_d_rom_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+static char xld_v_rom_filename[FILENAME_MAX] = Util_FILENAME_NOT_SET;
+
+static UBYTE votrax_latch = 0;
+static UBYTE modem_latch = 0;
+
+int PBI_XLD_enabled = FALSE;
+static int xld_v_enabled = FALSE;
+static int xld_d_enabled = FALSE;
+
+/* Parallel Disk I/O emulation support */
+#define PIO_NoFrame         (0x00)
+#define PIO_CommandFrame    (0x01)
+#define PIO_StatusRead      (0x02)
+#define PIO_ReadFrame       (0x03)
+#define PIO_WriteFrame      (0x04)
+#define PIO_FinalStatus     (0x05)
+#define PIO_FormatFrame     (0x06)
+static UBYTE CommandFrame[6];
+static int CommandIndex = 0;
+static UBYTE DataBuffer[256 + 3];
+static int DataIndex = 0;
+static int TransferStatus = PIO_CommandFrame;
+static int ExpectedBytes = 5;
+static void PIO_PutByte(int byte);
+static int PIO_GetByte(void);
+static UBYTE PIO_Command_Frame(void);
+
+/* Votrax */
+static double ratio;
+static int bit16;
+#define VTRX_BLOCK_SIZE 1024
+SWORD *temp_votrax_buffer = NULL;
+SWORD *votrax_buffer = NULL;
+static int votrax_busy = FALSE;
+static volatile int votrax_written = FALSE;
+static volatile int votrax_written_byte = 0x3f;
+static int votrax_sync_samples;
+static void votrax_busy_callback(int busy_status);
+static int dsprate;
+static int num_pokeys;
+static int samples_per_frame;
+
+#ifdef PBI_DEBUG
+#define D(a) a
+#else
+#define D(a) do{}while(0)
+#endif
+
+#define VTRX_RATE 24500
+
+static void init_xld_v(void)
+{
+	free(voicerom);
+	voicerom = (UBYTE *)Util_malloc(0x1000);
+	if (!Atari800_LoadImage(xld_v_rom_filename, voicerom, 0x1000)) {
+		free(voicerom);
+		xld_v_enabled = FALSE;
+	}
+	else {
+		printf("loaded XLD voice rom image\n");
+		PBI_D6D7ram = TRUE;
+	}
+	votrax_busy = FALSE;
+	votrax_sync_samples = 0;
+}
+
+static void init_xld_d(void)
+{
+	free(diskrom);
+	diskrom = (UBYTE *)Util_malloc(0x800);
+	if (!Atari800_LoadImage(xld_d_rom_filename, diskrom, 0x800)) {
+		free(diskrom);
+		xld_d_enabled = FALSE;
+	}
+	else {
+		D(printf("loaded 1450XLD D: device driver rom image\n"));
+		PBI_D6D7ram = TRUE;
+	}
+}
+
+int PBI_XLD_Initialise(int *argc, char *argv[])
+{
+	int i, j;
+	for (i = j = 1; i < *argc; i++) {
+		if (strcmp(argv[i], "-1400") == 0) {
+			xld_v_enabled = TRUE;
+			PBI_XLD_enabled = TRUE;
+		}else if (strcmp(argv[i], "-xld") == 0){
+			xld_v_enabled = TRUE;
+			xld_d_enabled = TRUE;
+			PBI_XLD_enabled = TRUE;
+		}
+		else {
+		 	if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-1400            Emulate the Atari 1400XL");
+				Log_print("\t-xld             Emulate the Atari 1450XLD");
+			}
+
+			argv[j++] = argv[i];
+		}
+
+	}
+	*argc = j;
+
+	if (xld_v_enabled) {
+		init_xld_v();
+	}
+
+	/* If you set the drive to empty in the UI, the message is displayed */
+	/* If you press select, I believe it tries to slow the I/O down */
+	/* in order to increase compatibility. */
+	/* dskcnt6 works. dskcnt10 does not */
+	if (xld_d_enabled) {
+		init_xld_d();
+	}
+
+	return TRUE;
+}
+
+int PBI_XLD_ReadConfig(char *string, char *ptr) 
+{
+	if (strcmp(string, "XLD_D_ROM") == 0)
+		Util_strlcpy(xld_d_rom_filename, ptr, sizeof(xld_d_rom_filename));
+	else if (strcmp(string, "XLD_V_ROM") == 0)
+		Util_strlcpy(xld_v_rom_filename, ptr, sizeof(xld_v_rom_filename));
+	else return FALSE; /* no match */
+	return TRUE; /* matched something */
+}
+
+void PBI_XLD_WriteConfig(FILE *fp)
+{
+	fprintf(fp, "XLD_D_ROM=%s\n", xld_d_rom_filename);
+	fprintf(fp, "XLD_V_ROM=%s\n", xld_v_rom_filename);
+}
+
+void PBI_XLD_Reset(void)
+{
+	votrax_latch = 0;
+}
+
+int PBI_XLD_D1GetByte(UWORD addr)
+{
+	int result = PBI_NOT_HANDLED;
+	if (xld_d_enabled && addr == 0xd114) {
+	/* XLD input from disk to atari byte latch */
+		result = (int)PIO_GetByte();
+		D(printf("d114: disk read byte:%2x\n",result));
+	}
+	return result;
+}
+
+
+/* D1FF: each bit indicates IRQ status of a device */
+UBYTE PBI_XLD_D1ffGetByte()
+{
+	UBYTE result = 0;
+	/* VOTRAX BUSY IRQ bit */
+	/*if (!votraxsc01_status_r()) {*/
+	if (!votrax_busy) {
+		result |= VOICE_MASK;
+	}
+	return result;
+}
+
+
+void PBI_XLD_D1PutByte(UWORD addr, UBYTE byte)
+{
+	if ((addr & ~3) == 0xd104)  {
+		/* XLD disk strobe line */
+		D(printf("votrax write:%4x\n",addr));
+		votrax_sync_samples = (int)((1.0/ratio)*(double)Votrax_Samples(votrax_written_byte, votrax_latch & 0x3f, votrax_sync_samples));
+		votrax_written = TRUE;
+		votrax_written_byte = votrax_latch & 0x3f;
+		if (!votrax_busy) {
+			votrax_busy = TRUE;
+			votrax_busy_callback(TRUE); /* idle -> busy */
+		}
+
+	}
+	else if ((addr & ~3) == 0xd100 )  {
+		/* votrax phoneme+irq-enable latch */
+		if ( !(votrax_latch & 0x80) && (byte & 0x80) && (!Votrax_GetStatus())) {
+			/* IRQ disabled -> enabled, and votrax idle: generate IRQ */
+			D(printf("votrax IRQ generated: IRQ enable changed and idle\n"));
+			CPU_GenerateIRQ();
+			PBI_IRQ |= VOICE_MASK;
+		} else if ((votrax_latch & 0x80) && !(byte & 0x80) ){
+			/* IRQ enabled -> disabled : stop IRQ */
+			PBI_IRQ &= ~VOICE_MASK;
+			/* update pokey IRQ status */
+			POKEY_PutByte(POKEY_OFFSET_IRQEN, POKEY_IRQEN);
+		}
+		votrax_latch = byte;
+	}
+	else if (addr == 0xd108) {
+	/* modem latch and XLD 8040 T1 input */
+		D(printf("XLD 8040 T1:%d loop-back:%d modem+phone:%d offhook(modem relay):%d phaudio:%d DTMF:%d O/!A(originate/answer):%d SQT(squelch transmitter):%d\n",!!(byte&0x80),!!(byte&0x40),!!(byte&0x20),!!(byte&0x10),!!(byte&0x08),!!(byte&0x04),!!(byte&0x02),!!(byte&0x01)));
+		modem_latch = byte;
+	}
+	else if (xld_d_enabled && addr == 0xd110) {
+	/* XLD byte output from atari to disk latch */ 
+		D(printf("d110: disk output byte:%2x\n",byte));
+		if (modem_latch & 0x80){
+			/* 8040 T1=1 */
+			CommandIndex = 0;
+			DataIndex = 0;
+			TransferStatus = PIO_CommandFrame;
+			ExpectedBytes = 5;
+			D(printf("command frame expected\n"));
+		}
+		else if (TransferStatus == PIO_StatusRead || TransferStatus == PIO_ReadFrame) {
+			D(printf("read ack strobe\n"));
+		}
+		else {
+			PIO_PutByte(byte);
+		}
+	}
+}
+
+int PBI_XLD_D1ffPutByte(UBYTE byte)
+{
+	int result = 0; /* handled */
+	if (xld_d_enabled && byte == DISK_MASK) {
+		memcpy(MEMORY_mem + 0xd800, diskrom, 0x800);
+		D(printf("DISK rom activated\n"));
+	} 
+	else if (byte == MODEM_MASK) {
+		memcpy(MEMORY_mem + 0xd800, voicerom + 0x800, 0x800);
+		D(printf("MODEM rom activated\n"));
+	} 
+	else if (byte == VOICE_MASK) { 
+		memcpy(MEMORY_mem + 0xd800, voicerom, 0x800);
+		D(printf("VOICE rom activated\n"));
+	}
+	else result = PBI_NOT_HANDLED;
+	return result;
+}
+
+static void votrax_busy_callback(int busy_status)
+{
+	if (!busy_status && (votrax_latch & 0x80)){
+		/* busy->idle and IRQ enabled */
+		D(printf("votrax IRQ generated\n"));
+		CPU_GenerateIRQ();		
+		PBI_IRQ |= VOICE_MASK;
+	}
+	else if (busy_status && (PBI_IRQ & VOICE_MASK)) {
+		/* idle->busy and PBI_IRQ set */
+		PBI_IRQ &= ~VOICE_MASK;
+		/* update pokey IRQ status */
+		POKEY_PutByte(POKEY_OFFSET_IRQEN, POKEY_IRQEN);
+	}
+}
+
+static void votrax_busy_callback_async(int busy_status)
+{
+	return;
+	/* do nothing */
+}
+
+/* from sio.c */
+static UBYTE WriteSectorBack(void)
+{
+	UWORD sector;
+	UBYTE unit;
+
+	sector = CommandFrame[2] + (CommandFrame[3] << 8);
+	unit = CommandFrame[0] - '1';
+	if (unit >= SIO_MAX_DRIVES)		/* UBYTE range ! */
+		return 0;
+	switch (CommandFrame[1]) {
+	case 0x4f:				/* Write Status Block */
+		return SIO_WriteStatusBlock(unit, DataBuffer);
+	case 0x50:				/* Write */
+	case 0x57:
+	case 0xD0:				/* xf551 hispeed */
+	case 0xD7:
+		return SIO_WriteSector(unit, sector, DataBuffer);
+	default:
+		return 'E';
+	}
+}
+
+/* Put a byte that comes from the parallel bus */
+static void PIO_PutByte(int byte)
+{
+	D(printf("TransferStatus:%d\n",TransferStatus));
+	switch (TransferStatus) {
+	case PIO_CommandFrame:
+		D(printf("CommandIndex:%d ExpectedBytes:%d\n",CommandIndex,ExpectedBytes));
+		if (CommandIndex < ExpectedBytes) {
+			CommandFrame[CommandIndex++] = byte;
+			if (CommandIndex >= ExpectedBytes) {
+				if (CommandFrame[0] >= 0x31 && CommandFrame[0] <= 0x38) {
+					TransferStatus = PIO_StatusRead;
+					/*DELAYED_SERIN_IRQ = SERIN_INTERVAL + ACK_INTERVAL;*/
+					D(printf("TransferStatus = PIO_StatusRead\n"));
+				}
+				else{
+					TransferStatus = PIO_NoFrame;
+					D(printf("TransferStatus = PIO_NoFrame\n"));
+				}
+			}
+		}
+		else {
+			Log_print("Invalid command frame!");
+			TransferStatus = PIO_NoFrame;
+		}
+		break;
+	case PIO_WriteFrame:		/* Expect data */
+		if (DataIndex < ExpectedBytes) {
+			DataBuffer[DataIndex++] = byte;
+			if (DataIndex >= ExpectedBytes) {
+				UBYTE sum = SIO_ChkSum(DataBuffer, ExpectedBytes - 1);
+				if (sum == DataBuffer[ExpectedBytes - 1]) {
+					UBYTE result = WriteSectorBack();
+					if (result != 0) {
+						DataBuffer[0] = 'A';
+						DataBuffer[1] = result;
+						DataIndex = 0;
+						ExpectedBytes = 2;
+						/*DELAYED_SERIN_IRQ = SERIN_INTERVAL + ACK_INTERVAL;*/
+						TransferStatus = PIO_FinalStatus;
+					}
+					else
+						TransferStatus = PIO_NoFrame;
+				}
+				else {
+					DataBuffer[0] = 'E';
+					DataIndex = 0;
+					ExpectedBytes = 1;
+					/*DELAYED_SERIN_IRQ = SERIN_INTERVAL + ACK_INTERVAL;*/
+					TransferStatus = PIO_FinalStatus;
+				}
+			}
+		}
+		else {
+			Log_print("Invalid data frame!");
+		}
+		break;
+	}
+	/*DELAYED_SEROUT_IRQ = SEROUT_INTERVAL;*/
+}
+
+/* Get a byte from the floppy to the parallel bus. */
+static int PIO_GetByte(void)
+{
+	int byte = 0;
+	D(printf("PIO_GetByte TransferStatus:%d\n",TransferStatus));
+
+	switch (TransferStatus) {
+	case PIO_StatusRead:
+		byte = PIO_Command_Frame();		/* Handle now the command */
+		break;
+	case PIO_FormatFrame:
+		TransferStatus = PIO_ReadFrame;
+		/*DELAYED_SERIN_IRQ = SERIN_INTERVAL << 3;*/
+		/* FALL THROUGH */
+	case PIO_ReadFrame:
+		D(printf("ReadFrame: DataIndex:%d ExpectedBytes:%d\n",DataIndex,ExpectedBytes));
+		if (DataIndex < ExpectedBytes) {
+			byte = DataBuffer[DataIndex++];
+			if (DataIndex >= ExpectedBytes) {
+				TransferStatus = PIO_NoFrame;
+			}
+			/*else {*/
+				/* set delay using the expected transfer speed */
+				/*DELAYED_SERIN_IRQ = (DataIndex == 1) ? SERIN_INTERVAL*/
+					/*: ((SERIN_INTERVAL * AUDF[CHAN3] - 1) / 0x28 + 1);*/
+			/*}*/
+		}
+		else {
+			Log_print("Invalid read frame!");
+			TransferStatus = PIO_NoFrame;
+		}
+		break;
+	case PIO_FinalStatus:
+		if (DataIndex < ExpectedBytes) {
+			byte = DataBuffer[DataIndex++];
+			if (DataIndex >= ExpectedBytes) {
+				TransferStatus = PIO_NoFrame;
+			}
+			/*else {
+				if (DataIndex == 0)
+					DELAYED_SERIN_IRQ = SERIN_INTERVAL + ACK_INTERVAL;
+				else
+					DELAYED_SERIN_IRQ = SERIN_INTERVAL;
+			}*/
+		}
+		else {
+			Log_print("Invalid read frame!");
+			TransferStatus = PIO_NoFrame;
+		}
+		break;
+	default:
+		break;
+	}
+	return byte;
+}
+
+static UBYTE PIO_Command_Frame(void)
+{
+	int unit;
+	int sector;
+	int realsize;
+
+	sector = CommandFrame[2] | (((UWORD) CommandFrame[3]) << 8);
+	unit = CommandFrame[0] - '1';
+
+	if (unit < 0 || unit >= SIO_MAX_DRIVES) {
+		/* Unknown device */
+		Log_print("Unknown command frame: %02x %02x %02x %02x %02x",
+			   CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			   CommandFrame[3], CommandFrame[4]);
+		TransferStatus = PIO_NoFrame;
+		return 0;
+	}
+	switch (CommandFrame[1]) {
+	case 0x01:
+		Log_print("PIO DISK: Set large mode (unimplemented)");
+		return 'E';
+	case 0x02:
+		Log_print("PIO DISK: Set small mode (unimplemented)");
+		return 'E';
+	case 0x23:
+		Log_print("PIO DISK: Drive Diagnostic In (unimplemented)");
+		return 'E';
+	case 0x24:
+		Log_print("PIO DISK: Drive Diagnostic Out (unimplemented)");
+		return 'E';
+	case 0x4e:				/* Read Status */
+#ifdef PBI_DEBUG
+		Log_print("PIO DISK: Read-status frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		DataBuffer[0] = SIO_ReadStatusBlock(unit, DataBuffer + 1);
+		DataBuffer[13] = SIO_ChkSum(DataBuffer + 1, 12);
+		DataIndex = 0;
+		ExpectedBytes = 14;
+		TransferStatus = PIO_ReadFrame;
+		/*DELAYED_SERIN_IRQ = SERIN_INTERVAL;*/
+		return 'A';
+	case 0x4f:				/* Write status */
+#ifdef PBI_DEBUG
+		Log_print("PIO DISK: Write-status frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		ExpectedBytes = 13;
+		DataIndex = 0;
+		TransferStatus = PIO_WriteFrame;
+		return 'A';
+	case 0x50:				/* Write */
+	case 0x57:
+#ifdef PBI_DEBUG
+		Log_print("PIO DISK: Write-sector frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		SIO_SizeOfSector((UBYTE) unit, sector, &realsize, NULL);
+		ExpectedBytes = realsize + 1;
+		DataIndex = 0;
+		TransferStatus = PIO_WriteFrame;
+		SIO_last_op = SIO_LAST_WRITE;
+		SIO_last_op_time = 10;
+		SIO_last_drive = unit + 1;
+		return 'A';
+	case 0x52:				/* Read */
+#ifdef PBI_DEBUG
+		Log_print("PIO DISK: Read-sector frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		SIO_SizeOfSector((UBYTE) unit, sector, &realsize, NULL);
+		DataBuffer[0] = SIO_ReadSector(unit, sector, DataBuffer + 1);
+		DataBuffer[1 + realsize] = SIO_ChkSum(DataBuffer + 1, realsize);
+		DataIndex = 0;
+		ExpectedBytes = 2 + realsize;
+		TransferStatus = PIO_ReadFrame;
+		/* wait longer before confirmation because bytes could be lost */
+		/* before the buffer was set (see $E9FB & $EA37 in XL-OS) */
+		/*DELAYED_SERIN_IRQ = SERIN_INTERVAL << 2;*/
+		/*
+#ifndef NO_SECTOR_DELAY
+		if (sector == 1) {
+			//DELAYED_SERIN_IRQ += delay_counter;
+			delay_counter = SECTOR_DELAY;
+		}
+		else {
+			delay_counter = 0;
+		}
+#endif*/
+		SIO_last_op = SIO_LAST_READ;
+		SIO_last_op_time = 10;
+		SIO_last_drive = unit + 1;
+		return 'A';
+	case 0x53:				/* Status */
+		/*
+		from spec doc:
+		BYTE 1 - DISK STATUS
+
+		BIT 0 = 1 indicates an invalid
+		command frame was receiv-
+		ed.
+		BIT 1 = 1 indicates an invalid
+		data frame was received.
+		BIT 2 = 1 indicates an opera-
+		tion was unsuccessful.
+		BIT 3 = 1 indicates the disk-
+		ette is write protected.
+		BIT 4 = 1 indicates drive is
+		active.
+		BITS 5-7 = 100 indicates single
+		density format.
+		BITS 5-7 = 101 indicates double
+		density format.
+
+		BYTE 2 - DISK CONTROLLER HARDWARE
+		STATUS
+
+		This byte shall contain the in-
+		verted value of the disk con-
+		troller hardware status regis-
+		ter as of the last operation.
+		The hardware status value for
+		no errors shall be $FF. A zero
+		in any bit position shall indi-
+		cate an error. The definition
+		of the bit positions shall be:
+
+		BIT 0 = 0 indicates device busy
+		BIT 1 = 0 indicates data re-
+		quest is full on a read
+		operation.
+		BIT 2 = 0 indicates data lost
+		BIT 3 = 0 indicates CRC error
+		BIT 4 = 0 indicates desired
+		track and sector not found
+		BIT 5 = 0 indicates record
+		type/write fault
+		BIT 6 NOT USED
+		*BIT 7 = 0 indicates device not
+		ready (door open)
+
+		BYTES 3 & 4 - TIMEOUT
+
+		These bytes shall contain a
+		disk controller provided maxi-
+		mum timeout value, in seconds,
+		for the worst case command. The
+		worst case operation is for a
+		disk format command (time TBD
+		seconds). Byte 4 is not used,
+		currently.*/
+		/*****Compare with:******/
+/*
+   Status Request from Atari 400/800 Technical Reference Notes
+
+   DVSTAT + 0   Command Status
+   DVSTAT + 1   Hardware Status
+   DVSTAT + 2   Timeout
+   DVSTAT + 3   Unused
+
+   Command Status Bits
+
+   Bit 0 = 1 indicates an invalid command frame was received(same)
+   Bit 1 = 1 indicates an invalid data frame was received(same)
+   Bit 2 = 1 indicates that last read/write operation was unsuccessful(same)
+   Bit 3 = 1 indicates that the diskette is write protected(same)
+   Bit 4 = 1 indicates active/standby(same)
+
+   plus
+
+   Bit 5 = 1 indicates double density
+   Bit 7 = 1 indicates dual density disk (1050 format)
+ */
+
+#ifdef PBI_DEBUG
+		Log_print("PIO DISK: Status frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		/*if (SIO_drive_status[unit]==SIO_OFF) SIO_drive_status[unit]=SIO_NO_DISK;*/
+		/*need to modify the line below also for  SIO_OFF==SIO_NO_DISK*/
+		DataBuffer[0] = SIO_DriveStatus(unit, DataBuffer + 1);
+		DataBuffer[2] = 0xff;/*/1;//SIO_DriveStatus(unit, DataBuffer + 1);*/
+		if (SIO_drive_status[unit]==SIO_NO_DISK || SIO_drive_status[unit]==SIO_OFF){
+		/*Can't turn 1450XLD drives off, so make SIO_OFF==SIO_NO_DISK*/
+			DataBuffer[2]=0x7f;
+		}
+		DataBuffer[1 + 4] = SIO_ChkSum(DataBuffer + 1, 4);
+		DataIndex = 0;
+		ExpectedBytes = 6;
+		TransferStatus = PIO_ReadFrame;
+		/*DELAYED_SERIN_IRQ = SERIN_INTERVAL;*/
+		return 'A';
+	case 0x21:				/* Format Disk */
+#ifdef PBI_DEBUG
+		Log_print("PIO DISK: Format-disk frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		realsize = SIO_format_sectorsize[unit];
+		DataBuffer[0] = SIO_FormatDisk(unit, DataBuffer + 1, realsize, SIO_format_sectorcount[unit]);
+		DataBuffer[1 + realsize] = SIO_ChkSum(DataBuffer + 1, realsize);
+		DataIndex = 0;
+		ExpectedBytes = 2 + realsize;
+		TransferStatus = PIO_FormatFrame;
+		/*DELAYED_SERIN_IRQ = SERIN_INTERVAL;*/
+		return 'A';
+	case 0x22:				/* Dual Density Format */
+#ifdef PBI_DEBUG
+		Log_print("PIO DISK: Format-Medium frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		DataBuffer[0] = SIO_FormatDisk(unit, DataBuffer + 1, 128, 1040);
+		DataBuffer[1 + 128] = SIO_ChkSum(DataBuffer + 1, 128);
+		DataIndex = 0;
+		ExpectedBytes = 2 + 128;
+		TransferStatus = PIO_FormatFrame;
+		/*DELAYED_SERIN_IRQ = SERIN_INTERVAL;*/
+		return 'A';
+
+		/*
+		The Integral Disk Drive uses COMMAND BYTE $B1 and
+			$B2 for internal use. These COMMAND BYTES may not
+			be used by any other drivers.*/
+	case 0xb1:
+		Log_print("PIO DISK: Internal Command 0xb1 (unimplemented)");
+		return 'E';
+	case 0xb2:
+		Log_print("PIO DISK: Internal Command 0xb2 (unimplemented)");
+		return 'E';
+
+
+	default:
+		/* Unknown command for a disk drive */
+#ifdef PBI_DEBUG
+		Log_print("PIO DISK: Unknown Command frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		TransferStatus = PIO_NoFrame;
+		return 'E';
+	}
+}
+
+/* called from POKEYSND_Init */
+void PBI_XLD_VInit(int playback_freq, int n_pokeys, int b16)
+{
+	static struct Votrax_interface vi;
+	int temp_votrax_buffer_size;
+	bit16 = b16;
+	dsprate = playback_freq;
+	num_pokeys = n_pokeys;
+	if (!xld_v_enabled) return;
+	if (num_pokeys != 1 && num_pokeys != 2) {
+		Log_print("PBI_XLD_VInit: cannot handle num_pokeys=%d", num_pokeys);
+		xld_v_enabled = FALSE;
+		return;
+	}
+	vi.num = 1;
+	vi.BusyCallback = votrax_busy_callback_async;
+	Votrax_Stop();
+	Votrax_Start((void *)&vi);
+	samples_per_frame = dsprate/(Atari800_tv_mode == Atari800_TV_PAL ? 50 : 60);
+	ratio = (double)VTRX_RATE/(double)dsprate;
+	temp_votrax_buffer_size = (int)(VTRX_BLOCK_SIZE*ratio + 10); /* +10 .. little extra? */
+	free(temp_votrax_buffer);
+	temp_votrax_buffer = (SWORD *)Util_malloc(temp_votrax_buffer_size*sizeof(SWORD));
+	free(votrax_buffer);
+	votrax_buffer = (SWORD *)Util_malloc(VTRX_BLOCK_SIZE*sizeof(SWORD));
+}
+
+/* process votrax and interpolate samples */
+static void votrax_process(SWORD *v_buffer, int len, SWORD *temp_v_buffer)
+{
+	static SWORD last_sample;
+	static SWORD last_sample2;
+	static double startpos;
+	static int have;
+	int max_left_sample_index = (int)(startpos + (double)(len - 1)*ratio);
+	int pos = 0;
+	double fraction = 0;
+	int i;
+	int floor_next_pos;
+
+	if (have == 2) {
+	    temp_v_buffer[0] = last_sample;
+		temp_v_buffer[1] = last_sample2;
+		Votrax_Update(0, temp_v_buffer + 2, (max_left_sample_index + 1 + 1) - 2);
+	}
+	else if (have == 1) {
+	    temp_v_buffer[0] = last_sample;
+		Votrax_Update(0, temp_v_buffer + 1, (max_left_sample_index + 1 + 1) - 1);
+	}
+	else if (have == 0) {
+		Votrax_Update(0, temp_v_buffer, max_left_sample_index + 1 + 1);
+	}
+	else if (have < 0) {
+		Votrax_Update(0, temp_v_buffer, -have);
+		Votrax_Update(0, temp_v_buffer, max_left_sample_index + 1 + 1);
+	}
+
+	for (i = 0; i < len; i++) {
+		SWORD left_sample;
+		SWORD right_sample;
+		SWORD interp_sample;
+		pos = (int)(startpos + (double)i*ratio);
+		fraction = startpos + (double)i*ratio - (double)pos;
+		left_sample = temp_v_buffer[pos];
+		right_sample = temp_v_buffer[pos+1];
+		interp_sample = (int)(left_sample + fraction*(double)(right_sample-left_sample));
+		v_buffer[i] = interp_sample;
+	}
+	floor_next_pos = (int)(startpos + (double)len*ratio);
+	startpos = (startpos + (double)len*ratio) - (double)floor_next_pos;
+	if (floor_next_pos == max_left_sample_index)
+	{ 
+		have = 2;
+		last_sample = temp_v_buffer[floor_next_pos];
+		last_sample2 = temp_v_buffer[floor_next_pos+1];
+	}
+	else if (floor_next_pos == max_left_sample_index + 1) {
+		have = 1;
+		last_sample = temp_v_buffer[floor_next_pos];
+	}
+	else {
+		have = (floor_next_pos - (max_left_sample_index + 2));
+	}
+}
+
+/* 16 bit mixing */
+static void mix(SWORD *dst, SWORD *src, int sndn, int volume)
+{
+	SWORD s1, s2;
+	int val;
+	int channel = 0;
+
+	while (sndn--) {
+		s1 = *src;
+		s1 = s1*volume/128;
+		s2 = *dst;
+		src++;
+		val = s1 + s2;
+		if (val > 32767) val = 32767;
+		if (val < -32768) val = -32768;
+		*dst++ = val;
+		if (num_pokeys == 2) {
+			if (!channel) {
+				channel = !channel;
+				sndn++;
+				src--;
+			}
+		}
+	}
+}
+
+/* 8 bit mixing */
+static void mix8(UBYTE *dst, SWORD *src, int sndn, int volume)
+{
+	SWORD s1, s2;
+	int val;
+	int channel = 0;
+
+	while (sndn--) {
+		s1 = *src;
+		s1 = s1*volume/128;
+		s2 = ((int)(*dst) - 0x80)*256;
+		src++;
+		val = s1 + s2;
+		if (val > 32767) val = 32767;
+		if (val < -32768) val = -32768;
+		*dst++ = (UBYTE)((val/256) + 0x80);
+		if (num_pokeys == 2) {
+			if (!channel) {
+				channel = !channel;
+				sndn++;
+				src--;
+			}
+		}
+	}
+}
+
+void PBI_XLD_VFrame(void)
+{
+	if (!xld_v_enabled) return;
+	votrax_sync_samples -= samples_per_frame;
+	if (votrax_sync_samples <= 0 ) {
+		votrax_sync_samples = 0;
+		votrax_busy = FALSE;
+		votrax_busy_callback(FALSE); /* busy -> idle */
+	}
+}
+
+void PBI_XLD_VProcess(void *sndbuffer, int sndn)
+{
+	if (!xld_v_enabled) return;
+
+	if(votrax_written) {
+		votrax_written = FALSE;
+		Votrax_PutByte(votrax_written_byte);
+	}
+	while (sndn > 0) {
+		int amount = ((sndn > VTRX_BLOCK_SIZE) ? VTRX_BLOCK_SIZE : sndn);
+		votrax_process(votrax_buffer, amount, temp_votrax_buffer);
+		if (bit16) mix((SWORD *)sndbuffer, votrax_buffer, amount, 128/4);
+		else mix8((UBYTE *)sndbuffer, votrax_buffer, amount, 128/4);
+		sndbuffer = (char *) sndbuffer + VTRX_BLOCK_SIZE*(bit16 ? 2 : 1)*((num_pokeys == 2) ? 2: 1);
+		sndn -= VTRX_BLOCK_SIZE;
+	}
+}
+
+#ifndef BASIC
+
+void PBI_XLD_StateSave(void)
+{
+	StateSav_SaveINT(&PBI_XLD_enabled, 1);
+	if (PBI_XLD_enabled) {
+		StateSav_SaveINT(&xld_v_enabled, 1);
+		StateSav_SaveINT(&xld_d_enabled, 1);
+		StateSav_SaveFNAME(xld_d_rom_filename);
+		StateSav_SaveFNAME(xld_v_rom_filename);
+
+		StateSav_SaveUBYTE(&votrax_latch, 1);
+		StateSav_SaveUBYTE(&modem_latch, 1);
+		StateSav_SaveUBYTE(CommandFrame, sizeof(CommandFrame));
+		StateSav_SaveINT(&CommandIndex, 1);
+		StateSav_SaveUBYTE(DataBuffer, sizeof(DataBuffer));
+		StateSav_SaveINT(&DataIndex, 1);
+		StateSav_SaveINT(&TransferStatus, 1);
+		StateSav_SaveINT(&ExpectedBytes, 1);
+		StateSav_SaveINT(&votrax_busy, 1);
+	}
+}
+
+void PBI_XLD_StateRead(void)
+{
+	StateSav_ReadINT(&PBI_XLD_enabled, 1);
+	if (PBI_XLD_enabled) {
+		/* UI should have paused sound while doing this */
+		StateSav_ReadINT(&xld_v_enabled, 1);
+		StateSav_ReadINT(&xld_d_enabled, 1);
+		StateSav_ReadFNAME(xld_d_rom_filename);
+		StateSav_ReadFNAME(xld_v_rom_filename);
+		if (xld_v_enabled) {
+			init_xld_v();
+			if (dsprate) PBI_XLD_VInit(dsprate, num_pokeys, bit16);
+		}
+		if (xld_d_enabled) init_xld_d();
+		StateSav_ReadUBYTE(&votrax_latch, 1);
+		StateSav_ReadUBYTE(&modem_latch, 1);
+		StateSav_ReadUBYTE(CommandFrame, sizeof(CommandFrame));
+		StateSav_ReadINT(&CommandIndex, 1);
+		StateSav_ReadUBYTE(DataBuffer, sizeof(DataBuffer));
+		StateSav_ReadINT(&DataIndex, 1);
+		StateSav_ReadINT(&TransferStatus, 1);
+		StateSav_ReadINT(&ExpectedBytes, 1);
+		StateSav_ReadINT(&votrax_busy, 1);
+	}
+	else {
+		xld_v_enabled = FALSE;
+		xld_d_enabled = FALSE;
+	}
+}
+
+#endif /* #ifndef BASIC */
+
+/*
+vim:ts=4:sw=4:
+*/
diff --git a/project/jni/application/atari800/src/pbi_xld.h b/project/jni/application/atari800/src/pbi_xld.h
new file mode 100755
index 000000000..270c737ca
--- /dev/null
+++ b/project/jni/application/atari800/src/pbi_xld.h
@@ -0,0 +1,20 @@
+#ifndef PBI_XLD_H_
+#define PBI_XLD_H_
+
+#include "atari.h"
+int PBI_XLD_Initialise(int *argc, char *argv[]);
+int PBI_XLD_ReadConfig(char *string, char *ptr);
+void PBI_XLD_WriteConfig(FILE *fp);
+void PBI_XLD_Reset(void);
+int PBI_XLD_D1GetByte(UWORD addr);
+UBYTE PBI_XLD_D1ffGetByte(void);
+void PBI_XLD_D1PutByte(UWORD addr, UBYTE byte);
+int PBI_XLD_D1ffPutByte(UBYTE byte);
+extern int PBI_XLD_enabled;
+void PBI_XLD_VInit(int playback_freq, int num_pokeys, int bit16);
+void PBI_XLD_VFrame(void);
+void PBI_XLD_VProcess(void *sndbuffer, int sndn);
+void PBI_XLD_StateSave(void);
+void PBI_XLD_StateRead(void);
+
+#endif /* PBI_XLD_H_ */
diff --git a/project/jni/application/atari800/src/pcjoy.h b/project/jni/application/atari800/src/pcjoy.h
new file mode 100644
index 000000000..61ae793af
--- /dev/null
+++ b/project/jni/application/atari800/src/pcjoy.h
@@ -0,0 +1,17 @@
+/* joystick types for DOS port of David Firth's Atari800 emulator */
+
+#define joy_off 0
+#define joy_analog 1
+#define joy_lpt1 2
+#define joy_lpt2 3
+#define joy_lpt3 4
+#define joy_keyset0 5
+#define joy_keyset1 6
+#define joy_keyset2 7
+#define joy_keyset3 8
+
+#define JOYSTICKTYPES 9
+
+char joyparams[JOYSTICKTYPES][10]={"OFF","PC","LPT1","LPT2",
+                       "LPT3","KEYSET_0","KEYSET_1","KEYSET_2","KEYSET_3"};
+
diff --git a/project/jni/application/atari800/src/pia.c b/project/jni/application/atari800/src/pia.c
new file mode 100644
index 000000000..53e3b02cc
--- /dev/null
+++ b/project/jni/application/atari800/src/pia.c
@@ -0,0 +1,222 @@
+/*
+ * pia.c - PIA chip emulation
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+
+#include "atari.h"
+#include "cpu.h"
+#include "memory.h"
+#include "pia.h"
+#include "sio.h"
+#ifdef XEP80_EMULATION
+#include "xep80.h"
+#endif
+#ifndef BASIC
+#include "input.h"
+#include "statesav.h"
+#endif
+
+UBYTE PIA_PACTL;
+UBYTE PIA_PBCTL;
+UBYTE PIA_PORTA;
+UBYTE PIA_PORTB;
+UBYTE PIA_PORT_input[2];
+
+UBYTE PIA_PORTA_mask;
+UBYTE PIA_PORTB_mask;
+
+int PIA_Initialise(int *argc, char *argv[])
+{
+	PIA_PACTL = 0x3f;
+	PIA_PBCTL = 0x3f;
+	PIA_PORTA = 0xff;
+	PIA_PORTB = 0xff;
+	PIA_PORTA_mask = 0xff;
+	PIA_PORTB_mask = 0xff;
+	PIA_PORT_input[0] = 0xff;
+	PIA_PORT_input[1] = 0xff;
+
+	return TRUE;
+}
+
+void PIA_Reset(void)
+{
+	PIA_PORTA = 0xff;
+	if (Atari800_machine_type == Atari800_MACHINE_XLXE) {
+		MEMORY_HandlePORTB(0xff, (UBYTE) (PIA_PORTB | PIA_PORTB_mask));
+	}
+	PIA_PORTB = 0xff;
+}
+
+UBYTE PIA_GetByte(UWORD addr)
+{
+	switch (addr & 0x03) {
+	case PIA_OFFSET_PACTL:
+		return PIA_PACTL & 0x3f;
+	case PIA_OFFSET_PBCTL:
+		return PIA_PBCTL & 0x3f;
+	case PIA_OFFSET_PORTA:
+		if ((PIA_PACTL & 0x04) == 0) {
+			/* direction register */
+			return ~PIA_PORTA_mask;
+		}
+		else {
+			/* port state */
+#ifdef XEP80_EMULATION
+			if (XEP80_enabled) {
+				return(XEP80_GetBit() & PIA_PORT_input[0] & (PIA_PORTA | PIA_PORTA_mask));
+			}
+#endif /* XEP80_EMULATION */
+			return PIA_PORT_input[0] & (PIA_PORTA | PIA_PORTA_mask);
+		}
+	case PIA_OFFSET_PORTB:
+		if ((PIA_PBCTL & 0x04) == 0) {
+			/* direction register */
+			return ~PIA_PORTB_mask;
+		}
+		else {
+			/* port state */
+			if (Atari800_machine_type == Atari800_MACHINE_XLXE) {
+				return PIA_PORTB | PIA_PORTB_mask;
+			}
+			else {
+				return PIA_PORT_input[1] & (PIA_PORTB | PIA_PORTB_mask);
+			}
+		}
+	}
+	/* for stupid compilers */
+	return 0xff;
+}
+
+void PIA_PutByte(UWORD addr, UBYTE byte)
+{
+	switch (addr & 0x03) {
+	case PIA_OFFSET_PACTL:
+                /* This code is part of the cassette emulation */
+		/* The motor status has changed */
+		SIO_TapeMotor(byte & 0x08 ? 0 : 1);
+	
+		PIA_PACTL = byte;
+		break;
+	case PIA_OFFSET_PBCTL:
+		/* This code is part of the serial I/O emulation */
+		if ((PIA_PBCTL ^ byte) & 0x08) {
+			/* The command line status has changed */
+			SIO_SwitchCommandFrame(byte & 0x08 ? 0 : 1);
+		}
+		PIA_PBCTL = byte;
+		break;
+	case PIA_OFFSET_PORTA:
+		if ((PIA_PACTL & 0x04) == 0) {
+			/* set direction register */
+ 			PIA_PORTA_mask = ~byte;
+		}
+		else {
+			/* set output register */
+#ifdef XEP80_EMULATION
+			if (XEP80_enabled && (~PIA_PORTA_mask & 0x11)) {
+				XEP80_PutBit(byte);
+			}
+#endif /* XEP80_EMULATION */
+			PIA_PORTA = byte;		/* change from thor */
+		}
+#ifndef BASIC
+		INPUT_SelectMultiJoy((PIA_PORTA | PIA_PORTA_mask) >> 4);
+#endif
+		break;
+	case PIA_OFFSET_PORTB:
+		if (Atari800_machine_type == Atari800_MACHINE_XLXE) {
+			if ((PIA_PBCTL & 0x04) == 0) {
+				/* direction register */
+				MEMORY_HandlePORTB((UBYTE) (PIA_PORTB | ~byte), (UBYTE) (PIA_PORTB | PIA_PORTB_mask));
+				PIA_PORTB_mask = ~byte;
+			}
+			else {
+				/* output register */
+				MEMORY_HandlePORTB((UBYTE) (byte | PIA_PORTB_mask), (UBYTE) (PIA_PORTB | PIA_PORTB_mask));
+				PIA_PORTB = byte;
+			}
+		}
+		else {
+			if ((PIA_PBCTL & 0x04) == 0) {
+				/* direction register */
+				PIA_PORTB_mask = ~byte;
+			}
+			else {
+				/* output register */
+				PIA_PORTB = byte;
+			}
+		}
+		break;
+	}
+}
+
+#ifndef BASIC
+
+void PIA_StateSave(void)
+{
+	int Ram256 = 0;
+	if (MEMORY_ram_size == MEMORY_RAM_320_RAMBO)
+		Ram256 = 1;
+	else if (MEMORY_ram_size == MEMORY_RAM_320_COMPY_SHOP)
+		Ram256 = 2;
+
+	StateSav_SaveUBYTE( &PIA_PACTL, 1 );
+	StateSav_SaveUBYTE( &PIA_PBCTL, 1 );
+	StateSav_SaveUBYTE( &PIA_PORTA, 1 );
+	StateSav_SaveUBYTE( &PIA_PORTB, 1 );
+
+	StateSav_SaveINT( &MEMORY_xe_bank, 1 );
+	StateSav_SaveINT( &MEMORY_selftest_enabled, 1 );
+	StateSav_SaveINT( &Ram256, 1 );
+
+	StateSav_SaveINT( &MEMORY_cartA0BF_enabled, 1 );
+
+	StateSav_SaveUBYTE( &PIA_PORTA_mask, 1 );
+	StateSav_SaveUBYTE( &PIA_PORTB_mask, 1 );
+}
+
+void PIA_StateRead(void)
+{
+	int Ram256 = 0;
+
+	StateSav_ReadUBYTE( &PIA_PACTL, 1 );
+	StateSav_ReadUBYTE( &PIA_PBCTL, 1 );
+	StateSav_ReadUBYTE( &PIA_PORTA, 1 );
+	StateSav_ReadUBYTE( &PIA_PORTB, 1 );
+
+	StateSav_ReadINT( &MEMORY_xe_bank, 1 );
+	StateSav_ReadINT( &MEMORY_selftest_enabled, 1 );
+	StateSav_ReadINT( &Ram256, 1 );
+
+	if (Ram256 == 1 && Atari800_machine_type == Atari800_MACHINE_XLXE && MEMORY_ram_size == MEMORY_RAM_320_COMPY_SHOP)
+		MEMORY_ram_size = MEMORY_RAM_320_RAMBO;
+
+	StateSav_ReadINT( &MEMORY_cartA0BF_enabled, 1 );
+
+	StateSav_ReadUBYTE( &PIA_PORTA_mask, 1 );
+	StateSav_ReadUBYTE( &PIA_PORTB_mask, 1 );
+}
+
+#endif /* BASIC */
diff --git a/project/jni/application/atari800/src/pia.h b/project/jni/application/atari800/src/pia.h
new file mode 100644
index 000000000..d6141fb48
--- /dev/null
+++ b/project/jni/application/atari800/src/pia.h
@@ -0,0 +1,26 @@
+#ifndef PIA_H_
+#define PIA_H_
+
+#include "atari.h"
+
+#define PIA_OFFSET_PORTA 0x00
+#define PIA_OFFSET_PORTB 0x01
+#define PIA_OFFSET_PACTL 0x02
+#define PIA_OFFSET_PBCTL 0x03
+
+extern UBYTE PIA_PACTL;
+extern UBYTE PIA_PBCTL;
+extern UBYTE PIA_PORTA;
+extern UBYTE PIA_PORTB;
+extern UBYTE PIA_PORTA_mask;
+extern UBYTE PIA_PORTB_mask;
+extern UBYTE PIA_PORT_input[2];
+
+int PIA_Initialise(int *argc, char *argv[]);
+void PIA_Reset(void);
+UBYTE PIA_GetByte(UWORD addr);
+void PIA_PutByte(UWORD addr, UBYTE byte);
+void PIA_StateSave(void);
+void PIA_StateRead(void);
+
+#endif /* PIA_H_ */
diff --git a/project/jni/application/atari800/src/platform.h b/project/jni/application/atari800/src/platform.h
new file mode 100644
index 000000000..cd09c3e05
--- /dev/null
+++ b/project/jni/application/atari800/src/platform.h
@@ -0,0 +1,75 @@
+#ifndef PLATFORM_H_
+#define PLATFORM_H_
+
+#include "config.h"
+#include <stdio.h>
+
+/* This include file defines prototypes for platform-specific functions. */
+
+int PLATFORM_Initialise(int *argc, char *argv[]);
+int PLATFORM_Exit(int run_monitor);
+int PLATFORM_Keyboard(void);
+void PLATFORM_DisplayScreen(void);
+
+int PLATFORM_PORT(int num);
+int PLATFORM_TRIG(int num);
+
+#ifdef SUPPORTS_PLATFORM_CONFIGINIT
+/* This function sets the configuration parameters to default values */
+void PLATFORM_ConfigInit(void);
+#endif
+
+#ifdef SUPPORTS_PLATFORM_CONFIGURE
+/* This procedure processes lines not recognized by RtConfigLoad. */
+int PLATFORM_Configure(char *option, char *parameters);
+#endif
+
+#ifdef SUPPORTS_PLATFORM_CONFIGSAVE
+/* This function saves additional config lines */
+void PLATFORM_ConfigSave(FILE *fp);
+#endif
+
+#ifdef SUPPORTS_PLATFORM_PALETTEUPDATE
+/* This function updates the palette */
+/* If the platform does a conversion of colortable when it initialises
+ * and the user changes colortable (such as changing from PAL to NTSC)
+ * then this function should update the platform palette */
+void PLATFORM_PaletteUpdate(void);
+#endif
+
+#ifdef SUPPORTS_PLATFORM_SLEEP
+/* This function is for those ports that need their own version of sleep */
+void PLATFORM_Sleep(double s);
+#endif
+
+#ifdef SDL
+/* used in UI to show how the keyboard joystick is mapped */
+extern int PLATFORM_kbd_joy_0_enabled;
+extern int PLATFORM_kbd_joy_1_enabled;
+int PLATFORM_GetRawKey(void);
+#endif
+
+#ifdef XEP80_EMULATION
+/* Switch between the Atari and XEP80 screen */
+void PLATFORM_SwitchXep80(void);
+/* TRUE if the XEP80 screen is visible */
+extern int PLATFORM_xep80;
+#endif
+
+#ifdef NTSC_FILTER
+enum PLATFORM_filter_t {
+	PLATFORM_FILTER_NONE,
+	PLATFORM_FILTER_NTSC
+};
+
+/* Represents whether the NTSC filter is turned on. Don't set this value
+   directly. */
+extern enum PLATFORM_filter_t PLATFORM_filter;
+
+/* This function turns the NTSC filter on or off. Changing the
+   PLATFORM_filter variable directly is not allowed; use this function
+   instead. */
+void PLATFORM_SetFilter(const enum PLATFORM_filter_t filter);
+#endif /* NTSC_FILTER */
+
+#endif /* PLATFORM_H_ */
diff --git a/project/jni/application/atari800/src/pokey.c b/project/jni/application/atari800/src/pokey.c
new file mode 100644
index 000000000..dfbd8c871
--- /dev/null
+++ b/project/jni/application/atari800/src/pokey.c
@@ -0,0 +1,667 @@
+/*
+ * pokey.c - POKEY sound chip emulation
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#ifdef HAVE_TIME_H
+#include <time.h>
+#endif
+#ifdef WIN32
+#include <windows.h>
+#endif
+
+#include "atari.h"
+#include "cpu.h"
+#include "esc.h"
+#include "pia.h"
+#include "pokey.h"
+#include "gtia.h"
+#include "sio.h"
+#ifndef BASIC
+#include "input.h"
+#include "statesav.h"
+#endif
+#ifdef SOUND
+#include "pokeysnd.h"
+#endif
+#include "antic.h"
+#include "cassette.h"
+#include "log.h"
+#include "input.h"
+#include "pbi.h"
+
+#ifdef POKEY_UPDATE
+void pokey_update(void);
+#endif
+
+UBYTE POKEY_KBCODE;
+UBYTE POKEY_SERIN;
+UBYTE POKEY_IRQST;
+UBYTE POKEY_IRQEN;
+UBYTE POKEY_SKSTAT;
+UBYTE POKEY_SKCTL;
+int POKEY_DELAYED_SERIN_IRQ;
+int POKEY_DELAYED_SEROUT_IRQ;
+int POKEY_DELAYED_XMTDONE_IRQ;
+
+/* structures to hold the 9 pokey control bytes */
+UBYTE POKEY_AUDF[4 * POKEY_MAXPOKEYS];	/* AUDFx (D200, D202, D204, D206) */
+UBYTE POKEY_AUDC[4 * POKEY_MAXPOKEYS];	/* AUDCx (D201, D203, D205, D207) */
+UBYTE POKEY_AUDCTL[POKEY_MAXPOKEYS];	/* AUDCTL (D208) */
+int POKEY_DivNIRQ[4], POKEY_DivNMax[4];
+int POKEY_Base_mult[POKEY_MAXPOKEYS];		/* selects either 64Khz or 15Khz clock mult */
+
+UBYTE POKEY_POT_input[8] = {228, 228, 228, 228, 228, 228, 228, 228};
+static int pot_scanline;
+
+UBYTE POKEY_poly9_lookup[511];
+UBYTE POKEY_poly17_lookup[16385];
+static ULONG random_scanline_counter;
+
+ULONG POKEY_GetRandomCounter(void)
+{
+	return random_scanline_counter;
+}
+
+void POKEY_SetRandomCounter(ULONG value)
+{
+	random_scanline_counter = value;
+}
+
+UBYTE POKEY_GetByte(UWORD addr)
+{
+	UBYTE byte = 0xff;
+
+#ifdef STEREO_SOUND
+	if (addr & 0x0010 && POKEYSND_stereo_enabled)
+		return 0;
+#endif
+	addr &= 0x0f;
+	if (addr < 8) {
+		byte = POKEY_POT_input[addr];
+		if (byte <= pot_scanline)
+			return byte;
+		return pot_scanline;
+	}
+	switch (addr) {
+	case POKEY_OFFSET_ALLPOT:
+		{
+			int i;
+			for (i = 0; i < 8; i++)
+				if (POKEY_POT_input[i] <= pot_scanline)
+					byte &= ~(1 << i);		/* reset bit if pot value known */
+		}
+		break;
+	case POKEY_OFFSET_KBCODE:
+		byte = POKEY_KBCODE;
+		break;
+	case POKEY_OFFSET_RANDOM:
+		if ((POKEY_SKCTL & 0x03) != 0) {
+			int i = random_scanline_counter + ANTIC_XPOS;
+			if (POKEY_AUDCTL[0] & POKEY_POLY9)
+				byte = POKEY_poly9_lookup[i % POKEY_POLY9_SIZE];
+			else {
+				const UBYTE *ptr;
+				i %= POKEY_POLY17_SIZE;
+				ptr = POKEY_poly17_lookup + (i >> 3);
+				i &= 7;
+				byte = (UBYTE) ((ptr[0] >> i) + (ptr[1] << (8 - i)));
+			}
+		}
+		break;
+	case POKEY_OFFSET_SERIN:
+		byte = POKEY_SERIN;
+#ifdef DEBUG3
+		printf("SERIO: SERIN read, bytevalue %02x\n", POKEY_SERIN);
+#endif
+#ifdef SERIO_SOUND
+		POKEYSND_UpdateSerio(0,byte);
+#endif
+		break;
+	case POKEY_OFFSET_IRQST:
+		byte = POKEY_IRQST;
+		break;
+	case POKEY_OFFSET_SKSTAT:
+		byte = POKEY_SKSTAT + (CASSETTE_IOLineStatus() << 4);
+		break;
+	}
+
+	return byte;
+}
+
+static void Update_Counter(int chan_mask);
+
+static int POKEY_siocheck(void)
+{
+	return (((POKEY_AUDF[POKEY_CHAN3] == 0x28 || POKEY_AUDF[POKEY_CHAN3] == 0x10
+	        || POKEY_AUDF[POKEY_CHAN3] == 0x08 || POKEY_AUDF[POKEY_CHAN3] == 0x0a)
+		&& POKEY_AUDF[POKEY_CHAN4] == 0x00) /* intelligent peripherals speeds */
+		|| (POKEY_SKCTL & 0x78) == 0x28) /* cassette save mode */
+		&& (POKEY_AUDCTL[0] & 0x28) == 0x28;
+}
+
+#ifndef SOUND_GAIN /* sound gain can be pre-defined in the configure/Makefile */
+#define SOUND_GAIN 4
+#endif
+
+#ifndef SOUND
+#define POKEYSND_Update(addr, val, chip, gain)
+#endif
+
+void POKEY_PutByte(UWORD addr, UBYTE byte)
+{
+#ifdef STEREO_SOUND
+	addr &= POKEYSND_stereo_enabled ? 0x1f : 0x0f;
+#else
+	addr &= 0x0f;
+#endif
+	switch (addr) {
+	case POKEY_OFFSET_AUDC1:
+		POKEY_AUDC[POKEY_CHAN1] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDC1, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDC2:
+		POKEY_AUDC[POKEY_CHAN2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDC2, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDC3:
+		POKEY_AUDC[POKEY_CHAN3] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDC3, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDC4:
+		POKEY_AUDC[POKEY_CHAN4] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDC4, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDCTL:
+		POKEY_AUDCTL[0] = byte;
+
+		/* determine the base multiplier for the 'div by n' calculations */
+		if (byte & POKEY_CLOCK_15)
+			POKEY_Base_mult[0] = POKEY_DIV_15;
+		else
+			POKEY_Base_mult[0] = POKEY_DIV_64;
+
+		Update_Counter((1 << POKEY_CHAN1) | (1 << POKEY_CHAN2) | (1 << POKEY_CHAN3) | (1 << POKEY_CHAN4));
+		POKEYSND_Update(POKEY_OFFSET_AUDCTL, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDF1:
+		POKEY_AUDF[POKEY_CHAN1] = byte;
+		Update_Counter((POKEY_AUDCTL[0] & POKEY_CH1_CH2) ? ((1 << POKEY_CHAN2) | (1 << POKEY_CHAN1)) : (1 << POKEY_CHAN1));
+		POKEYSND_Update(POKEY_OFFSET_AUDF1, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDF2:
+		POKEY_AUDF[POKEY_CHAN2] = byte;
+		Update_Counter(1 << POKEY_CHAN2);
+		POKEYSND_Update(POKEY_OFFSET_AUDF2, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDF3:
+		POKEY_AUDF[POKEY_CHAN3] = byte;
+		Update_Counter((POKEY_AUDCTL[0] & POKEY_CH3_CH4) ? ((1 << POKEY_CHAN4) | (1 << POKEY_CHAN3)) : (1 << POKEY_CHAN3));
+		POKEYSND_Update(POKEY_OFFSET_AUDF3, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDF4:
+		POKEY_AUDF[POKEY_CHAN4] = byte;
+		Update_Counter(1 << POKEY_CHAN4);
+		POKEYSND_Update(POKEY_OFFSET_AUDF4, byte, 0, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_IRQEN:
+		POKEY_IRQEN = byte;
+#ifdef DEBUG1
+		printf("WR: IRQEN = %x, PC = %x\n", POKEY_IRQEN, PC);
+#endif
+		POKEY_IRQST |= ~byte & 0xf7;	/* Reset disabled IRQs except XMTDONE */
+		if (POKEY_IRQEN & 0x20) {
+			SLONG delay;
+			delay = CASSETTE_GetInputIRQDelay();
+			if (delay > 0)
+				POKEY_DELAYED_SERIN_IRQ = delay;
+		}
+		if ((~POKEY_IRQST & POKEY_IRQEN) == 0 && PBI_IRQ == 0)
+			CPU_IRQ = 0;
+		else
+			CPU_GenerateIRQ();
+		break;
+	case POKEY_OFFSET_SKRES:
+		POKEY_SKSTAT |= 0xe0;
+		break;
+	case POKEY_OFFSET_POTGO:
+		if (!(POKEY_SKCTL & 4))
+			pot_scanline = 0;	/* slow pot mode */
+		break;
+	case POKEY_OFFSET_SEROUT:
+		if ((POKEY_SKCTL & 0x70) == 0x20 && POKEY_siocheck())
+			SIO_PutByte(byte);
+		/* check if cassette 2-tone mode has been enabled */
+		if ((POKEY_SKCTL & 0x08) == 0x00) {
+			/* intelligent device */
+			POKEY_DELAYED_SEROUT_IRQ = SIO_SEROUT_INTERVAL;
+			POKEY_IRQST |= 0x08;
+			POKEY_DELAYED_XMTDONE_IRQ = SIO_XMTDONE_INTERVAL;
+		}
+		else {
+			/* cassette */
+			/* some savers patch the cassette baud rate, so we evaluate it here */
+			/* scanlines per second*10 bit*audiofrequency/(1.79 MHz/2) */
+                        POKEY_DELAYED_SEROUT_IRQ = 312*50*10*(POKEY_AUDF[POKEY_CHAN3] + POKEY_AUDF[POKEY_CHAN4]*0x100)/895000;
+			/* safety check */
+			if (POKEY_DELAYED_SEROUT_IRQ >= 3) {
+                        	POKEY_IRQST |= 0x08;
+                        	POKEY_DELAYED_XMTDONE_IRQ = 2*POKEY_DELAYED_SEROUT_IRQ - 2;
+			}
+			else {
+				POKEY_DELAYED_SEROUT_IRQ = 0;
+				POKEY_DELAYED_XMTDONE_IRQ = 0;
+			}
+		};
+#ifdef SERIO_SOUND
+		POKEYSND_UpdateSerio(1, byte);
+#endif
+		break;
+	case POKEY_OFFSET_STIMER:
+		POKEY_DivNIRQ[POKEY_CHAN1] = POKEY_DivNMax[POKEY_CHAN1];
+		POKEY_DivNIRQ[POKEY_CHAN2] = POKEY_DivNMax[POKEY_CHAN2];
+		POKEY_DivNIRQ[POKEY_CHAN4] = POKEY_DivNMax[POKEY_CHAN4];
+		POKEYSND_Update(POKEY_OFFSET_STIMER, byte, 0, SOUND_GAIN);
+#ifdef DEBUG1
+		printf("WR: STIMER = %x\n", byte);
+#endif
+		break;
+	case POKEY_OFFSET_SKCTL:
+		POKEY_SKCTL = byte;
+		POKEYSND_Update(POKEY_OFFSET_SKCTL, byte, 0, SOUND_GAIN);
+		if (byte & 4)
+			pot_scanline = 228;	/* fast pot mode - return results immediately */
+		break;
+#ifdef STEREO_SOUND
+	case POKEY_OFFSET_AUDC1 + POKEY_OFFSET_POKEY2:
+		POKEY_AUDC[POKEY_CHAN1 + POKEY_CHIP2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDC1, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDC2 + POKEY_OFFSET_POKEY2:
+		POKEY_AUDC[POKEY_CHAN2 + POKEY_CHIP2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDC2, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDC3 + POKEY_OFFSET_POKEY2:
+		POKEY_AUDC[POKEY_CHAN3 + POKEY_CHIP2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDC3, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDC4 + POKEY_OFFSET_POKEY2:
+		POKEY_AUDC[POKEY_CHAN4 + POKEY_CHIP2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDC4, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDCTL + POKEY_OFFSET_POKEY2:
+		POKEY_AUDCTL[1] = byte;
+		/* determine the base multiplier for the 'div by n' calculations */
+		if (byte & POKEY_CLOCK_15)
+			POKEY_Base_mult[1] = POKEY_DIV_15;
+		else
+			POKEY_Base_mult[1] = POKEY_DIV_64;
+
+		POKEYSND_Update(POKEY_OFFSET_AUDCTL, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDF1 + POKEY_OFFSET_POKEY2:
+		POKEY_AUDF[POKEY_CHAN1 + POKEY_CHIP2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDF1, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDF2 + POKEY_OFFSET_POKEY2:
+		POKEY_AUDF[POKEY_CHAN2 + POKEY_CHIP2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDF2, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDF3 + POKEY_OFFSET_POKEY2:
+		POKEY_AUDF[POKEY_CHAN3 + POKEY_CHIP2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDF3, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_AUDF4 + POKEY_OFFSET_POKEY2:
+		POKEY_AUDF[POKEY_CHAN4 + POKEY_CHIP2] = byte;
+		POKEYSND_Update(POKEY_OFFSET_AUDF4, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_STIMER + POKEY_OFFSET_POKEY2:
+		POKEYSND_Update(POKEY_OFFSET_STIMER, byte, 1, SOUND_GAIN);
+		break;
+	case POKEY_OFFSET_SKCTL + POKEY_OFFSET_POKEY2:
+		POKEYSND_Update(POKEY_OFFSET_SKCTL, byte, 1, SOUND_GAIN);
+		break;
+#endif
+	}
+}
+
+int POKEY_Initialise(int *argc, char *argv[])
+{
+	int i;
+	ULONG reg;
+
+	/* Initialise Serial Port Interrupts */
+	POKEY_DELAYED_SERIN_IRQ = 0;
+	POKEY_DELAYED_SEROUT_IRQ = 0;
+	POKEY_DELAYED_XMTDONE_IRQ = 0;
+
+	POKEY_KBCODE = 0xff;
+	POKEY_SERIN = 0x00;	/* or 0xff ? */
+	POKEY_IRQST = 0xff;
+	POKEY_IRQEN = 0x00;
+	POKEY_SKSTAT = 0xef;
+	POKEY_SKCTL = 0x00;
+
+	for (i = 0; i < (POKEY_MAXPOKEYS * 4); i++) {
+		POKEY_AUDC[i] = 0;
+		POKEY_AUDF[i] = 0;
+	}
+
+	for (i = 0; i < POKEY_MAXPOKEYS; i++) {
+		POKEY_AUDCTL[i] = 0;
+		POKEY_Base_mult[i] = POKEY_DIV_64;
+	}
+
+	for (i = 0; i < 4; i++)
+		POKEY_DivNIRQ[i] = POKEY_DivNMax[i] = 0;
+
+	pot_scanline = 0;
+
+	/* initialise poly9_lookup */
+	reg = 0x1ff;
+	for (i = 0; i < 511; i++) {
+		reg = ((((reg >> 5) ^ reg) & 1) << 8) + (reg >> 1);
+		POKEY_poly9_lookup[i] = (UBYTE) reg;
+	}
+	/* initialise poly17_lookup */
+	reg = 0x1ffff;
+	for (i = 0; i < 16385; i++) {
+		reg = ((((reg >> 5) ^ reg) & 0xff) << 9) + (reg >> 8);
+		POKEY_poly17_lookup[i] = (UBYTE) (reg >> 1);
+	}
+
+#ifndef BASIC
+	if (INPUT_Playingback()) {
+		random_scanline_counter = INPUT_PlaybackInt();
+	}
+	else
+#endif
+	{
+		random_scanline_counter =
+#ifdef WIN32
+		GetTickCount() % POKEY_POLY17_SIZE;
+#elif defined(HAVE_TIME)
+		time(NULL) % POKEY_POLY17_SIZE;
+#else
+		0;
+#endif
+	}
+#ifndef BASIC
+	if (INPUT_Recording()) {
+		INPUT_RecordInt(random_scanline_counter);
+	}
+#endif
+
+	return TRUE;
+}
+
+void POKEY_Frame(void)
+{
+	random_scanline_counter %= (POKEY_AUDCTL[0] & POKEY_POLY9) ? POKEY_POLY9_SIZE : POKEY_POLY17_SIZE;
+}
+
+/***************************************************************************
+ ** Generate POKEY Timer IRQs if required                                 **
+ ** called on a per-scanline basis, not very precise, but good enough     **
+ ** for most applications                                                 **
+ ***************************************************************************/
+
+void POKEY_Scanline(void)
+{
+#ifdef POKEY_UPDATE
+	pokey_update();
+#endif
+
+#ifdef VOL_ONLY_SOUND
+	POKEYSND_UpdateVolOnly();
+#endif
+
+#ifndef BASIC
+	INPUT_Scanline();	/* Handle Amiga and ST mice. */
+						/* It's not a part of POKEY emulation, */
+						/* but it looks to be the best place to put it. */
+#endif
+
+	if (pot_scanline < 228)
+		pot_scanline++;
+
+	random_scanline_counter += ANTIC_LINE_C;
+
+	/* on nonpatched i/o-operation, enable the cassette timing */
+	if (!ESC_enable_sio_patch)
+		CASSETTE_AddScanLine();
+
+	if (POKEY_DELAYED_SERIN_IRQ > 0) {
+		if (--POKEY_DELAYED_SERIN_IRQ == 0) {
+			if (POKEY_IRQEN & 0x20) {
+				if (POKEY_IRQST & 0x20) {
+					POKEY_IRQST &= 0xdf;
+					POKEY_SERIN = SIO_GetByte();
+#ifdef DEBUG2
+					printf("SERIO: SERIN Interrupt triggered, bytevalue %02x\n", POKEY_SERIN);
+#endif
+				}
+				else {
+					POKEY_SKSTAT &= 0xdf;
+#ifdef DEBUG2
+					printf("SERIO: SERIN Interrupt triggered\n");
+#endif
+				}
+				CPU_GenerateIRQ();
+			}
+#ifdef DEBUG2
+			else {
+				printf("SERIO: SERIN Interrupt missed\n");
+			}
+#endif
+		}
+	}
+
+	if (POKEY_DELAYED_SEROUT_IRQ > 0) {
+		if (--POKEY_DELAYED_SEROUT_IRQ == 0) {
+			if (POKEY_IRQEN & 0x10) {
+#ifdef DEBUG2
+				printf("SERIO: SEROUT Interrupt triggered\n");
+#endif
+				POKEY_IRQST &= 0xef;
+				CPU_GenerateIRQ();
+			}
+#ifdef DEBUG2
+			else {
+				printf("SERIO: SEROUT Interrupt missed\n");
+			}
+#endif
+		}
+	}
+
+	if (POKEY_DELAYED_XMTDONE_IRQ > 0)
+		if (--POKEY_DELAYED_XMTDONE_IRQ == 0) {
+			POKEY_IRQST &= 0xf7;
+			if (POKEY_IRQEN & 0x08) {
+#ifdef DEBUG2
+				printf("SERIO: XMTDONE Interrupt triggered\n");
+#endif
+				CPU_GenerateIRQ();
+			}
+#ifdef DEBUG2
+			else
+				printf("SERIO: XMTDONE Interrupt missed\n");
+#endif
+		}
+
+	if ((POKEY_DivNIRQ[POKEY_CHAN1] -= ANTIC_LINE_C) < 0 ) {
+		POKEY_DivNIRQ[POKEY_CHAN1] += POKEY_DivNMax[POKEY_CHAN1];
+		if (POKEY_IRQEN & 0x01) {
+			POKEY_IRQST &= 0xfe;
+			CPU_GenerateIRQ();
+		}
+	}
+
+	if ((POKEY_DivNIRQ[POKEY_CHAN2] -= ANTIC_LINE_C) < 0 ) {
+		POKEY_DivNIRQ[POKEY_CHAN2] += POKEY_DivNMax[POKEY_CHAN2];
+		if (POKEY_IRQEN & 0x02) {
+			POKEY_IRQST &= 0xfd;
+			CPU_GenerateIRQ();
+		}
+	}
+
+	if ((POKEY_DivNIRQ[POKEY_CHAN4] -= ANTIC_LINE_C) < 0 ) {
+		POKEY_DivNIRQ[POKEY_CHAN4] += POKEY_DivNMax[POKEY_CHAN4];
+		if (POKEY_IRQEN & 0x04) {
+			POKEY_IRQST &= 0xfb;
+			CPU_GenerateIRQ();
+		}
+	}
+}
+
+/*****************************************************************************/
+/* Module:  Update_Counter()                                                 */
+/* Purpose: To process the latest control values stored in the AUDF, AUDC,   */
+/*          and AUDCTL registers.  It pre-calculates as much information as  */
+/*          possible for better performance.  This routine has been added    */
+/*          here again as I need the precise frequency for the pokey timers  */
+/*          again. The pokey emulation is therefore somewhat sub-optimal     */
+/*          since the actual pokey emulation should grab the frequency values */
+/*          directly from here instead of calculating them again.            */
+/*                                                                           */
+/* Author:  Ron Fries,Thomas Richter                                         */
+/* Date:    March 27, 1998                                                   */
+/*                                                                           */
+/* Inputs:  chan_mask: Channel mask, one bit per channel.                    */
+/*          The channels that need to be updated                             */
+/*                                                                           */
+/* Outputs: Adjusts local globals - no return value                          */
+/*                                                                           */
+/*****************************************************************************/
+
+static void Update_Counter(int chan_mask)
+{
+
+/************************************************************/
+/* As defined in the manual, the exact Div_n_cnt values are */
+/* different depending on the frequency and resolution:     */
+/*    64 kHz or 15 kHz - AUDF + 1                           */
+/*    1 MHz, 8-bit -     AUDF + 4                           */
+/*    1 MHz, 16-bit -    AUDF[CHAN1]+256*AUDF[CHAN2] + 7    */
+/************************************************************/
+
+	/* only reset the channels that have changed */
+
+	if (chan_mask & (1 << POKEY_CHAN1)) {
+		/* process channel 1 frequency */
+		if (POKEY_AUDCTL[0] & POKEY_CH1_179)
+			POKEY_DivNMax[POKEY_CHAN1] = POKEY_AUDF[POKEY_CHAN1] + 4;
+		else
+			POKEY_DivNMax[POKEY_CHAN1] = (POKEY_AUDF[POKEY_CHAN1] + 1) * POKEY_Base_mult[0];
+		if (POKEY_DivNMax[POKEY_CHAN1] < ANTIC_LINE_C)
+			POKEY_DivNMax[POKEY_CHAN1] = ANTIC_LINE_C;
+	}
+
+	if (chan_mask & (1 << POKEY_CHAN2)) {
+		/* process channel 2 frequency */
+		if (POKEY_AUDCTL[0] & POKEY_CH1_CH2) {
+			if (POKEY_AUDCTL[0] & POKEY_CH1_179)
+				POKEY_DivNMax[POKEY_CHAN2] = POKEY_AUDF[POKEY_CHAN2] * 256 + POKEY_AUDF[POKEY_CHAN1] + 7;
+			else
+				POKEY_DivNMax[POKEY_CHAN2] = (POKEY_AUDF[POKEY_CHAN2] * 256 + POKEY_AUDF[POKEY_CHAN1] + 1) * POKEY_Base_mult[0];
+		}
+		else
+			POKEY_DivNMax[POKEY_CHAN2] = (POKEY_AUDF[POKEY_CHAN2] + 1) * POKEY_Base_mult[0];
+		if (POKEY_DivNMax[POKEY_CHAN2] < ANTIC_LINE_C)
+			POKEY_DivNMax[POKEY_CHAN2] = ANTIC_LINE_C;
+	}
+
+	if (chan_mask & (1 << POKEY_CHAN4)) {
+		/* process channel 4 frequency */
+		if (POKEY_AUDCTL[0] & POKEY_CH3_CH4) {
+			if (POKEY_AUDCTL[0] & POKEY_CH3_179)
+				POKEY_DivNMax[POKEY_CHAN4] = POKEY_AUDF[POKEY_CHAN4] * 256 + POKEY_AUDF[POKEY_CHAN3] + 7;
+			else
+				POKEY_DivNMax[POKEY_CHAN4] = (POKEY_AUDF[POKEY_CHAN4] * 256 + POKEY_AUDF[POKEY_CHAN3] + 1) * POKEY_Base_mult[0];
+		}
+		else
+			POKEY_DivNMax[POKEY_CHAN4] = (POKEY_AUDF[POKEY_CHAN4] + 1) * POKEY_Base_mult[0];
+		if (POKEY_DivNMax[POKEY_CHAN4] < ANTIC_LINE_C)
+			POKEY_DivNMax[POKEY_CHAN4] = ANTIC_LINE_C;
+	}
+}
+
+#ifndef BASIC
+
+void POKEY_StateSave(void)
+{
+	int shift_key = 0;
+	int keypressed = 0;
+
+	StateSav_SaveUBYTE(&POKEY_KBCODE, 1);
+	StateSav_SaveUBYTE(&POKEY_IRQST, 1);
+	StateSav_SaveUBYTE(&POKEY_IRQEN, 1);
+	StateSav_SaveUBYTE(&POKEY_SKCTL, 1);
+
+	StateSav_SaveINT(&shift_key, 1);
+	StateSav_SaveINT(&keypressed, 1);
+	StateSav_SaveINT(&POKEY_DELAYED_SERIN_IRQ, 1);
+	StateSav_SaveINT(&POKEY_DELAYED_SEROUT_IRQ, 1);
+	StateSav_SaveINT(&POKEY_DELAYED_XMTDONE_IRQ, 1);
+
+	StateSav_SaveUBYTE(&POKEY_AUDF[0], 4);
+	StateSav_SaveUBYTE(&POKEY_AUDC[0], 4);
+	StateSav_SaveUBYTE(&POKEY_AUDCTL[0], 1);
+
+	StateSav_SaveINT(&POKEY_DivNIRQ[0], 4);
+	StateSav_SaveINT(&POKEY_DivNMax[0], 4);
+	StateSav_SaveINT(&POKEY_Base_mult[0], 1);
+}
+
+void POKEY_StateRead(void)
+{
+	int i;
+	int shift_key;
+	int keypressed;
+
+	StateSav_ReadUBYTE(&POKEY_KBCODE, 1);
+	StateSav_ReadUBYTE(&POKEY_IRQST, 1);
+	StateSav_ReadUBYTE(&POKEY_IRQEN, 1);
+	StateSav_ReadUBYTE(&POKEY_SKCTL, 1);
+
+	StateSav_ReadINT(&shift_key, 1);
+	StateSav_ReadINT(&keypressed, 1);
+	StateSav_ReadINT(&POKEY_DELAYED_SERIN_IRQ, 1);
+	StateSav_ReadINT(&POKEY_DELAYED_SEROUT_IRQ, 1);
+	StateSav_ReadINT(&POKEY_DELAYED_XMTDONE_IRQ, 1);
+
+	StateSav_ReadUBYTE(&POKEY_AUDF[0], 4);
+	StateSav_ReadUBYTE(&POKEY_AUDC[0], 4);
+	StateSav_ReadUBYTE(&POKEY_AUDCTL[0], 1);
+	for (i = 0; i < 4; i++) {
+		POKEY_PutByte((UWORD) (POKEY_OFFSET_AUDF1 + i * 2), POKEY_AUDF[i]);
+		POKEY_PutByte((UWORD) (POKEY_OFFSET_AUDC1 + i * 2), POKEY_AUDC[i]);
+	}
+	POKEY_PutByte(POKEY_OFFSET_AUDCTL, POKEY_AUDCTL[0]);
+
+	StateSav_ReadINT(&POKEY_DivNIRQ[0], 4);
+	StateSav_ReadINT(&POKEY_DivNMax[0], 4);
+	StateSav_ReadINT(&POKEY_Base_mult[0], 1);
+}
+
+#endif
diff --git a/project/jni/application/atari800/src/pokey.h b/project/jni/application/atari800/src/pokey.h
new file mode 100644
index 000000000..12ba69dac
--- /dev/null
+++ b/project/jni/application/atari800/src/pokey.h
@@ -0,0 +1,122 @@
+#ifndef POKEY_H_
+#define POKEY_H_
+
+#ifdef ASAP /* external project, see http://asap.sf.net */
+#include "asap_internal.h"
+#else
+#include "atari.h"
+#endif
+
+#define POKEY_OFFSET_AUDF1 0x00
+#define POKEY_OFFSET_AUDC1 0x01
+#define POKEY_OFFSET_AUDF2 0x02
+#define POKEY_OFFSET_AUDC2 0x03
+#define POKEY_OFFSET_AUDF3 0x04
+#define POKEY_OFFSET_AUDC3 0x05
+#define POKEY_OFFSET_AUDF4 0x06
+#define POKEY_OFFSET_AUDC4 0x07
+#define POKEY_OFFSET_AUDCTL 0x08
+#define POKEY_OFFSET_STIMER 0x09
+#define POKEY_OFFSET_SKRES 0x0a
+#define POKEY_OFFSET_POTGO 0x0b
+#define POKEY_OFFSET_SEROUT 0x0d
+#define POKEY_OFFSET_IRQEN 0x0e
+#define POKEY_OFFSET_SKCTL 0x0f
+
+#define POKEY_OFFSET_POT0 0x00
+#define POKEY_OFFSET_POT1 0x01
+#define POKEY_OFFSET_POT2 0x02
+#define POKEY_OFFSET_POT3 0x03
+#define POKEY_OFFSET_POT4 0x04
+#define POKEY_OFFSET_POT5 0x05
+#define POKEY_OFFSET_POT6 0x06
+#define POKEY_OFFSET_POT7 0x07
+#define POKEY_OFFSET_ALLPOT 0x08
+#define POKEY_OFFSET_KBCODE 0x09
+#define POKEY_OFFSET_RANDOM 0x0a
+#define POKEY_OFFSET_SERIN 0x0d
+#define POKEY_OFFSET_IRQST 0x0e
+#define POKEY_OFFSET_SKSTAT 0x0f
+
+#define POKEY_OFFSET_POKEY2 0x10			/* offset to second pokey chip (STEREO expansion) */
+
+#ifndef ASAP
+
+extern UBYTE POKEY_KBCODE;
+extern UBYTE POKEY_IRQST;
+extern UBYTE POKEY_IRQEN;
+extern UBYTE POKEY_SKSTAT;
+extern UBYTE POKEY_SKCTL;
+extern int POKEY_DELAYED_SERIN_IRQ;
+extern int POKEY_DELAYED_SEROUT_IRQ;
+extern int POKEY_DELAYED_XMTDONE_IRQ;
+
+extern UBYTE POKEY_POT_input[8];
+
+ULONG POKEY_GetRandomCounter(void);
+void POKEY_SetRandomCounter(ULONG value);
+UBYTE POKEY_GetByte(UWORD addr);
+void POKEY_PutByte(UWORD addr, UBYTE byte);
+int POKEY_Initialise(int *argc, char *argv[]);
+void POKEY_Frame(void);
+void POKEY_Scanline(void);
+void POKEY_StateSave(void);
+void POKEY_StateRead(void);
+
+#endif
+
+/* CONSTANT DEFINITIONS */
+
+/* definitions for AUDCx (D201, D203, D205, D207) */
+#define POKEY_NOTPOLY5    0x80		/* selects POLY5 or direct CLOCK */
+#define POKEY_POLY4       0x40		/* selects POLY4 or POLY17 */
+#define POKEY_PURETONE    0x20		/* selects POLY4/17 or PURE tone */
+#define POKEY_VOL_ONLY    0x10		/* selects VOLUME OUTPUT ONLY */
+#define POKEY_VOLUME_MASK 0x0f		/* volume mask */
+
+/* definitions for AUDCTL (D208) */
+#define POKEY_POLY9       0x80		/* selects POLY9 or POLY17 */
+#define POKEY_CH1_179     0x40		/* selects 1.78979 MHz for Ch 1 */
+#define POKEY_CH3_179     0x20		/* selects 1.78979 MHz for Ch 3 */
+#define POKEY_CH1_CH2     0x10		/* clocks channel 1 w/channel 2 */
+#define POKEY_CH3_CH4     0x08		/* clocks channel 3 w/channel 4 */
+#define POKEY_CH1_FILTER  0x04		/* selects channel 1 high pass filter */
+#define POKEY_CH2_FILTER  0x02		/* selects channel 2 high pass filter */
+#define POKEY_CLOCK_15    0x01		/* selects 15.6999kHz or 63.9210kHz */
+
+/* for accuracy, the 64kHz and 15kHz clocks are exact divisions of
+   the 1.79MHz clock */
+#define POKEY_DIV_64      28			/* divisor for 1.79MHz clock to 64 kHz */
+#define POKEY_DIV_15      114			/* divisor for 1.79MHz clock to 15 kHz */
+
+/* the size (in entries) of the 4 polynomial tables */
+#define POKEY_POLY4_SIZE  0x000f
+#define POKEY_POLY5_SIZE  0x001f
+#define POKEY_POLY9_SIZE  0x01ff
+#define POKEY_POLY17_SIZE 0x0001ffff
+
+#define POKEY_MAXPOKEYS         2		/* max number of emulated chips */
+
+/* channel/chip definitions */
+#define POKEY_CHAN1       0
+#define POKEY_CHAN2       1
+#define POKEY_CHAN3       2
+#define POKEY_CHAN4       3
+#define POKEY_CHIP1       0
+#define POKEY_CHIP2       4
+#define POKEY_CHIP3       8
+#define POKEY_CHIP4      12
+#define POKEY_SAMPLE    127
+
+/* structures to hold the 9 pokey control bytes */
+extern UBYTE POKEY_AUDF[4 * POKEY_MAXPOKEYS];	/* AUDFx (D200, D202, D204, D206) */
+extern UBYTE POKEY_AUDC[4 * POKEY_MAXPOKEYS];	/* AUDCx (D201, D203, D205, D207) */
+extern UBYTE POKEY_AUDCTL[POKEY_MAXPOKEYS];		/* AUDCTL (D208) */
+
+extern int POKEY_DivNIRQ[4], POKEY_DivNMax[4];
+extern int POKEY_Base_mult[POKEY_MAXPOKEYS];	/* selects either 64Khz or 15Khz clock mult */
+
+extern UBYTE POKEY_poly9_lookup[POKEY_POLY9_SIZE];
+extern UBYTE POKEY_poly17_lookup[16385];
+
+#endif /* POKEY_H_ */
diff --git a/project/jni/application/atari800/src/pokeysnd.c b/project/jni/application/atari800/src/pokeysnd.c
new file mode 100644
index 000000000..e492302d9
--- /dev/null
+++ b/project/jni/application/atari800/src/pokeysnd.c
@@ -0,0 +1,1225 @@
+/*
+ * pokeysnd.c - POKEY sound chip emulation, v2.4
+ *
+ * Copyright (C) 1996-1998 Ron Fries
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+
+#ifdef ASAP /* external project, see http://asap.sf.net */
+#include "asap_internal.h"
+#else
+#include "atari.h"
+#ifndef __PLUS
+#include "sndsave.h"
+#else
+#include "sound_win.h"
+#endif
+#endif
+#include "mzpokeysnd.h"
+#include "pokeysnd.h"
+#ifdef PBI_XLD
+#include "pbi_xld.h"
+#endif
+#include "antic.h"
+#include "gtia.h"
+
+#ifdef WORDS_UNALIGNED_OK
+#  define READ_U32(x)     (*(ULONG *) (x))
+#  define WRITE_U32(x, d) (*(ULONG *) (x) = (d))
+#else
+#  ifdef WORDS_BIGENDIAN
+#    define READ_U32(x) (((*(unsigned char *)(x)) << 24) | ((*((unsigned char *)(x) + 1)) << 16) | \
+                        ((*((unsigned char *)(x) + 2)) << 8) | ((*((unsigned char *)(x) + 3))))
+#    define WRITE_U32(x, d) \
+  { \
+  ULONG i = d; \
+  (*(unsigned char *) (x)) = (((i) >> 24) & 255); \
+  (*((unsigned char *) (x) + 1)) = (((i) >> 16) & 255); \
+  (*((unsigned char *) (x) + 2)) = (((i) >> 8) & 255); \
+  (*((unsigned char *) (x) + 3)) = ((i) & 255); \
+  }
+#  else
+#    define READ_U32(x) ((*(unsigned char *) (x)) | ((*((unsigned char *) (x) + 1)) << 8) | \
+                        ((*((unsigned char *) (x) + 2)) << 16) | ((*((unsigned char *) (x) + 3)) << 24))
+#    define WRITE_U32(x, d) \
+  { \
+  ULONG i = d; \
+  (*(unsigned char *)(x)) = ((i) & 255); \
+  (*((unsigned char *)(x) + 1)) = (((i) >> 8) & 255); \
+  (*((unsigned char *)(x) + 2)) = (((i) >> 16) & 255); \
+  (*((unsigned char *)(x) + 3)) = (((i) >> 24) & 255); \
+  }
+#  endif
+#endif
+
+/* GLOBAL VARIABLE DEFINITIONS */
+
+/* number of pokey chips currently emulated */
+static UBYTE Num_pokeys;
+
+static UBYTE pokeysnd_AUDV[4 * POKEY_MAXPOKEYS];	/* Channel volume - derived */
+
+static UBYTE Outbit[4 * POKEY_MAXPOKEYS];		/* current state of the output (high or low) */
+
+static UBYTE Outvol[4 * POKEY_MAXPOKEYS];		/* last output volume for each channel */
+
+/* Initialize the bit patterns for the polynomials. */
+
+/* The 4bit and 5bit patterns are the identical ones used in the pokey chip. */
+/* Though the patterns could be packed with 8 bits per byte, using only a */
+/* single bit per byte keeps the math simple, which is important for */
+/* efficient processing. */
+
+static UBYTE bit4[POKEY_POLY4_SIZE] =
+#ifndef POKEY23_POLY
+{1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0, 1, 0};	/* new table invented by Perry */
+#else
+{1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0};	/* original POKEY 2.3 table */
+#endif
+
+static UBYTE bit5[POKEY_POLY5_SIZE] =
+#ifndef POKEY23_POLY
+{1, 1, 1, 1, 0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0};
+#else
+{0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 1};
+#endif
+
+static ULONG P4 = 0,			/* Global position pointer for the 4-bit  POLY array */
+ P5 = 0,						/* Global position pointer for the 5-bit  POLY array */
+ P9 = 0,						/* Global position pointer for the 9-bit  POLY array */
+ P17 = 0;						/* Global position pointer for the 17-bit POLY array */
+
+static ULONG Div_n_cnt[4 * POKEY_MAXPOKEYS],		/* Divide by n counter. one for each channel */
+ Div_n_max[4 * POKEY_MAXPOKEYS];		/* Divide by n maximum, one for each channel */
+
+static ULONG Samp_n_max,		/* Sample max.  For accuracy, it is *256 */
+ Samp_n_cnt[2];					/* Sample cnt. */
+
+#ifdef INTERPOLATE_SOUND
+static UWORD last_val = 0;		/* last output value */
+#ifdef STEREO_SOUND
+static UWORD last_val2 = 0;	/* last output value */
+#endif
+#endif
+
+/* Volume only emulations declarations */
+#ifdef VOL_ONLY_SOUND
+
+int	POKEYSND_sampbuf_val[POKEYSND_SAMPBUF_MAX];	/* volume values */
+int	POKEYSND_sampbuf_cnt[POKEYSND_SAMPBUF_MAX];	/* relative start time */
+int	POKEYSND_sampbuf_ptr = 0;		/* pointer to sampbuf */
+int	POKEYSND_sampbuf_rptr = 0;		/* pointer to read from sampbuf */
+int	POKEYSND_sampbuf_last = 0;		/* last absolute time */
+int	POKEYSND_sampbuf_AUDV[4 * POKEY_MAXPOKEYS];	/* prev. channel volume */
+int	POKEYSND_sampbuf_lastval = 0;		/* last volume */
+int	POKEYSND_sampout;			/* last out volume */
+int	POKEYSND_samp_freq;
+int	POKEYSND_samp_consol_val = 0;		/* actual value of console sound */
+#ifdef STEREO_SOUND
+static int	sampbuf_val2[POKEYSND_SAMPBUF_MAX];	/* volume values */
+static int	sampbuf_cnt2[POKEYSND_SAMPBUF_MAX];	/* relative start time */
+static int	sampbuf_ptr2 = 0;		/* pointer to sampbuf */
+static int	sampbuf_rptr2 = 0;		/* pointer to read from sampbuf */
+static int	sampbuf_last2 = 0;		/* last absolute time */
+static int	sampbuf_lastval2 = 0;		/* last volume */
+static int	sampout2;			/* last out volume */
+#endif
+#endif  /* VOL_ONLY_SOUND */
+
+static ULONG snd_freq17 = POKEYSND_FREQ_17_EXACT;
+int POKEYSND_playback_freq = 44100;
+UBYTE POKEYSND_num_pokeys = 1;
+int POKEYSND_snd_flags = 0;
+static int mz_quality = 0;		/* default quality for mzpokeysnd */
+#ifdef __PLUS
+int mz_clear_regs = 0;
+#endif
+
+int POKEYSND_enable_new_pokey = TRUE;
+int POKEYSND_bienias_fix = TRUE;  /* when TRUE, high frequencies get emulated: better sound but slower */
+#if defined(__PLUS) && !defined(_WX_)
+#define BIENIAS_FIX (g_Sound.nBieniasFix)
+#else
+#define BIENIAS_FIX POKEYSND_bienias_fix
+#endif
+#ifndef ASAP
+int POKEYSND_stereo_enabled = FALSE;
+#endif
+
+/* multiple sound engine interface */
+static void pokeysnd_process_8(void *sndbuffer, int sndn);
+static void pokeysnd_process_16(void *sndbuffer, int sndn);
+static void null_pokey_process(void *sndbuffer, int sndn) {}
+void (*POKEYSND_Process_ptr)(void *sndbuffer, int sndn) = null_pokey_process;
+
+static void Update_pokey_sound_rf(UWORD, UBYTE, UBYTE, UBYTE);
+static void null_pokey_sound(UWORD addr, UBYTE val, UBYTE chip, UBYTE gain) {}
+void (*POKEYSND_Update) (UWORD addr, UBYTE val, UBYTE chip, UBYTE gain)
+  = null_pokey_sound;
+
+#ifdef SERIO_SOUND
+static void Update_serio_sound_rf(int out, UBYTE data);
+static void null_serio_sound(int out, UBYTE data) {}
+void (*POKEYSND_UpdateSerio)(int out, UBYTE data) = null_serio_sound;
+int POKEYSND_serio_sound_enabled = 1;
+#endif
+
+#ifdef CONSOLE_SOUND
+static void Update_consol_sound_rf(int set);
+static void null_consol_sound(int set) {}
+void (*POKEYSND_UpdateConsol)(int set) = null_consol_sound;
+int POKEYSND_console_sound_enabled = 1;
+#endif
+
+#ifdef VOL_ONLY_SOUND
+static void Update_vol_only_sound_rf(void);
+static void null_vol_only_sound(void) {}
+void (*POKEYSND_UpdateVolOnly)(void) = null_vol_only_sound;
+#endif
+
+/*****************************************************************************/
+/* In my routines, I treat the sample output as another divide by N counter  */
+/* For better accuracy, the Samp_n_cnt has a fixed binary decimal point      */
+/* which has 8 binary digits to the right of the decimal point.  I use a two */
+/* byte array to give me a minimum of 40 bits, and then use pointer math to  */
+/* reference either the 24.8 whole/fraction combination or the 32-bit whole  */
+/* only number.  This is mainly used to keep the math simple for             */
+/* optimization. See below:                                                  */
+/*                                                                           */
+/* Representation on little-endian machines:                                 */
+/* xxxxxxxx xxxxxxxx xxxxxxxx xxxxxxxx | xxxxxxxx xxxxxxxx xxxxxxxx xxxxxxxx */
+/* fraction   whole    whole    whole      whole   unused   unused   unused  */
+/*                                                                           */
+/* Samp_n_cnt[0] gives me a 32-bit int 24 whole bits with 8 fractional bits, */
+/* while (ULONG *)((UBYTE *)(&Samp_n_cnt[0])+1) gives me the 32-bit whole   */
+/* number only.                                                              */
+/*                                                                           */
+/* Representation on big-endian machines:                                    */
+/* xxxxxxxx xxxxxxxx xxxxxxxx xxxxxxxx | xxxxxxxx xxxxxxxx xxxxxxxx.xxxxxxxx */
+/*  unused   unused   unused    whole      whole    whole    whole  fraction */
+/*                                                                           */
+/* Samp_n_cnt[1] gives me a 32-bit int 24 whole bits with 8 fractional bits, */
+/* while (ULONG *)((UBYTE *)(&Samp_n_cnt[0])+3) gives me the 32-bit whole   */
+/* number only.                                                              */
+/*****************************************************************************/
+
+
+/*****************************************************************************/
+/* Module:  pokeysnd_init_rf()                                              */
+/* Purpose: to handle the power-up initialization functions                  */
+/*          these functions should only be executed on a cold-restart        */
+/*                                                                           */
+/* Author:  Ron Fries                                                        */
+/* Date:    January 1, 1997                                                  */
+/*                                                                           */
+/* Inputs:  freq17 - the value for the '1.79MHz' Pokey audio clock           */
+/*          playback_freq - the playback frequency in samples per second     */
+/*          num_pokeys - specifies the number of pokey chips to be emulated  */
+/*                                                                           */
+/* Outputs: Adjusts local globals - no return value                          */
+/*                                                                           */
+/*****************************************************************************/
+
+static int pokeysnd_init_rf(ULONG freq17, int playback_freq,
+           UBYTE num_pokeys, int flags);
+
+int POKEYSND_DoInit(void)
+{
+	SndSave_CloseSoundFile();
+	if (POKEYSND_enable_new_pokey)
+		return MZPOKEYSND_Init(snd_freq17, POKEYSND_playback_freq,
+				POKEYSND_num_pokeys, POKEYSND_snd_flags, mz_quality
+#ifdef __PLUS
+				, mz_clear_regs
+#endif
+		);
+	else
+		return pokeysnd_init_rf(snd_freq17, POKEYSND_playback_freq,
+				POKEYSND_num_pokeys, POKEYSND_snd_flags);
+}
+
+int POKEYSND_Init(ULONG freq17, int playback_freq, UBYTE num_pokeys,
+                     int flags
+#ifdef __PLUS
+                     , int clear_regs
+#endif
+)
+{
+	snd_freq17 = freq17;
+	POKEYSND_playback_freq = playback_freq;
+	POKEYSND_num_pokeys = num_pokeys;
+	POKEYSND_snd_flags = flags;
+#ifdef __PLUS
+	mz_clear_regs = clear_regs;
+#endif
+
+#ifdef PBI_XLD
+	PBI_XLD_VInit(playback_freq, num_pokeys, (flags & POKEYSND_BIT16));
+#endif
+	return POKEYSND_DoInit();
+}
+
+void POKEYSND_SetMzQuality(int quality)	/* specially for win32, perhaps not needed? */
+{
+	mz_quality = quality;
+}
+
+void POKEYSND_Process(void *sndbuffer, int sndn)
+{
+	POKEYSND_Process_ptr(sndbuffer, sndn);
+#ifdef PBI_XLD
+	PBI_XLD_VProcess(sndbuffer,sndn);
+#endif
+#if !defined(__PLUS) && !defined(ASAP)
+	SndSave_WriteToSoundFile((const unsigned char *)sndbuffer, sndn);
+#endif
+}
+
+static int pokeysnd_init_rf(ULONG freq17, int playback_freq,
+           UBYTE num_pokeys, int flags)
+{
+	UBYTE chan;
+
+	POKEYSND_Update = Update_pokey_sound_rf;
+#ifdef SERIO_SOUND
+	POKEYSND_UpdateSerio = Update_serio_sound_rf;
+#endif
+#ifdef CONSOLE_SOUND
+	POKEYSND_UpdateConsol = Update_consol_sound_rf;
+#endif
+#ifdef VOL_ONLY_SOUND
+	POKEYSND_UpdateVolOnly = Update_vol_only_sound_rf;
+#endif
+
+	POKEYSND_Process_ptr = (flags & POKEYSND_BIT16) ? pokeysnd_process_16 : pokeysnd_process_8;
+
+#ifdef VOL_ONLY_SOUND
+	POKEYSND_samp_freq = playback_freq;
+#endif
+
+	/* start all of the polynomial counters at zero */
+	P4 = 0;
+	P5 = 0;
+	P9 = 0;
+	P17 = 0;
+
+	/* calculate the sample 'divide by N' value based on the playback freq. */
+	Samp_n_max = ((ULONG) freq17 << 8) / playback_freq;
+
+	Samp_n_cnt[0] = 0;			/* initialize all bits of the sample */
+	Samp_n_cnt[1] = 0;			/* 'divide by N' counter */
+
+	for (chan = 0; chan < (POKEY_MAXPOKEYS * 4); chan++) {
+		Outvol[chan] = 0;
+		Outbit[chan] = 0;
+		Div_n_cnt[chan] = 0;
+		Div_n_max[chan] = 0x7fffffffL;
+		pokeysnd_AUDV[chan] = 0;
+#ifdef VOL_ONLY_SOUND
+		POKEYSND_sampbuf_AUDV[chan] = 0;
+#endif
+	}
+
+	/* set the number of pokey chips currently emulated */
+	Num_pokeys = num_pokeys;
+
+	return 0; /* OK */
+}
+
+
+/*****************************************************************************/
+/* Module:  Update_pokey_sound_rf()                                          */
+/* Purpose: To process the latest control values stored in the AUDF, AUDC,   */
+/*          and AUDCTL registers.  It pre-calculates as much information as  */
+/*          possible for better performance.  This routine has not been      */
+/*          optimized.                                                       */
+/*                                                                           */
+/* Author:  Ron Fries                                                        */
+/* Date:    January 1, 1997                                                  */
+/*                                                                           */
+/* Inputs:  addr - the address of the parameter to be changed                */
+/*          val - the new value to be placed in the specified address        */
+/*          gain - specified as an 8-bit fixed point number - use 1 for no   */
+/*                 amplification (output is multiplied by gain)              */
+/*                                                                           */
+/* Outputs: Adjusts local globals - no return value                          */
+/*                                                                           */
+/*****************************************************************************/
+
+static void Update_pokey_sound_rf(UWORD addr, UBYTE val, UBYTE chip,
+				  UBYTE gain)
+{
+	ULONG new_val = 0;
+	UBYTE chan;
+	UBYTE chan_mask;
+	UBYTE chip_offs;
+
+	/* calculate the chip_offs for the channel arrays */
+	chip_offs = chip << 2;
+
+	/* determine which address was changed */
+	switch (addr & 0x0f) {
+	case POKEY_OFFSET_AUDF1:
+		/* POKEY_AUDF[POKEY_CHAN1 + chip_offs] = val; */
+		chan_mask = 1 << POKEY_CHAN1;
+		if (POKEY_AUDCTL[chip] & POKEY_CH1_CH2)		/* if ch 1&2 tied together */
+			chan_mask |= 1 << POKEY_CHAN2;	/* then also change on ch2 */
+		break;
+	case POKEY_OFFSET_AUDC1:
+		/* POKEY_AUDC[POKEY_CHAN1 + chip_offs] = val; */
+		pokeysnd_AUDV[POKEY_CHAN1 + chip_offs] = (val & POKEY_VOLUME_MASK) * gain;
+		chan_mask = 1 << POKEY_CHAN1;
+		break;
+	case POKEY_OFFSET_AUDF2:
+		/* POKEY_AUDF[POKEY_CHAN2 + chip_offs] = val; */
+		chan_mask = 1 << POKEY_CHAN2;
+		break;
+	case POKEY_OFFSET_AUDC2:
+		/* POKEY_AUDC[POKEY_CHAN2 + chip_offs] = val; */
+		pokeysnd_AUDV[POKEY_CHAN2 + chip_offs] = (val & POKEY_VOLUME_MASK) * gain;
+		chan_mask = 1 << POKEY_CHAN2;
+		break;
+	case POKEY_OFFSET_AUDF3:
+		/* POKEY_AUDF[POKEY_CHAN3 + chip_offs] = val; */
+		chan_mask = 1 << POKEY_CHAN3;
+		if (POKEY_AUDCTL[chip] & POKEY_CH3_CH4)		/* if ch 3&4 tied together */
+			chan_mask |= 1 << POKEY_CHAN4;	/* then also change on ch4 */
+		break;
+	case POKEY_OFFSET_AUDC3:
+		/* POKEY_AUDC[POKEY_CHAN3 + chip_offs] = val; */
+		pokeysnd_AUDV[POKEY_CHAN3 + chip_offs] = (val & POKEY_VOLUME_MASK) * gain;
+		chan_mask = 1 << POKEY_CHAN3;
+		break;
+	case POKEY_OFFSET_AUDF4:
+		/* POKEY_AUDF[POKEY_CHAN4 + chip_offs] = val; */
+		chan_mask = 1 << POKEY_CHAN4;
+		break;
+	case POKEY_OFFSET_AUDC4:
+		/* POKEY_AUDC[POKEY_CHAN4 + chip_offs] = val; */
+		pokeysnd_AUDV[POKEY_CHAN4 + chip_offs] = (val & POKEY_VOLUME_MASK) * gain;
+		chan_mask = 1 << POKEY_CHAN4;
+		break;
+	case POKEY_OFFSET_AUDCTL:
+		/* POKEY_AUDCTL[chip] = val; */
+		chan_mask = 15;			/* all channels */
+		break;
+	default:
+		chan_mask = 0;
+		break;
+	}
+
+	/************************************************************/
+	/* As defined in the manual, the exact Div_n_cnt values are */
+	/* different depending on the frequency and resolution:     */
+	/*    64 kHz or 15 kHz - AUDF + 1                           */
+	/*    1 MHz, 8-bit -     AUDF + 4                           */
+	/*    1 MHz, 16-bit -    POKEY_AUDF[POKEY_CHAN1]+256*POKEY_AUDF[POKEY_CHAN2] + 7    */
+	/************************************************************/
+
+	/* only reset the channels that have changed */
+
+	if (chan_mask & (1 << POKEY_CHAN1)) {
+		/* process channel 1 frequency */
+		if (POKEY_AUDCTL[chip] & POKEY_CH1_179)
+			new_val = POKEY_AUDF[POKEY_CHAN1 + chip_offs] + 4;
+		else
+			new_val = (POKEY_AUDF[POKEY_CHAN1 + chip_offs] + 1) * POKEY_Base_mult[chip];
+
+		if (new_val != Div_n_max[POKEY_CHAN1 + chip_offs]) {
+			Div_n_max[POKEY_CHAN1 + chip_offs] = new_val;
+
+			if (Div_n_cnt[POKEY_CHAN1 + chip_offs] > new_val) {
+				Div_n_cnt[POKEY_CHAN1 + chip_offs] = new_val;
+			}
+		}
+	}
+
+	if (chan_mask & (1 << POKEY_CHAN2)) {
+		/* process channel 2 frequency */
+		if (POKEY_AUDCTL[chip] & POKEY_CH1_CH2) {
+			if (POKEY_AUDCTL[chip] & POKEY_CH1_179)
+				new_val = POKEY_AUDF[POKEY_CHAN2 + chip_offs] * 256 +
+					POKEY_AUDF[POKEY_CHAN1 + chip_offs] + 7;
+			else
+				new_val = (POKEY_AUDF[POKEY_CHAN2 + chip_offs] * 256 +
+						   POKEY_AUDF[POKEY_CHAN1 + chip_offs] + 1) * POKEY_Base_mult[chip];
+		}
+		else
+			new_val = (POKEY_AUDF[POKEY_CHAN2 + chip_offs] + 1) * POKEY_Base_mult[chip];
+
+		if (new_val != Div_n_max[POKEY_CHAN2 + chip_offs]) {
+			Div_n_max[POKEY_CHAN2 + chip_offs] = new_val;
+
+			if (Div_n_cnt[POKEY_CHAN2 + chip_offs] > new_val) {
+				Div_n_cnt[POKEY_CHAN2 + chip_offs] = new_val;
+			}
+		}
+	}
+
+	if (chan_mask & (1 << POKEY_CHAN3)) {
+		/* process channel 3 frequency */
+		if (POKEY_AUDCTL[chip] & POKEY_CH3_179)
+			new_val = POKEY_AUDF[POKEY_CHAN3 + chip_offs] + 4;
+		else
+			new_val = (POKEY_AUDF[POKEY_CHAN3 + chip_offs] + 1) * POKEY_Base_mult[chip];
+
+		if (new_val != Div_n_max[POKEY_CHAN3 + chip_offs]) {
+			Div_n_max[POKEY_CHAN3 + chip_offs] = new_val;
+
+			if (Div_n_cnt[POKEY_CHAN3 + chip_offs] > new_val) {
+				Div_n_cnt[POKEY_CHAN3 + chip_offs] = new_val;
+			}
+		}
+	}
+
+	if (chan_mask & (1 << POKEY_CHAN4)) {
+		/* process channel 4 frequency */
+		if (POKEY_AUDCTL[chip] & POKEY_CH3_CH4) {
+			if (POKEY_AUDCTL[chip] & POKEY_CH3_179)
+				new_val = POKEY_AUDF[POKEY_CHAN4 + chip_offs] * 256 +
+					POKEY_AUDF[POKEY_CHAN3 + chip_offs] + 7;
+			else
+				new_val = (POKEY_AUDF[POKEY_CHAN4 + chip_offs] * 256 +
+						   POKEY_AUDF[POKEY_CHAN3 + chip_offs] + 1) * POKEY_Base_mult[chip];
+		}
+		else
+			new_val = (POKEY_AUDF[POKEY_CHAN4 + chip_offs] + 1) * POKEY_Base_mult[chip];
+
+		if (new_val != Div_n_max[POKEY_CHAN4 + chip_offs]) {
+			Div_n_max[POKEY_CHAN4 + chip_offs] = new_val;
+
+			if (Div_n_cnt[POKEY_CHAN4 + chip_offs] > new_val) {
+				Div_n_cnt[POKEY_CHAN4 + chip_offs] = new_val;
+			}
+		}
+	}
+
+	/* if channel is volume only, set current output */
+	for (chan = POKEY_CHAN1; chan <= POKEY_CHAN4; chan++) {
+		if (chan_mask & (1 << chan)) {
+
+#ifdef VOL_ONLY_SOUND
+
+#ifdef __PLUS
+			if (g_Sound.nDigitized)
+#endif
+			if ((POKEY_AUDC[chan + chip_offs] & POKEY_VOL_ONLY)) {
+
+#ifdef STEREO_SOUND
+
+#ifdef __PLUS
+				if (POKEYSND_stereo_enabled && chip & 0x01)
+#else
+				if (chip & 0x01)
+#endif
+				{
+					sampbuf_lastval2 += pokeysnd_AUDV[chan + chip_offs]
+						- POKEYSND_sampbuf_AUDV[chan + chip_offs];
+
+					sampbuf_val2[sampbuf_ptr2] = sampbuf_lastval2;
+					POKEYSND_sampbuf_AUDV[chan + chip_offs] = pokeysnd_AUDV[chan + chip_offs];
+					sampbuf_cnt2[sampbuf_ptr2] =
+						(ANTIC_CPU_CLOCK - sampbuf_last2) * 128 * POKEYSND_samp_freq / 178979;
+					sampbuf_last2 = ANTIC_CPU_CLOCK;
+					sampbuf_ptr2++;
+					if (sampbuf_ptr2 >= POKEYSND_SAMPBUF_MAX)
+						sampbuf_ptr2 = 0;
+					if (sampbuf_ptr2 == sampbuf_rptr2) {
+						sampbuf_rptr2++;
+						if (sampbuf_rptr2 >= POKEYSND_SAMPBUF_MAX)
+							sampbuf_rptr2 = 0;
+					}
+				}
+				else
+#endif /* STEREO_SOUND */
+				{
+					POKEYSND_sampbuf_lastval += pokeysnd_AUDV[chan + chip_offs]
+						-POKEYSND_sampbuf_AUDV[chan + chip_offs];
+
+					POKEYSND_sampbuf_val[POKEYSND_sampbuf_ptr] = POKEYSND_sampbuf_lastval;
+					POKEYSND_sampbuf_AUDV[chan + chip_offs] = pokeysnd_AUDV[chan + chip_offs];
+					POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_ptr] =
+						(ANTIC_CPU_CLOCK - POKEYSND_sampbuf_last) * 128 * POKEYSND_samp_freq / 178979;
+					POKEYSND_sampbuf_last = ANTIC_CPU_CLOCK;
+					POKEYSND_sampbuf_ptr++;
+					if (POKEYSND_sampbuf_ptr >= POKEYSND_SAMPBUF_MAX)
+						POKEYSND_sampbuf_ptr = 0;
+					if (POKEYSND_sampbuf_ptr == POKEYSND_sampbuf_rptr) {
+						POKEYSND_sampbuf_rptr++;
+						if (POKEYSND_sampbuf_rptr >= POKEYSND_SAMPBUF_MAX)
+							POKEYSND_sampbuf_rptr = 0;
+					}
+				}
+			}
+
+#endif /* VOL_ONLY_SOUND */
+
+			/* I've disabled any frequencies that exceed the sampling
+			   frequency.  There isn't much point in processing frequencies
+			   that the hardware can't reproduce.  I've also disabled
+			   processing if the volume is zero. */
+
+			/* if the channel is volume only */
+			/* or the channel is off (volume == 0) */
+			/* or the channel freq is greater than the playback freq */
+			if ( (POKEY_AUDC[chan + chip_offs] & POKEY_VOL_ONLY) ||
+				((POKEY_AUDC[chan + chip_offs] & POKEY_VOLUME_MASK) == 0)
+				|| (!BIENIAS_FIX && (Div_n_max[chan + chip_offs] < (Samp_n_max >> 8)))
+				) {
+				/* indicate the channel is 'on' */
+				Outvol[chan + chip_offs] = 1;
+
+				/* can only ignore channel if filtering off */
+				if ((chan == POKEY_CHAN3 && !(POKEY_AUDCTL[chip] & POKEY_CH1_FILTER)) ||
+					(chan == POKEY_CHAN4 && !(POKEY_AUDCTL[chip] & POKEY_CH2_FILTER)) ||
+					(chan == POKEY_CHAN1) ||
+					(chan == POKEY_CHAN2)
+					|| (!BIENIAS_FIX && (Div_n_max[chan + chip_offs] < (Samp_n_max >> 8)))
+				) {
+					/* and set channel freq to max to reduce processing */
+					Div_n_max[chan + chip_offs] = 0x7fffffffL;
+					Div_n_cnt[chan + chip_offs] = 0x7fffffffL;
+				}
+			}
+		}
+	}
+
+	/*    _enable(); */ /* RSF - removed for portability 31-MAR-97 */
+}
+
+
+/*****************************************************************************/
+/* Module:  pokeysnd_process()                                                  */
+/* Purpose: To fill the output buffer with the sound output based on the     */
+/*          pokey chip parameters.                                           */
+/*                                                                           */
+/* Author:  Ron Fries                                                        */
+/* Date:    January 1, 1997                                                  */
+/*                                                                           */
+/* Inputs:  *buffer - pointer to the buffer where the audio output will      */
+/*                    be placed                                              */
+/*          sndn - for mono, size of the playback buffer in samples          */
+/*                 for stereo, size of the playback buffer in left samples   */
+/*                    plus right samples.                                    */
+/*          num_pokeys - number of currently active pokeys to process        */
+/*                                                                           */
+/* Outputs: the buffer will be filled with n bytes of audio - no return val  */
+/*          Also the buffer will be written to disk if Sound recording is ON */
+/*                                                                           */
+/*****************************************************************************/
+
+static void pokeysnd_process_8(void *sndbuffer, int sndn)
+{
+	register UBYTE *buffer = (UBYTE *) sndbuffer;
+	register int n = sndn;
+
+	register ULONG *div_n_ptr;
+	register UBYTE *samp_cnt_w_ptr;
+	register ULONG event_min;
+	register UBYTE next_event;
+#ifdef CLIP_SOUND
+	register SWORD cur_val;		/* then we have to count as 16-bit signed */
+#ifdef STEREO_SOUND
+	register SWORD cur_val2;
+#endif
+#else /* CLIP_SOUND */
+	register UBYTE cur_val;		/* otherwise we'll simplify as 8-bit unsigned */
+#ifdef STEREO_SOUND
+	register UBYTE cur_val2;
+#endif
+#endif /* CLIP_SOUND */
+	register UBYTE *out_ptr;
+	register UBYTE audc;
+	register UBYTE toggle;
+	register UBYTE count;
+	register UBYTE *vol_ptr;
+
+	/* set a pointer to the whole portion of the samp_n_cnt */
+#ifdef WORDS_BIGENDIAN
+	samp_cnt_w_ptr = ((UBYTE *) (&Samp_n_cnt[0]) + 3);
+#else
+	samp_cnt_w_ptr = ((UBYTE *) (&Samp_n_cnt[0]) + 1);
+#endif
+
+	/* set a pointer for optimization */
+	out_ptr = Outvol;
+	vol_ptr = pokeysnd_AUDV;
+
+	/* The current output is pre-determined and then adjusted based on each */
+	/* output change for increased performance (less over-all math). */
+	/* add the output values of all 4 channels */
+	cur_val = POKEYSND_SAMP_MIN;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+	if (POKEYSND_stereo_enabled)
+#endif
+	cur_val2 = POKEYSND_SAMP_MIN;
+#endif /* STEREO_SOUND */
+
+	count = Num_pokeys;
+	do {
+		if (*out_ptr++)
+			cur_val += *vol_ptr;
+		vol_ptr++;
+
+		if (*out_ptr++)
+			cur_val += *vol_ptr;
+		vol_ptr++;
+
+		if (*out_ptr++)
+			cur_val += *vol_ptr;
+		vol_ptr++;
+
+		if (*out_ptr++)
+			cur_val += *vol_ptr;
+		vol_ptr++;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+		if (POKEYSND_stereo_enabled)
+#endif
+		{
+			count--;
+			if (count) {
+				if (*out_ptr++)
+					cur_val2 += *vol_ptr;
+				vol_ptr++;
+
+				if (*out_ptr++)
+					cur_val2 += *vol_ptr;
+				vol_ptr++;
+
+				if (*out_ptr++)
+					cur_val2 += *vol_ptr;
+				vol_ptr++;
+
+				if (*out_ptr++)
+					cur_val2 += *vol_ptr;
+				vol_ptr++;
+			}
+			else
+				break;
+		}
+#endif /* STEREO_SOUND */
+		count--;
+	} while (count);
+/*
+#if defined (USE_DOSSOUND)
+	cur_val += 32 * GTIA_speaker;
+#endif
+*/
+
+	/* loop until the buffer is filled */
+	while (n) {
+		/* Normally the routine would simply decrement the 'div by N' */
+		/* counters and react when they reach zero.  Since we normally */
+		/* won't be processing except once every 80 or so counts, */
+		/* I've optimized by finding the smallest count and then */
+		/* 'accelerated' time by adjusting all pointers by that amount. */
+
+		/* find next smallest event (either sample or chan 1-4) */
+		next_event = POKEY_SAMPLE;
+		event_min = READ_U32(samp_cnt_w_ptr);
+
+		div_n_ptr = Div_n_cnt;
+
+		count = 0;
+		do {
+			/* Though I could have used a loop here, this is faster */
+			if (*div_n_ptr <= event_min) {
+				event_min = *div_n_ptr;
+				next_event = POKEY_CHAN1 + (count << 2);
+			}
+			div_n_ptr++;
+			if (*div_n_ptr <= event_min) {
+				event_min = *div_n_ptr;
+				next_event = POKEY_CHAN2 + (count << 2);
+			}
+			div_n_ptr++;
+			if (*div_n_ptr <= event_min) {
+				event_min = *div_n_ptr;
+				next_event = POKEY_CHAN3 + (count << 2);
+			}
+			div_n_ptr++;
+			if (*div_n_ptr <= event_min) {
+				event_min = *div_n_ptr;
+				next_event = POKEY_CHAN4 + (count << 2);
+			}
+			div_n_ptr++;
+
+			count++;
+		} while (count < Num_pokeys);
+
+		/* if the next event is a channel change */
+		if (next_event != POKEY_SAMPLE) {
+			/* shift the polynomial counters */
+
+			count = Num_pokeys;
+			do {
+				/* decrement all counters by the smallest count found */
+				/* again, no loop for efficiency */
+				div_n_ptr--;
+				*div_n_ptr -= event_min;
+				div_n_ptr--;
+				*div_n_ptr -= event_min;
+				div_n_ptr--;
+				*div_n_ptr -= event_min;
+				div_n_ptr--;
+				*div_n_ptr -= event_min;
+
+				count--;
+			} while (count);
+
+
+			WRITE_U32(samp_cnt_w_ptr, READ_U32(samp_cnt_w_ptr) - event_min);
+
+			/* since the polynomials require a mod (%) function which is
+			   division, I don't adjust the polynomials on the SAMPLE events,
+			   only the CHAN events.  I have to keep track of the change,
+			   though. */
+
+			P4 = (P4 + event_min) % POKEY_POLY4_SIZE;
+			P5 = (P5 + event_min) % POKEY_POLY5_SIZE;
+			P9 = (P9 + event_min) % POKEY_POLY9_SIZE;
+			P17 = (P17 + event_min) % POKEY_POLY17_SIZE;
+
+			/* adjust channel counter */
+			Div_n_cnt[next_event] += Div_n_max[next_event];
+
+			/* get the current AUDC into a register (for optimization) */
+			audc = POKEY_AUDC[next_event];
+
+			/* set a pointer to the current output (for opt...) */
+			out_ptr = &Outvol[next_event];
+
+			/* assume no changes to the output */
+			toggle = FALSE;
+
+			/* From here, a good understanding of the hardware is required */
+			/* to understand what is happening.  I won't be able to provide */
+			/* much description to explain it here. */
+
+			/* if VOLUME only then nothing to process */
+			if (!(audc & POKEY_VOL_ONLY)) {
+				/* if the output is pure or the output is poly5 and the poly5 bit */
+				/* is set */
+				if ((audc & POKEY_NOTPOLY5) || bit5[P5]) {
+					/* if the PURETONE bit is set */
+					if (audc & POKEY_PURETONE) {
+						/* then simply toggle the output */
+						toggle = TRUE;
+					}
+					/* otherwise if POLY4 is selected */
+					else if (audc & POKEY_POLY4) {
+						/* then compare to the poly4 bit */
+						toggle = (bit4[P4] == !(*out_ptr));
+					}
+					else {
+						/* if 9-bit poly is selected on this chip */
+						if (POKEY_AUDCTL[next_event >> 2] & POKEY_POLY9) {
+							/* compare to the poly9 bit */
+							toggle = ((POKEY_poly9_lookup[P9] & 1) == !(*out_ptr));
+						}
+						else {
+							/* otherwise compare to the poly17 bit */
+							toggle = (((POKEY_poly17_lookup[P17 >> 3] >> (P17 & 7)) & 1) == !(*out_ptr));
+						}
+					}
+				}
+			}
+
+			/* check channel 1 filter (clocked by channel 3) */
+			if ( POKEY_AUDCTL[next_event >> 2] & POKEY_CH1_FILTER) {
+				/* if we're processing channel 3 */
+				if ((next_event & 0x03) == POKEY_CHAN3) {
+					/* check output of channel 1 on same chip */
+					if (Outvol[next_event & 0xfd]) {
+						/* if on, turn it off */
+						Outvol[next_event & 0xfd] = 0;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+						if (POKEYSND_stereo_enabled && (next_event & 0x04))
+#else
+						if ((next_event & 0x04))
+#endif
+							cur_val2 -= pokeysnd_AUDV[next_event & 0xfd];
+						else
+#endif /* STEREO_SOUND */
+							cur_val -= pokeysnd_AUDV[next_event & 0xfd];
+					}
+				}
+			}
+
+			/* check channel 2 filter (clocked by channel 4) */
+			if ( POKEY_AUDCTL[next_event >> 2] & POKEY_CH2_FILTER) {
+				/* if we're processing channel 4 */
+				if ((next_event & 0x03) == POKEY_CHAN4) {
+					/* check output of channel 2 on same chip */
+					if (Outvol[next_event & 0xfd]) {
+						/* if on, turn it off */
+						Outvol[next_event & 0xfd] = 0;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+						if (POKEYSND_stereo_enabled && (next_event & 0x04))
+#else
+						if ((next_event & 0x04))
+#endif
+							cur_val2 -= pokeysnd_AUDV[next_event & 0xfd];
+						else
+#endif /* STEREO_SOUND */
+							cur_val -= pokeysnd_AUDV[next_event & 0xfd];
+					}
+				}
+			}
+
+			/* if the current output bit has changed */
+			if (toggle) {
+				if (*out_ptr) {
+					/* remove this channel from the signal */
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+					if (POKEYSND_stereo_enabled && (next_event & 0x04))
+#else
+					if ((next_event & 0x04))
+#endif
+						cur_val2 -= pokeysnd_AUDV[next_event];
+					else
+#endif /* STEREO_SOUND */
+						cur_val -= pokeysnd_AUDV[next_event];
+
+					/* and turn the output off */
+					*out_ptr = 0;
+				}
+				else {
+					/* turn the output on */
+					*out_ptr = 1;
+
+					/* and add it to the output signal */
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+					if (POKEYSND_stereo_enabled && (next_event & 0x04))
+#else
+					if ((next_event & 0x04))
+#endif
+						cur_val2 += pokeysnd_AUDV[next_event];
+					else
+#endif /* STEREO_SOUND */
+						cur_val += pokeysnd_AUDV[next_event];
+				}
+			}
+		}
+		else {					/* otherwise we're processing a sample */
+			/* adjust the sample counter - note we're using the 24.8 integer
+			   which includes an 8 bit fraction for accuracy */
+
+			int iout;
+#ifdef STEREO_SOUND
+			int iout2;
+#endif
+#ifdef INTERPOLATE_SOUND
+			if (cur_val != last_val) {
+				if (*Samp_n_cnt < Samp_n_max) {		/* need interpolation */
+					iout = (cur_val * (*Samp_n_cnt) +
+							last_val * (Samp_n_max - *Samp_n_cnt))
+						/ Samp_n_max;
+				}
+				else
+					iout = cur_val;
+				last_val = cur_val;
+			}
+			else
+				iout = cur_val;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+		if (POKEYSND_stereo_enabled)
+#endif
+			if (cur_val2 != last_val2) {
+				if (*Samp_n_cnt < Samp_n_max) {		/* need interpolation */
+					iout2 = (cur_val2 * (*Samp_n_cnt) +
+							last_val2 * (Samp_n_max - *Samp_n_cnt))
+						/ Samp_n_max;
+				}
+				else
+					iout2 = cur_val2;
+				last_val2 = cur_val2;
+			}
+			else
+				iout2 = cur_val2;
+#endif  /* STEREO_SOUND */
+#else   /* INTERPOLATE_SOUND */
+			iout = cur_val;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+		if (POKEYSND_stereo_enabled)
+#endif
+			iout2 = cur_val2;
+#endif  /* STEREO_SOUND */
+#endif  /* INTERPOLATE_SOUND */
+
+#ifdef VOL_ONLY_SOUND
+#ifdef __PLUS
+			if (g_Sound.nDigitized)
+#endif
+			{
+				if (POKEYSND_sampbuf_rptr != POKEYSND_sampbuf_ptr) {
+					int l;
+					if (POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr] > 0)
+						POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr] -= 1280;
+					while ((l = POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr]) <= 0) {
+						POKEYSND_sampout = POKEYSND_sampbuf_val[POKEYSND_sampbuf_rptr];
+						POKEYSND_sampbuf_rptr++;
+						if (POKEYSND_sampbuf_rptr >= POKEYSND_SAMPBUF_MAX)
+							POKEYSND_sampbuf_rptr = 0;
+						if (POKEYSND_sampbuf_rptr != POKEYSND_sampbuf_ptr)
+							POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_rptr] += l;
+						else
+							break;
+					}
+				}
+				iout += POKEYSND_sampout;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+				if (POKEYSND_stereo_enabled)
+#endif
+				{
+					if (sampbuf_rptr2 != sampbuf_ptr2) {
+						int l;
+						if (sampbuf_cnt2[sampbuf_rptr2] > 0)
+							sampbuf_cnt2[sampbuf_rptr2] -= 1280;
+						while ((l = sampbuf_cnt2[sampbuf_rptr2]) <= 0) {
+							sampout2 = sampbuf_val2[sampbuf_rptr2];
+							sampbuf_rptr2++;
+							if (sampbuf_rptr2 >= POKEYSND_SAMPBUF_MAX)
+								sampbuf_rptr2 = 0;
+							if (sampbuf_rptr2 != sampbuf_ptr2)
+								sampbuf_cnt2[sampbuf_rptr2] += l;
+							else
+								break;
+						}
+					}
+					iout2 += sampout2;
+				}
+#endif  /* STEREO_SOUND */
+			}
+#endif  /* VOL_ONLY_SOUND */
+
+#ifdef CLIP_SOUND
+			if (iout > POKEYSND_SAMP_MAX) {	/* then check high limit */
+				*buffer++ = (UBYTE) POKEYSND_SAMP_MAX;	/* and limit if greater */
+			}
+			else if (iout < POKEYSND_SAMP_MIN) {		/* else check low limit */
+				*buffer++ = (UBYTE) POKEYSND_SAMP_MIN;	/* and limit if less */
+			}
+			else {				/* otherwise use raw value */
+				*buffer++ = (UBYTE) iout;
+			}
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+			if (POKEYSND_stereo_enabled) {
+				if (iout2 > POKEYSND_SAMP_MAX)
+					*buffer++ = (UBYTE) POKEYSND_SAMP_MAX;
+				else if (iout2 < POKEYSND_SAMP_MIN)
+					*buffer++ = (UBYTE) POKEYSND_SAMP_MIN;
+				else
+					*buffer++ = (UBYTE) iout2;
+			}
+#else /* __PLUS */
+			if (Num_pokeys > 1) {
+				if ((POKEYSND_stereo_enabled ? iout2 : iout) > POKEYSND_SAMP_MAX) {	/* then check high limit */
+					*buffer++ = (UBYTE) POKEYSND_SAMP_MAX;	/* and limit if greater */
+				}
+				else if ((POKEYSND_stereo_enabled ? iout2 : iout) < POKEYSND_SAMP_MIN) {		/* else check low limit */
+					*buffer++ = (UBYTE) POKEYSND_SAMP_MIN;	/* and limit if less */
+				}
+				else {				/* otherwise use raw value */
+					*buffer++ = (UBYTE) (POKEYSND_stereo_enabled ? iout2 : iout);
+				}
+			}
+#endif /* __PLUS */
+#endif /* STEREO_SOUND */
+#else /* CLIP_SOUND */
+			*buffer++ = (UBYTE) iout;	/* clipping not selected, use value */
+#ifdef STEREO_SOUND
+			if (Num_pokeys > 1)
+#ifdef ASAP
+				*buffer++ = (UBYTE) iout2;
+#else
+				*buffer++ = (UBYTE) (POKEYSND_stereo_enabled ? iout2 : iout);
+#endif
+#endif /* STEREO_SOUND */
+#endif /* CLIP_SOUND */
+
+#ifdef WORDS_BIGENDIAN
+			*(Samp_n_cnt + 1) += Samp_n_max;
+#else
+			*Samp_n_cnt += Samp_n_max;
+#endif
+			/* and indicate one less byte in the buffer */
+			n--;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+			if (POKEYSND_stereo_enabled)
+#endif
+			if (Num_pokeys > 1)
+				n--;
+#endif
+		}
+	}
+#ifdef VOL_ONLY_SOUND
+#ifdef __PLUS
+	if (g_Sound.nDigitized)
+#endif
+	{
+		if (POKEYSND_sampbuf_rptr == POKEYSND_sampbuf_ptr)
+			POKEYSND_sampbuf_last = ANTIC_CPU_CLOCK;
+#ifdef STEREO_SOUND
+#ifdef __PLUS
+	if (POKEYSND_stereo_enabled)
+#endif
+		if (sampbuf_rptr2 == sampbuf_ptr2)
+			sampbuf_last2 = ANTIC_CPU_CLOCK;
+#endif /* STEREO_SOUND */
+	}
+#endif  /* VOL_ONLY_SOUND */
+}
+
+#ifdef SERIO_SOUND
+static void Update_serio_sound_rf(int out, UBYTE data)
+{
+#ifdef VOL_ONLY_SOUND
+#ifdef __PLUS
+	if (g_Sound.nDigitized) {
+#endif
+	int bits, pv, future;
+	if (!POKEYSND_serio_sound_enabled) return;
+
+	pv = 0;
+	future = 0;
+	bits = (data << 1) | 0x200;
+	while (bits)
+	{
+		POKEYSND_sampbuf_lastval -= pv;
+		pv = (bits & 0x01) * pokeysnd_AUDV[3];	/* FIXME!!! - set volume from AUDV */
+		POKEYSND_sampbuf_lastval += pv;
+
+	POKEYSND_sampbuf_val[POKEYSND_sampbuf_ptr] = POKEYSND_sampbuf_lastval;
+	POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_ptr] =
+		(ANTIC_CPU_CLOCK + future-POKEYSND_sampbuf_last) * 128 * POKEYSND_samp_freq / 178979;
+	POKEYSND_sampbuf_last = ANTIC_CPU_CLOCK + future;
+	POKEYSND_sampbuf_ptr++;
+	if (POKEYSND_sampbuf_ptr >= POKEYSND_SAMPBUF_MAX )
+		POKEYSND_sampbuf_ptr = 0;
+	if (POKEYSND_sampbuf_ptr == POKEYSND_sampbuf_rptr ) {
+		POKEYSND_sampbuf_rptr++;
+		if (POKEYSND_sampbuf_rptr >= POKEYSND_SAMPBUF_MAX)
+			POKEYSND_sampbuf_rptr = 0;
+	}
+		/* 1789790/19200 = 93 */
+		future += 93;	/* ~ 19200 bit/s - FIXME!!! set speed form AUDF [2] ??? */
+		bits >>= 1;
+	}
+	POKEYSND_sampbuf_lastval -= pv;
+#ifdef __PLUS
+	}
+#endif
+#endif  /* VOL_ONLY_SOUND */
+}
+#endif /* SERIO_SOUND */
+
+static void pokeysnd_process_16(void *sndbuffer, int sndn)
+{
+	UWORD *buffer = (UWORD *) sndbuffer;
+	int i;
+
+	pokeysnd_process_8(buffer, sndn);
+
+	for (i = sndn - 1; i >= 0; i--) {
+		int smp = ((int) (((UBYTE *) buffer)[i]) - 0x80) * 0x100;
+
+		if (smp > 32767)
+			smp = 32767;
+		else if (smp < -32768)
+			smp = -32768;
+
+		buffer[i] = smp;
+	}
+}
+
+#ifdef CONSOLE_SOUND
+static void Update_consol_sound_rf(int set)
+{
+#ifdef VOL_ONLY_SOUND
+	static int prev_atari_speaker = 0;
+	static unsigned int prev_cpu_clock = 0;
+	int d;
+#ifdef __PLUS
+	if (!g_Sound.nDigitized)
+		return;
+#endif
+	if (!POKEYSND_console_sound_enabled)
+		return;
+
+	if (!set && POKEYSND_samp_consol_val == 0)
+		return;
+	POKEYSND_sampbuf_lastval -= POKEYSND_samp_consol_val;
+	if (prev_atari_speaker != GTIA_speaker) {
+		POKEYSND_samp_consol_val = GTIA_speaker * 8 * 4;	/* gain */
+		prev_cpu_clock = ANTIC_CPU_CLOCK;
+	}
+	else if (!set) {
+		d = ANTIC_CPU_CLOCK - prev_cpu_clock;
+		if (d < 114) {
+			POKEYSND_sampbuf_lastval += POKEYSND_samp_consol_val;
+			return;
+		}
+		while (d >= 114 /* CPUL */) {
+			POKEYSND_samp_consol_val = POKEYSND_samp_consol_val * 99 / 100;
+			d -= 114;
+		}
+		prev_cpu_clock = ANTIC_CPU_CLOCK - d;
+	}
+	POKEYSND_sampbuf_lastval += POKEYSND_samp_consol_val;
+	prev_atari_speaker = GTIA_speaker;
+
+	POKEYSND_sampbuf_val[POKEYSND_sampbuf_ptr] = POKEYSND_sampbuf_lastval;
+	POKEYSND_sampbuf_cnt[POKEYSND_sampbuf_ptr] =
+		(ANTIC_CPU_CLOCK - POKEYSND_sampbuf_last) * 128 * POKEYSND_samp_freq / 178979;
+	POKEYSND_sampbuf_last = ANTIC_CPU_CLOCK;
+	POKEYSND_sampbuf_ptr++;
+	if (POKEYSND_sampbuf_ptr >= POKEYSND_SAMPBUF_MAX)
+		POKEYSND_sampbuf_ptr = 0;
+	if (POKEYSND_sampbuf_ptr == POKEYSND_sampbuf_rptr) {
+		POKEYSND_sampbuf_rptr++;
+		if (POKEYSND_sampbuf_rptr >= POKEYSND_SAMPBUF_MAX)
+			POKEYSND_sampbuf_rptr = 0;
+	}
+#endif  /* VOL_ONLY_SOUND */
+}
+#endif /* CONSOLE_SOUND */
+
+#ifdef VOL_ONLY_SOUND
+static void Update_vol_only_sound_rf(void)
+{
+#ifdef CONSOLE_SOUND
+	POKEYSND_UpdateConsol(0);	/* mmm */
+#endif /* CONSOLE_SOUND */
+}
+#endif  /* VOL_ONLY_SOUND */
diff --git a/project/jni/application/atari800/src/pokeysnd.h b/project/jni/application/atari800/src/pokeysnd.h
new file mode 100644
index 000000000..622f8d077
--- /dev/null
+++ b/project/jni/application/atari800/src/pokeysnd.h
@@ -0,0 +1,130 @@
+/*****************************************************************************/
+/*                                                                           */
+/* Module:  POKEY Chip Simulator Includes, V2.3                              */
+/* Purpose: To emulate the sound generation hardware of the Atari POKEY chip. */
+/* Author:  Ron Fries                                                        */
+/*                                                                           */
+/* Revision History:                                                         */
+/*                                                                           */
+/* 09/22/96 - Ron Fries - Initial Release                                    */
+/* 04/06/97 - Brad Oliver - Some cross-platform modifications. Added         */
+/*                          big/little endian #defines, removed <dos.h>,     */
+/*                          conditional defines for TRUE/FALSE               */
+/* 01/19/98 - Ron Fries - Changed signed/unsigned sample support to a        */
+/*                        compile-time option.  Defaults to unsigned -       */
+/*                        define SIGNED_SAMPLES to create signed.            */
+/*                                                                           */
+/*****************************************************************************/
+/*                                                                           */
+/*                 License Information and Copyright Notice                  */
+/*                 ========================================                  */
+/*                                                                           */
+/* PokeySound is Copyright(c) 1996-1998 by Ron Fries                         */
+/*                                                                           */
+/* This library is free software; you can redistribute it and/or modify it   */
+/* under the terms of version 2 of the GNU Library General Public License    */
+/* as published by the Free Software Foundation.                             */
+/*                                                                           */
+/* This library 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 Library */
+/* General Public License for more details.                                  */
+/* To obtain a copy of the GNU Library General Public License, write to the  */
+/* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.   */
+/*                                                                           */
+/* Any permitted reproduction of these routines, in whole or in part, must   */
+/* bear this legend.                                                         */
+/*                                                                           */
+/*****************************************************************************/
+
+#ifndef POKEYSND_H_
+#define POKEYSND_H_
+
+#include "config.h"
+#include "pokey.h"
+
+/* CONSTANT DEFINITIONS */
+
+/* As an alternative to using the exact frequencies, selecting a playback
+   frequency that is an exact division of the main clock provides a higher
+   quality output due to less aliasing.  For best results, a value of
+   1787520 MHz is used for the main clock.  With this value, both the
+   64 kHz and 15 kHz clocks are evenly divisible.  Selecting a playback
+   frequency that is also a division of the clock provides the best
+   results.  The best options are FREQ_64 divided by either 2, 3, or 4.
+   The best selection is based on a trade off between performance and
+   sound quality.
+
+   Of course, using a main clock frequency that is not exact will affect
+   the pitch of the output.  With these numbers, the pitch will be low
+   by 0.127%.  (More than likely, an actual unit will vary by this much!) */
+
+#define POKEYSND_FREQ_17_EXACT     1789790	/* exact 1.79 MHz clock freq */
+#define POKEYSND_FREQ_17_APPROX    1787520	/* approximate 1.79 MHz clock freq */
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+	/* #define SIGNED_SAMPLES */ /* define for signed output */
+
+#ifdef  POKEYSND_SIGNED_SAMPLES			/* if signed output selected */
+#define POKEYSND_SAMP_MAX 127			/* then set signed 8-bit clipping ranges */
+#define POKEYSND_SAMP_MIN -128
+#define POKEYSND_SAMP_MID 0
+#else
+#define POKEYSND_SAMP_MAX 255			/* else set unsigned 8-bit clip ranges */
+#define POKEYSND_SAMP_MIN 0
+#define POKEYSND_SAMP_MID 128
+#endif
+
+/* init flags */
+#define POKEYSND_BIT16	1
+
+extern SLONG POKEYSND_playback_freq;
+extern UBYTE POKEYSND_num_pokeys;
+extern int POKEYSND_snd_flags;
+
+extern int POKEYSND_enable_new_pokey;
+extern int POKEYSND_stereo_enabled;
+extern int POKEYSND_serio_sound_enabled;
+extern int POKEYSND_console_sound_enabled;
+extern int POKEYSND_bienias_fix;
+
+extern void (*POKEYSND_Process_ptr)(void *sndbuffer, int sndn);
+extern void (*POKEYSND_Update)(UWORD addr, UBYTE val, UBYTE /*chip*/, UBYTE gain);
+extern void (*POKEYSND_UpdateSerio)(int out, UBYTE data);
+extern void (*POKEYSND_UpdateConsol)(int set);
+extern void (*POKEYSND_UpdateVolOnly)(void);
+
+int POKEYSND_Init(ULONG freq17, int playback_freq, UBYTE num_pokeys,
+                     int flags
+#ifdef __PLUS
+                     , int clear_regs
+#endif
+                     );
+void POKEYSND_Process(void *sndbuffer, int sndn);
+int POKEYSND_DoInit(void);
+void POKEYSND_SetMzQuality(int quality);
+
+/* Volume only emulations declarations */
+#ifdef VOL_ONLY_SOUND
+
+#define	POKEYSND_SAMPBUF_MAX	2000
+extern int	POKEYSND_sampbuf_val[POKEYSND_SAMPBUF_MAX];	/* volume values */
+extern int	POKEYSND_sampbuf_cnt[POKEYSND_SAMPBUF_MAX];	/* relative start time */
+extern int	POKEYSND_sampbuf_ptr;                    /* pointer to sampbuf */
+extern int	POKEYSND_sampbuf_rptr;                   /* pointer to read from sampbuf */
+extern int	POKEYSND_sampbuf_last;                   /* last absolute time */
+extern int	POKEYSND_sampbuf_AUDV[4 * POKEY_MAXPOKEYS];	/* prev. channel volume */
+extern int	POKEYSND_sampbuf_lastval;		/* last volume */
+extern int	POKEYSND_sampout;			/* last out volume */
+extern int	POKEYSND_samp_freq;
+extern int	POKEYSND_samp_consol_val;		/* actual value of console sound */
+#endif  /* VOL_ONLY_SOUND */
+
+#ifdef __cplusplus
+}
+
+#endif
+#endif /* POKEYSND_H_ */
diff --git a/project/jni/application/atari800/src/rdevice.c b/project/jni/application/atari800/src/rdevice.c
new file mode 100644
index 000000000..671425ba4
--- /dev/null
+++ b/project/jni/application/atari800/src/rdevice.c
@@ -0,0 +1,1455 @@
+/*
+ * rdevice.c - Atari850 emulation
+ *
+ * Copyright (c) ???? Tom Hunt, Chris Martin
+ * Copyright (c) 2003-2005,2007-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+/* Originally From Closer To Home (Tom Hunt)
+ *
+ * 2003.04.03 cmartin@ti.com - Added connecting Host name lookup and port
+ *                             changing as well as CONNECT_STRING changing...
+ * 2003.04.03 cmartin@ti.com - Added setsockopt SO_REUSEADDR for socket to
+ *                             allow reconnections
+ * 2003.04.05 cmartin@ti.com - Added sighandler for catching SIGPIPE error...
+ *                             can get this and cause the emu to crash if
+ *                             the other end disconnects prematurely...
+ * 2003.04.06 cmartin@ti.com - Added translation on/off and line feeds
+ *                           - Fixed IP address lookup (print ip address if
+ *                             lookup fails...)
+ * 2003.04.07 cmartin@ti.com - Added Local echo when not connected.
+ * 2003.04.17 cmartin@ti.com - Added Telnet escape sequence parsing for
+ *                             connecting to telnet
+ * 2003.09.02 cmartin@ti.com - Cleaned up Serial port (/dev/ttyS*) Handling
+ * 2003.09.05 cmartin@ti.com - Included minor bug fixes submitted from
+ *                             Christian Groessler (thanks Chris!)
+ *                           - Removed erroneous return in RREAD().
+ *                           - Fixed typo for 9600 baud in xio_36()
+ *                           - Modified serial port dev_name generation in
+ *                             open_connection_serial()
+ *                           - Now we only modify the serial port options if
+ *                             we can open a port (in open_connection_serial())
+ *                           - Removed Telnet IAC escape sequence handling in
+ *                             RWRIT() and now we only
+ *                             write to the port if we are connected.
+ * 2003.09.08 cmartin@ti.com - Added missing baud rates and data word
+ *                             lengths (5,6,7,8)
+ * 2003.09.11 cmartin@ti.com - Fixed Address lookup in open_connection()
+ *                           - Reformatted and cleaned whole file.
+ *                           - Removed all memory writes to addresses
+ *                             746 - 749 except within the RSTAT function.
+ *
+ * TODO:
+ *       create a new socket and a buffer for each port number....
+ *       non-concurrent mode error reporting to 747
+ *       error bits in location 746
+ *       implement xio 32?
+ *       error reporting to CPU_regY
+ *       heavy ASCII translation
+ *       controlling DTR, RTS, & XMT - xio 34
+ *
+ * Dialing out via telnet:
+ * Type "ATDL" to toggle Linefeeds on/off (normally off)
+ * Type "ATDI <hostname> <port>" example: "ATDI localhost 23"
+ * if the port is omitted, then 23 is assumed.
+ *
+ */
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <signal.h>
+#include <time.h>
+#include <errno.h>
+#include <unistd.h>
+#include <sys/stat.h>
+
+#ifdef DEBUG
+#define DBG_APRINT(x) Log_print(x)
+#else
+#define DBG_APRINT(x)
+#endif
+
+#if 0  /* debug stuff */
+#ifdef R_NETWORK
+#warning R_NETWORK defined
+#endif
+#ifdef R_SERIAL
+#warning R_SERIAL defined
+#endif
+#endif
+
+#ifdef WIN32
+#ifdef R_SERIAL
+#error The Windows version does not support the serial R: device
+#endif
+#ifndef R_NETWORK
+#error R_NETWORK must be defined to use the Windows R: device
+#endif
+#include <winsock2.h>
+   #define F_SETFL 0
+   #define O_NONBLOCK 0
+   #define WM_SOCKET (WM_USER+20)
+   #define inet_pton(fam,ip,addr) ((addr)->s_addr = inet_addr(ip), 0)
+static u_long ioctlsocket_non_block = 1; /* for ioctlsocket */
+#define perror(a) printf("%s:WSA error code:%d\n",a,WSAGetLastError())
+#define close(a) closesocket(a)
+typedef char *caddr_t;
+static void catch_disconnect(int sig);
+static int rdevice_win32_read(SOCKET s, char *buf, int len) {
+  int r;
+  r = recv(s, buf, len, 0);
+  if (r <= 0 ) {
+    switch (WSAGetLastError()) {
+      case WSAECONNRESET:
+      case WSAECONNABORTED:
+      case WSAESHUTDOWN:
+        catch_disconnect(0);
+        break;
+    }
+  }
+  return r;
+}
+
+static int rdevice_win32_write(SOCKET s, char *buf, int len) {
+  int r;
+  r = send(s, buf, len, 0);
+  if (r <= 0 ) {
+    switch (WSAGetLastError()) {
+      case WSAECONNRESET:
+      case WSAECONNABORTED:
+      case WSAESHUTDOWN:
+        catch_disconnect(0);
+        break;
+    }
+  }
+  return r;
+}
+
+#define read(a,b,c) rdevice_win32_read(a,b,c)
+#define write(a,b,c) rdevice_win32_write(a,b,c)
+
+#elif defined(DREAMCAST) /* above WIN32, below DREAMCAST */
+
+/* these functions reside in dc/atari_dc.c */
+extern void dc_init_serial(void);
+extern int dc_write_serial(unsigned char byte);
+extern int dc_read_serial(unsigned char *byte);
+extern void dc_set_baud(int baud);
+
+#else /* above DREAMCAST, below not WIN32 and not DREAMCAST */
+
+#if !defined(R_SERIAL) && !defined(R_NETWORK)
+#error R: device needs serial or network or both
+#endif
+#ifdef R_NETWORK
+#include <sys/socket.h>
+#include <netinet/in.h>
+#include <netdb.h>
+#include <arpa/inet.h>
+#include <sys/time.h>
+#endif /* R_NETWORK */
+#include <sys/types.h>
+#include <fcntl.h>
+#endif /* not WIN32 and not DREAMCAST */
+
+#if defined(R_SERIAL) && !defined(DREAMCAST)
+#include <termios.h>
+#endif /* defined(R_SERIAL) && !defined(DREAMCAST) */
+
+#include "atari.h"
+#include "rdevice.h"
+#include "cpu.h"
+#include "devices.h"
+#include "log.h"
+#include "memory.h"
+#include "util.h"
+
+#define Peek(a)    MEMORY_dGetByte(a)
+#define DPeek(a)   MEMORY_dGetWord(a)
+#define Poke(x,y)  MEMORY_dPutByte(x, y)
+
+/*---------------------------------------------------------------------------
+  Global Variables
+---------------------------------------------------------------------------*/
+static int connected;
+static int do_once;
+static int rdev_fd;
+
+#ifdef R_NETWORK
+static struct sockaddr_in in;
+static struct sockaddr_in peer_in;
+static int sock;
+static int portnum = 9000;
+static char inetaddress[256];
+static char CONNECT_STRING[40] = "\r\n_CONNECT 2400\r\n";
+static int retval;
+#endif /* R_NETWORK */
+
+static char MESSAGE[256];
+static char command_buf[256];
+static char bufout[256];
+static int concurrent;
+
+static int command_end = 0;
+static int translation = 1;
+static int trans_cr = 0;
+static int linefeeds = 1;
+static int bufend = 0;
+
+#ifndef R_NETWORK
+int RDevice_serial_enabled = 1;
+#else
+int RDevice_serial_enabled = 0;  /* Default to network, if enabled. Use parameter to -rdevice command line switch to enable serial mode. */
+#endif
+char RDevice_serial_device[FILENAME_MAX];
+
+/*---------------------------------------------------------------------------
+   Host Support Function - If Disconnect signal is found, then close socket
+   and clean up.
+---------------------------------------------------------------------------*/
+#ifdef R_NETWORK
+static void catch_disconnect(int sig)
+{
+  DBG_APRINT("R*: Disconnected....");
+  close(rdev_fd);
+  connected = 0;
+  do_once = 0;
+  bufout[0] = 0;
+  strcat(bufout, "\r\nNO CARRIER\r\n");
+  bufend = 13;
+#if 0
+  Poke(747,bufend);
+  Poke(748,0);
+#endif
+}
+#endif /* R_NETWORK */
+
+/*---------------------------------------------------------------------------
+   Host Support Function - XIO 34 - Called from RDevice_SPEC
+   Controls handshake lines DTR, RTS, SD
+---------------------------------------------------------------------------*/
+static void xio_34(void)
+{
+#ifndef DREAMCAST  /* Dreamcast port doesn't currently support handshake lines */
+  int temp;
+  /*int fid;*/
+#ifdef R_SERIAL
+  struct termios options;
+#endif /* R_SERIAL */
+  /*int status;*/
+
+  /*fid = MEMORY_dGetByte(0x2e) >> 4;*/
+  temp = MEMORY_dGetByte(Devices_ICAX1Z);
+
+#ifdef R_SERIAL
+  if(RDevice_serial_enabled)
+  {
+    tcgetattr(rdev_fd, &options);
+    /*ioctl(rdev_fd, TIOCMGET, &status);*/
+  }
+#endif /* R_SERIAL */
+
+  if(temp & 0x80)
+  {
+    if(temp & 0x40)
+    {
+      /* turn DTR on */
+#ifdef R_SERIAL
+      if(RDevice_serial_enabled)
+      {
+        /*status |= TIOCM_DTR;*/
+      }
+#endif /* R_SERIAL */
+    }
+    else
+    {
+      /*Drop DTR*/
+#ifdef R_SERIAL
+      if(RDevice_serial_enabled)
+      {
+        cfsetispeed(&options, B0);
+        cfsetospeed(&options, B0);
+      }
+#endif /* R_SERIAL */
+
+      if(connected != 0)
+      {
+        close ( rdev_fd );
+        connected = 0;
+        do_once = 0;
+        /*bufend = 0;*/
+      }
+    }
+  }
+
+#ifdef R_SERIAL
+  if(RDevice_serial_enabled)
+  {
+    /* RTS Set/Clear*/
+    if(temp & 0x20)
+    {
+      if(temp & 0x10)
+      {
+        /*status |= TIOCM_RTS;*/
+      }
+      else
+      {
+        /*status &= ~TIOCM_RTS;*/
+      }
+    }
+
+    if(temp & 0x02)
+    {
+      if(temp & 0x01)
+      {
+        /*status |= TIOCM_RTS;*/
+      }
+      else
+      {
+        /*status &= ~TIOCM_RTS;*/
+      }
+    }
+  }
+#endif /* R_SERIAL */
+
+#ifdef R_SERIAL
+  if(RDevice_serial_enabled)
+  {
+    tcsetattr(rdev_fd, TCSANOW, &options);
+    /*ioctl(rdev_fd, TIOCMSET, &status);*/
+  }
+#endif /* R_SERIAL */
+#endif /* not defined DREAMCAST */
+
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+
+}
+
+/*---------------------------------------------------------------------------
+   Host Support Function - XIO 36 - Called from RDevice_SPEC
+   Sets baud, stop bits, and ready monitoring.
+---------------------------------------------------------------------------*/
+static void xio_36(void)
+{
+  int aux1, aux2;
+#if defined(R_SERIAL) && !defined(DREAMCAST)
+  struct termios options;
+#endif /* defined(R_SERIAL) && !defined(DREAMCAST) */
+
+  aux1 = MEMORY_dGetByte(Devices_ICAX1Z);
+  aux2 = MEMORY_dGetByte(Devices_ICAX2Z);
+
+#ifdef R_SERIAL
+  if(RDevice_serial_enabled)
+  {
+#ifndef DREAMCAST
+    tcgetattr(rdev_fd, &options);
+
+    /*Set Stop bits*/
+    if(aux1 & 0x80)
+    { /*2 Stop bits*/
+      options.c_cflag |= CSTOPB;
+    }
+    else
+    { /*1 Stop bit*/
+      options.c_cflag &= ~CSTOPB;
+    }
+
+    /*Set word size*/
+    if((aux1 & 0x30) == 0)
+    { /*8 bit word size*/
+      options.c_cflag &= ~CSIZE;
+      options.c_cflag |= CS8;
+    }
+    else if((aux1 & 0x30) == 0x10)
+    { /*7 bit word size*/
+      options.c_cflag &= ~CSIZE;
+      options.c_cflag |= CS7;
+    }
+    else if((aux1 & 0x30) == 0x20)
+    { /*6 bit word size*/
+      options.c_cflag &= ~CSIZE;
+      options.c_cflag |= CS6;
+    }
+    else if((aux1 & 0x30) == 0x30)
+    { /*5 bit word size*/
+      options.c_cflag &= ~CSIZE;
+      options.c_cflag |= CS5;
+    }
+    else
+    { /*8 bit word size*/
+      options.c_cflag &= ~CSIZE;
+      options.c_cflag |= CS8;
+    }
+
+    /*Set Baud Rate*/
+    if((aux1 & 0x0f) == 0)
+    { /*300 Baud*/
+      cfsetispeed(&options, B300);
+      cfsetospeed(&options, B300);
+    }
+    else if((aux1 & 0x0f) == 1)
+    { /* 45.5 Baud (unsupported) - now 57600 */
+#ifdef B57600
+      cfsetispeed(&options, B57600);
+      cfsetospeed(&options, B57600);
+#else
+      cfsetispeed(&options, B50);
+      cfsetospeed(&options, B50);
+#endif
+    }
+    else if ((aux1 & 0x0f) == 2)
+    { /* 50 Baud */
+      cfsetispeed(&options, B50);
+      cfsetospeed(&options, B50);
+    }
+    else if ((aux1 & 0x0f) == 3)
+    { /* 56.875 Baud (unsupported) - now 115200 */
+#ifdef B115200
+      cfsetispeed(&options, B115200);
+      cfsetospeed(&options, B115200);
+#else
+      cfsetispeed(&options, B50);
+      cfsetospeed(&options, B50);
+#endif
+    }
+    else if((aux1 & 0x0f) == 4)
+    { /* 75 Baud */
+      cfsetispeed(&options, B75);
+      cfsetospeed(&options, B75);
+    }
+    else if((aux1 & 0x0f) == 5)
+    { /* 110 Baud */
+      cfsetispeed(&options, B110);
+      cfsetospeed(&options, B110);
+    }
+    else if((aux1 & 0x0f) == 6)
+    { /* 134.5 Baud */
+      cfsetispeed(&options, B134);
+      cfsetospeed(&options, B134);
+    }
+    else if((aux1 & 0x0f) == 7)
+    { /* 150 Baud */
+      cfsetispeed(&options, B150);
+      cfsetospeed(&options, B150);
+    }
+    else if((aux1 & 0x0f) == 8)
+    { /* 300 Baud */
+      cfsetispeed(&options, B300);
+      cfsetospeed(&options, B300);
+    }
+    else if((aux1 & 0x0f) == 9)
+    { /* 600 Baud */
+      cfsetispeed(&options, B600);
+      cfsetospeed(&options, B600);
+    }
+    else if((aux1 & 0x0f) == 10)
+    { /* 1200 Baud */
+      cfsetispeed(&options, B1200);
+      cfsetospeed(&options, B1200);
+    }
+    else if((aux1 & 0x0f) == 12)
+    { /* 2400 Baud */
+      cfsetispeed(&options, B2400);
+      cfsetospeed(&options, B2400);
+    }
+    else if((aux1 & 0x0f) == 13)
+    { /* 4800 Baud */
+      cfsetispeed(&options, B4800);
+      cfsetospeed(&options, B4800);
+    }
+    else if((aux1 & 0x0f) == 14)
+    { /* 9600 Baud */
+      cfsetispeed(&options, B9600);
+      cfsetospeed(&options, B9600);
+    }
+    else if((aux1 & 0x0f) == 15)
+    { /* 19200 Baud */
+#ifdef B19200
+      cfsetispeed(&options, B19200);
+      cfsetospeed(&options, B19200);
+#else
+      cfsetispeed(&options, B9600);
+      cfsetospeed(&options, B9600);
+#endif
+    }
+    else
+    { /* 115200 Baud (can add 38400, 76800 if wanted) */
+#ifdef B115200
+      cfsetispeed(&options, B115200);
+      cfsetospeed(&options, B115200);
+#else
+      cfsetispeed(&options, B9600);
+      cfsetospeed(&options, B9600);
+#endif
+    }
+
+    if(aux1 & 0x40)
+    { /* 230400 Baud */
+#ifdef B230400
+      cfsetispeed(&options, B230400);
+      cfsetospeed(&options, B230400);
+#endif
+    }
+
+    tcsetattr(rdev_fd, TCSANOW, &options);
+#else /* below DREAMCAST, above not; both R_SERIAL */
+    /* Set Stop bits */
+    if(aux1 & 0x80)
+    { /* 2 Stop bits */
+      /* currently not supported on DC */
+    }
+    else
+    { /* 1 Stop bit */
+      /* currently not supported on DC */
+    }
+
+    /* Set word size */
+    if((aux1 & 0x30) == 0)
+    { /* 8 bit word size */
+      /* currently not supported on DC */
+    }
+    else if((aux1 & 0x30) == 0x10)
+    { /* 7 bit word size */
+      /* currently not supported on DC */
+    }
+    else if((aux1 & 0x30) == 0x20)
+    { /* 6 bit word size */
+      /* currently not supported on DC */
+    }
+    else if((aux1 & 0x30) == 0x30)
+    { /* 5 bit word size */
+      /* currently not supported on DC */
+    }
+    else
+    { /* 8 bit word size */
+      /* currently not supported on DC */
+    }
+
+    /* Set Baud Rate */
+    if((aux1 & 0x0f) == 0)
+    { /* 300 Baud */
+      dc_set_baud(300);
+    }
+    else if((aux1 & 0x0f) == 1)
+    { /* 45.5 Baud (unsupported) - now 57600 */
+      dc_set_baud(57600);
+    }
+    else if ((aux1 & 0x0f) == 2)
+    { /* 50 Baud */
+      dc_set_baud(50);
+    }
+    else if ((aux1 & 0x0f) == 3)
+    { /* 56.875 Baud (unsupported) - now 115200 */
+      dc_set_baud(115200);
+    }
+    else if((aux1 & 0x0f) == 4)
+    { /* 75 Baud */
+      dc_set_baud(75);
+    }
+    else if((aux1 & 0x0f) == 5)
+    { /* 110 Baud */
+      dc_set_baud(110);
+    }
+    else if((aux1 & 0x0f) == 6)
+    { /* 134.5 Baud */
+      dc_set_baud(134);
+    }
+    else if((aux1 & 0x0f) == 7)
+    { /* 150 Baud */
+      dc_set_baud(150);
+    }
+    else if((aux1 & 0x0f) == 8)
+    { /* 300 Baud */
+      dc_set_baud(300);
+    }
+    else if((aux1 & 0x0f) == 9)
+    { /* 600 Baud */
+      dc_set_baud(600);
+    }
+    else if((aux1 & 0x0f) == 10)
+    { /* 1200 Baud */
+      dc_set_baud(1200);
+    }
+    else if((aux1 & 0x0f) == 12)
+    { /* 2400 Baud */
+      dc_set_baud(2400);
+    }
+    else if((aux1 & 0x0f) == 13)
+    { /* 4800 Baud */
+      dc_set_baud(4800);
+    }
+    else if((aux1 & 0x0f) == 14)
+    { /* 9600 Baud */
+      dc_set_baud(9600);
+    }
+    else if((aux1 & 0x0f) == 15)
+    { /* 19200 Baud */
+      dc_set_baud(19200);
+    }
+    else
+    { /* 115200 Baud (can add 38400, 76800 if wanted) */
+      dc_set_baud(115200);
+    }
+
+    if(aux1 & 0x40)
+    { /*  230400 Baud */
+      dc_set_baud(230400);
+    }
+#endif /* DREAMCAST */
+  }
+#endif /* R_SERIAL */
+
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+}
+
+/*---------------------------------------------------------------------------
+   Host Support Function - XIO 38 - Called from RDevice_SPEC
+   Sets Translation and parity
+---------------------------------------------------------------------------*/
+static void xio_38(void)
+{
+  int aux1;
+#if defined(R_SERIAL) && !defined(DREAMCAST)
+  struct termios options;
+#endif /* defined(R_SERIAL) && !defined(DREAMCAST) */
+
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+
+  aux1 = Peek(Devices_ICAX1Z);
+#if defined(R_SERIAL) && !defined(DREAMCAST)
+  if(RDevice_serial_enabled)
+  {
+    if(aux1 & 0x04)
+    { /*Odd Parity*/
+      tcgetattr(rdev_fd, &options);
+      options.c_cflag |= PARENB;
+      options.c_cflag |= PARODD;
+      tcsetattr(rdev_fd, TCSANOW, &options);
+    }
+    else if(aux1 & 0x08)
+    { /*Even Parity*/
+      tcgetattr(rdev_fd, &options);
+      options.c_cflag |= PARENB;
+      options.c_cflag &= ~PARODD;
+      tcsetattr(rdev_fd, TCSANOW, &options);
+
+    }
+    else
+    { /*No Parity*/
+      tcgetattr(rdev_fd, &options);
+      options.c_cflag &= ~PARENB;
+      tcsetattr(rdev_fd, TCSANOW, &options);
+    }
+  }
+#endif /* defined(R_SERIAL) && !defined(DREAMCAST) */
+
+  if(aux1 & 0x20)
+  { /* No Translation */
+    DBG_APRINT("R*: No ATASCII/ASCII TRANSLATION");
+    translation = 0;
+  }
+  else
+  {
+    translation = 1;
+  }
+
+  if(aux1 & 0x40)
+  { /* Append line feed */
+    DBG_APRINT("R*: Append Line Feeds");
+    linefeeds = 1;
+  }
+  else
+  {
+    linefeeds = 0;
+  }
+
+}
+
+/*---------------------------------------------------------------------------
+   Host Support Function - XIO 40 - Called from RDevice_SPEC
+   Sets concurrent mode.  Also checks for dropped carrier.
+---------------------------------------------------------------------------*/
+static void xio_40(void)
+{
+
+  int aux1;
+/*
+    if(connected == 0)
+      Poke(747,0);
+*/
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+
+  aux1 = Peek(Devices_ICAX1Z);
+
+  if(aux1 >= 12)
+  {
+    concurrent = 1;
+    DBG_APRINT("R*: Entering concurrent IO mode...");
+  }
+  else
+  {
+    concurrent = 0;
+    sprintf(MESSAGE, "R*: XIO 40, %d", aux1);
+    DBG_APRINT(MESSAGE);
+  }
+
+}
+
+/*---------------------------------------------------------------------------
+   Host Support Function - Internet Socket Open Connection
+---------------------------------------------------------------------------*/
+#ifdef R_NETWORK
+static void open_connection(char * address, int port)
+{
+  struct hostent *host;
+#ifdef WIN32
+  static int winsock_started;
+  WSADATA wdata;
+  WORD ver = MAKEWORD(1,1);
+  int ret;
+  if (!winsock_started) {
+    ret = WSAStartup(ver, &wdata);
+    if (ret) {
+      printf("Error in WSAStartup,return code:%d\n", ret);
+    }
+    winsock_started = 1;
+  }
+#endif /* WIN32 */
+  if((address != NULL) && (strlen(address) > 0))
+  {
+    close(rdev_fd);
+    close(sock);
+    do_once = 1;
+    connected = 1;
+    memset ( &peer_in, 0, sizeof ( struct sockaddr_in ) );
+    /*rdev_fd = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);*/
+    rdev_fd = socket(AF_INET, SOCK_STREAM, 0);
+#ifdef WIN32
+    ioctlsocket(rdev_fd, FIONBIO, &ioctlsocket_non_block);
+#else
+    fcntl(rdev_fd, F_SETFL, O_NONBLOCK);
+#endif
+    peer_in.sin_family = AF_INET;
+    if(inet_pton(AF_INET, address, &peer_in.sin_addr) == 0)
+    { /* invalid address if zero */
+      if((peer_in.sin_addr.s_addr == -1) || (peer_in.sin_addr.s_addr == 0))
+      {
+        host = gethostbyname(address);
+        if(host != NULL)
+        {
+          sprintf(MESSAGE, "R*: Host = '%s'.",  host->h_name);
+          DBG_APRINT(MESSAGE);
+          memcpy((caddr_t)&peer_in.sin_addr, host->h_addr_list[0], host->h_length);
+        }
+        else
+        {
+          perror("gethostbyname");
+        }
+      }
+    }
+
+    if(port > 0)
+    {
+      peer_in.sin_port = htons (port);
+    }
+    else
+    {  /* telnet port */
+      peer_in.sin_port = htons (23);
+    }
+    if(connect(rdev_fd, (struct sockaddr *)&peer_in, sizeof(peer_in)) < 0)
+    {
+#ifdef DEBUG
+      sprintf(MESSAGE, "R*: connect: '%s'", strerror(errno));
+      DBG_APRINT(MESSAGE);
+#endif
+    }
+#ifndef WIN32
+    signal(SIGPIPE, catch_disconnect); /*Need to see if the other end disconnects...*/
+    signal(SIGHUP, catch_disconnect); /*Need to see if the other end disconnects...*/
+#endif /* WIN32 */
+    sprintf(MESSAGE, "R*: Connecting to %s", address);
+    DBG_APRINT(MESSAGE);
+#ifdef WIN32
+    ioctlsocket(rdev_fd, FIONBIO, &ioctlsocket_non_block);
+#else
+    fcntl(rdev_fd, F_SETFL, O_NONBLOCK);
+#endif /* WIN32 */
+
+    /* Telnet negotiation */
+    sprintf(MESSAGE, "%c%c%c%c%c%c%c%c%c", 0xff, 0xfb, 0x01, 0xff, 0xfb, 0x03, 0xff, 0xfd, 0x0f3);
+    write(rdev_fd, MESSAGE, 9);
+    DBG_APRINT("R*: Negotiating Terminal Options...");
+  }
+}
+#endif /* R_NETWORK */
+
+
+#if defined(R_SERIAL) && !defined(DREAMCAST)
+#ifdef __linux__
+#define TTY_DEV_NAME "/dev/ttyS0"   /* Linux */
+#elif defined (__NetBSD__) && defined(__i386__)
+#define TTY_DEV_NAME "/dev/tty00"   /* NetBSD/x86 */
+#elif defined (__FreeBSD__) && defined(__i386__)
+#define TTY_DEV_NAME "/dev/ttyd1"   /* FreeBSD/x86 */
+#elif defined (__sun__)
+#define TTY_DEV_NAME "/dev/ttya"    /* Solaris */
+#else
+#error tty name unknown!
+#endif
+#endif /* defined(R_SERIAL) && !defined(DREAMCAST) */
+
+/*---------------------------------------------------------------------------
+   Host Support Function - Serial Open Connection
+---------------------------------------------------------------------------*/
+#ifdef R_SERIAL
+static void open_connection_serial(int port)
+{
+#ifdef DREAMCAST
+  dc_init_serial();
+  connected = 1;
+#else /* above DREAMCAST, below not */
+  char dev_name[FILENAME_MAX] = TTY_DEV_NAME; /* reinitialize each time */
+  struct termios options;
+
+  if(connected)
+    close(rdev_fd);
+  do_once = 1;
+
+  if (*RDevice_serial_device)  /* got a device name from command line */
+  {
+    strcpy(dev_name, RDevice_serial_device);
+  }
+
+  dev_name[strlen(dev_name) - 1] += port - 1;
+
+  sprintf(MESSAGE, "R*: using serial device %s", dev_name);
+  DBG_APRINT(MESSAGE);
+
+  rdev_fd = open(dev_name, O_RDWR | O_NOCTTY | O_NDELAY);
+  if(rdev_fd == -1)
+  {
+    connected = 0;
+    perror("R*: open_port: Unable to open serial Port - ");
+  }
+  else
+  {
+    connected = 1;
+#if 0
+    fcntl(rdev_fd, F_SETFL, O_NONBLOCK);
+#endif
+    /*Set 8N1 by default on open*/
+    /*Set Baud to 115200 by default;*/
+    tcgetattr(rdev_fd, &options);
+    options.c_lflag = 0;
+    options.c_iflag = 0;
+    options.c_oflag = 0;
+    options.c_cc[VMIN] = 1;
+    options.c_cc[VTIME] = 0;
+
+    options.c_cflag = CS8 | CREAD | CLOCAL;
+#if 0
+    cfmakeraw(&options);
+/*#else*/
+    /* from glibc 2.3.2 */
+    options.c_iflag &= ~(IGNBRK|BRKINT|PARMRK|ISTRIP|INLCR|IGNCR|ICRNL|IXON);
+    options.c_oflag &= ~OPOST;
+    options.c_lflag &= ~(ECHO|ECHONL|ICANON|ISIG|IEXTEN);
+    options.c_cflag &= ~(CSIZE|PARENB);
+    options.c_cflag |= CS8;
+    options.c_cc[VMIN] = 1;            /* read returns when one char is available.  */
+    options.c_cc[VTIME] = 0;
+#endif
+
+    cfsetispeed(&options, B115200);
+    cfsetospeed(&options, B115200);
+    tcsetattr(rdev_fd, TCSANOW, &options);
+  }
+#endif /* not DREAMCAST */
+}
+#endif /* R_SERIAL */
+
+/*---------------------------------------------------------------------------
+   Host Support Function - Retrieve address from open command:
+   From Basic: OPEN #1,8,23,"R:JYBOLAC.HOMELINUX.COM"
+   Returns:    "jybolac.homelinux.com"
+---------------------------------------------------------------------------*/
+#ifdef R_NETWORK
+static void RDevice_GetInetAddress(void)
+{
+  UWORD bufadr = Devices_SkipDeviceName();
+  char *p;
+
+  if (bufadr == 0) {
+    /* XXX: signal error */
+    inetaddress[0] = '\0';
+    return;
+  }
+
+  p = inetaddress;
+  while (p < inetaddress + sizeof(inetaddress) - 1) {
+    char c = (char) MEMORY_dGetByte(bufadr);
+    if (c < '!' || c > '\x7e')
+      break;
+    if (c >= 'A' && c <= 'Z')
+      c += 'a' - 'A';
+    *p++ = c;
+    bufadr++;
+  }
+  *p = '\0';
+}
+#endif /* R_NETWORK */
+
+
+/*---------------------------------------------------------------------------
+   R Device OPEN vector - called from Atari OS Device Handler Address Table
+---------------------------------------------------------------------------*/
+void RDevice_OPEN(void)
+{
+  int  port;
+  int  direction;
+  int  devnum;
+
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+
+  bufend = 0;
+
+  port = Peek(Devices_ICAX2Z);
+  direction = Peek(Devices_ICAX1Z);
+  devnum = MEMORY_dGetByte(Devices_ICDNOZ);
+  if(direction & 0x04)
+  {
+    DBG_APRINT("R*: Open for Reading...");
+  }
+
+  if(direction & 0x08)
+  {
+    DBG_APRINT("R*: Open for Writing...");
+#ifdef R_SERIAL
+    if(RDevice_serial_enabled)
+    {
+      DBG_APRINT("R*: serial mode.");
+      open_connection_serial(devnum);
+    }
+#endif /* R_SERIAL */
+#if defined(R_SERIAL) && defined(R_NETWORK)
+    else
+#endif
+#ifdef R_NETWORK
+    {
+      DBG_APRINT("R*: Socket mode.");
+      RDevice_GetInetAddress();
+      open_connection(inetaddress, port);
+    }
+#endif /* R_NETWORK */
+  }
+  if(direction & 0x01)
+  {
+    /* Open for concurrent mode */
+  }
+
+}
+
+/*---------------------------------------------------------------------------
+   R Device CLOSE vector - called from Atari OS Device Handler Address Table
+---------------------------------------------------------------------------*/
+void RDevice_CLOS(void)
+{
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+  concurrent = 0;
+  bufend = 0;
+  close(rdev_fd);
+}
+
+/*---------------------------------------------------------------------------
+   R Device READ vector - called from Atari OS Device Handler Address Table
+---------------------------------------------------------------------------*/
+void RDevice_READ(void)
+{
+  int j;
+
+  /*bufend = Peek(747);*/
+  /*printf("Bufend = %d.\n", bufend);*/
+
+/*  if(bufend >= 0) */
+/*  { */
+    if(translation)
+    {
+      if(bufout[0] == 0x0d)
+      {
+        CPU_regA = 0x9b;
+      }
+    }
+    else
+    {
+      CPU_regA = bufout[0];
+    }
+
+    bufend--;
+
+    for(j = 0; j <= bufend; j++)
+    {
+      bufout[j] = bufout[j+1];
+    }
+
+    /*Cycle the buffer again to skip over linefeed....*/
+    if(translation && linefeeds && (bufout[0] == 0x0a))
+    {
+      for(j = 0; j <= bufend; j++)
+      {
+        bufout[j] = bufout[j+1];
+      }
+    }
+    /*return; ???*/
+/*  } */
+
+  CPU_regY = 1;
+  CPU_ClrN;
+}
+
+
+
+/*---------------------------------------------------------------------------
+   R Device WRITE vector - called from Atari OS Device Handler Address Table
+---------------------------------------------------------------------------*/
+void RDevice_WRIT(void)
+{
+  unsigned char out_char;
+#ifdef R_NETWORK
+  int port;
+#endif
+
+  CPU_regY = 1;
+  CPU_ClrN;
+
+  /*bufend = Peek(747);*/
+
+  /* Translation mode */
+  if(translation)
+  {
+    if(CPU_regA == 0x9b)
+    {
+      out_char = 0x0d;
+      if(linefeeds)
+      {
+        if((RDevice_serial_enabled == 0) && (connected == 0))
+        { /* local echo */
+          bufend++;
+          bufout[bufend-1] = out_char;
+          bufout[bufend] = 0;
+
+          command_end = 0;
+          command_buf[command_end] = 0;
+          strcat(bufout, "OK\r\n");
+          bufend += 4;
+
+        }
+        else
+        {
+#ifndef DREAMCAST
+          write(rdev_fd, (char *)&out_char, 1); /* Write return */
+#else
+          dc_write_serial(out_char);
+#endif
+        }
+        out_char = 0x0a;  /*set char for line feed to be output later....*/
+      }
+    }
+  }
+  else
+  {
+    out_char = CPU_regA;
+  }
+
+  /* Translate the CR to a LF for telnet, ftp, etc */
+  if(connected && trans_cr && (out_char == 0x0d))
+  {
+    out_char = 0x0a;
+  }
+
+  /*if((RDevice_serial_enabled == 0) && (out_char == 255))*/
+  /*{*/
+  /*  DBG_APRINT("R: Writing IAC..."); */
+  /*  retval = write(rdev_fd, &out_char, 1);*/ /* IAC escape sequence */ 
+  /*}*/
+  /*if(retval == -1)*/
+
+#ifdef R_NETWORK
+  if((RDevice_serial_enabled == 0) && (connected == 0))
+  { /* Local echo - only do if in socket mode */
+    bufend++;
+    bufout[bufend-1] = out_char;
+    bufout[bufend] = 0;
+
+    /* Grab Command */
+    if((out_char == 0x9b) || (out_char == 0x0d))
+    { /*process command with a return/enter*/
+      command_end = 0;
+
+      /*Make out going connection command 'ATDI'*/
+      if((command_buf[0] == 'A') && (command_buf[1] == 'T') && (command_buf[2] == 'D') && (command_buf[3] == 'I'))
+      {
+        /*DBG_APRINT(command_buf);*/
+        if(strchr(command_buf, ' ') != NULL)
+        {
+          if(strrchr(command_buf, ' ') != strchr(command_buf, ' '))
+          {
+            port = atoi((char *)(strrchr(command_buf, ' ')+1));
+            * strrchr(command_buf, ' ') = '\0'; /*zero last space in line*/
+          }
+          else
+          {
+            port = 23;
+          }
+          open_connection((char *)(strchr(command_buf, ' ')+1), port); /*send string after first space in line*/
+        }
+        command_buf[command_end] = 0;
+        strcat(bufout, "OK\r\n");
+        bufend += 4;
+      /*Change translation command 'ATDL'*/
+      }
+      else if((command_buf[0] == 'A') && (command_buf[1] == 'T') && (command_buf[2] == 'D') && (command_buf[3] == 'L'))
+      {
+        trans_cr = (trans_cr + 1) % 2;
+
+        command_buf[command_end] = 0;
+        strcat(bufout, "OK\r\n");
+        bufend += 4;
+      }
+    }
+    else
+    {
+      if(((out_char == 0x7f) || (out_char == 0x08)) && (command_end > 0))
+      {
+        command_end--; /* backspace */
+        command_buf[command_end] = 0;
+      }
+      else
+      {
+        command_buf[command_end] = out_char;
+        command_buf[command_end+1] = 0;
+        command_end = (command_end + 1) % 256;
+      }
+    }
+  }
+  else
+#endif /* R_NETWORK */
+#ifndef DREAMCAST
+    if((connected) && (write(rdev_fd, (char *)&out_char, 1) < 1))
+    { /* returns -1 if disconnected or 0 if could not send */
+      perror("write");
+      DBG_APRINT("R*: ERROR on write.");
+      CPU_SetN;
+      CPU_regY = 135;
+      /*bufend = 13;*/ /* To catch NO CARRIER message */
+    }
+#else
+  if (connected)
+  {
+    if (dc_write_serial(out_char) != 1)
+    {
+      Log_print("R*: ERROR on write.");
+      CPU_SetN;
+      CPU_regY = 135;
+    }
+  }
+#endif
+
+  CPU_regA = 1;
+}
+
+/*---------------------------------------------------------------------------
+   R Device GET STATUS vector - called from Device Handler Address Table
+---------------------------------------------------------------------------*/
+void RDevice_STAT(void)
+{
+#ifdef WIN32
+  int len;
+#else
+#ifdef R_NETWORK
+  unsigned int len;
+#endif
+#endif
+  int bytesread;
+  unsigned char one;
+  int devnum;
+  int on;
+  unsigned char telnet_command[2];
+  /*static char IACctr = 0;*/
+  on = 1;
+
+  if(Peek(764) == 1)
+  { /* Hack for Ice-T Terminal program to work! */
+    Poke(764, 255);
+  }
+  devnum = MEMORY_dGetByte(Devices_ICDNOZ);
+
+#ifdef R_NETWORK
+  if(connected == 0)
+  {
+    if(RDevice_serial_enabled == 0)
+    {
+      if(do_once == 0)
+      {
+
+        /*strcpy(PORT,"23\n");*/
+        /*strcpy(PORT,"8000\n");*/
+        /*sprintf(PORT, "%d", 8000 + devnum);*/
+        portnum = portnum + devnum - 1;
+
+        /* Set up the listening port. */
+        do_once = 1;
+        memset ( &in, 0, sizeof ( struct sockaddr_in ) );
+        sock = socket ( AF_INET, SOCK_STREAM, 0 );
+        in.sin_family = AF_INET;
+        in.sin_addr.s_addr = INADDR_ANY;
+        /*in.sin_port = htons ( atoi ( PORT ) );*/
+        in.sin_port = htons (portnum);
+        setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, (void *) &on, sizeof(on) ); /* cmartin */
+        if(bind ( sock, (struct sockaddr *)&in, sizeof ( struct sockaddr_in ) ) < 0) perror("bind");
+        listen ( sock, 5 );
+        /* sethostent(1); */
+#ifdef WIN32
+        retval = ioctlsocket(sock, FIONBIO, &ioctlsocket_non_block);
+#else
+        retval = fcntl( sock, F_SETFL, O_NONBLOCK);
+#endif /* WIN32 */
+        len = sizeof ( struct sockaddr_in );
+        /*bufend = 0;*/
+        sprintf(MESSAGE, "R%d: Listening on port %d...", devnum, portnum);
+        DBG_APRINT(MESSAGE);
+      }
+
+      rdev_fd = accept ( sock, (struct sockaddr *)&peer_in, &len );
+      if(rdev_fd != -1)
+      {
+        struct hostent *host;
+        if (getpeername(rdev_fd, (struct sockaddr *) &peer_in, &len) < 0)
+        {
+          perror("getpeername");
+        }
+        else
+        {
+          sprintf(MESSAGE, "R%d: Serving Connection from %s...", devnum, inet_ntoa(peer_in.sin_addr));
+          if ((host = gethostbyaddr((char *) &peer_in.sin_addr, sizeof peer_in.sin_addr, AF_INET)) == NULL)
+          {
+            /*perror("gethostbyaddr");*/
+            /*DBG_APRINT("Connected.");*/
+          } else {
+            sprintf(MESSAGE, "R%d: Serving Connection from %s.", devnum, host->h_name);
+          }
+        }
+        DBG_APRINT(MESSAGE);
+#ifndef WIN32
+        signal(SIGPIPE, catch_disconnect); /*Need to see if the other end disconnects...*/
+        signal(SIGHUP, catch_disconnect); /*Need to see if the other end disconnects...*/
+#endif /* WIN32 */
+#ifdef WIN32
+        retval = ioctlsocket(rdev_fd, FIONBIO, &ioctlsocket_non_block);
+#else
+        retval = fcntl( rdev_fd, F_SETFL, O_NONBLOCK);
+#endif /* WIN32 */
+
+        /* Telnet negotiation */
+        sprintf(MESSAGE, "%c%c%c%c%c%c%c%c%c", 0xff, 0xfb, 0x01, 0xff, 0xfb, 0x03, 0xff, 0xfd, 0x0f3);
+        write(rdev_fd, MESSAGE, 9);
+        DBG_APRINT("R*: Negotiating Terminal Options...");
+
+        connected = 1;
+  /*
+        retval = write(rdev_fd, &IACdoBinary, 3);
+        retval = write(rdev_fd, &IACwillBinary, 3);
+        retval = write(rdev_fd, &IACdontLinemode, 3);
+        retval = write(rdev_fd, &IACwontLinemode, 3);
+  */
+        bufout[0] = 0;
+        strcat(bufout, CONNECT_STRING);
+        bufend = strlen(CONNECT_STRING);
+        close(sock);
+      }
+    }
+  }
+  else
+#endif /* R_NETWORK */
+  {
+    /* Actually reading and setting the Atari input buffer here */
+    if(concurrent)
+    {
+#ifndef DREAMCAST
+      bytesread = read(rdev_fd, (char *)&one, 1);
+#else
+      bytesread = dc_read_serial(&one);
+#endif
+      if(bytesread > 0)
+      {
+        if((RDevice_serial_enabled == 0) && (one == 0xff))
+        {
+          /* Start Telnet escape seq processing... */
+          while(read(rdev_fd, (char *)telnet_command,2) != 2) {};
+
+          /*sprintf(MESSAGE, "Telnet Command = 0x%x 0x%x", telnet_command[0], telnet_command[1]);*/
+          /*DBG_APRINT(MESSAGE);*/
+          if(telnet_command[0] ==  0xfd)
+          { /*DO*/
+            if((telnet_command[1] == 0x01) || (telnet_command[1] == 0x03))
+            { /* WILL ECHO and GO AHEAD (char mode) */
+              telnet_command[0] = 0xfb; /* WILL */
+            }
+            else
+            {
+              telnet_command[0] = 0xfc; /* WONT */
+            }
+          }
+          else if(telnet_command[0] == 0xfb)
+          { /*WILL*/
+            /*telnet_command[0] = 0xfd;*/ /*DO*/
+            telnet_command[0] = 0xfe; /*DONT*/
+          }
+          else if(telnet_command[0] == 0xfe)
+          { /*DONT*/
+            telnet_command[0] = 0xfc;
+          }
+          else if(telnet_command[0] == 0xfc)
+          { /*WONT*/
+            telnet_command[0] = 0xfe;
+          }
+
+          if(telnet_command[0] == 0xfa)
+          { /* subnegotiation */
+            while(read(rdev_fd, (char *)&one, 1) != 1) {};
+
+            while(one != 0xf0)
+            { /* wait for end of sub negotiation */
+              while(read(rdev_fd, (char *)&one, 1) != 1) {};
+            }
+          }
+          else
+          {
+            write(rdev_fd, (char *)&one, 1);
+            write(rdev_fd, (char *)telnet_command, 2);
+          }
+        }
+        else
+        {
+          bufend++;
+          bufout[bufend-1] = one;
+          bufout[bufend] = 0;
+          /*return;*/
+        }
+      }
+    }
+  }
+
+  /* Set all values at all memory locations we modify on exit */
+  Poke(746,0);
+  Poke(748,0);
+  Poke(749,0);
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+
+  if(concurrent)
+  {
+    Poke(747,bufend);
+  }
+  else
+  {
+    DBG_APRINT("R*: Not in concurrent mode....");
+    /*Poke(747,8);*/
+    Poke(747,(12+48+192)); /* Write 0xfc to address 747 */
+  }
+}
+
+/*---------------------------------------------------------------------------
+   R Device SPECIAL vector - called from Atari OS Device Handler Address Table
+---------------------------------------------------------------------------*/
+void RDevice_SPEC(void)
+{
+  int iccom;
+
+  iccom = Peek(Devices_ICCOMZ);
+  sprintf(MESSAGE, "R*: XIO %d", iccom);
+  DBG_APRINT(MESSAGE);
+
+/*
+  DBG_APRINT("Devices_ICCOMZ =");
+  DBG_APRINT("%d",iccom);
+  DBG_APRINT("^^ in Devices_ICCOMZ");
+*/
+
+  switch (iccom)
+  {
+    case 32: /*Force Short Block*/
+      break;
+    case 34:
+      xio_34();
+      break;
+    case 36:
+      xio_36();
+      break;
+    case 38:
+      xio_38();
+      break;
+    case 40:
+      xio_40();
+      break;
+    default:
+      DBG_APRINT("R*: Unsupported XIO #.");
+      break;
+  }
+/*
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+*/
+
+}
+
+/*---------------------------------------------------------------------------
+   R Device INIT vector - called from Atari OS Device Handler Address Table
+---------------------------------------------------------------------------*/
+void RDevice_INIT(void)
+{
+  DBG_APRINT("R*: INIT");
+  CPU_regA = 1;
+  CPU_regY = 1;
+  CPU_ClrN;
+}
+
+void RDevice_Exit(void)
+{
+#ifdef WIN32
+  WSACleanup();
+#endif /* WIN32 */
+}
diff --git a/project/jni/application/atari800/src/rdevice.h b/project/jni/application/atari800/src/rdevice.h
new file mode 100644
index 000000000..90ec94447
--- /dev/null
+++ b/project/jni/application/atari800/src/rdevice.h
@@ -0,0 +1,41 @@
+/*
+ * rdevice.h - Atari850 emulation header file
+ *
+ * Copyright (c) ???? Tom Hunt, Chris Martin
+ * Copyright (c) 2003,2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#ifndef RDEVICE_H_
+#define RDEVICE_H_
+
+extern void RDevice_OPEN(void);
+extern void RDevice_CLOS(void);
+extern void RDevice_READ(void);
+extern void RDevice_WRIT(void);
+extern void RDevice_STAT(void);
+extern void RDevice_SPEC(void);
+extern void RDevice_INIT(void);
+
+extern int RDevice_serial_enabled;
+extern char RDevice_serial_device[];
+
+extern void RDevice_Exit(void);
+
+#endif /* RDEVICE_H_ */
diff --git a/project/jni/application/atari800/src/remez.c b/project/jni/application/atari800/src/remez.c
new file mode 100644
index 000000000..f2fe955d0
--- /dev/null
+++ b/project/jni/application/atari800/src/remez.c
@@ -0,0 +1,643 @@
+/*
+ * remez.c - Parks-McClellan algorithm for FIR filter design (C version)
+ *
+ * Copyright (C) 1995,1998 Jake Janovetz
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <math.h>
+
+#include "remez.h"
+#ifdef ASAP /* external project, see http://asap.sf.net */
+#include "asap_internal.h"
+#else
+#include "log.h"
+#include "util.h"
+#endif
+
+#define NEGATIVE       0
+#define POSITIVE       1
+
+#define Pi             3.1415926535897932
+#define Pi2            6.2831853071795865
+
+#define GRIDDENSITY    16
+#define MAXITERATIONS  40
+
+/*******************
+ * CreateDenseGrid
+ *=================
+ * Creates the dense grid of frequencies from the specified bands.
+ * Also creates the Desired Frequency Response function (D[]) and
+ * the Weight function (W[]) on that dense grid
+ *
+ *
+ * INPUT:
+ * ------
+ * int      r        - 1/2 the number of filter coefficients
+ * int      numtaps  - Number of taps in the resulting filter
+ * int      numband  - Number of bands in user specification
+ * double   bands[]  - User-specified band edges [2*numband]
+ * double   des[]    - Desired response per band [numband]
+ * double   weight[] - Weight per band [numband]
+ * int      symmetry - Symmetry of filter - used for grid check
+ *
+ * OUTPUT:
+ * -------
+ * int    gridsize   - Number of elements in the dense frequency grid
+ * double Grid[]     - Frequencies (0 to 0.5) on the dense grid [gridsize]
+ * double D[]        - Desired response on the dense grid [gridsize]
+ * double W[]        - Weight function on the dense grid [gridsize]
+ *******************/
+
+static void CreateDenseGrid(int r, int numtaps, int numband, double bands[],
+                            const double des[], const double weight[],
+                            int *gridsize, double Grid[],
+                            double D[], double W[], int symmetry)
+{
+	int i, j, k, band;
+	double delf, lowf, highf;
+
+	delf = 0.5 / (GRIDDENSITY * r);
+
+	/* For differentiator, hilbert,
+	 *   symmetry is odd and Grid[0] = max(delf, band[0]) */
+
+	if (symmetry == NEGATIVE && delf > bands[0])
+		bands[0] = delf;
+
+	j = 0;
+	for (band = 0; band < numband; band++) {
+		Grid[j] = bands[2 * band];
+		lowf = bands[2 * band];
+		highf = bands[2 * band + 1];
+		k = (int) ((highf - lowf) / delf + 0.5); /* .5 for rounding */
+		for (i = 0; i < k; i++) {
+			D[j] = des[band];
+			W[j] = weight[band];
+			Grid[j] = lowf;
+			lowf += delf;
+			j++;
+		}
+		Grid[j - 1] = highf;
+	}
+
+	/* Similar to above, if odd symmetry, last grid point can't be .5
+	 *  - but, if there are even taps, leave the last grid point at .5 */
+	if ((symmetry == NEGATIVE) &&
+	   (Grid[*gridsize - 1] > (0.5 - delf)) &&
+	   (numtaps % 2))
+	{
+		Grid[*gridsize - 1] = 0.5 - delf;
+	}
+}
+
+
+/********************
+ * InitialGuess
+ *==============
+ * Places Extremal Frequencies evenly throughout the dense grid.
+ *
+ *
+ * INPUT:
+ * ------
+ * int r        - 1/2 the number of filter coefficients
+ * int gridsize - Number of elements in the dense frequency grid
+ *
+ * OUTPUT:
+ * -------
+ * int Ext[]    - Extremal indexes to dense frequency grid [r+1]
+ ********************/
+
+static void InitialGuess(int r, int Ext[], int gridsize)
+{
+	int i;
+
+	for (i = 0; i <= r; i++)
+		Ext[i] = i * (gridsize - 1) / r;
+}
+
+
+/***********************
+ * CalcParms
+ *===========
+ *
+ *
+ * INPUT:
+ * ------
+ * int    r      - 1/2 the number of filter coefficients
+ * int    Ext[]  - Extremal indexes to dense frequency grid [r+1]
+ * double Grid[] - Frequencies (0 to 0.5) on the dense grid [gridsize]
+ * double D[]    - Desired response on the dense grid [gridsize]
+ * double W[]    - Weight function on the dense grid [gridsize]
+ *
+ * OUTPUT:
+ * -------
+ * double ad[]   - 'b' in Oppenheim & Schafer [r+1]
+ * double x[]    - [r+1]
+ * double y[]    - 'C' in Oppenheim & Schafer [r+1]
+ ***********************/
+
+static void CalcParms(int r, const int Ext[], const double Grid[],
+                      const double D[], const double W[],
+                      double ad[], double x[], double y[])
+{
+	int i, j, k, ld;
+	double sign, xi, delta, denom, numer;
+
+	/* Find x[] */
+	for (i = 0; i <= r; i++)
+		x[i] = cos(Pi2 * Grid[Ext[i]]);
+
+	/* Calculate ad[]  - Oppenheim & Schafer eq 7.132 */
+	ld = (r - 1) / 15 + 1; /* Skips around to avoid round errors */
+	for (i = 0; i <= r; i++) {
+		denom = 1.0;
+		xi = x[i];
+		for (j = 0; j < ld; j++) {
+			for (k = j; k <= r; k += ld)
+				if (k != i)
+					denom *= 2.0 * (xi - x[k]);
+		}
+		if (fabs(denom) < 0.00001)
+			denom = 0.00001;
+		ad[i] = 1.0 / denom;
+	}
+
+	/* Calculate delta  - Oppenheim & Schafer eq 7.131 */
+	numer = denom = 0;
+	sign = 1;
+	for (i = 0; i <= r; i++) {
+		numer += ad[i] * D[Ext[i]];
+		denom += sign * ad[i] / W[Ext[i]];
+		sign = -sign;
+	}
+	delta = numer / denom;
+	sign = 1;
+
+	/* Calculate y[]  - Oppenheim & Schafer eq 7.133b */
+	for (i = 0; i <= r; i++) {
+		y[i] = D[Ext[i]] - sign * delta / W[Ext[i]];
+		sign = -sign;
+	}
+}
+
+
+/*********************
+ * ComputeA
+ *==========
+ * Using values calculated in CalcParms, ComputeA calculates the
+ * actual filter response at a given frequency (freq).  Uses
+ * eq 7.133a from Oppenheim & Schafer.
+ *
+ *
+ * INPUT:
+ * ------
+ * double freq - Frequency (0 to 0.5) at which to calculate A
+ * int    r    - 1/2 the number of filter coefficients
+ * double ad[] - 'b' in Oppenheim & Schafer [r+1]
+ * double x[]  - [r+1]
+ * double y[]  - 'C' in Oppenheim & Schafer [r+1]
+ *
+ * OUTPUT:
+ * -------
+ * Returns double value of A[freq]
+ *********************/
+
+static double ComputeA(double freq, int r, const double ad[],
+                       const double x[], const double y[])
+{
+	int i;
+	double xc, c, denom, numer;
+
+	denom = numer = 0;
+	xc = cos(Pi2 * freq);
+	for (i = 0; i <= r; i++) {
+		c = xc - x[i];
+		if (fabs(c) < 1.0e-7) {
+			numer = y[i];
+			denom = 1;
+			break;
+		}
+		c = ad[i] / c;
+		denom += c;
+		numer += c * y[i];
+	}
+	return numer / denom;
+}
+
+
+/************************
+ * CalcError
+ *===========
+ * Calculates the Error function from the desired frequency response
+ * on the dense grid (D[]), the weight function on the dense grid (W[]),
+ * and the present response calculation (A[])
+ *
+ *
+ * INPUT:
+ * ------
+ * int    r      - 1/2 the number of filter coefficients
+ * double ad[]   - [r+1]
+ * double x[]    - [r+1]
+ * double y[]    - [r+1]
+ * int gridsize  - Number of elements in the dense frequency grid
+ * double Grid[] - Frequencies on the dense grid [gridsize]
+ * double D[]    - Desired response on the dense grid [gridsize]
+ * double W[]    - Weight function on the desnse grid [gridsize]
+ *
+ * OUTPUT:
+ * -------
+ * double E[]    - Error function on dense grid [gridsize]
+ ************************/
+
+static void CalcError(int r, const double ad[],
+                      const double x[], const double y[],
+                      int gridsize, const double Grid[],
+                      const double D[], const double W[], double E[])
+{
+	int i;
+	double A;
+
+	for (i = 0; i < gridsize; i++) {
+		A = ComputeA(Grid[i], r, ad, x, y);
+		E[i] = W[i] * (D[i] - A);
+	}
+}
+
+/************************
+ * Search
+ *========
+ * Searches for the maxima/minima of the error curve.  If more than
+ * r+1 extrema are found, it uses the following heuristic (thanks
+ * Chris Hanson):
+ * 1) Adjacent non-alternating extrema deleted first.
+ * 2) If there are more than one excess extrema, delete the
+ *    one with the smallest error.  This will create a non-alternation
+ *    condition that is fixed by 1).
+ * 3) If there is exactly one excess extremum, delete the smaller
+ *    of the first/last extremum
+ *
+ *
+ * INPUT:
+ * ------
+ * int    r        - 1/2 the number of filter coefficients
+ * int    Ext[]    - Indexes to Grid[] of extremal frequencies [r+1]
+ * int    gridsize - Number of elements in the dense frequency grid
+ * double E[]      - Array of error values.  [gridsize]
+ * OUTPUT:
+ * -------
+ * int    Ext[]    - New indexes to extremal frequencies [r+1]
+ ************************/
+
+static void Search(int r, int Ext[], int gridsize, const double E[])
+{
+	int i, j, k, l, extra;     /* Counters */
+	int up, alt;
+	int *foundExt;             /* Array of found extremals */
+
+	/* Allocate enough space for found extremals. */
+	foundExt = (int *) Util_malloc((2 * r) * sizeof(int));
+	k = 0;
+
+	/* Check for extremum at 0. */
+	if (((E[0] > 0.0) && (E[0] > E[1])) ||
+	   ((E[0] < 0.0) && (E[0] < E[1])))
+		foundExt[k++] = 0;
+
+	/* Check for extrema inside dense grid */
+	for (i = 1; i < gridsize - 1; i++) {
+		if (((E[i] >= E[i - 1]) && (E[i] > E[i + 1]) && (E[i] > 0.0)) ||
+		   ((E[i] <= E[i - 1]) && (E[i] < E[i + 1]) && (E[i] < 0.0)))
+			foundExt[k++] = i;
+	}
+
+	/* Check for extremum at 0.5 */
+	j = gridsize - 1;
+	if (((E[j] > 0.0) && (E[j] > E[j - 1])) ||
+	   ((E[j] < 0.0) && (E[j] < E[j - 1])))
+		foundExt[k++] = j;
+
+	/* Remove extra extremals */
+	extra = k - (r + 1);
+
+	while (extra > 0) {
+		if (E[foundExt[0]] > 0.0)
+			up = 1;                /* first one is a maxima */
+		else
+			up = 0;                /* first one is a minima */
+
+		l = 0;
+		alt = 1;
+		for (j = 1; j < k; j++) {
+			if (fabs(E[foundExt[j]]) < fabs(E[foundExt[l]]))
+				l = j;              /* new smallest error. */
+			if ((up) && (E[foundExt[j]] < 0.0))
+				up = 0;             /* switch to a minima */
+			else if ((!up) && (E[foundExt[j]] > 0.0))
+				up = 1;             /* switch to a maxima */
+			else {
+				alt = 0;
+				break;              /* Ooops, found two non-alternating */
+			}                       /* extrema.  Delete smallest of them */
+		}  /* if the loop finishes, all extrema are alternating */
+
+		/* If there's only one extremal and all are alternating,
+		 * delete the smallest of the first/last extremals. */
+		if ((alt) && (extra == 1)) {
+			if (fabs(E[foundExt[k - 1]]) < fabs(E[foundExt[0]]))
+				l = foundExt[k - 1];   /* Delete last extremal */
+			else
+				l = foundExt[0];       /* Delete first extremal */
+		}
+
+		/* Loop that does the deletion */
+		for (j = l; j < k; j++) {
+			foundExt[j] = foundExt[j+1];
+		}
+		k--;
+		extra--;
+	}
+
+	/* Copy found extremals to Ext[] */
+	for (i = 0; i <= r; i++) {
+		Ext[i] = foundExt[i];
+	}
+
+	free(foundExt);
+}
+
+
+/*********************
+ * FreqSample
+ *============
+ * Simple frequency sampling algorithm to determine the impulse
+ * response h[] from A's found in ComputeA
+ *
+ *
+ * INPUT:
+ * ------
+ * int      N        - Number of filter coefficients
+ * double   A[]      - Sample points of desired response [N/2]
+ * int      symm     - Symmetry of desired filter
+ *
+ * OUTPUT:
+ * -------
+ * double h[] - Impulse Response of final filter [N]
+ *********************/
+static void FreqSample(int N, const double A[], double h[], int symm)
+{
+	int n, k;
+	double x, val, M;
+
+	M = (N - 1.0) / 2.0;
+	if (symm == POSITIVE) {
+		if (N % 2) {
+			for (n = 0; n < N; n++) {
+				val = A[0];
+				x = Pi2 * (n - M) / N;
+				for (k = 1; k <= M; k++)
+					val += 2.0 * A[k] * cos(x * k);
+				h[n] = val / N;
+			}
+		}
+		else {
+			for (n = 0; n < N; n++) {
+				val = A[0];
+				x = Pi2 * (n - M)/N;
+				for (k = 1; k <= (N / 2 - 1); k++)
+					val += 2.0 * A[k] * cos(x * k);
+				h[n] = val / N;
+			}
+		}
+	}
+	else {
+		if (N % 2) {
+			for (n = 0; n < N; n++) {
+				val = 0;
+				x = Pi2 * (n - M) / N;
+				for (k = 1; k <= M; k++)
+					val += 2.0 * A[k] * sin(x * k);
+				h[n] = val / N;
+			}
+		}
+		else {
+			for (n = 0; n < N; n++) {
+				val = A[N / 2] * sin(Pi * (n - M));
+				x = Pi2 * (n - M) / N;
+				for (k = 1; k <= (N / 2 - 1); k++)
+					val += 2.0 * A[k] * sin(x * k);
+				h[n] = val / N;
+			}
+		}
+	}
+}
+
+/*******************
+ * isDone
+ *========
+ * Checks to see if the error function is small enough to consider
+ * the result to have converged.
+ *
+ * INPUT:
+ * ------
+ * int    r     - 1/2 the number of filter coeffiecients
+ * int    Ext[] - Indexes to extremal frequencies [r+1]
+ * double E[]   - Error function on the dense grid [gridsize]
+ *
+ * OUTPUT:
+ * -------
+ * Returns 1 if the result converged
+ * Returns 0 if the result has not converged
+ ********************/
+
+static int isDone(int r, const int Ext[], const double E[])
+{
+	int i;
+	double min, max, current;
+
+	min = max = fabs(E[Ext[0]]);
+	for (i = 1; i <= r; i++) {
+		current = fabs(E[Ext[i]]);
+		if (current < min)
+			min = current;
+		if (current > max)
+			max = current;
+	}
+	if (((max - min) / max) < 0.0001)
+		return 1;
+	return 0;
+}
+
+/********************
+ * REMEZ_CreateFilter
+ *=======
+ * Calculates the optimal (in the Chebyshev/minimax sense)
+ * FIR filter impulse response given a set of band edges,
+ * the desired reponse on those bands, and the weight given to
+ * the error in those bands.
+ *
+ * INPUT:
+ * ------
+ * int     numtaps     - Number of filter coefficients
+ * int     numband     - Number of bands in filter specification
+ * double  bands[]     - User-specified band edges [2 * numband]
+ * double  des[]       - User-specified band responses [numband]
+ * double  weight[]    - User-specified error weights [numband]
+ * int     type        - Type of filter
+ *
+ * OUTPUT:
+ * -------
+ * double h[]      - Impulse response of final filter [numtaps]
+ ********************/
+
+void REMEZ_CreateFilter(double h[], int numtaps, int numband, double bands[],
+           const double des[], const double weight[], int type)
+{
+	double *Grid, *W, *D, *E;
+	int    i, iter, gridsize, r, *Ext;
+	double *taps, c;
+	double *x, *y, *ad;
+	int    symmetry;
+
+	if (type == REMEZ_BANDPASS)
+		symmetry = POSITIVE;
+	else
+		symmetry = NEGATIVE;
+
+	r = numtaps / 2;                  /* number of extrema */
+	if ((numtaps % 2) && (symmetry == POSITIVE))
+		r++;
+
+	/* Predict dense grid size in advance for memory allocation
+	 *   .5 is so we round up, not truncate */
+	gridsize = 0;
+	for (i = 0; i < numband; i++) {
+		gridsize += (int) (2 * r * GRIDDENSITY *
+		                   (bands[2 * i + 1] - bands[2 * i]) + .5);
+	}
+	if (symmetry == NEGATIVE) {
+		gridsize--;
+	}
+
+	/* Dynamically allocate memory for arrays with proper sizes */
+	Grid = (double *) Util_malloc(gridsize * sizeof(double));
+	D = (double *) Util_malloc(gridsize * sizeof(double));
+	W = (double *) Util_malloc(gridsize * sizeof(double));
+	E = (double *) Util_malloc(gridsize * sizeof(double));
+	Ext = (int *) Util_malloc((r + 1) * sizeof(int));
+	taps = (double *) Util_malloc((r + 1) * sizeof(double));
+	x = (double *) Util_malloc((r + 1) * sizeof(double));
+	y = (double *) Util_malloc((r + 1) * sizeof(double));
+	ad = (double *) Util_malloc((r + 1) * sizeof(double));
+
+	/* Create dense frequency grid */
+	CreateDenseGrid(r, numtaps, numband, bands, des, weight,
+	                &gridsize, Grid, D, W, symmetry);
+	InitialGuess(r, Ext, gridsize);
+
+	/* For Differentiator: (fix grid) */
+	if (type == REMEZ_DIFFERENTIATOR) {
+		for (i = 0; i < gridsize; i++) {
+			/* D[i] = D[i] * Grid[i]; */
+			if (D[i] > 0.0001)
+				W[i] = W[i] / Grid[i];
+		}
+	}
+
+	/* For odd or Negative symmetry filters, alter the
+	 * D[] and W[] according to Parks McClellan */
+	if (symmetry == POSITIVE) {
+		if (numtaps % 2 == 0) {
+			for (i = 0; i < gridsize; i++) {
+				c = cos(Pi * Grid[i]);
+				D[i] /= c;
+				W[i] *= c;
+			}
+		}
+	}
+	else {
+		if (numtaps % 2) {
+			for (i = 0; i < gridsize; i++) {
+				c = sin(Pi2 * Grid[i]);
+				D[i] /= c;
+				W[i] *= c;
+			}
+		}
+		else {
+			for (i = 0; i < gridsize; i++) {
+				c = sin(Pi * Grid[i]);
+				D[i] /= c;
+				W[i] *= c;
+			}
+		}
+	}
+
+	/* Perform the Remez Exchange algorithm */
+	for (iter = 0; iter < MAXITERATIONS; iter++) {
+		CalcParms(r, Ext, Grid, D, W, ad, x, y);
+		CalcError(r, ad, x, y, gridsize, Grid, D, W, E);
+		Search(r, Ext, gridsize, E);
+		if (isDone(r, Ext, E))
+			break;
+	}
+#ifndef ASAP
+	if (iter == MAXITERATIONS) {
+		Log_print("remez(): reached maximum iteration count. Results may be bad.");
+	}
+#endif
+
+	CalcParms(r, Ext, Grid, D, W, ad, x, y);
+
+	/* Find the 'taps' of the filter for use with Frequency
+	 * Sampling.  If odd or Negative symmetry, fix the taps
+	 * according to Parks McClellan */
+	for (i = 0; i <= numtaps / 2; i++) {
+		if (symmetry == POSITIVE) {
+			if (numtaps % 2)
+				c = 1;
+			else
+				c = cos(Pi * (double) i / numtaps);
+		}
+		else {
+			if (numtaps % 2)
+				c = sin(Pi2 * (double) i / numtaps);
+			else
+				c = sin(Pi * (double) i / numtaps);
+		}
+		taps[i] = ComputeA((double) i / numtaps, r, ad, x, y) * c;
+	}
+
+	/* Frequency sampling design with calculated taps */
+	FreqSample(numtaps, taps, h, symmetry);
+
+	/* Delete allocated memory */
+	free(Grid);
+	free(W);
+	free(D);
+	free(E);
+	free(Ext);
+	free(taps);
+	free(x);
+	free(y);
+	free(ad);
+}
diff --git a/project/jni/application/atari800/src/remez.h b/project/jni/application/atari800/src/remez.h
new file mode 100644
index 000000000..ca35aa3fb
--- /dev/null
+++ b/project/jni/application/atari800/src/remez.h
@@ -0,0 +1,34 @@
+/**************************************************************************
+ * Parks-McClellan algorithm for FIR filter design (C version)
+ *-------------------------------------------------
+ *  Copyright (c) 1995,1998  Jake Janovetz (janovetz@uiuc.edu)
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Library General Public
+ *  License as published by the Free Software Foundation; either
+ *  version 2 of the License, or (at your option) any later version.
+ *
+ *  This library 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
+ *  Library General Public License for more details.
+
+ *  You should have received a copy of the GNU Library General Public
+ *  License along with this library; if not, write to the Free
+ *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ *
+ *************************************************************************/
+#ifndef REMEZ_H_
+#define REMEZ_H_
+
+#define REMEZ_BANDPASS       1
+#define REMEZ_DIFFERENTIATOR 2
+#define REMEZ_HILBERT        3
+
+/* Function prototype for REMEZ_CreateFilter() - the only function that should need be
+ * called from external code */
+void REMEZ_CreateFilter(double h[], int numtaps,
+           int numband, double bands[], const double des[], const double weight[],
+           int type);
+
+#endif /* REMEZ_H_ */
diff --git a/project/jni/application/atari800/src/rtime.c b/project/jni/application/atari800/src/rtime.c
new file mode 100644
index 000000000..07c10bd6f
--- /dev/null
+++ b/project/jni/application/atari800/src/rtime.c
@@ -0,0 +1,173 @@
+/*
+ * rtime.c - Emulate ICD R-Time 8 cartridge
+ *
+ * Copyright (C) 2000 Jason Duerstock
+ * Copyright (C) 2000-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdlib.h>	/* for NULL */
+#include <string.h>	/* for strcmp() */
+#ifdef HAVE_TIME_H
+#include <time.h>
+#endif
+#ifdef WIN32
+#include <windows.h>
+#endif
+
+#include "atari.h"
+#include "log.h"
+#include "rtime.h"
+
+int RTIME_enabled = 1;
+
+static int rtime_state = 0;
+				/* 0 = waiting for register # */
+				/* 1 = got register #, waiting for hi nybble */
+				/* 2 = got hi nybble, waiting for lo nybble */
+static int rtime_tmp = 0;
+static int rtime_tmp2 = 0;
+
+static UBYTE regset[16] = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
+
+int RTIME_Initialise(int *argc, char *argv[])
+{
+	int i;
+	int j;
+	for (i = j = 1; i < *argc; i++) {
+		if (strcmp(argv[i], "-rtime") == 0)
+			RTIME_enabled = TRUE;
+		else if (strcmp(argv[i], "-nortime") == 0)
+			RTIME_enabled = FALSE;
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-rtime           Enable R-Time 8 emulation");
+				Log_print("\t-nortime         Disable R-Time 8 emulation");
+			}
+			argv[j++] = argv[i];
+		}
+	}
+	*argc = j;
+
+	return TRUE;
+}
+
+#if defined(WIN32) || (defined(HAVE_TIME) && defined(HAVE_LOCALTIME))
+
+static int hex2bcd(int h)
+{
+	return ((h / 10) << 4) | (h % 10);
+}
+
+static int gettime(int p)
+{
+#ifdef WIN32
+	SYSTEMTIME st;
+	GetLocalTime(&st);
+	switch (p) {
+	case 0:
+		return hex2bcd(st.wSecond);
+	case 1:
+		return hex2bcd(st.wMinute);
+	case 2:
+		return hex2bcd(st.wHour);
+	case 3:
+		return hex2bcd(st.wDay);
+	case 4:
+		return hex2bcd(st.wMonth);
+	case 5:
+		return hex2bcd(st.wYear % 100);
+	case 6:
+		return hex2bcd(((st.wDayOfWeek + 2) % 7) + 1);
+	}
+#else /* WIN32 */
+	time_t tt;
+	struct tm *lt;
+
+	tt = time(NULL);
+	lt = localtime(&tt);
+
+	switch (p) {
+	case 0:
+		return hex2bcd(lt->tm_sec);
+	case 1:
+		return hex2bcd(lt->tm_min);
+	case 2:
+		return hex2bcd(lt->tm_hour);
+	case 3:
+		return hex2bcd(lt->tm_mday);
+	case 4:
+		return hex2bcd(lt->tm_mon + 1);
+	case 5:
+		return hex2bcd(lt->tm_year % 100);
+	case 6:
+		return hex2bcd(((lt->tm_wday + 2) % 7) + 1);
+	}
+#endif /* WIN32 */
+	return 0;
+}
+
+#define HAVE_GETTIME
+
+#endif /* defined(WIN32) || (defined(HAVE_TIME) && defined(HAVE_LOCALTIME)) */
+
+UBYTE RTIME_GetByte(void)
+{
+	switch (rtime_state) {
+	case 0:
+		/* Log_print("pretending rtime not busy, returning 0"); */
+		return 0;
+	case 1:
+		rtime_state = 2;
+		return (
+#ifdef HAVE_GETTIME
+			rtime_tmp <= 6 ?
+			gettime(rtime_tmp) :
+#endif
+			regset[rtime_tmp]) >> 4;
+	case 2:
+		rtime_state = 0;
+		return (
+#ifdef HAVE_GETTIME
+			rtime_tmp <= 6 ?
+			gettime(rtime_tmp) :
+#endif
+			regset[rtime_tmp]) & 0x0f;
+	}
+	return 0;
+}
+
+void RTIME_PutByte(UBYTE byte)
+{
+	switch (rtime_state) {
+	case 0:
+		rtime_tmp = byte & 0x0f;
+		rtime_state = 1;
+		break;
+	case 1:
+		rtime_tmp2 = byte << 4;
+		rtime_state = 2;
+		break;
+	case 2:
+		regset[rtime_tmp] = rtime_tmp2 | (byte & 0x0f);
+		rtime_state = 0;
+		break;
+	}
+}
diff --git a/project/jni/application/atari800/src/rtime.h b/project/jni/application/atari800/src/rtime.h
new file mode 100644
index 000000000..7038e4db2
--- /dev/null
+++ b/project/jni/application/atari800/src/rtime.h
@@ -0,0 +1,27 @@
+#ifndef RTIME_H_
+#define RTIME_H_
+/* Emulate ICD R-Time 8 cartridge
+   Copyright 2000 Jason Duerstock <jason@cluephone.com>
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
+
+#include "atari.h"
+
+extern int RTIME_enabled;
+
+int RTIME_Initialise(int *argc, char *argv[]);
+UBYTE RTIME_GetByte(void);
+void RTIME_PutByte(UBYTE byte);
+#endif /* RTIME_H_ */
diff --git a/project/jni/application/atari800/src/screen.c b/project/jni/application/atari800/src/screen.c
new file mode 100644
index 000000000..8e6b12fc3
--- /dev/null
+++ b/project/jni/application/atari800/src/screen.c
@@ -0,0 +1,587 @@
+/*
+ * screen.c - Atari screen handling
+ *
+ * Copyright (c) 2001 Robert Golias and Piotr Fusik
+ * Copyright (C) 2001-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#ifdef HAVE_LIBPNG
+#include <png.h>
+#endif
+
+#include "antic.h"
+#include "atari.h"
+#include "colours.h"
+#include "log.h"
+#include "screen.h"
+#include "sio.h"
+#include "util.h"
+
+#define ATARI_VISIBLE_WIDTH 336
+#define ATARI_LEFT_MARGIN 24
+
+ULONG *Screen_atari = NULL;
+#ifdef DIRTYRECT
+UBYTE *Screen_dirty = NULL;
+#endif
+#ifdef BITPL_SCR
+ULONG *Screen_atari_b = NULL;
+ULONG *Screen_atari1 = NULL;
+ULONG *Screen_atari2 = NULL;
+#endif
+
+/* The area that can been seen is Screen_visible_x1 <= x < Screen_visible_x2,
+   Screen_visible_y1 <= y < Screen_visible_y2.
+   Full Atari screen is 336x240. Screen_WIDTH is 384 only because
+   the code in antic.c sometimes draws more than 336 bytes in a line.
+   Currently Screen_visible variables are used only to place
+   disk led and snailmeter in the corners of the screen.
+*/
+int Screen_visible_x1 = 24;				/* 0 .. Screen_WIDTH */
+int Screen_visible_y1 = 0;				/* 0 .. Screen_HEIGHT */
+int Screen_visible_x2 = 360;			/* 0 .. Screen_WIDTH */
+int Screen_visible_y2 = Screen_HEIGHT;	/* 0 .. Screen_HEIGHT */
+
+int Screen_show_atari_speed = FALSE;
+int Screen_show_disk_led = TRUE;
+int Screen_show_sector_counter = FALSE;
+
+#ifdef HAVE_LIBPNG
+#define DEFAULT_SCREENSHOT_FILENAME_FORMAT "atari%03d.png"
+#else
+#define DEFAULT_SCREENSHOT_FILENAME_FORMAT "atari%03d.pcx"
+#endif
+
+static char screenshot_filename_format[FILENAME_MAX] = DEFAULT_SCREENSHOT_FILENAME_FORMAT;
+static int screenshot_no_max = 1000;
+
+/* converts "foo%bar##.pcx" to "foo%%bar%02d.pcx" */
+static void Screen_SetScreenshotFilenamePattern(const char *p)
+{
+	char *f = screenshot_filename_format;
+	char no_width = '0';
+	screenshot_no_max = 1;
+	/* 9 because sprintf'ed "no" can be 9 digits */
+	while (f < screenshot_filename_format + FILENAME_MAX - 9) {
+		/* replace a sequence of hashes with e.g. "%05d" */
+		if (*p == '#') {
+			if (no_width > '0') /* already seen a sequence of hashes */
+				break;          /* invalid */
+			/* count hashes */
+			do {
+				screenshot_no_max *= 10;
+				p++;
+				no_width++;
+				/* now no_width is the number of hashes seen so far
+				   and p points after the counted hashes */
+			} while (no_width < '9' && *p == '#'); /* no more than 9 hashes */
+			*f++ = '%';
+			*f++ = '0';
+			*f++ = no_width;
+			*f++ = 'd';
+			continue;
+		}
+		if (*p == '%')
+			*f++ = '%'; /* double the percents */
+		*f++ = *p;
+		if (*p == '\0')
+			return; /* ok */
+		p++;
+	}
+	Log_print("Invalid filename pattern for screenshots, using default.");
+	strcpy(screenshot_filename_format, DEFAULT_SCREENSHOT_FILENAME_FORMAT);
+	screenshot_no_max = 1000;
+}
+
+int Screen_Initialise(int *argc, char *argv[])
+{
+	int i;
+	int j;
+	int help_only = FALSE;
+
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = FALSE;			/* error, argument missing! */
+		
+		if (strcmp(argv[i], "-screenshots") == 0) {
+			if (i_a)
+				Screen_SetScreenshotFilenamePattern(argv[++i]);
+			else a_m = TRUE;
+		}
+		if (strcmp(argv[i], "-showspeed") == 0) {
+			Screen_show_atari_speed = TRUE;
+		}
+		else {
+			if (strcmp(argv[i], "-help") == 0) {
+				help_only = TRUE;
+				Log_print("\t-screenshots <p> Set filename pattern for screenshots");
+				Log_print("\t-showspeed       Show percentage of actual speed");
+			}
+			argv[j++] = argv[i];
+		}
+
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return FALSE;
+		}
+	}
+	*argc = j;
+
+	/* don't bother mallocing Screen_atari with just "-help" */
+	if (help_only)
+		return TRUE;
+
+	if (Screen_atari == NULL) { /* platform-specific code can initialize it in theory */
+		Screen_atari = (ULONG *) Util_malloc(Screen_HEIGHT * Screen_WIDTH);
+#ifdef DIRTYRECT
+		Screen_dirty = (UBYTE *) Util_malloc(Screen_HEIGHT * Screen_WIDTH / 8);
+		Screen_EntireDirty();
+#endif
+#ifdef BITPL_SCR
+		Screen_atari_b = (ULONG *) Util_malloc(Screen_HEIGHT * Screen_WIDTH);
+		Screen_atari1 = Screen_atari;
+		Screen_atari2 = Screen_atari_b;
+#endif
+	}
+
+	return TRUE;
+}
+
+#define SMALLFONT_WIDTH    5
+#define SMALLFONT_HEIGHT   7
+#define SMALLFONT_PERCENT  10
+#define SMALLFONT_____ 0x00
+#define SMALLFONT___X_ 0x02
+#define SMALLFONT__X__ 0x04
+#define SMALLFONT__XX_ 0x06
+#define SMALLFONT_X___ 0x08
+#define SMALLFONT_X_X_ 0x0A
+#define SMALLFONT_XX__ 0x0C
+#define SMALLFONT_XXX_ 0x0E
+
+static void SmallFont_DrawChar(UBYTE *screen, int ch, UBYTE color1, UBYTE color2)
+{
+	static const UBYTE font[12][SMALLFONT_HEIGHT] = {
+		{
+			SMALLFONT_____,
+			SMALLFONT__X__,
+			SMALLFONT_X_X_,
+			SMALLFONT_X_X_,
+			SMALLFONT_X_X_,
+			SMALLFONT__X__,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT__X__,
+			SMALLFONT_XX__,
+			SMALLFONT__X__,
+			SMALLFONT__X__,
+			SMALLFONT__X__,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT_XX__,
+			SMALLFONT___X_,
+			SMALLFONT__X__,
+			SMALLFONT_X___,
+			SMALLFONT_XXX_,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT_XX__,
+			SMALLFONT___X_,
+			SMALLFONT__X__,
+			SMALLFONT___X_,
+			SMALLFONT_XX__,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT___X_,
+			SMALLFONT__XX_,
+			SMALLFONT_X_X_,
+			SMALLFONT_XXX_,
+			SMALLFONT___X_,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT_XXX_,
+			SMALLFONT_X___,
+			SMALLFONT_XXX_,
+			SMALLFONT___X_,
+			SMALLFONT_XX__,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT__X__,
+			SMALLFONT_X___,
+			SMALLFONT_XX__,
+			SMALLFONT_X_X_,
+			SMALLFONT__X__,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT_XXX_,
+			SMALLFONT___X_,
+			SMALLFONT__X__,
+			SMALLFONT__X__,
+			SMALLFONT__X__,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT__X__,
+			SMALLFONT_X_X_,
+			SMALLFONT__X__,
+			SMALLFONT_X_X_,
+			SMALLFONT__X__,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT__X__,
+			SMALLFONT_X_X_,
+			SMALLFONT__XX_,
+			SMALLFONT___X_,
+			SMALLFONT__X__,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT_X_X_,
+			SMALLFONT___X_,
+			SMALLFONT__X__,
+			SMALLFONT_X___,
+			SMALLFONT_X_X_,
+			SMALLFONT_____
+		},
+		{
+			SMALLFONT_____,
+			SMALLFONT__X__,
+			SMALLFONT_X_X_,
+			SMALLFONT_X___,
+			SMALLFONT_X_X_,
+			SMALLFONT__X__,
+			SMALLFONT_____
+		}
+	};
+	int y;
+	for (y = 0; y < SMALLFONT_HEIGHT; y++) {
+		int src;
+		int mask;
+		src = font[ch][y];
+		for (mask = 1 << (SMALLFONT_WIDTH - 1); mask != 0; mask >>= 1) {
+			ANTIC_VideoPutByte(screen, (UBYTE) ((src & mask) != 0 ? color1 : color2));
+			screen++;
+		}
+		screen += Screen_WIDTH - SMALLFONT_WIDTH;
+	}
+}
+
+static void SmallFont_DrawInt(UBYTE *screen, int n, UBYTE color1, UBYTE color2)
+{
+	do {
+		SmallFont_DrawChar(screen, n % 10, color1, color2);
+		screen -= SMALLFONT_WIDTH;
+		n /= 10;
+	} while (n > 0);
+}
+
+void Screen_DrawAtariSpeed(double cur_time)
+{
+	if (Screen_show_atari_speed) {
+		static int percent_display = 100;
+		static int last_updated = 0;
+		static double last_time = 0;
+		if ((cur_time - last_time) >= 0.5) {
+			percent_display = (int) (100 * (Atari800_nframes - last_updated) / (cur_time - last_time) / (Atari800_tv_mode == Atari800_TV_PAL ? 50 : 60));
+			last_updated = Atari800_nframes;
+			last_time = cur_time;
+		}
+		/* if (percent_display < 99 || percent_display > 101) */
+		{
+			/* space for 5 digits - up to 99999% Atari speed */
+			UBYTE *screen = (UBYTE *) Screen_atari + Screen_visible_x1 + 5 * SMALLFONT_WIDTH
+			          	+ (Screen_visible_y2 - SMALLFONT_HEIGHT) * Screen_WIDTH;
+			SmallFont_DrawChar(screen, SMALLFONT_PERCENT, 0x0c, 0x00);
+			SmallFont_DrawInt(screen - SMALLFONT_WIDTH, percent_display, 0x0c, 0x00);
+		}
+	}
+}
+
+void Screen_DrawDiskLED(void)
+{
+	if (SIO_last_op_time > 0) {
+		UBYTE *screen;
+		if (SIO_last_drive != 0x60)
+			SIO_last_op_time--;
+		screen = (UBYTE *) Screen_atari + Screen_visible_x2 - SMALLFONT_WIDTH
+			+ (Screen_visible_y2 - SMALLFONT_HEIGHT) * Screen_WIDTH;
+		if (SIO_last_drive == 0x60 || SIO_last_drive == 0x61) {
+			if (Screen_show_disk_led)
+				SmallFont_DrawChar(screen, 11, 0x00, (UBYTE) (SIO_last_op == SIO_LAST_READ ? 0xac : 0x2b));
+		}
+		else {
+			if (Screen_show_disk_led)
+				SmallFont_DrawChar(screen, SIO_last_drive, 0x00, (UBYTE) (SIO_last_op == SIO_LAST_READ ? 0xac : 0x2b));
+		
+			if (Screen_show_sector_counter)
+				SmallFont_DrawInt(screen - SMALLFONT_WIDTH, SIO_last_sector, 0x00, 0x88);
+		}
+	}
+}
+
+void Screen_FindScreenshotFilename(char *buffer)
+{
+	static int no = -1;
+	static int overwrite = FALSE;
+
+	for (;;) {
+		if (++no >= screenshot_no_max) {
+			no = 0;
+			overwrite = TRUE;
+		}
+		sprintf(buffer, screenshot_filename_format, no);
+		if (overwrite)
+			break;
+		if (!Util_fileexists(buffer))
+			break; /* file does not exist - we can create it */
+	}
+}
+
+static void fputw(int x, FILE *fp)
+{
+	fputc(x & 0xff, fp);
+	fputc(x >> 8, fp);
+}
+
+static void Screen_SavePCX(FILE *fp, UBYTE *ptr1, UBYTE *ptr2)
+{
+	int i;
+	int x;
+	int y;
+	UBYTE plane = 16;	/* 16 = Red, 8 = Green, 0 = Blue */
+	UBYTE last;
+	UBYTE count;
+
+	fputc(0xa, fp);   /* pcx signature */
+	fputc(0x5, fp);   /* version 5 */
+	fputc(0x1, fp);   /* RLE encoding */
+	fputc(0x8, fp);   /* bits per pixel */
+	fputw(0, fp);     /* XMin */
+	fputw(0, fp);     /* YMin */
+	fputw(ATARI_VISIBLE_WIDTH - 1, fp); /* XMax */
+	fputw(Screen_HEIGHT - 1, fp);        /* YMax */
+	fputw(0, fp);     /* HRes */
+	fputw(0, fp);     /* VRes */
+	for (i = 0; i < 48; i++)
+		fputc(0, fp); /* EGA color palette */
+	fputc(0, fp);     /* reserved */
+	fputc(ptr2 != NULL ? 3 : 1, fp); /* number of bit planes */
+	fputw(ATARI_VISIBLE_WIDTH, fp);  /* number of bytes per scan line per color plane */
+	fputw(1, fp);     /* palette info */
+	fputw(ATARI_VISIBLE_WIDTH, fp); /* screen resolution */
+	fputw(Screen_HEIGHT, fp);
+	for (i = 0; i < 54; i++)
+		fputc(0, fp);  /* unused */
+
+	for (y = 0; y < Screen_HEIGHT; ) {
+		x = 0;
+		do {
+			last = ptr2 != NULL ? (((Colours_table[*ptr1] >> plane) & 0xff) + ((Colours_table[*ptr2] >> plane) & 0xff)) >> 1 : *ptr1;
+			count = 0xc0;
+			do {
+				ptr1++;
+				if (ptr2 != NULL)
+					ptr2++;
+				count++;
+				x++;
+			} while (last == (ptr2 != NULL ? (((Colours_table[*ptr1] >> plane) & 0xff) + ((Colours_table[*ptr2] >> plane) & 0xff)) >> 1 : *ptr1)
+						&& count < 0xff && x < ATARI_VISIBLE_WIDTH);
+			if (count > 0xc1 || last >= 0xc0)
+				fputc(count, fp);
+			fputc(last, fp);
+		} while (x < ATARI_VISIBLE_WIDTH);
+
+		if (ptr2 != NULL && plane) {
+			ptr1 -= ATARI_VISIBLE_WIDTH;
+			ptr2 -= ATARI_VISIBLE_WIDTH;
+			plane -= 8;
+		}
+		else {
+			ptr1 += Screen_WIDTH - ATARI_VISIBLE_WIDTH;
+			if (ptr2 != NULL) {
+				ptr2 += Screen_WIDTH - ATARI_VISIBLE_WIDTH;
+				plane = 16;
+			}
+			y++;
+		}
+	}
+
+	if (ptr2 == NULL) {
+		/* write palette */
+		fputc(0xc, fp);
+		for (i = 0; i < 256; i++) {
+			fputc(Colours_GetR(i), fp);
+			fputc(Colours_GetG(i), fp);
+			fputc(Colours_GetB(i), fp);
+		}
+	}
+}
+
+static int striendswith(const char *s1, const char *s2)
+{
+	int pos;
+	pos = strlen(s1) - strlen(s2);
+	if (pos < 0)
+		return 0;
+	return Util_stricmp(s1 + pos, s2) == 0;
+}
+
+#ifdef HAVE_LIBPNG
+static void Screen_SavePNG(FILE *fp, UBYTE *ptr1, UBYTE *ptr2)
+{
+	png_structp png_ptr;
+	png_infop info_ptr;
+	png_bytep rows[Screen_HEIGHT];
+
+	png_ptr = png_create_write_struct(
+		PNG_LIBPNG_VER_STRING,
+		NULL, NULL, NULL
+	);
+	if (png_ptr == NULL)
+		return;
+	info_ptr = png_create_info_struct(png_ptr);
+	if (info_ptr == NULL)
+		return;
+	png_init_io(png_ptr, fp);
+	png_set_IHDR(
+		png_ptr, info_ptr, ATARI_VISIBLE_WIDTH, Screen_HEIGHT,
+		8, ptr2 == NULL ? PNG_COLOR_TYPE_PALETTE : PNG_COLOR_TYPE_RGB,
+		PNG_INTERLACE_NONE,
+		PNG_COMPRESSION_TYPE_DEFAULT,
+		PNG_FILTER_TYPE_DEFAULT
+	);
+	if (ptr2 == NULL) {
+		int i;
+		png_color palette[256];
+		for (i = 0; i < 256; i++) {
+			palette[i].red = Colours_GetR(i);
+			palette[i].green = Colours_GetG(i);
+			palette[i].blue = Colours_GetB(i);
+		}
+		png_set_PLTE(png_ptr, info_ptr, palette, 256);
+		for (i = 0; i < Screen_HEIGHT; i++) {
+			rows[i] = ptr1;
+			ptr1 += Screen_WIDTH;
+		}
+	}
+	else {
+		png_bytep ptr3;
+		int x;
+		int y;
+		ptr3 = (png_bytep) Util_malloc(3 * ATARI_VISIBLE_WIDTH * Screen_HEIGHT);
+		for (y = 0; y < Screen_HEIGHT; y++) {
+			rows[y] = ptr3;
+			for (x = 0; x < ATARI_VISIBLE_WIDTH; x++) {
+				*ptr3++ = (png_byte) ((Colours_GetR(*ptr1) + Colours_GetR(*ptr2)) >> 1);
+				*ptr3++ = (png_byte) ((Colours_GetG(*ptr1) + Colours_GetG(*ptr2)) >> 1);
+				*ptr3++ = (png_byte) ((Colours_GetB(*ptr1) + Colours_GetB(*ptr2)) >> 1);
+				ptr1++;
+				ptr2++;
+			}
+			ptr1 += Screen_WIDTH - ATARI_VISIBLE_WIDTH;
+			ptr2 += Screen_WIDTH - ATARI_VISIBLE_WIDTH;
+		}
+	}
+	png_set_rows(png_ptr, info_ptr, rows);
+	png_write_png(png_ptr, info_ptr, PNG_TRANSFORM_IDENTITY, NULL);
+	png_destroy_write_struct(&png_ptr, &info_ptr);
+	if (ptr2 != NULL)
+		free(rows[0]);
+}
+#endif /* HAVE_LIBPNG */
+
+int Screen_SaveScreenshot(const char *filename, int interlaced)
+{
+	int is_png;
+	FILE *fp;
+	ULONG *main_screen_atari;
+	UBYTE *ptr1;
+	UBYTE *ptr2;
+	if (striendswith(filename, ".pcx"))
+		is_png = 0;
+#ifdef HAVE_LIBPNG
+	else if (striendswith(filename, ".png"))
+		is_png = 1;
+#endif
+	else
+		return FALSE;
+	fp = fopen(filename, "wb");
+	if (fp == NULL)
+		return FALSE;
+	main_screen_atari = Screen_atari;
+	ptr1 = (UBYTE *) Screen_atari + ATARI_LEFT_MARGIN;
+	if (interlaced) {
+		Screen_atari = (ULONG *) Util_malloc(Screen_WIDTH * Screen_HEIGHT);
+		ptr2 = (UBYTE *) Screen_atari + ATARI_LEFT_MARGIN;
+		ANTIC_Frame(TRUE); /* draw on Screen_atari */
+	}
+	else {
+		ptr2 = NULL;
+	}
+#ifdef HAVE_LIBPNG
+	if (is_png)
+		Screen_SavePNG(fp, ptr1, ptr2);
+	else
+#endif
+		Screen_SavePCX(fp, ptr1, ptr2);
+	fclose(fp);
+	if (interlaced) {
+		free(Screen_atari);
+		Screen_atari = main_screen_atari;
+	}
+	return TRUE;
+}
+
+void Screen_SaveNextScreenshot(int interlaced)
+{
+	char filename[FILENAME_MAX];
+	Screen_FindScreenshotFilename(filename);
+	Screen_SaveScreenshot(filename, interlaced);
+}
+
+void Screen_EntireDirty(void)
+{
+#ifdef DIRTYRECT
+	memset(Screen_dirty, 1, Screen_WIDTH * Screen_HEIGHT / 8);
+#endif /* DIRTYRECT */
+}
diff --git a/project/jni/application/atari800/src/screen.h b/project/jni/application/atari800/src/screen.h
new file mode 100644
index 000000000..3544c6261
--- /dev/null
+++ b/project/jni/application/atari800/src/screen.h
@@ -0,0 +1,45 @@
+#ifndef SCREEN_H_
+#define SCREEN_H_
+
+#include "atari.h"  /* UBYTE */
+
+#ifdef DIRTYRECT
+#ifndef CLIENTUPDATE
+extern UBYTE *Screen_dirty;
+#endif /* CLIENTUPDATE */
+#endif /* DIRTYRECT */
+
+extern ULONG *Screen_atari;
+
+/* Dimensions of Screen_atari.
+   Screen_atari is Screen_WIDTH * Screen_HEIGHT bytes.
+   Each byte is an Atari color code - use Colours_Get[RGB] functions
+   to get actual RGB codes.
+   You should never display anything outside the middle 336 columns. */
+#define Screen_WIDTH  384
+#define Screen_HEIGHT 240
+
+#ifdef BITPL_SCR
+extern ULONG *Screen_atari_b;
+extern ULONG *Screen_atari1;
+extern ULONG *Screen_atari2;
+#endif
+
+extern int Screen_visible_x1;
+extern int Screen_visible_y1;
+extern int Screen_visible_x2;
+extern int Screen_visible_y2;
+
+extern int Screen_show_atari_speed;
+extern int Screen_show_disk_led;
+extern int Screen_show_sector_counter;
+
+int Screen_Initialise(int *argc, char *argv[]);
+void Screen_DrawAtariSpeed(double);
+void Screen_DrawDiskLED(void);
+void Screen_FindScreenshotFilename(char *buffer);
+int Screen_SaveScreenshot(const char *filename, int interlaced);
+void Screen_SaveNextScreenshot(int interlaced);
+void Screen_EntireDirty(void);
+
+#endif /* SCREEN_H_ */
diff --git a/project/jni/application/atari800/src/sio.c b/project/jni/application/atari800/src/sio.c
new file mode 100644
index 000000000..a3f84dd4f
--- /dev/null
+++ b/project/jni/application/atari800/src/sio.c
@@ -0,0 +1,1329 @@
+/*
+ * sio.c - Serial I/O emulation
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "afile.h"
+#include "antic.h"  /* ANTIC_ypos */
+#include "atari.h"
+#include "binload.h"
+#include "cassette.h"
+#include "compfile.h"
+#include "cpu.h"
+#include "esc.h"
+#include "log.h"
+#include "memory.h"
+#include "platform.h"
+#include "pokey.h"
+#include "pokeysnd.h"
+#include "sio.h"
+#include "util.h"
+#ifndef BASIC
+#include "statesav.h"
+#endif
+
+/* If ATR image is in double density (256 bytes per sector),
+   then the boot sectors (sectors 1-3) can be:
+   - logical (as seen by Atari) - 128 bytes in each sector
+   - physical (as stored on the disk) - 256 bytes in each sector.
+     Only the first half of sector is used for storing data, the rest is zero.
+   - SIO2PC (the type used by the SIO2PC program) - 3 * 128 bytes for data
+     of boot sectors, then 3 * 128 unused bytes (zero)
+   The XFD images in double density have either logical or physical
+   boot sectors. */
+#define BOOT_SECTORS_LOGICAL	0
+#define BOOT_SECTORS_PHYSICAL	1
+#define BOOT_SECTORS_SIO2PC		2
+static int boot_sectors_type[SIO_MAX_DRIVES];
+
+static int image_type[SIO_MAX_DRIVES];
+#define IMAGE_TYPE_XFD 0
+#define IMAGE_TYPE_ATR 1
+#define IMAGE_TYPE_PRO 2
+static FILE *disk[SIO_MAX_DRIVES] = { NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL };
+static int sectorcount[SIO_MAX_DRIVES];
+static int sectorsize[SIO_MAX_DRIVES];
+/* these two are used by the 1450XLD parallel disk device */
+int SIO_format_sectorcount[SIO_MAX_DRIVES];
+int SIO_format_sectorsize[SIO_MAX_DRIVES];
+static int io_success[SIO_MAX_DRIVES];
+/* stores dup sector counter for PRO images */
+typedef struct tagpro_additional_info_t {
+	int max_sector;
+	unsigned char *count;
+} pro_additional_info_t;
+static void *additional_info[SIO_MAX_DRIVES];
+
+SIO_UnitStatus SIO_drive_status[SIO_MAX_DRIVES];
+char SIO_filename[SIO_MAX_DRIVES][FILENAME_MAX];
+
+Util_tmpbufdef(static, sio_tmpbuf[SIO_MAX_DRIVES])
+
+int SIO_last_op;
+int SIO_last_op_time = 0;
+int SIO_last_drive;
+int SIO_last_sector;
+char SIO_status[256];
+
+/* Serial I/O emulation support */
+#define SIO_NoFrame         (0x00)
+#define SIO_CommandFrame    (0x01)
+#define SIO_StatusRead      (0x02)
+#define SIO_ReadFrame       (0x03)
+#define SIO_WriteFrame      (0x04)
+#define SIO_FinalStatus     (0x05)
+#define SIO_FormatFrame     (0x06)
+#define SIO_CasRead         (0x60)
+#define SIO_CasWrite        (0x61)
+static UBYTE CommandFrame[6];
+static int CommandIndex = 0;
+static UBYTE DataBuffer[256 + 3];
+static int DataIndex = 0;
+static int TransferStatus = SIO_NoFrame;
+static int ExpectedBytes = 0;
+
+int ignore_header_writeprotect = FALSE;
+
+int SIO_Initialise(int *argc, char *argv[])
+{
+	int i;
+	for (i = 0; i < SIO_MAX_DRIVES; i++) {
+		strcpy(SIO_filename[i], "Off");
+		SIO_drive_status[i] = SIO_OFF;
+		SIO_format_sectorsize[i] = 128;
+		SIO_format_sectorcount[i] = 720;
+	}
+	TransferStatus = SIO_NoFrame;
+
+	return TRUE;
+}
+
+/* umount disks so temporary files are deleted */
+void SIO_Exit(void)
+{
+	int i;
+	for (i = 1; i <= SIO_MAX_DRIVES; i++)
+		SIO_Dismount(i);
+}
+
+int SIO_Mount(int diskno, const char *filename, int b_open_readonly)
+{
+	FILE *f = NULL;
+	SIO_UnitStatus status = SIO_READ_WRITE;
+	struct AFILE_ATR_Header header;
+
+	/* avoid overruns in SIO_filename[] */
+	if (strlen(filename) >= FILENAME_MAX)
+		return FALSE;
+
+	/* release previous disk */
+	SIO_Dismount(diskno);
+
+	/* open file */
+	if (!b_open_readonly)
+		f = Util_fopen(filename, "rb+", sio_tmpbuf[diskno - 1]);
+	if (f == NULL) {
+		f = Util_fopen(filename, "rb", sio_tmpbuf[diskno - 1]);
+		if (f == NULL)
+			return FALSE;
+		status = SIO_READ_ONLY;
+	}
+
+	/* read header */
+	if (fread(&header, 1, sizeof(struct AFILE_ATR_Header), f) != sizeof(struct AFILE_ATR_Header)) {
+		fclose(f);
+		return FALSE;
+	}
+
+	/* detect compressed image and uncompress */
+	switch (header.magic1) {
+	case 0xf9:
+	case 0xfa:
+		/* DCM */
+		{
+			FILE *f2 = Util_tmpopen(sio_tmpbuf[diskno - 1]);
+			if (f2 == NULL)
+				return FALSE;
+			Util_rewind(f);
+			if (!CompFile_DCMtoATR(f, f2)) {
+				Util_fclose(f2, sio_tmpbuf[diskno - 1]);
+				fclose(f);
+				return FALSE;
+			}
+			fclose(f);
+			f = f2;
+		}
+		Util_rewind(f);
+		if (fread(&header, 1, sizeof(struct AFILE_ATR_Header), f) != sizeof(struct AFILE_ATR_Header)) {
+			Util_fclose(f, sio_tmpbuf[diskno - 1]);
+			return FALSE;
+		}
+		status = SIO_READ_ONLY;
+		/* XXX: status = b_open_readonly ? SIO_READ_ONLY : SIO_READ_WRITE; */
+		break;
+	case 0x1f:
+		if (header.magic2 == 0x8b) {
+			/* ATZ/ATR.GZ, XFZ/XFD.GZ */
+			fclose(f);
+			f = Util_tmpopen(sio_tmpbuf[diskno - 1]);
+			if (f == NULL)
+				return FALSE;
+			if (!CompFile_ExtractGZ(filename, f)) {
+				Util_fclose(f, sio_tmpbuf[diskno - 1]);
+				return FALSE;
+			}
+			Util_rewind(f);
+			if (fread(&header, 1, sizeof(struct AFILE_ATR_Header), f) != sizeof(struct AFILE_ATR_Header)) {
+				Util_fclose(f, sio_tmpbuf[diskno - 1]);
+				return FALSE;
+			}
+			status = SIO_READ_ONLY;
+			/* XXX: status = b_open_readonly ? SIO_READ_ONLY : SIO_READ_WRITE; */
+		}
+		break;
+	default:
+		break;
+	}
+
+	boot_sectors_type[diskno - 1] = BOOT_SECTORS_LOGICAL;
+
+	if (header.magic1 == AFILE_ATR_MAGIC1 && header.magic2 == AFILE_ATR_MAGIC2) {
+		/* ATR (may be temporary from DCM or ATR/ATR.GZ) */
+		image_type[diskno - 1] = IMAGE_TYPE_ATR;
+
+		sectorsize[diskno - 1] = (header.secsizehi << 8) + header.secsizelo;
+		if (sectorsize[diskno - 1] != 128 && sectorsize[diskno - 1] != 256) {
+			Util_fclose(f, sio_tmpbuf[diskno - 1]);
+			return FALSE;
+		}
+
+		if (header.writeprotect != 0 && !ignore_header_writeprotect)
+			status = SIO_READ_ONLY;
+
+		/* ATR header contains length in 16-byte chunks. */
+		/* First compute number of 128-byte chunks
+		   - it's number of sectors on single density disk */
+		sectorcount[diskno - 1] = ((header.hiseccounthi << 24)
+			+ (header.hiseccountlo << 16)
+			+ (header.seccounthi << 8)
+			+ header.seccountlo) >> 3;
+
+		/* Fix number of sectors if double density */
+		if (sectorsize[diskno - 1] == 256) {
+			if ((sectorcount[diskno - 1] & 1) != 0)
+				/* logical (128-byte) boot sectors */
+				sectorcount[diskno - 1] += 3;
+			else {
+				/* 256-byte boot sectors */
+				/* check if physical or SIO2PC: physical if there's
+				   a non-zero byte in bytes 0x190-0x30f of the ATR file */
+				UBYTE buffer[0x180];
+				int i;
+				fseek(f, 0x190, SEEK_SET);
+				if (fread(buffer, 1, 0x180, f) != 0x180) {
+					Util_fclose(f, sio_tmpbuf[diskno - 1]);
+					return FALSE;
+				}
+				boot_sectors_type[diskno - 1] = BOOT_SECTORS_SIO2PC;
+				for (i = 0; i < 0x180; i++)
+					if (buffer[i] != 0) {
+						boot_sectors_type[diskno - 1] = BOOT_SECTORS_PHYSICAL;
+						break;
+					}
+			}
+			sectorcount[diskno - 1] >>= 1;
+		}
+	}
+	else {
+		int file_length = Util_flen(f);
+		/* check for PRO */
+		if ((file_length-16)%(128+12) == 0 &&
+				(header.magic1*256 + header.magic2 == (file_length-16)/(128+12)) &&
+				header.seccountlo == 'P') {
+			pro_additional_info_t *info;
+			/* .pro is read only for now */
+			if (!b_open_readonly) {
+				fclose(f);
+				f = Util_fopen(filename, "rb", sio_tmpbuf[diskno - 1]);
+				if (f == NULL)
+					return FALSE;
+				status = SIO_READ_ONLY;
+			}
+			image_type[diskno - 1] = IMAGE_TYPE_PRO;
+			sectorsize[diskno - 1] = 128;
+			if (file_length >= 1040*(128+12)+16) {
+				/* assume enhanced density */
+				sectorcount[diskno - 1] = 1040;
+			}
+			else {
+				/* assume single density */
+				sectorcount[diskno - 1] = 720;
+			}
+
+			info = Util_malloc(sizeof(pro_additional_info_t));
+			additional_info[diskno-1] = info;
+			info->count = Util_malloc(sectorcount[diskno - 1]);
+			memset(info->count, 0, sectorcount[diskno -1]);
+			info->max_sector = (file_length-16)/(128+12);
+		}
+		else {
+			/* XFD (may be temporary from XFZ/XFD.GZ) */
+
+			image_type[diskno - 1] = IMAGE_TYPE_XFD;
+
+			if (file_length <= (1040 * 128)) {
+				/* single density */
+				sectorsize[diskno - 1] = 128;
+				sectorcount[diskno - 1] = file_length >> 7;
+			}
+			else {
+				/* double density */
+				sectorsize[diskno - 1] = 256;
+				if ((file_length & 0xff) == 0) {
+					boot_sectors_type[diskno - 1] = BOOT_SECTORS_PHYSICAL;
+					sectorcount[diskno - 1] = file_length >> 8;
+				}
+				else
+					sectorcount[diskno - 1] = (file_length + 0x180) >> 8;
+			}
+		}
+	}
+
+#ifdef DEBUG
+	Log_print("sectorcount = %d, sectorsize = %d",
+		   sectorcount[diskno - 1], sectorsize[diskno - 1]);
+#endif
+	SIO_format_sectorsize[diskno - 1] = sectorsize[diskno - 1];
+	SIO_format_sectorcount[diskno - 1] = sectorcount[diskno - 1];
+	strcpy(SIO_filename[diskno - 1], filename);
+	SIO_drive_status[diskno - 1] = status;
+	disk[diskno - 1] = f;
+	return TRUE;
+}
+
+void SIO_Dismount(int diskno)
+{
+	if (disk[diskno - 1] != NULL) {
+		Util_fclose(disk[diskno - 1], sio_tmpbuf[diskno - 1]);
+		disk[diskno - 1] = NULL;
+		SIO_drive_status[diskno - 1] = SIO_NO_DISK;
+		strcpy(SIO_filename[diskno - 1], "Empty");
+		if (image_type[diskno - 1] == IMAGE_TYPE_PRO) {
+			free(((pro_additional_info_t *)additional_info[diskno-1])->count);
+		}
+		free(additional_info[diskno - 1]);
+		additional_info[diskno - 1] = 0;
+	}
+}
+
+void SIO_DisableDrive(int diskno)
+{
+	SIO_Dismount(diskno);
+	SIO_drive_status[diskno - 1] = SIO_OFF;
+	strcpy(SIO_filename[diskno - 1], "Off");
+}
+
+void SIO_SizeOfSector(UBYTE unit, int sector, int *sz, ULONG *ofs)
+{
+	int size;
+	ULONG offset;
+	int header_size = (image_type[unit] == IMAGE_TYPE_ATR ? 16 : 0);
+
+	if (BINLOAD_start_binloading) {
+		if (sz)
+			*sz = 128;
+		if (ofs)
+			*ofs = 0;
+		return;
+	}
+
+	if (image_type[unit] == IMAGE_TYPE_PRO) {
+		size = 128;
+		offset = 16 + (128+12)*(sector -1); /* returns offset of header */
+	}
+	else if (sector < 4) {
+		/* special case for first three sectors in ATR and XFD image */
+		size = 128;
+		offset = header_size + (sector - 1) * (boot_sectors_type[unit] == BOOT_SECTORS_PHYSICAL ? 256 : 128);
+	}
+	else {
+		size = sectorsize[unit];
+		offset = header_size + (boot_sectors_type[unit] == BOOT_SECTORS_LOGICAL ? 0x180 : 0x300) + (sector - 4) * size;
+	}
+
+	if (sz)
+		*sz = size;
+
+	if (ofs)
+		*ofs = offset;
+}
+
+static int SeekSector(int unit, int sector)
+{
+	ULONG offset;
+	int size;
+
+	SIO_last_sector = sector;
+	sprintf(SIO_status, "%d: %d", unit + 1, sector);
+	SIO_SizeOfSector((UBYTE) unit, sector, &size, &offset);
+	fseek(disk[unit], offset, SEEK_SET);
+
+	return size;
+}
+
+/* Unit counts from zero up */
+int SIO_ReadSector(int unit, int sector, UBYTE *buffer)
+{
+	int size;
+	if (BINLOAD_start_binloading)
+		return BINLOAD_LoaderStart(buffer);
+
+	io_success[unit] = -1;
+	if (SIO_drive_status[unit] == SIO_OFF)
+		return 0;
+	if (disk[unit] == NULL)
+		return 'N';
+	if (sector <= 0 || sector > sectorcount[unit])
+		return 'E';
+	SIO_last_op = SIO_LAST_READ;
+	SIO_last_op_time = 1;
+	SIO_last_drive = unit + 1;
+	/* FIXME: what sector size did the user expect? */
+	size = SeekSector(unit, sector);
+	if (image_type[unit] == IMAGE_TYPE_PRO) {
+		pro_additional_info_t *info;
+		unsigned char *count;
+		info = (pro_additional_info_t *)additional_info[unit];
+		count = info->count;
+		fread(buffer, 1, 12, disk[unit]);
+		/* handle duplicate sectors */
+		if (buffer[5] != 0) {
+			int dupnum = count[sector];
+#ifdef DEBUG_PRO
+			Log_print("duplicate sector:%d dupnum:%d",sector, dupnum);
+#endif
+			count[sector] = (count[sector]+1) % (buffer[5]+1);
+			if (dupnum != 0)  {
+				sector = sectorcount[unit] + buffer[6+dupnum];
+				/* can dupnum be 5? */
+				if (dupnum > 4 || sector <= 0 || sector > info->max_sector) {
+					Log_print("Error in .pro image: sector:%d dupnum:%d", sector, dupnum);
+					return 'E';
+				}
+				size = SeekSector(unit, sector);
+				/* read sector header */
+				fread(buffer, 1, 12, disk[unit]);
+			}
+		}
+		/* bad sector */
+		if (buffer[1] != 0xff) {
+			fread(buffer, 1, size, disk[unit]);
+			io_success[unit] = sector;
+#ifdef DEBUG_PRO
+			Log_print("bad sector:%d", sector);
+#endif
+			return 'E';
+		}
+	}
+	fread(buffer, 1, size, disk[unit]);
+	io_success[unit] = 0;
+	return 'C';
+}
+
+int SIO_WriteSector(int unit, int sector, const UBYTE *buffer)
+{
+	int size;
+	io_success[unit] = -1;
+	if (SIO_drive_status[unit] == SIO_OFF)
+		return 0;
+	if (disk[unit] == NULL)
+		return 'N';
+	if (SIO_drive_status[unit] != SIO_READ_WRITE || sector <= 0 || sector > sectorcount[unit])
+		return 'E';
+	SIO_last_op = SIO_LAST_WRITE;
+	SIO_last_op_time = 1;
+	SIO_last_drive = unit + 1;
+	size = SeekSector(unit, sector);
+	fwrite(buffer, 1, size, disk[unit]);
+	io_success[unit] = 0;
+	return 'C';
+}
+
+int SIO_FormatDisk(int unit, UBYTE *buffer, int sectsize, int sectcount)
+{
+	char fname[FILENAME_MAX];
+	int is_atr;
+	int save_boot_sectors_type;
+	int bootsectsize;
+	int bootsectcount;
+	FILE *f;
+	int i;
+	io_success[unit] = -1;
+	if (SIO_drive_status[unit] == SIO_OFF)
+		return 0;
+	if (disk[unit] == NULL)
+		return 'N';
+	if (SIO_drive_status[unit] != SIO_READ_WRITE)
+		return 'E';
+	/* Note formatting the disk can change size of the file.
+	   There is no portable way to truncate the file at given position.
+	   We have to close the "rb+" open file and open it in "wb" mode.
+	   First get the information about the disk image, because we are going
+	   to umount it. */
+	memcpy(fname, SIO_filename[unit], FILENAME_MAX);
+	is_atr = (image_type[unit] == IMAGE_TYPE_ATR);
+	save_boot_sectors_type = boot_sectors_type[unit];
+	bootsectsize = 128;
+	if (sectsize == 256 && save_boot_sectors_type != BOOT_SECTORS_LOGICAL)
+		bootsectsize = 256;
+	bootsectcount = sectcount < 3 ? sectcount : 3;
+	/* Umount the file and open it in "wb" mode (it will truncate the file) */
+	SIO_Dismount(unit + 1);
+	f = fopen(fname, "wb");
+	if (f == NULL) {
+		Log_print("SIO_FormatDisk: failed to open %s for writing", fname);
+		return 'E';
+	}
+	/* Write ATR header if necessary */
+	if (is_atr) {
+		struct AFILE_ATR_Header header;
+		ULONG disksize = (bootsectsize * bootsectcount + sectsize * (sectcount - bootsectcount)) >> 4;
+		memset(&header, 0, sizeof(header));
+		header.magic1 = AFILE_ATR_MAGIC1;
+		header.magic2 = AFILE_ATR_MAGIC2;
+		header.secsizelo = (UBYTE) sectsize;
+		header.secsizehi = (UBYTE) (sectsize >> 8);
+		header.seccountlo = (UBYTE) disksize;
+		header.seccounthi = (UBYTE) (disksize >> 8);
+		header.hiseccountlo = (UBYTE) (disksize >> 16);
+		header.hiseccounthi = (UBYTE) (disksize >> 24);
+		fwrite(&header, 1, sizeof(header), f);
+	}
+	/* Write boot sectors */
+	memset(buffer, 0, sectsize);
+	for (i = 1; i <= bootsectcount; i++)
+		fwrite(buffer, 1, bootsectsize, f);
+	/* Write regular sectors */
+	for ( ; i <= sectcount; i++)
+		fwrite(buffer, 1, sectsize, f);
+	/* Close file and mount the disk back */
+	fclose(f);
+	SIO_Mount(unit + 1, fname, FALSE);
+	/* We want to keep the current PHYSICAL/SIO2PC boot sectors type
+	   (since the image is blank it can't be figured out by SIO_Mount) */
+	if (bootsectsize == 256)
+		boot_sectors_type[unit] = save_boot_sectors_type;
+	/* Return information for Atari (buffer filled with ff's - no bad sectors) */
+	memset(buffer, 0xff, sectsize);
+	io_success[unit] = 0;
+	return 'C';
+}
+
+/* Set density and number of sectors
+   This function is used before the format (0x21) command
+   to set how the disk will be formatted.
+   Note this function does *not* affect the currently attached disk
+   (previously sectorsize/sectorcount were used which could result in
+   a corrupted image).
+*/
+int SIO_WriteStatusBlock(int unit, const UBYTE *buffer)
+{
+	int size;
+#ifdef DEBUG
+	Log_print("Write Status-Block: %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x",
+		buffer[0], buffer[1], buffer[2], buffer[3],
+		buffer[4], buffer[5], buffer[6], buffer[7],
+		buffer[8], buffer[9], buffer[10], buffer[11]);
+#endif
+	if (SIO_drive_status[unit] == SIO_OFF)
+		return 0;
+	/* We only care about the density and the sector count here.
+	   Setting everything else right here seems to be non-sense.
+	   I'm not sure about this density settings, my XF551
+	   honors only the sector size and ignores the density */
+	size = buffer[6] * 256 + buffer[7];
+	if (size == 128 || size == 256)
+		SIO_format_sectorsize[unit] = size;
+	/* Note that the number of heads are minus 1 */
+	SIO_format_sectorcount[unit] = buffer[0] * (buffer[2] * 256 + buffer[3]) * (buffer[4] + 1);
+	if (SIO_format_sectorcount[unit] < 1 || SIO_format_sectorcount[unit] > 65535)
+		SIO_format_sectorcount[unit] = 720;
+	return 'C';
+}
+
+int SIO_ReadStatusBlock(int unit, UBYTE *buffer)
+{
+	UBYTE tracks;
+	UBYTE heads;
+	int spt;
+	if (SIO_drive_status[unit] == SIO_OFF)
+		return 0;
+	/* default to 1 track, 1 side for non-standard images */
+	tracks = 1;
+	heads = 1;
+	spt = sectorcount[unit];
+
+	if (spt % 40 == 0) {
+		/* standard disk */
+		tracks = 40;
+		spt /= 40;
+		if (spt > 26 && spt % 2 == 0) {
+			/* double-sided */
+			heads = 2;
+			spt >>= 1;
+			if (spt > 26 && spt % 2 == 0) {
+				/* double-sided, 80 tracks */
+				tracks = 80;
+				spt >>= 1;
+			}
+		}
+	}
+
+	buffer[0] = tracks;              /* # of tracks */
+	buffer[1] = 1;                   /* step rate */
+	buffer[2] = (UBYTE) (spt >> 8);  /* sectors per track. HI byte */
+	buffer[3] = (UBYTE) spt;         /* sectors per track. LO byte */
+	buffer[4] = (UBYTE) (heads - 1); /* # of heads minus 1 */
+	/* FM for single density, MFM otherwise */
+	buffer[5] = (sectorsize[unit] == 128 && sectorcount[unit] <= 720) ? 0 : 4;
+	buffer[6] = (UBYTE) (sectorsize[unit] >> 8); /* bytes per sector. HI byte */
+	buffer[7] = (UBYTE) sectorsize[unit];        /* bytes per sector. LO byte */
+	buffer[8] = 1;                   /* drive is online */
+	buffer[9] = 192;                 /* transfer speed, whatever this means */
+	buffer[10] = 0;
+	buffer[11] = 0;
+	return 'C';
+}
+
+/*
+   Status Request from Atari 400/800 Technical Reference Notes
+
+   DVSTAT + 0   Command Status
+   DVSTAT + 1   Hardware Status
+   DVSTAT + 2   Timeout
+   DVSTAT + 3   Unused
+
+   Command Status Bits
+
+   Bit 0 = 1 indicates an invalid command frame was received
+   Bit 1 = 1 indicates an invalid data frame was received
+   Bit 2 = 1 indicates that last read/write operation was unsuccessful
+   Bit 3 = 1 indicates that the diskette is write protected
+   Bit 4 = 1 indicates active/standby
+
+   plus
+
+   Bit 5 = 1 indicates double density
+   Bit 7 = 1 indicates dual density disk (1050 format)
+ */
+int SIO_DriveStatus(int unit, UBYTE *buffer)
+{
+	if (BINLOAD_start_binloading) {
+		buffer[0] = 16 + 8;
+		buffer[1] = 255;
+		buffer[2] = 1;
+		buffer[3] = 0 ;
+		return 'C';
+	}
+
+	if (SIO_drive_status[unit] == SIO_OFF)
+		return 0;
+
+	/* .PRO contains status information in the sector header */
+	if (io_success[unit] != 0  && image_type[unit] == IMAGE_TYPE_PRO) {
+		int sector = io_success[unit];
+		SeekSector(unit, sector);
+		fread(buffer, 1, 4, disk[unit]);
+		return 'C';
+	}
+	buffer[0] = 16;         /* drive active */
+	buffer[1] = disk[unit] != NULL ? 255 /* WD 177x OK */ : 127 /* no disk */;
+	if (io_success[unit] != 0)
+		buffer[0] |= 4;     /* failed RW-operation */
+	if (SIO_drive_status[unit] == SIO_READ_ONLY)
+		buffer[0] |= 8;     /* write protection */
+	if (SIO_format_sectorsize[unit] == 256)
+		buffer[0] |= 32;    /* double density */
+	if (SIO_format_sectorcount[unit] == 1040)
+		buffer[0] |= 128;   /* 1050 enhanced density */
+	buffer[2] = 1;
+	buffer[3] = 0;
+	return 'C';
+}
+
+#ifndef NO_SECTOR_DELAY
+/* A hack for the "Overmind" demo.  This demo verifies if sectors aren't read
+   faster than with a typical disk drive.  We introduce a delay
+   of SECTOR_DELAY scanlines between successive reads of sector 1. */
+#define SECTOR_DELAY 3200
+static int delay_counter = 0;
+static int last_ypos = 0;
+#endif
+
+/* SIO patch emulation routine */
+void SIO_Handler(void)
+{
+	int sector = MEMORY_dGetWordAligned(0x30a);
+	UBYTE unit = (MEMORY_dGetByte(0x300) + MEMORY_dGetByte(0x301) + 0xff ) - 0x31;
+	UBYTE result = 0x00;
+	UWORD data = MEMORY_dGetWordAligned(0x304);
+	int length = MEMORY_dGetWordAligned(0x308);
+	int realsize = 0;
+	int cmd = MEMORY_dGetByte(0x302);
+
+	if ((unsigned int)MEMORY_dGetByte(0x300) + (unsigned int)MEMORY_dGetByte(0x301) > 0xff) {
+		/* carry */
+		unit++;
+	}
+	/* A real atari just adds the bytes and 0xff. The result could wrap.*/
+	/* XL OS: E99D: LDA $0300 ADC $0301 ADC #$FF STA 023A */
+	/* Disk 1 is ASCII '1' = 0x31 etc */
+	/* Disk 1 -> unit = 0 */
+	if (MEMORY_dGetByte(0x300) != 0x60 && unit < SIO_MAX_DRIVES) {	/* UBYTE range ! */
+#ifdef DEBUG
+		Log_print("SIO disk command is %02x %02x %02x %02x %02x   %02x %02x %02x %02x %02x %02x",
+			cmd, MEMORY_dGetByte(0x303), MEMORY_dGetByte(0x304), MEMORY_dGetByte(0x305), MEMORY_dGetByte(0x306),
+			MEMORY_dGetByte(0x308), MEMORY_dGetByte(0x309), MEMORY_dGetByte(0x30a), MEMORY_dGetByte(0x30b),
+			MEMORY_dGetByte(0x30c), MEMORY_dGetByte(0x30d));
+#endif
+		switch (cmd) {
+		case 0x4e:				/* Read Status Block */
+			if (12 == length) {
+				result = SIO_ReadStatusBlock(unit, DataBuffer);
+				if (result == 'C')
+					MEMORY_CopyToMem(DataBuffer, data, 12);
+			}
+			else
+				result = 'E';
+			break;
+		case 0x4f:				/* Write Status Block */
+			if (12 == length) {
+				MEMORY_CopyFromMem(data, DataBuffer, 12);
+				result = SIO_WriteStatusBlock(unit, DataBuffer);
+			}
+			else
+				result = 'E';
+			break;
+		case 0x50:				/* Write */
+		case 0x57:
+		case 0xD0:				/* xf551 hispeed */
+		case 0xD7:
+			SIO_SizeOfSector(unit, sector, &realsize, NULL);
+			if (realsize == length) {
+				MEMORY_CopyFromMem(data, DataBuffer, realsize);
+				result = SIO_WriteSector(unit, sector, DataBuffer);
+			}
+			else
+				result = 'E';
+			break;
+		case 0x52:				/* Read */
+		case 0xD2:				/* xf551 hispeed */
+#ifndef NO_SECTOR_DELAY
+			if (sector == 1) {
+				if (delay_counter > 0) {
+					if (last_ypos != ANTIC_ypos) {
+						last_ypos = ANTIC_ypos;
+						delay_counter--;
+					}
+					CPU_regPC = 0xe459;	/* stay at SIO patch */
+					return;
+				}
+				delay_counter = SECTOR_DELAY;
+			}
+			else {
+				delay_counter = 0;
+			}
+#endif
+			SIO_SizeOfSector(unit, sector, &realsize, NULL);
+			if (realsize == length) {
+				result = SIO_ReadSector(unit, sector, DataBuffer);
+				if (result == 'C')
+					MEMORY_CopyToMem(DataBuffer, data, realsize);
+			}
+			else
+				result = 'E';
+			break;
+		case 0x53:				/* Status */
+			if (4 == length) {
+				result = SIO_DriveStatus(unit, DataBuffer);
+				MEMORY_CopyToMem(DataBuffer, data, 4);
+			}
+			else
+				result = 'E';
+			break;
+		/*case 0x66:*/			/* US Doubler Format - I think! */
+		case 0x21:				/* Format Disk */
+		case 0xA1:				/* xf551 hispeed */
+			realsize = SIO_format_sectorsize[unit];
+			if (realsize == length) {
+				result = SIO_FormatDisk(unit, DataBuffer, realsize, SIO_format_sectorcount[unit]);
+				if (result == 'C')
+					MEMORY_CopyToMem(DataBuffer, data, realsize);
+			}
+			else {
+				/* there are programs which send the format-command but don't wait for the result (eg xf-tools) */
+				SIO_FormatDisk(unit, DataBuffer, realsize, SIO_format_sectorcount[unit]);
+				result = 'E';
+			}
+			break;
+		case 0x22:				/* Enhanced Density Format */
+		case 0xA2:				/* xf551 hispeed */
+			realsize = 128;
+			if (realsize == length) {
+				result = SIO_FormatDisk(unit, DataBuffer, 128, 1040);
+				if (result == 'C')
+					MEMORY_CopyToMem(DataBuffer, data, realsize);
+			}
+			else {
+				SIO_FormatDisk(unit, DataBuffer, 128, 1040);
+				result = 'E';
+			}
+			break;
+		default:
+			result = 'N';
+		}
+	}
+	/* cassette i/o */
+	else if (MEMORY_dGetByte(0x300) == 0x60) {
+		int storagelength = 0;
+		UBYTE gaps = MEMORY_dGetByte(0x30b);
+		switch (cmd){
+		case 0x52:	/* read */
+			/* set expected Gap */
+			CASSETTE_AddGap(gaps == 0 ? 2000 : 160);
+			SIO_last_op = SIO_LAST_READ;
+			SIO_last_drive = 0x61;
+			SIO_last_op_time = 0x10;
+			/* get record from storage medium */
+			storagelength = CASSETTE_Read();
+			if (storagelength - 1 != length)	/* includes -1 as error */
+				result = 'E';
+			else
+				result = 'C';
+			/* check checksum */
+			if (CASSETTE_buffer[length] != SIO_ChkSum(CASSETTE_buffer, length))
+				result = 'E';
+			/* if all went ok, copy to Atari */
+			if (result == 'C')
+				MEMORY_CopyToMem(CASSETTE_buffer, data, length);
+			break;
+		case 0x57:	/* write */
+			SIO_last_op = SIO_LAST_WRITE;
+			SIO_last_drive = 0x61;
+			SIO_last_op_time = 0x10;
+			/* put record into buffer */
+			MEMORY_CopyFromMem(data, CASSETTE_buffer, length);
+			/* eval checksum over buffer data */
+			CASSETTE_buffer[length] = SIO_ChkSum(CASSETTE_buffer, length);
+			/* add pregap length */
+			CASSETTE_AddGap(gaps == 0 ? 3000 : 260);
+			/* write full record to storage medium */
+			storagelength = CASSETTE_Write(length + 1);
+			if (storagelength - 1 != length)	/* includes -1 as error */
+				result = 'E';
+			else
+				result = 'C';
+			break;
+		default:
+			result = 'N';
+		}
+	}
+
+	switch (result) {
+	case 0x00:					/* Device disabled, generate timeout */
+		CPU_regY = 138;
+		CPU_SetN;
+		break;
+	case 'A':					/* Device acknowledge */
+	case 'C':					/* Operation complete */
+		CPU_regY = 1;
+		CPU_ClrN;
+		break;
+	case 'N':					/* Device NAK */
+		CPU_regY = 144;
+		CPU_SetN;
+		break;
+	case 'E':					/* Device error */
+	default:
+		CPU_regY = 146;
+		CPU_SetN;
+		break;
+	}
+	CPU_regA = 0;	/* MMM */
+	MEMORY_dPutByte(0x0303, CPU_regY);
+	MEMORY_dPutByte(0x42,0);
+	CPU_SetC;
+}
+
+UBYTE SIO_ChkSum(const UBYTE *buffer, int length)
+{
+#if 0
+	/* old, less efficient version */
+	int i;
+	int checksum = 0;
+	for (i = 0; i < length; i++, buffer++) {
+		checksum += *buffer;
+		while (checksum > 255)
+			checksum -= 255;
+	}
+#else
+	int checksum = 0;
+	while (--length >= 0)
+		checksum += *buffer++;
+	do
+		checksum = (checksum & 0xff) + (checksum >> 8);
+	while (checksum > 255);
+#endif
+	return checksum;
+}
+
+static UBYTE Command_Frame(void)
+{
+	int unit;
+	int sector;
+	int realsize;
+
+	sector = CommandFrame[2] | (((UWORD) CommandFrame[3]) << 8);
+	unit = CommandFrame[0] - '1';
+
+	if (unit < 0 || unit >= SIO_MAX_DRIVES) {
+		/* Unknown device */
+		Log_print("Unknown command frame: %02x %02x %02x %02x %02x",
+			   CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			   CommandFrame[3], CommandFrame[4]);
+		TransferStatus = SIO_NoFrame;
+		return 0;
+	}
+	switch (CommandFrame[1]) {
+	case 0x4e:				/* Read Status */
+#ifdef DEBUG
+		Log_print("Read-status frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		DataBuffer[0] = SIO_ReadStatusBlock(unit, DataBuffer + 1);
+		DataBuffer[13] = SIO_ChkSum(DataBuffer + 1, 12);
+		DataIndex = 0;
+		ExpectedBytes = 14;
+		TransferStatus = SIO_ReadFrame;
+		POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL;
+		return 'A';
+	case 0x4f:				/* Write status */
+#ifdef DEBUG
+		Log_print("Write-status frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		ExpectedBytes = 13;
+		DataIndex = 0;
+		TransferStatus = SIO_WriteFrame;
+		return 'A';
+	case 0x50:				/* Write */
+	case 0x57:
+	case 0xD0:				/* xf551 hispeed */
+	case 0xD7:
+#ifdef DEBUG
+		Log_print("Write-sector frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		SIO_SizeOfSector((UBYTE) unit, sector, &realsize, NULL);
+		ExpectedBytes = realsize + 1;
+		DataIndex = 0;
+		TransferStatus = SIO_WriteFrame;
+		SIO_last_op = SIO_LAST_WRITE;
+		SIO_last_op_time = 10;
+		SIO_last_drive = unit + 1;
+		return 'A';
+	case 0x52:				/* Read */
+	case 0xD2:				/* xf551 hispeed */
+#ifdef DEBUG
+		Log_print("Read-sector frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		SIO_SizeOfSector((UBYTE) unit, sector, &realsize, NULL);
+		DataBuffer[0] = SIO_ReadSector(unit, sector, DataBuffer + 1);
+		DataBuffer[1 + realsize] = SIO_ChkSum(DataBuffer + 1, realsize);
+		DataIndex = 0;
+		ExpectedBytes = 2 + realsize;
+		TransferStatus = SIO_ReadFrame;
+		/* wait longer before confirmation because bytes could be lost */
+		/* before the buffer was set (see $E9FB & $EA37 in XL-OS) */
+		POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL << 2;
+#ifndef NO_SECTOR_DELAY
+		if (sector == 1) {
+			POKEY_DELAYED_SERIN_IRQ += delay_counter;
+			delay_counter = SECTOR_DELAY;
+		}
+		else {
+			delay_counter = 0;
+		}
+#endif
+		SIO_last_op = SIO_LAST_READ;
+		SIO_last_op_time = 10;
+		SIO_last_drive = unit + 1;
+		return 'A';
+	case 0x53:				/* Status */
+#ifdef DEBUG
+		Log_print("Status frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		DataBuffer[0] = SIO_DriveStatus(unit, DataBuffer + 1);
+		DataBuffer[1 + 4] = SIO_ChkSum(DataBuffer + 1, 4);
+		DataIndex = 0;
+		ExpectedBytes = 6;
+		TransferStatus = SIO_ReadFrame;
+		POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL;
+		return 'A';
+	/*case 0x66:*/			/* US Doubler Format - I think! */
+	case 0x21:				/* Format Disk */
+	case 0xa1:				/* xf551 hispeed */
+#ifdef DEBUG
+		Log_print("Format-disk frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		realsize = SIO_format_sectorsize[unit];
+		DataBuffer[0] = SIO_FormatDisk(unit, DataBuffer + 1, realsize, SIO_format_sectorcount[unit]);
+		DataBuffer[1 + realsize] = SIO_ChkSum(DataBuffer + 1, realsize);
+		DataIndex = 0;
+		ExpectedBytes = 2 + realsize;
+		TransferStatus = SIO_FormatFrame;
+		POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL;
+		return 'A';
+	case 0x22:				/* Dual Density Format */
+	case 0xa2:				/* xf551 hispeed */
+#ifdef DEBUG
+		Log_print("Format-Medium frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		DataBuffer[0] = SIO_FormatDisk(unit, DataBuffer + 1, 128, 1040);
+		DataBuffer[1 + 128] = SIO_ChkSum(DataBuffer + 1, 128);
+		DataIndex = 0;
+		ExpectedBytes = 2 + 128;
+		TransferStatus = SIO_FormatFrame;
+		POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL;
+		return 'A';
+	default:
+		/* Unknown command for a disk drive */
+#ifdef DEBUG
+		Log_print("Command frame: %02x %02x %02x %02x %02x",
+			CommandFrame[0], CommandFrame[1], CommandFrame[2],
+			CommandFrame[3], CommandFrame[4]);
+#endif
+		TransferStatus = SIO_NoFrame;
+		return 'E';
+	}
+}
+
+/* Enable/disable the Tape Motor */
+void SIO_TapeMotor(int onoff)
+{
+	/* if sio is patched, do not do anything */
+	if (ESC_enable_sio_patch)
+		return;
+	if (onoff) {
+		/* set frame to cassette frame, if not */
+		/* in a transfer with an intelligent peripheral */
+		if (TransferStatus == SIO_NoFrame || (TransferStatus & 0xfe) == SIO_CasRead) {
+			if (CASSETTE_IsSaveFile()) {
+				TransferStatus = SIO_CasWrite;
+				CASSETTE_TapeMotor(onoff);
+				SIO_last_op = SIO_LAST_WRITE;
+			}
+			else {
+				TransferStatus = SIO_CasRead;
+				CASSETTE_TapeMotor(onoff);
+				POKEY_DELAYED_SERIN_IRQ = CASSETTE_GetInputIRQDelay();
+				SIO_last_op = SIO_LAST_READ;
+			};
+			SIO_last_drive = 0x60;
+			SIO_last_op_time = 0x10;
+		}
+		else {
+			CASSETTE_TapeMotor(onoff);
+		}
+	}
+	else {
+		/* set frame to none */
+		if (TransferStatus == SIO_CasWrite) {
+			TransferStatus = SIO_NoFrame;
+			CASSETTE_TapeMotor(onoff);
+		}
+		else if (TransferStatus == SIO_CasRead) {
+			TransferStatus = SIO_NoFrame;
+			CASSETTE_TapeMotor(onoff);
+			POKEY_DELAYED_SERIN_IRQ = 0; /* off */
+		}
+		else {
+			CASSETTE_TapeMotor(onoff);
+			POKEY_DELAYED_SERIN_IRQ = 0; /* off */
+		}
+		SIO_last_op_time = 0;
+	}
+}
+
+/* Enable/disable the command frame */
+void SIO_SwitchCommandFrame(int onoff)
+{
+	if (onoff) {				/* Enabled */
+		if (TransferStatus != SIO_NoFrame)
+			Log_print("Unexpected command frame at state %x.", TransferStatus);
+		CommandIndex = 0;
+		DataIndex = 0;
+		ExpectedBytes = 5;
+		TransferStatus = SIO_CommandFrame;
+	}
+	else {
+		if (TransferStatus != SIO_StatusRead && TransferStatus != SIO_NoFrame &&
+			TransferStatus != SIO_ReadFrame) {
+			if (!(TransferStatus == SIO_CommandFrame && CommandIndex == 0))
+				Log_print("Command frame %02x unfinished.", TransferStatus);
+			TransferStatus = SIO_NoFrame;
+		}
+		CommandIndex = 0;
+	}
+}
+
+static UBYTE WriteSectorBack(void)
+{
+	UWORD sector;
+	UBYTE unit;
+
+	sector = CommandFrame[2] + (CommandFrame[3] << 8);
+	unit = CommandFrame[0] - '1';
+	if (unit >= SIO_MAX_DRIVES)		/* UBYTE range ! */
+		return 0;
+	switch (CommandFrame[1]) {
+	case 0x4f:				/* Write Status Block */
+		return SIO_WriteStatusBlock(unit, DataBuffer);
+	case 0x50:				/* Write */
+	case 0x57:
+	case 0xD0:				/* xf551 hispeed */
+	case 0xD7:
+		return SIO_WriteSector(unit, sector, DataBuffer);
+	default:
+		return 'E';
+	}
+}
+
+/* Put a byte that comes out of POKEY. So get it here... */
+void SIO_PutByte(int byte)
+{
+	switch (TransferStatus) {
+	case SIO_CommandFrame:
+		if (CommandIndex < ExpectedBytes) {
+			CommandFrame[CommandIndex++] = byte;
+			if (CommandIndex >= ExpectedBytes) {
+				if (CommandFrame[0] >= 0x31 && CommandFrame[0] <= 0x38) {
+					TransferStatus = SIO_StatusRead;
+					POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL + SIO_ACK_INTERVAL;
+				}
+				else
+					TransferStatus = SIO_NoFrame;
+			}
+		}
+		else {
+			Log_print("Invalid command frame!");
+			TransferStatus = SIO_NoFrame;
+		}
+		break;
+	case SIO_WriteFrame:		/* Expect data */
+		if (DataIndex < ExpectedBytes) {
+			DataBuffer[DataIndex++] = byte;
+			if (DataIndex >= ExpectedBytes) {
+				UBYTE sum = SIO_ChkSum(DataBuffer, ExpectedBytes - 1);
+				if (sum == DataBuffer[ExpectedBytes - 1]) {
+					UBYTE result = WriteSectorBack();
+					if (result != 0) {
+						DataBuffer[0] = 'A';
+						DataBuffer[1] = result;
+						DataIndex = 0;
+						ExpectedBytes = 2;
+						POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL + SIO_ACK_INTERVAL;
+						TransferStatus = SIO_FinalStatus;
+					}
+					else
+						TransferStatus = SIO_NoFrame;
+				}
+				else {
+					DataBuffer[0] = 'E';
+					DataIndex = 0;
+					ExpectedBytes = 1;
+					POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL + SIO_ACK_INTERVAL;
+					TransferStatus = SIO_FinalStatus;
+				}
+			}
+		}
+		else {
+			Log_print("Invalid data frame!");
+		}
+		break;
+	case SIO_CasWrite:
+		CASSETTE_PutByte(byte);
+		break;
+	}
+	/* POKEY_DELAYED_SEROUT_IRQ = SIO_SEROUT_INTERVAL; */ /* already set in pokey.c */
+}
+
+/* Get a byte from the floppy to the pokey. */
+int SIO_GetByte(void)
+{
+	int byte = 0;
+
+	switch (TransferStatus) {
+	case SIO_StatusRead:
+		byte = Command_Frame();		/* Handle now the command */
+		break;
+	case SIO_FormatFrame:
+		TransferStatus = SIO_ReadFrame;
+		POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL << 3;
+		/* FALL THROUGH */
+	case SIO_ReadFrame:
+		if (DataIndex < ExpectedBytes) {
+			byte = DataBuffer[DataIndex++];
+			if (DataIndex >= ExpectedBytes) {
+				TransferStatus = SIO_NoFrame;
+			}
+			else {
+				/* set delay using the expected transfer speed */
+				POKEY_DELAYED_SERIN_IRQ = (DataIndex == 1) ? SIO_SERIN_INTERVAL
+					: ((SIO_SERIN_INTERVAL * POKEY_AUDF[POKEY_CHAN3] - 1) / 0x28 + 1);
+			}
+		}
+		else {
+			Log_print("Invalid read frame!");
+			TransferStatus = SIO_NoFrame;
+		}
+		break;
+	case SIO_FinalStatus:
+		if (DataIndex < ExpectedBytes) {
+			byte = DataBuffer[DataIndex++];
+			if (DataIndex >= ExpectedBytes) {
+				TransferStatus = SIO_NoFrame;
+			}
+			else {
+				if (DataIndex == 0)
+					POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL + SIO_ACK_INTERVAL;
+				else
+					POKEY_DELAYED_SERIN_IRQ = SIO_SERIN_INTERVAL;
+			}
+		}
+		else {
+			Log_print("Invalid read frame!");
+			TransferStatus = SIO_NoFrame;
+		}
+		break;
+	case SIO_CasRead:
+		byte = CASSETTE_GetByte();
+		POKEY_DELAYED_SERIN_IRQ = CASSETTE_GetInputIRQDelay();
+		break;
+	default:
+		break;
+	}
+	return byte;
+}
+
+#if !defined(BASIC) && !defined(__PLUS)
+int SIO_RotateDisks(void)
+{
+	char tmp_filenames[SIO_MAX_DRIVES][FILENAME_MAX];
+	int i;
+	int bSuccess = TRUE;
+
+	for (i = 0; i < SIO_MAX_DRIVES; i++) {
+		strcpy(tmp_filenames[i], SIO_filename[i]);
+		SIO_Dismount(i + 1);
+	}
+
+	for (i = 1; i < SIO_MAX_DRIVES; i++) {
+		if (strcmp(tmp_filenames[i], "None") && strcmp(tmp_filenames[i], "Off") && strcmp(tmp_filenames[i], "Empty") ) {
+			if (!SIO_Mount(i, tmp_filenames[i], FALSE)) /* Note that this is NOT i-1 because SIO_Mount is 1 indexed */
+				bSuccess = FALSE;
+		}
+	}
+
+	i = SIO_MAX_DRIVES - 1;
+	while (i > -1 && (!strcmp(tmp_filenames[i], "None") || !strcmp(tmp_filenames[i], "Off") || !strcmp(tmp_filenames[i], "Empty")) ) {
+		i--;
+	}
+
+	if (i > -1)	{
+		if (!SIO_Mount(i + 1, tmp_filenames[0], FALSE))
+			bSuccess = FALSE;
+	}
+
+	return bSuccess;
+}
+#endif /* !defined(BASIC) && !defined(__PLUS) */
+
+#ifndef BASIC
+
+void SIO_StateSave(void)
+{
+	int i;
+
+	for (i = 0; i < 8; i++) {
+		StateSav_SaveINT((int *) &SIO_drive_status[i], 1);
+		StateSav_SaveFNAME(SIO_filename[i]);
+	}
+}
+
+void SIO_StateRead(void)
+{
+	int i;
+
+	for (i = 0; i < 8; i++) {
+		int saved_drive_status;
+		char filename[FILENAME_MAX];
+
+		StateSav_ReadINT(&saved_drive_status, 1);
+		SIO_drive_status[i] = (SIO_UnitStatus)saved_drive_status;
+
+		StateSav_ReadFNAME(filename);
+		if (filename[0] == 0)
+			continue;
+
+		/* If the disk drive wasn't empty or off when saved,
+		   mount the disk */
+		switch (saved_drive_status) {
+		case SIO_READ_ONLY:
+			SIO_Mount(i + 1, filename, TRUE);
+			break;
+		case SIO_READ_WRITE:
+			SIO_Mount(i + 1, filename, FALSE);
+			break;
+		default:
+			break;
+		}
+	}
+}
+
+#endif /* BASIC */
diff --git a/project/jni/application/atari800/src/sio.h b/project/jni/application/atari800/src/sio.h
new file mode 100644
index 000000000..39676b521
--- /dev/null
+++ b/project/jni/application/atari800/src/sio.h
@@ -0,0 +1,63 @@
+#ifndef SIO_H_
+#define SIO_H_
+
+#include "config.h"
+
+#include <stdio.h> /* FILENAME_MAX */
+
+#include "atari.h"
+
+#define SIO_MAX_DRIVES 8
+
+typedef enum SIO_tagUnitStatus {
+	SIO_OFF,
+	SIO_NO_DISK,
+	SIO_READ_ONLY,
+	SIO_READ_WRITE
+} SIO_UnitStatus;
+
+extern char SIO_status[256];
+extern SIO_UnitStatus SIO_drive_status[SIO_MAX_DRIVES];
+extern char SIO_filename[SIO_MAX_DRIVES][FILENAME_MAX];
+
+#define SIO_LAST_READ 0
+#define SIO_LAST_WRITE 1
+extern int SIO_last_op;
+extern int SIO_last_op_time;
+extern int SIO_last_drive; /* 1 .. 8 */
+extern int SIO_last_sector;
+
+int SIO_Mount(int diskno, const char *filename, int b_open_readonly);
+void SIO_Dismount(int diskno);
+void SIO_DisableDrive(int diskno);
+int SIO_RotateDisks(void);
+void SIO_Handler(void);
+
+UBYTE SIO_ChkSum(const UBYTE *buffer, int length);
+void SIO_TapeMotor(int onoff);
+void SIO_SwitchCommandFrame(int onoff);
+void SIO_PutByte(int byte);
+int SIO_GetByte(void);
+int SIO_Initialise(int *argc, char *argv[]);
+void SIO_Exit(void);
+
+/* Some defines about the serial I/O timing. Currently fixed! */
+#define SIO_XMTDONE_INTERVAL  15
+#define SIO_SERIN_INTERVAL     8
+#define SIO_SEROUT_INTERVAL    8
+#define SIO_ACK_INTERVAL      36
+
+/* These functions are also used by the 1450XLD Parallel disk device */
+extern int SIO_format_sectorcount[SIO_MAX_DRIVES];
+extern int SIO_format_sectorsize[SIO_MAX_DRIVES];
+int SIO_ReadStatusBlock(int unit, UBYTE *buffer);
+int SIO_FormatDisk(int unit, UBYTE *buffer, int sectsize, int sectcount);
+void SIO_SizeOfSector(UBYTE unit, int sector, int *sz, ULONG *ofs);
+int SIO_ReadSector(int unit, int sector, UBYTE *buffer);
+int SIO_DriveStatus(int unit, UBYTE *buffer);
+int SIO_WriteStatusBlock(int unit, const UBYTE *buffer);
+int SIO_WriteSector(int unit, int sector, const UBYTE *buffer);
+void SIO_StateSave(void);
+void SIO_StateRead(void);
+
+#endif	/* SIO_H_ */
diff --git a/project/jni/application/atari800/src/sndsave.c b/project/jni/application/atari800/src/sndsave.c
new file mode 100644
index 000000000..89f45c6ed
--- /dev/null
+++ b/project/jni/application/atari800/src/sndsave.c
@@ -0,0 +1,191 @@
+/*
+ * sndsave.c - reading and writing sound to files
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include <stdio.h>
+#include "pokeysnd.h"
+#include "sndsave.h"
+
+/* sndoutput is just the file pointer for the current sound file */
+static FILE *sndoutput = NULL;
+
+static ULONG byteswritten;
+
+/* write 32-bit word as little endian */
+static void write32(long x)
+{
+	fputc(x & 0xff, sndoutput);
+	fputc((x >> 8) & 0xff, sndoutput);
+	fputc((x >> 16) & 0xff, sndoutput);
+	fputc((x >> 24) & 0xff, sndoutput);
+}
+
+/* SndSave_IsSoundFileOpen simply returns true if the sound file is currently open and able to receive writes
+   RETURNS: TRUE is file is open, FALSE if it is not */
+int SndSave_IsSoundFileOpen(void)
+{
+	return sndoutput != NULL;
+}
+
+
+/* SndSave_CloseSoundFile should be called when the program is exiting, or when all data required has been
+   written to the file. SndSave_CloseSoundFile will also be called automatically when a call is made to
+   SndSave_OpenSoundFile, or an error is made in SndSave_WriteToSoundFile. Note that CloseSoundFile has to back track
+   to the header written out in SndSave_OpenSoundFile and update it with the length of samples written
+
+   RETURNS: TRUE if file closed with no problems, FALSE if failure during close */
+
+int SndSave_CloseSoundFile(void)
+{
+	int bSuccess = TRUE;
+	char aligned = 0;
+
+	if (sndoutput != NULL) {
+		/* A RIFF file's chunks must be word-aligned. So let's align. */
+		if (byteswritten & 1) {
+			if (putc(0, sndoutput) == EOF)
+				bSuccess = FALSE;
+			else
+				aligned = 1;
+		}
+
+		if (bSuccess) {
+			/* Sound file is finished, so modify header and close it. */
+			if (fseek(sndoutput, 4, SEEK_SET) != 0)	/* Seek past RIFF */
+				bSuccess = FALSE;
+			else {
+				/* RIFF header's size field must equal the size of all chunks
+				 * with alignment, so the alignment byte is added.
+				 */
+				write32(byteswritten + 36 + aligned);
+				if (fseek(sndoutput, 40, SEEK_SET) != 0)
+					bSuccess = FALSE;
+				else {
+					/* But in the "data" chunk size field, the alignment byte
+					 * should be ignored. */
+					write32(byteswritten);
+				}
+			}
+		}
+		fclose(sndoutput);
+		sndoutput = NULL;
+	}
+
+	return bSuccess;
+}
+
+
+/* SndSave_OpenSoundFile will start a new sound file and write out the header. If an existing sound file is
+   already open it will be closed first, and the new file opened in it's place
+
+   RETURNS: TRUE if file opened with no problems, FALSE if failure during open */
+
+int SndSave_OpenSoundFile(const char *szFileName)
+{
+	SndSave_CloseSoundFile();
+
+	sndoutput = fopen(szFileName, "wb");
+
+	if (sndoutput == NULL)
+		return FALSE;
+	/*
+	The RIFF header:
+
+	  Offset  Length   Contents
+	  0       4 bytes  'RIFF'
+	  4       4 bytes  <file length - 8>
+	  8       4 bytes  'WAVE'
+
+	The fmt chunk:
+
+	  12      4 bytes  'fmt '
+	  16      4 bytes  0x00000010     // Length of the fmt data (16 bytes)
+	  20      2 bytes  0x0001         // Format tag: 1 = PCM
+	  22      2 bytes  <channels>     // Channels: 1 = mono, 2 = stereo
+	  24      4 bytes  <sample rate>  // Samples per second: e.g., 44100
+	  28      4 bytes  <bytes/second> // sample rate * block align
+	  32      2 bytes  <block align>  // channels * bits/sample / 8
+	  34      2 bytes  <bits/sample>  // 8 or 16
+
+	The data chunk:
+
+	  36      4 bytes  'data'
+	  40      4 bytes  <length of the data block>
+	  44        bytes  <sample data>
+
+	All chunks must be word-aligned.
+
+	Good description of WAVE format: http://www.sonicspot.com/guide/wavefiles.html
+	*/
+
+	if (fwrite("RIFF\0\0\0\0WAVEfmt \x10\0\0\0\1\0", 1, 22, sndoutput) != 22) {
+		fclose(sndoutput);
+		sndoutput = NULL;
+		return FALSE;
+	}
+
+	fputc(POKEYSND_num_pokeys, sndoutput);
+	fputc(0, sndoutput);
+	write32(POKEYSND_playback_freq);
+
+
+	write32(POKEYSND_playback_freq * (POKEYSND_snd_flags & POKEYSND_BIT16 ? POKEYSND_num_pokeys << 1 : POKEYSND_num_pokeys));
+
+	fputc(POKEYSND_snd_flags & POKEYSND_BIT16 ? POKEYSND_num_pokeys << 1 : POKEYSND_num_pokeys, sndoutput);
+	fputc(0, sndoutput);
+
+	fputc(POKEYSND_snd_flags & POKEYSND_BIT16? 16: 8, sndoutput);
+
+	if (fwrite("\0data\0\0\0\0", 1, 9, sndoutput) != 9) {
+		fclose(sndoutput);
+		sndoutput = NULL;
+		return FALSE;
+	}
+
+	byteswritten = 0;
+	return TRUE;
+}
+
+/* SndSave_WriteToSoundFile will dump PCM data to the WAV file. The best way to do this for Atari800 is
+   probably to call it directly after POKEYSND_Process(buffer, size) with the same values (buffer, size)
+
+   RETURNS: the number of bytes written to the file (should be equivalent to the input uiSize parm) */
+
+int SndSave_WriteToSoundFile(const unsigned char *ucBuffer, unsigned int uiSize)
+{
+	/* XXX FIXME: doesn't work with big-endian architectures */
+	if (sndoutput && ucBuffer && uiSize) {
+		int result;
+		if (POKEYSND_snd_flags & POKEYSND_BIT16)
+			uiSize <<= 1;
+		result = fwrite(ucBuffer, 1, uiSize, sndoutput);
+		byteswritten += result;
+		if (result != uiSize) {
+			SndSave_CloseSoundFile();
+		}
+
+		return result;
+	}
+
+	return 0;
+}
diff --git a/project/jni/application/atari800/src/sndsave.h b/project/jni/application/atari800/src/sndsave.h
new file mode 100644
index 000000000..02a7c7ae9
--- /dev/null
+++ b/project/jni/application/atari800/src/sndsave.h
@@ -0,0 +1,12 @@
+#ifndef SNDSAVE_H_
+#define SNDSAVE_H_
+
+#include "atari.h"
+
+int SndSave_IsSoundFileOpen(void);
+int SndSave_CloseSoundFile(void);
+int SndSave_OpenSoundFile(const char *szFileName);
+int SndSave_WriteToSoundFile(const UBYTE *ucBuffer, unsigned int uiSize);
+
+#endif /* SNDSAVE_H_ */
+
diff --git a/project/jni/application/atari800/src/sound.h b/project/jni/application/atari800/src/sound.h
new file mode 100644
index 000000000..a001a419b
--- /dev/null
+++ b/project/jni/application/atari800/src/sound.h
@@ -0,0 +1,13 @@
+#ifndef SOUND_H_
+#define SOUND_H_
+
+void Sound_Initialise(int *argc, char *argv[]);
+void Sound_Exit(void);
+void Sound_Update(void);
+void Sound_Pause(void);
+void Sound_Continue(void);
+#ifdef SUPPORTS_SOUND_REINIT
+void Sound_Reinit(void);
+#endif
+
+#endif /* SOUND_H_ */
diff --git a/project/jni/application/atari800/src/statesav.c b/project/jni/application/atari800/src/statesav.c
new file mode 100644
index 000000000..2089c709b
--- /dev/null
+++ b/project/jni/application/atari800/src/statesav.c
@@ -0,0 +1,662 @@
+/*
+ * statesav.c - saving the emulator's state to a file
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#ifdef HAVE_ERRNO_H
+#include <errno.h>
+#endif
+#ifdef HAVE_UNISTD_H
+#include <unistd.h> /* getcwd */
+#endif
+#ifdef HAVE_DIRECT_H
+#include <direct.h> /* getcwd on MSVC*/
+#endif
+#ifdef HAVE_LIBZ
+#include <zlib.h>
+#endif
+#ifdef DREAMCAST
+#include <bzlib/bzlib.h>
+#define MEMCOMPR     /* compress in memory before writing */
+#include "vmu.h"
+#include "icon.h"
+#include "version.h"
+#endif
+
+#include "atari.h"
+#include "statesav.h"
+#include "antic.h"
+#include "cartridge.h"
+#include "cpu.h"
+#include "gtia.h"
+#include "log.h"
+#include "pbi.h"
+#include "pia.h"
+#include "pokey.h"
+#include "sio.h"
+#include "util.h"
+#ifdef PBI_MIO
+#include "pbi_mio.h"
+#endif
+#ifdef PBI_BB
+#include "pbi_bb.h"
+#endif
+#ifdef PBI_XLD
+#include "pbi_xld.h"
+#endif
+#ifdef XEP80_EMULATION
+#include "xep80.h"
+#endif
+
+#define SAVE_VERSION_NUMBER 6
+
+#if defined(MEMCOMPR)
+static gzFile *mem_open(const char *name, const char *mode);
+static int mem_close(gzFile *stream);
+static size_t mem_read(void *buf, size_t len, gzFile *stream);
+static size_t mem_write(const void *buf, size_t len, gzFile *stream);
+#define GZOPEN(X, Y)     mem_open(X, Y)
+#define GZCLOSE(X)       mem_close(X)
+#define GZREAD(X, Y, Z)  mem_read(Y, Z, X)
+#define GZWRITE(X, Y, Z) mem_write(Y, Z, X)
+#undef GZERROR
+#elif defined(HAVE_LIBZ) /* above MEMCOMPR, below HAVE_LIBZ */
+#define GZOPEN(X, Y)     gzopen(X, Y)
+#define GZCLOSE(X)       gzclose(X)
+#define GZREAD(X, Y, Z)  gzread(X, Y, Z)
+#define GZWRITE(X, Y, Z) gzwrite(X, (const voidp) Y, Z)
+#define GZERROR(X, Y)    gzerror(X, Y)
+#else
+#define GZOPEN(X, Y)     fopen(X, Y)
+#define GZCLOSE(X)       fclose(X)
+#define GZREAD(X, Y, Z)  fread(Y, Z, 1, X)
+#define GZWRITE(X, Y, Z) fwrite(Y, Z, 1, X)
+#undef GZERROR
+#define gzFile  FILE *
+#define Z_OK    0
+#endif
+
+static gzFile StateFile = NULL;
+static int nFileError = Z_OK;
+
+static void GetGZErrorText(void)
+{
+#ifdef GZERROR
+	const char *error = GZERROR(StateFile, &nFileError);
+	if (nFileError == Z_ERRNO) {
+#ifdef HAVE_STRERROR
+		Log_print("The following general file I/O error occurred:");
+		Log_print(strerror(errno));
+#else
+		Log_print("A file I/O error occurred");
+#endif
+		return;
+	}
+	Log_print("ZLIB returned the following error: %s", error);
+#endif /* GZERROR */
+	Log_print("State file I/O failed.");
+}
+
+/* Value is memory location of data, num is number of type to save */
+void StateSav_SaveUBYTE(const UBYTE *data, int num)
+{
+	if (!StateFile || nFileError != Z_OK)
+		return;
+
+	/* Assumption is that UBYTE = 8bits and the pointer passed in refers
+	   directly to the active bits if in a padded location. If not (unlikely)
+	   you'll have to redefine this to save appropriately for cross-platform
+	   compatibility */
+	if (GZWRITE(StateFile, data, num) == 0)
+		GetGZErrorText();
+}
+
+/* Value is memory location of data, num is number of type to save */
+void StateSav_ReadUBYTE(UBYTE *data, int num)
+{
+	if (!StateFile || nFileError != Z_OK)
+		return;
+
+	if (GZREAD(StateFile, data, num) == 0)
+		GetGZErrorText();
+}
+
+/* Value is memory location of data, num is number of type to save */
+void StateSav_SaveUWORD(const UWORD *data, int num)
+{
+	if (!StateFile || nFileError != Z_OK)
+		return;
+
+	/* UWORDS are saved as 16bits, regardless of the size on this particular
+	   platform. Each byte of the UWORD will be pushed out individually in
+	   LSB order. The shifts here and in the read routines will work for both
+	   LSB and MSB architectures. */
+	while (num > 0) {
+		UWORD temp;
+		UBYTE byte;
+
+		temp = *data++;
+		byte = temp & 0xff;
+		if (GZWRITE(StateFile, &byte, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		temp >>= 8;
+		byte = temp & 0xff;
+		if (GZWRITE(StateFile, &byte, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+		num--;
+	}
+}
+
+/* Value is memory location of data, num is number of type to save */
+void StateSav_ReadUWORD(UWORD *data, int num)
+{
+	if (!StateFile || nFileError != Z_OK)
+		return;
+
+	while (num > 0) {
+		UBYTE byte1, byte2;
+
+		if (GZREAD(StateFile, &byte1, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		if (GZREAD(StateFile, &byte2, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		*data++ = (byte2 << 8) | byte1;
+		num--;
+	}
+}
+
+void StateSav_SaveINT(const int *data, int num)
+{
+	if (!StateFile || nFileError != Z_OK)
+		return;
+
+	/* INTs are always saved as 32bits (4 bytes) in the file. They can be any size
+	   on the platform however. The sign bit is clobbered into the fourth byte saved
+	   for each int; on read it will be extended out to its proper position for the
+	   native INT size */
+	while (num > 0) {
+		UBYTE signbit = 0;
+		unsigned int temp;
+		UBYTE byte;
+		int temp0;
+
+		temp0 = *data++;
+		if (temp0 < 0) {
+			temp0 = -temp0;
+			signbit = 0x80;
+		}
+		temp = (unsigned int) temp0;
+
+		byte = temp & 0xff;
+		if (GZWRITE(StateFile, &byte, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		temp >>= 8;
+		byte = temp & 0xff;
+		if (GZWRITE(StateFile, &byte, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		temp >>= 8;
+		byte = temp & 0xff;
+		if (GZWRITE(StateFile, &byte, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		temp >>= 8;
+		byte = (temp & 0x7f) | signbit;
+		if (GZWRITE(StateFile, &byte, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		num--;
+	}
+}
+
+void StateSav_ReadINT(int *data, int num)
+{
+	if (!StateFile || nFileError != Z_OK)
+		return;
+
+	while (num > 0) {
+		UBYTE signbit = 0;
+		int temp;
+		UBYTE byte1, byte2, byte3, byte4;
+
+		if (GZREAD(StateFile, &byte1, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		if (GZREAD(StateFile, &byte2, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		if (GZREAD(StateFile, &byte3, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		if (GZREAD(StateFile, &byte4, 1) == 0) {
+			GetGZErrorText();
+			break;
+		}
+
+		signbit = byte4 & 0x80;
+		byte4 &= 0x7f;
+
+		temp = (byte4 << 24) | (byte3 << 16) | (byte2 << 8) | byte1;
+		if (signbit)
+			temp = -temp;
+		*data++ = temp;
+
+		num--;
+	}
+}
+
+void StateSav_SaveFNAME(const char *filename)
+{
+	UWORD namelen;
+#ifdef HAVE_GETCWD
+	char dirname[FILENAME_MAX];
+
+	/* Check to see if file is in application tree, if so, just save as
+	   relative path....*/
+	getcwd(dirname, FILENAME_MAX);
+	if (strncmp(filename, dirname, strlen(dirname)) == 0)
+		/* XXX: check if '/' or '\\' follows dirname in filename? */
+		filename += strlen(dirname) + 1;
+#endif
+
+	namelen = strlen(filename);
+	/* Save the length of the filename, followed by the filename */
+	StateSav_SaveUWORD(&namelen, 1);
+	StateSav_SaveUBYTE((const UBYTE *) filename, namelen);
+}
+
+void StateSav_ReadFNAME(char *filename)
+{
+	UWORD namelen = 0;
+
+	StateSav_ReadUWORD(&namelen, 1);
+	if (namelen >= FILENAME_MAX) {
+		Log_print("Filenames of %d characters not supported on this platform", (int) namelen);
+		return;
+	}
+	StateSav_ReadUBYTE((UBYTE *) filename, namelen);
+	filename[namelen] = 0;
+}
+
+int StateSav_SaveAtariState(const char *filename, const char *mode, UBYTE SaveVerbose)
+{
+	UBYTE StateVersion = SAVE_VERSION_NUMBER;
+
+	if (StateFile != NULL) {
+		GZCLOSE(StateFile);
+		StateFile = NULL;
+	}
+	nFileError = Z_OK;
+
+	StateFile = GZOPEN(filename, mode);
+	if (StateFile == NULL) {
+		Log_print("Could not open %s for state save.", filename);
+		GetGZErrorText();
+		return FALSE;
+	}
+	if (GZWRITE(StateFile, "ATARI800", 8) == 0) {
+		GetGZErrorText();
+		GZCLOSE(StateFile);
+		StateFile = NULL;
+		return FALSE;
+	}
+
+	StateSav_SaveUBYTE(&StateVersion, 1);
+	StateSav_SaveUBYTE(&SaveVerbose, 1);
+	/* The order here is important. Atari800_StateSave must be first because it saves the machine type, and
+	   decisions on what to save/not save are made based off that later in the process */
+	Atari800_StateSave();
+	CARTRIDGE_StateSave();
+	SIO_StateSave();
+	ANTIC_StateSave();
+	CPU_StateSave(SaveVerbose);
+	GTIA_StateSave();
+	PIA_StateSave();
+	POKEY_StateSave();
+#ifdef XEP80_EMULATION
+	XEP80_StateSave();
+#else
+	{
+		int local_xep80_enabled = FALSE;
+		StateSav_SaveINT(&local_xep80_enabled, 1);
+	}
+#endif /* XEP80_EMULATION */
+	PBI_StateSave();
+#ifdef PBI_MIO
+	PBI_MIO_StateSave();
+#else
+	{
+		int local_mio_enabled = FALSE;
+		StateSav_SaveINT(&local_mio_enabled, 1);
+	}
+#endif /* PBI_MIO */
+#ifdef PBI_BB
+	PBI_BB_StateSave();
+#else
+	{
+		int local_bb_enabled = FALSE;
+		StateSav_SaveINT(&local_bb_enabled, 1);
+	}
+#endif /* PBI_BB */
+#ifdef PBI_XLD
+	PBI_XLD_StateSave();
+#else
+	{
+		int local_xld_enabled = FALSE;
+		StateSav_SaveINT(&local_xld_enabled, 1);
+	}
+#endif /* PBI_XLD */
+#ifdef DREAMCAST
+	DCStateSave();
+#endif
+
+	if (GZCLOSE(StateFile) != 0) {
+		StateFile = NULL;
+		return FALSE;
+	}
+	StateFile = NULL;
+
+	if (nFileError != Z_OK)
+		return FALSE;
+
+	return TRUE;
+}
+
+int StateSav_ReadAtariState(const char *filename, const char *mode)
+{
+	char header_string[8];
+	UBYTE StateVersion = 0;  /* The version of the save file */
+	UBYTE SaveVerbose = 0;   /* Verbose mode means save basic, OS if patched */
+
+	if (StateFile != NULL) {
+		GZCLOSE(StateFile);
+		StateFile = NULL;
+	}
+	nFileError = Z_OK;
+
+	StateFile = GZOPEN(filename, mode);
+	if (StateFile == NULL) {
+		Log_print("Could not open %s for state read.", filename);
+		GetGZErrorText();
+		return FALSE;
+	}
+
+	if (GZREAD(StateFile, header_string, 8) == 0) {
+		GetGZErrorText();
+		GZCLOSE(StateFile);
+		StateFile = NULL;
+		return FALSE;
+	}
+	if (memcmp(header_string, "ATARI800", 8) != 0) {
+		Log_print("This is not an Atari800 state save file.");
+		GZCLOSE(StateFile);
+		StateFile = NULL;
+		return FALSE;
+	}
+
+	if (GZREAD(StateFile, &StateVersion, 1) == 0
+	 || GZREAD(StateFile, &SaveVerbose, 1) == 0) {
+		Log_print("Failed read from Atari state file.");
+		GetGZErrorText();
+		GZCLOSE(StateFile);
+		StateFile = NULL;
+		return FALSE;
+	}
+
+	if (StateVersion != SAVE_VERSION_NUMBER && StateVersion < 3) {
+		Log_print("Cannot read this state file because it is an incompatible version.");
+		GZCLOSE(StateFile);
+		StateFile = NULL;
+		return FALSE;
+	}
+
+	Atari800_StateRead();
+	if (StateVersion >= 4) {
+		CARTRIDGE_StateRead();
+		SIO_StateRead();
+	}
+	ANTIC_StateRead();
+	CPU_StateRead(SaveVerbose, StateVersion);
+	GTIA_StateRead();
+	PIA_StateRead();
+	POKEY_StateRead();
+	if (StateVersion >= 6) {
+#ifdef XEP80_EMULATION
+		XEP80_StateRead();
+#else
+		int local_xep80_enabled;
+		StateSav_ReadINT(&local_xep80_enabled,1);
+		if (local_xep80_enabled) {
+			Log_print("Cannot read this state file because this version does not support XEP80.");
+			GZCLOSE(StateFile);
+			StateFile = NULL;
+			return FALSE;
+		}
+#endif /* XEP80_EMULATION */
+		PBI_StateRead();
+#ifdef PBI_MIO
+		PBI_MIO_StateRead();
+#else
+		{
+			int local_mio_enabled;
+			StateSav_ReadINT(&local_mio_enabled,1);
+			if (local_mio_enabled) {
+				Log_print("Cannot read this state file because this version does not support MIO.");
+				GZCLOSE(StateFile);
+				StateFile = NULL;
+				return FALSE;
+			}
+		}
+#endif /* PBI_MIO */
+#ifdef PBI_BB
+		PBI_BB_StateRead();
+#else
+		{
+			int local_bb_enabled;
+			StateSav_ReadINT(&local_bb_enabled,1);
+			if (local_bb_enabled) {
+				Log_print("Cannot read this state file because this version does not support the Black Box.");
+				GZCLOSE(StateFile);
+				StateFile = NULL;
+				return FALSE;
+			}
+		}
+#endif /* PBI_BB */
+#ifdef PBI_XLD
+		PBI_XLD_StateRead();
+#else
+		{
+			int local_xld_enabled;
+			StateSav_ReadINT(&local_xld_enabled,1);
+			if (local_xld_enabled) {
+				Log_print("Cannot read this state file because this version does not support the 1400XL/1450XLD.");
+				GZCLOSE(StateFile);
+				StateFile = NULL;
+				return FALSE;
+			}
+		}
+#endif /* PBI_XLD */
+	}
+#ifdef DREAMCAST
+	DCStateRead();
+#endif
+
+	GZCLOSE(StateFile);
+	StateFile = NULL;
+
+	if (nFileError != Z_OK)
+		return FALSE;
+
+	return TRUE;
+}
+
+
+/* hack to compress in memory before writing
+ * - for DREAMCAST only
+ * - 2 reasons for this:
+ * - use bzip2 instead of zip: better compression ratio (the DC VMUs are small)
+ * - write in DC specific file format to provide icon and description
+ */
+#ifdef MEMCOMPR
+
+static char * plainmembuf;
+static unsigned int plainmemoff;
+static char * comprmembuf;
+#define OM_READ  1
+#define OM_WRITE 2
+static int openmode;
+static unsigned int unclen;
+static char savename[FILENAME_MAX];
+#define HDR_LEN 640
+
+#define ALLOC_LEN 210000
+
+/* replacement for GZOPEN */
+static gzFile *mem_open(const char *name, const char *mode)
+{
+	if (*mode == 'w') {
+		/* open for write (save) */
+		openmode = OM_WRITE;
+		strcpy(savename, name); /* remember name */
+		plainmembuf = Util_malloc(ALLOC_LEN);
+		plainmemoff = 0; /*HDR_LEN;*/
+		return (gzFile *) plainmembuf;
+	}
+	else {
+		/* open for read (read) */
+		FILE *f;
+		size_t len;
+		openmode = OM_READ;
+		unclen = ALLOC_LEN;
+		f = fopen(name, mode);
+		if (f == NULL)
+			return NULL;
+		plainmembuf = Util_malloc(ALLOC_LEN);
+		comprmembuf = Util_malloc(ALLOC_LEN);
+		len = fread(comprmembuf, 1, ALLOC_LEN, f);
+		fclose(f);
+		/* XXX: does DREAMCAST's fread return ((size_t) -1) ? */
+		if (len != 0
+		 && BZ2_bzBuffToBuffDecompress(plainmembuf, &unclen, comprmembuf + HDR_LEN, len - HDR_LEN, 1, 0) == BZ_OK) {
+#ifdef DEBUG
+			printf("decompress: old len %lu, new len %lu\n",
+				   (unsigned long) len - 1024, (unsigned long) unclen);
+#endif
+			free(comprmembuf);
+			plainmemoff = 0;
+			return (gzFile *) plainmembuf;
+		}
+		free(comprmembuf);
+		free(plainmembuf);
+		return NULL;
+	}
+}
+
+/* replacement for GZCLOSE */
+static int mem_close(gzFile *stream)
+{
+	int status = -1;
+	unsigned int comprlen = ALLOC_LEN - HDR_LEN;
+	if (openmode != OM_WRITE) {
+		/* was opened for read */
+		free(plainmembuf);
+		return 0;
+	}
+	comprmembuf = Util_malloc(ALLOC_LEN);
+	if (BZ2_bzBuffToBuffCompress(comprmembuf + HDR_LEN, &comprlen, plainmembuf, plainmemoff, 9, 0, 0) == BZ_OK) {
+		FILE *f;
+		f = fopen(savename, "wb");
+		if (f != NULL) {
+			char icon[32 + 512];
+#ifdef DEBUG
+			printf("mem_close: plain len %lu, compr len %lu\n",
+			       (unsigned long) plainmemoff, (unsigned long) comprlen);
+#endif
+			memcpy(icon, palette, 32);
+			memcpy(icon + 32, bitmap, 512);
+			ndc_vmu_create_vmu_header(comprmembuf, "Atari800DC",
+						  "Atari800DC " A800DCVERASC " saved state",
+						  comprlen, icon);
+			comprlen = (comprlen + HDR_LEN + 511) & ~511;
+			ndc_vmu_do_crc(comprmembuf, comprlen);
+			status = (fwrite(comprmembuf, 1, comprlen, f) == comprlen) ? 0 : -1;
+			status |= fclose(f);
+#ifdef DEBUG
+			if (status != 0)
+				printf("mem_close: fwrite: error!!\n");
+#endif
+		}
+	}
+	free(comprmembuf);
+	free(plainmembuf);
+	return status;
+}
+
+/* replacement for GZREAD */
+static size_t mem_read(void *buf, size_t len, gzFile *stream)
+{
+	if (plainmemoff + len > unclen) return 0;  /* shouldn't happen */
+	memcpy(buf, plainmembuf + plainmemoff, len);
+	plainmemoff += len;
+	return len;
+}
+
+/* replacement for GZWRITE */
+static size_t mem_write(const void *buf, size_t len, gzFile *stream)
+{
+	if (plainmemoff + len > ALLOC_LEN) return 0;  /* shouldn't happen */
+	memcpy(plainmembuf + plainmemoff, buf, len);
+	plainmemoff += len;
+	return len;
+}
+
+#endif /* #ifdef MEMCOMPR */
diff --git a/project/jni/application/atari800/src/statesav.h b/project/jni/application/atari800/src/statesav.h
new file mode 100644
index 000000000..2c6b692a5
--- /dev/null
+++ b/project/jni/application/atari800/src/statesav.h
@@ -0,0 +1,19 @@
+#ifndef STATESAV_H_
+#define STATESAV_H_
+
+#include "atari.h"
+
+int StateSav_SaveAtariState(const char *filename, const char *mode, UBYTE SaveVerbose);
+int StateSav_ReadAtariState(const char *filename, const char *mode);
+
+void StateSav_SaveUBYTE(const UBYTE *data, int num);
+void StateSav_SaveUWORD(const UWORD *data, int num);
+void StateSav_SaveINT(const int *data, int num);
+void StateSav_SaveFNAME(const char *filename);
+
+void StateSav_ReadUBYTE(UBYTE *data, int num);
+void StateSav_ReadUWORD(UWORD *data, int num);
+void StateSav_ReadINT(int *data, int num);
+void StateSav_ReadFNAME(char *filename);
+
+#endif /* STATESAV_H_ */
diff --git a/project/jni/application/atari800/src/ui.c b/project/jni/application/atari800/src/ui.c
new file mode 100644
index 000000000..02afea00d
--- /dev/null
+++ b/project/jni/application/atari800/src/ui.c
@@ -0,0 +1,1858 @@
+/*
+ * ui.c - main user interface
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h> /* free() */
+
+#include "afile.h"
+#include "antic.h"
+#include "atari.h"
+#include "binload.h"
+#include "cartridge.h"
+#include "cassette.h"
+#include "compfile.h"
+#include "cfg.h"
+#include "cpu.h"
+#include "devices.h" /* Devices_SetPrintCommand */
+#include "esc.h"
+#include "gtia.h"
+#include "input.h"
+#include "akey.h"
+#include "log.h"
+#include "memory.h"
+#include "platform.h"
+#include "rtime.h"
+#include "screen.h"
+#include "sio.h"
+#include "statesav.h"
+#include "ui.h"
+#include "ui_basic.h"
+#include "util.h"
+#ifdef SOUND
+#include "pokeysnd.h"
+#include "sndsave.h"
+#include "sound.h"
+#endif
+
+
+#ifdef _WIN32_WCE
+extern int smooth_filter;
+extern int filter_available;
+extern int virtual_joystick;
+extern void AboutPocketAtari(void);
+#endif
+
+#ifdef DREAMCAST
+extern int db_mode;
+extern int screen_tv_mode;
+extern int emulate_paddles;
+extern int glob_snd_ena;
+extern void ButtonConfiguration(void);
+extern void AboutAtariDC(void);
+extern void update_vidmode(void);
+extern void update_screen_updater(void);
+#ifdef HZ_TEST
+extern void do_hz_test(void);
+#endif
+#endif
+
+UI_tDriver *UI_driver = &UI_BASIC_driver;
+
+int UI_is_active = FALSE;
+int UI_alt_function = -1;
+
+#ifdef CRASH_MENU
+int UI_crash_code = -1;
+UWORD UI_crash_address;
+UWORD UI_crash_afterCIM;
+int CrashMenu(void);
+#endif
+
+char UI_atari_files_dir[UI_MAX_DIRECTORIES][FILENAME_MAX];
+char UI_saved_files_dir[UI_MAX_DIRECTORIES][FILENAME_MAX];
+int UI_n_atari_files_dir = 0;
+int UI_n_saved_files_dir = 0;
+#ifdef XEP80_EMULATION
+static int saved_xep80;
+#endif
+
+static UI_tMenuItem *FindMenuItem(UI_tMenuItem *mip, int option)
+{
+	while (mip->retval != option)
+		mip++;
+	return mip;
+}
+
+static void SetItemChecked(UI_tMenuItem *mip, int option, int checked)
+{
+	FindMenuItem(mip, option)->flags = checked ? (UI_ITEM_CHECK | UI_ITEM_CHECKED) : UI_ITEM_CHECK;
+}
+
+static void FilenameMessage(const char *format, const char *filename)
+{
+	char msg[FILENAME_MAX + 30];
+	sprintf(msg, format, filename);
+	UI_driver->fMessage(msg, 1);
+}
+
+static const char * const cant_load = "Can't load \"%s\"";
+static const char * const cant_save = "Can't save \"%s\"";
+static const char * const created = "Created \"%s\"";
+
+#define CantLoad(filename) FilenameMessage(cant_load, filename)
+#define CantSave(filename) FilenameMessage(cant_save, filename)
+#define Created(filename) FilenameMessage(created, filename)
+
+static void SelectSystem(void)
+{
+	typedef struct {
+		int type;
+		int ram;
+	} tSysConfig;
+
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_ACTION(0, "Atari OS/A (16 KB)"),
+		UI_MENU_ACTION(1, "Atari OS/A (48 KB)"),
+		UI_MENU_ACTION(2, "Atari OS/A (52 KB)"),
+		UI_MENU_ACTION(3, "Atari OS/B (16 KB)"),
+		UI_MENU_ACTION(4, "Atari OS/B (48 KB)"),
+		UI_MENU_ACTION(5, "Atari OS/B (52 KB)"),
+		UI_MENU_ACTION(6, "Atari 600XL (16 KB)"),
+		UI_MENU_ACTION(7, "Atari 800XL (64 KB)"),
+		UI_MENU_ACTION(8, "Atari 130XE (128 KB)"),
+		UI_MENU_ACTION(9, "Atari XL/XE (192 KB)"),
+		UI_MENU_ACTION(10, "Atari XL/XE (320 KB RAMBO)"),
+		UI_MENU_ACTION(11, "Atari XL/XE (320 KB COMPY SHOP)"),
+		UI_MENU_ACTION(12, "Atari XL/XE (576 KB)"),
+		UI_MENU_ACTION(13, "Atari XL/XE (1088 KB)"),
+		UI_MENU_ACTION(14, "Atari 5200 (16 KB)"),
+		UI_MENU_ACTION(15, "Video system:"),
+		UI_MENU_END
+	};
+
+	static const tSysConfig machine[] = {
+		{ Atari800_MACHINE_OSA, 16 },
+		{ Atari800_MACHINE_OSA, 48 },
+		{ Atari800_MACHINE_OSA, 52 },
+		{ Atari800_MACHINE_OSB, 16 },
+		{ Atari800_MACHINE_OSB, 48 },
+		{ Atari800_MACHINE_OSB, 52 },
+		{ Atari800_MACHINE_XLXE, 16 },
+		{ Atari800_MACHINE_XLXE, 64 },
+		{ Atari800_MACHINE_XLXE, 128 },
+		{ Atari800_MACHINE_XLXE, 192 },
+		{ Atari800_MACHINE_XLXE, MEMORY_RAM_320_RAMBO },
+		{ Atari800_MACHINE_XLXE, MEMORY_RAM_320_COMPY_SHOP },
+		{ Atari800_MACHINE_XLXE, 576 },
+		{ Atari800_MACHINE_XLXE, 1088 },
+		{ Atari800_MACHINE_5200, 16 }
+	};
+
+#define N_MACHINES  ((int) (sizeof(machine) / sizeof(machine[0])))
+
+	int option = 0;
+	int old_tv_mode = Atari800_tv_mode;
+
+	int i;
+	for (i = 0; i < N_MACHINES; i++)
+		if (Atari800_machine_type == machine[i].type && MEMORY_ram_size == machine[i].ram) {
+			option = i;
+			break;
+		}
+
+	for (;;) {
+		menu_array[N_MACHINES].suffix = (Atari800_tv_mode == Atari800_TV_PAL) ? "PAL" : "NTSC";
+		option = UI_driver->fSelect("Select System", 0, option, menu_array, NULL);
+		if (option < N_MACHINES)
+			break;
+		Atari800_tv_mode = (Atari800_tv_mode == Atari800_TV_PAL) ? Atari800_TV_NTSC : Atari800_TV_PAL;
+	}
+	if (option >= 0) {
+		Atari800_machine_type = machine[option].type;
+		MEMORY_ram_size = machine[option].ram;
+		Atari800_InitialiseMachine();
+	}
+	else if (Atari800_tv_mode != old_tv_mode)
+		Atari800_InitialiseMachine(); /* XXX: Atari800_Coldstart() is probably enough */
+}
+
+/* Inspired by LNG (lng.sourceforge.net) */
+/* Writes a blank ATR. The ATR must by formatted by an Atari DOS
+   before files are written to it. */
+static void MakeBlankDisk(FILE *setFile)
+{
+/* 720, so it's a standard Single Density disk,
+   which can be formatted by 2.x DOSes.
+   It will be resized when formatted in another density. */
+#define BLANK_DISK_SECTORS  720
+#define BLANK_DISK_PARAS    (BLANK_DISK_SECTORS * 128 / 16)
+	int i;
+	struct AFILE_ATR_Header hdr;
+	UBYTE sector[128];
+
+	memset(&hdr, 0, sizeof(hdr));
+	hdr.magic1 = 0x96;
+	hdr.magic2 = 0x02;
+	hdr.seccountlo = (UBYTE) BLANK_DISK_PARAS;
+	hdr.seccounthi = (UBYTE) (BLANK_DISK_PARAS >> 8);
+	hdr.hiseccountlo = (UBYTE) (BLANK_DISK_PARAS >> 16);
+	hdr.secsizelo = 128;
+	fwrite(&hdr, 1, sizeof(hdr), setFile);
+
+	memset(sector, 0, sizeof(sector));
+	for (i = 1; i <= BLANK_DISK_SECTORS; i++)
+		fwrite(sector, 1, sizeof(sector), setFile);
+}
+
+static void DiskManagement(void)
+{
+	static char drive_array[8][5] = { " D1:", " D2:", " D3:", " D4:", " D5:", " D6:", " D7:", " D8:" };
+
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_FILESEL_PREFIX_TIP(0, drive_array[0], SIO_filename[0], NULL),
+		UI_MENU_FILESEL_PREFIX_TIP(1, drive_array[1], SIO_filename[1], NULL),
+		UI_MENU_FILESEL_PREFIX_TIP(2, drive_array[2], SIO_filename[2], NULL),
+		UI_MENU_FILESEL_PREFIX_TIP(3, drive_array[3], SIO_filename[3], NULL),
+		UI_MENU_FILESEL_PREFIX_TIP(4, drive_array[4], SIO_filename[4], NULL),
+		UI_MENU_FILESEL_PREFIX_TIP(5, drive_array[5], SIO_filename[5], NULL),
+		UI_MENU_FILESEL_PREFIX_TIP(6, drive_array[6], SIO_filename[6], NULL),
+		UI_MENU_FILESEL_PREFIX_TIP(7, drive_array[7], SIO_filename[7], NULL),
+		UI_MENU_FILESEL(8, "Save Disk Set"),
+		UI_MENU_FILESEL(9, "Load Disk Set"),
+		UI_MENU_ACTION(10, "Rotate Disks"),
+		UI_MENU_FILESEL(11, "Make Blank ATR Disk"),
+		UI_MENU_FILESEL_TIP(12, "Uncompress Disk Image", "Convert GZ or DCM to ATR"),
+		UI_MENU_END
+	};
+
+	int dsknum = 0;
+
+	for (;;) {
+		static char disk_filename[FILENAME_MAX] = "";
+		static char set_filename[FILENAME_MAX] = "";
+		int i;
+		int seltype;
+
+		for (i = 0; i < 8; i++) {
+			drive_array[i][0] = ' ';
+			switch (SIO_drive_status[i]) {
+			case SIO_OFF:
+				menu_array[i].suffix = "Return:insert";
+				break;
+			case SIO_NO_DISK:
+				menu_array[i].suffix = "Return:insert Backspace:off";
+				break;
+			case SIO_READ_ONLY:
+				drive_array[i][0] = '*';
+				/* FALLTHROUGH */
+			default:
+				menu_array[i].suffix = "Ret:insert Bksp:eject Space:read-only";
+				break;
+			}
+		}
+
+		dsknum = UI_driver->fSelect("Disk Management", 0, dsknum, menu_array, &seltype);
+
+		switch (dsknum) {
+		case 8:
+			if (UI_driver->fGetSaveFilename(set_filename, UI_saved_files_dir, UI_n_saved_files_dir)) {
+				FILE *fp = fopen(set_filename, "w");
+				if (fp == NULL) {
+					CantSave(set_filename);
+					break;
+				}
+				for (i = 0; i < 8; i++)
+					fprintf(fp, "%s\n", SIO_filename[i]);
+				fclose(fp);
+				Created(set_filename);
+			}
+			break;
+		case 9:
+			if (UI_driver->fGetLoadFilename(set_filename, UI_saved_files_dir, UI_n_saved_files_dir)) {
+				FILE *fp = fopen(set_filename, "r");
+				if (fp == NULL) {
+					CantLoad(set_filename);
+					break;
+				}
+				for (i = 0; i < 8; i++) {
+					char filename[FILENAME_MAX];
+					fgets(filename, FILENAME_MAX, fp);
+					Util_chomp(filename);
+					if (strcmp(filename, "Empty") != 0 && strcmp(filename, "Off") != 0)
+						SIO_Mount(i + 1, filename, FALSE);
+				}
+				fclose(fp);
+			}
+			break;
+		case 10:
+			SIO_RotateDisks();
+			break;
+		case 11:
+			if (UI_driver->fGetSaveFilename(disk_filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+				FILE *fp = fopen(disk_filename, "wb");
+				if (fp == NULL) {
+					CantSave(disk_filename);
+					break;
+				}
+				MakeBlankDisk(fp);
+				fclose(fp);
+				Created(disk_filename);
+			}
+			break;
+		case 12:
+			if (UI_driver->fGetLoadFilename(disk_filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+				char uncompr_filename[FILENAME_MAX];
+				FILE *fp = fopen(disk_filename, "rb");
+				const char *p;
+				if (fp == NULL) {
+					CantLoad(disk_filename);
+					break;
+				}
+				/* propose an output filename to make user's life easier */
+				p = strrchr(disk_filename, '.');
+				if (p != NULL) {
+					char *q;
+					p++;
+					q = uncompr_filename + (p - disk_filename);
+					if (Util_stricmp(p, "atz") == 0) {
+						/* change last 'z' to 'r', preserving case */
+						p += 2;
+						q[2] = p[0] == 'z' ? 'r' : 'R';
+						q[3] = '\0';
+					}
+					else if (Util_stricmp(p, "xfz") == 0) {
+						/* change last 'z' to 'd', preserving case */
+						p += 2;
+						q[2] = p[0] == 'z' ? 'd' : 'D';
+						q[3] = '\0';
+					}
+					else if (Util_stricmp(p, "gz") == 0) {
+						/* strip ".gz" */
+						p--;
+						q[-1] = '\0';
+					}
+					else if (Util_stricmp(p, "atr") == 0) {
+						/* ".atr" ? Probably won't work, anyway cut the extension but leave the dot */
+						q[0] = '\0';
+					}
+					else {
+						/* replace extension with "atr", preserving case */
+						strcpy(q, p[0] <= 'Z' ? "ATR" : "atr");
+					}
+					memcpy(uncompr_filename, disk_filename, p - disk_filename);
+				}
+				else
+					/* was no extension -> propose no filename */
+					uncompr_filename[0] = '\0';
+				/* recognize file type and uncompress */
+				switch (fgetc(fp)) {
+				case 0x1f:
+					fclose(fp);
+					if (UI_driver->fGetSaveFilename(uncompr_filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+						FILE *fp2 = fopen(uncompr_filename, "wb");
+						int success;
+						if (fp2 == NULL) {
+							CantSave(uncompr_filename);
+							continue;
+						}
+						success = CompFile_ExtractGZ(disk_filename, fp2);
+						fclose(fp2);
+						UI_driver->fMessage(success ? "Conversion successful" : "Cannot convert this file", 1);
+					}
+					break;
+				case 0xf9:
+				case 0xfa:
+					if (UI_driver->fGetSaveFilename(uncompr_filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+						FILE *fp2 = fopen(uncompr_filename, "wb");
+						int success;
+						if (fp2 == NULL) {
+							fclose(fp);
+							CantSave(uncompr_filename);
+							continue;
+						}
+						Util_rewind(fp);
+						success = CompFile_DCMtoATR(fp, fp2);
+						fclose(fp2);
+						fclose(fp);
+						UI_driver->fMessage(success ? "Conversion successful" : "Cannot convert this file", 1);
+					}
+					break;
+				default:
+					fclose(fp);
+					UI_driver->fMessage("This is not a compressed disk image", 1);
+					break;
+				}
+			}
+			break;
+		default:
+			if (dsknum < 0)
+				return;
+			/* dsknum = 0..7 */
+			switch (seltype) {
+			case UI_USER_SELECT: /* "Enter" */
+				if (SIO_drive_status[dsknum] != SIO_OFF && SIO_drive_status[dsknum] != SIO_NO_DISK)
+					strcpy(disk_filename, SIO_filename[dsknum]);
+				if (UI_driver->fGetLoadFilename(disk_filename, UI_atari_files_dir, UI_n_atari_files_dir))
+					if (!SIO_Mount(dsknum + 1, disk_filename, FALSE))
+						CantLoad(disk_filename);
+				break;
+			case UI_USER_TOGGLE: /* "Space" */
+				i = FALSE;
+				switch (SIO_drive_status[dsknum]) {
+				case SIO_READ_WRITE:
+					i = TRUE;
+					/* FALLTHROUGH */
+				case SIO_READ_ONLY:
+					strcpy(disk_filename, SIO_filename[dsknum]);
+					SIO_Mount(dsknum + 1, disk_filename, i);
+					break;
+				default:
+					break;
+				}
+				break;
+			default: /* Backspace */
+				switch (SIO_drive_status[dsknum]) {
+				case SIO_OFF:
+					break;
+				case SIO_NO_DISK:
+					SIO_DisableDrive(dsknum + 1);
+					break;
+				default:
+					SIO_Dismount(dsknum + 1);
+					break;
+				}
+			}
+			break;
+		}
+	}
+}
+
+int UI_SelectCartType(int k)
+{
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_ACTION(1, "Standard 8 KB cartridge"),
+		UI_MENU_ACTION(2, "Standard 16 KB cartridge"),
+		UI_MENU_ACTION(3, "OSS '034M' 16 KB cartridge"),
+		UI_MENU_ACTION(4, "Standard 32 KB 5200 cartridge"),
+		UI_MENU_ACTION(5, "DB 32 KB cartridge"),
+		UI_MENU_ACTION(6, "Two chip 16 KB 5200 cartridge"),
+		UI_MENU_ACTION(7, "Bounty Bob 40 KB 5200 cartridge"),
+		UI_MENU_ACTION(8, "64 KB Williams cartridge"),
+		UI_MENU_ACTION(9, "Express 64 KB cartridge"),
+		UI_MENU_ACTION(10, "Diamond 64 KB cartridge"),
+		UI_MENU_ACTION(11, "SpartaDOS X 64 KB cartridge"),
+		UI_MENU_ACTION(12, "XEGS 32 KB cartridge"),
+		UI_MENU_ACTION(13, "XEGS 64 KB cartridge"),
+		UI_MENU_ACTION(14, "XEGS 128 KB cartridge"),
+		UI_MENU_ACTION(15, "OSS 'M091' 16 KB cartridge"),
+		UI_MENU_ACTION(16, "One chip 16 KB 5200 cartridge"),
+		UI_MENU_ACTION(17, "Atrax 128 KB cartridge"),
+		UI_MENU_ACTION(18, "Bounty Bob 40 KB cartridge"),
+		UI_MENU_ACTION(19, "Standard 8 KB 5200 cartridge"),
+		UI_MENU_ACTION(20, "Standard 4 KB 5200 cartridge"),
+		UI_MENU_ACTION(21, "Right slot 8 KB cartridge"),
+		UI_MENU_ACTION(22, "32 KB Williams cartridge"),
+		UI_MENU_ACTION(23, "XEGS 256 KB cartridge"),
+		UI_MENU_ACTION(24, "XEGS 512 KB cartridge"),
+		UI_MENU_ACTION(25, "XEGS 1 MB cartridge"),
+		UI_MENU_ACTION(26, "MegaCart 16 KB cartridge"),
+		UI_MENU_ACTION(27, "MegaCart 32 KB cartridge"),
+		UI_MENU_ACTION(28, "MegaCart 64 KB cartridge"),
+		UI_MENU_ACTION(29, "MegaCart 128 KB cartridge"),
+		UI_MENU_ACTION(30, "MegaCart 256 KB cartridge"),
+		UI_MENU_ACTION(31, "MegaCart 512 KB cartridge"),
+		UI_MENU_ACTION(32, "MegaCart 1 MB cartridge"),
+		UI_MENU_ACTION(33, "Switchable XEGS 32 KB cartridge"),
+		UI_MENU_ACTION(34, "Switchable XEGS 64 KB cartridge"),
+		UI_MENU_ACTION(35, "Switchable XEGS 128 KB cartridge"),
+		UI_MENU_ACTION(36, "Switchable XEGS 256 KB cartridge"),
+		UI_MENU_ACTION(37, "Switchable XEGS 512 KB cartridge"),
+		UI_MENU_ACTION(38, "Switchable XEGS 1 MB cartridge"),
+		UI_MENU_ACTION(39, "Phoenix 8 KB cartridge"),
+		UI_MENU_ACTION(40, "Blizzard 16 KB cartridge"),
+		UI_MENU_ACTION(41, "Atarimax 128 KB Flash cartridge"),
+		UI_MENU_ACTION(42, "Atarimax 1 MB Flash cartridge"),
+		UI_MENU_ACTION(43, "SpartaDOS X 128 KB cartridge"),
+		UI_MENU_END
+	};
+
+	int i;
+	int option = 0;
+
+	UI_driver->fInit();
+
+	for (i = 1; i <= CARTRIDGE_LAST_SUPPORTED; i++)
+		if (CARTRIDGE_kb[i] == k) {
+			if (option == 0)
+				option = i;
+			menu_array[i - 1].flags = UI_ITEM_ACTION;
+		}
+		else
+			menu_array[i - 1].flags = UI_ITEM_HIDDEN;
+
+	if (option == 0)
+		return CARTRIDGE_NONE;
+
+	option = UI_driver->fSelect("Select Cartridge Type", 0, option, menu_array, NULL);
+	if (option > 0)
+		return option;
+
+	return CARTRIDGE_NONE;
+}
+
+static void CartManagement(void)
+{
+	static const UI_tMenuItem menu_array[] = {
+		UI_MENU_FILESEL(0, "Create Cartridge from ROM image"),
+		UI_MENU_FILESEL(1, "Extract ROM image from Cartridge"),
+		UI_MENU_FILESEL(2, "Insert Cartridge"),
+		UI_MENU_ACTION(3, "Remove Cartridge"),
+		UI_MENU_END
+	};
+
+	typedef struct {
+		UBYTE id[4];
+		UBYTE type[4];
+		UBYTE checksum[4];
+		UBYTE gash[4];
+	} Header;
+
+	int option = 2;
+
+	for (;;) {
+		static char cart_filename[FILENAME_MAX] = "";
+
+		option = UI_driver->fSelect("Cartridge Management", 0, option, menu_array, NULL);
+
+		switch (option) {
+		case 0:
+			if (UI_driver->fGetLoadFilename(cart_filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+				FILE *f;
+				int nbytes;
+				int type;
+				UBYTE *image;
+				int checksum;
+				Header header;
+
+				f = fopen(cart_filename, "rb");
+				if (f == NULL) {
+					CantLoad(cart_filename);
+					break;
+				}
+				nbytes = Util_flen(f);
+				if ((nbytes & 0x3ff) != 0) {
+					fclose(f);
+					UI_driver->fMessage("ROM image must be full kilobytes long", 1);
+					break;
+				}
+				type = UI_SelectCartType(nbytes >> 10);
+				if (type == CARTRIDGE_NONE) {
+					fclose(f);
+					break;
+				}
+
+				image = (UBYTE *) Util_malloc(nbytes);
+				Util_rewind(f);
+				if ((int) fread(image, 1, nbytes, f) != nbytes) {
+					fclose(f);
+					CantLoad(cart_filename);
+					break;
+				}
+				fclose(f);
+
+				if (!UI_driver->fGetSaveFilename(cart_filename, UI_atari_files_dir, UI_n_atari_files_dir))
+					break;
+
+				checksum = CARTRIDGE_Checksum(image, nbytes);
+				header.id[0] = 'C';
+				header.id[1] = 'A';
+				header.id[2] = 'R';
+				header.id[3] = 'T';
+				header.type[0] = '\0';
+				header.type[1] = '\0';
+				header.type[2] = '\0';
+				header.type[3] = (UBYTE) type;
+				header.checksum[0] = (UBYTE) (checksum >> 24);
+				header.checksum[1] = (UBYTE) (checksum >> 16);
+				header.checksum[2] = (UBYTE) (checksum >> 8);
+				header.checksum[3] = (UBYTE) checksum;
+				header.gash[0] = '\0';
+				header.gash[1] = '\0';
+				header.gash[2] = '\0';
+				header.gash[3] = '\0';
+
+				f = fopen(cart_filename, "wb");
+				if (f == NULL) {
+					CantSave(cart_filename);
+					break;
+				}
+				fwrite(&header, 1, sizeof(header), f);
+				fwrite(image, 1, nbytes, f);
+				fclose(f);
+				free(image);
+				Created(cart_filename);
+			}
+			break;
+		case 1:
+			if (UI_driver->fGetLoadFilename(cart_filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+				FILE *f;
+				int nbytes;
+				Header header;
+				UBYTE *image;
+
+				f = fopen(cart_filename, "rb");
+				if (f == NULL) {
+					CantLoad(cart_filename);
+					break;
+				}
+				nbytes = Util_flen(f) - sizeof(header);
+				Util_rewind(f);
+				if (nbytes <= 0 || fread(&header, 1, sizeof(header), f) != sizeof(header)
+				 || header.id[0] != 'C' || header.id[1] != 'A' || header.id[2] != 'R' || header.id[3] != 'T') {
+					fclose(f);
+					UI_driver->fMessage("Not a CART file", 1);
+					break;
+				}
+				image = (UBYTE *) Util_malloc(nbytes);
+				fread(image, 1, nbytes, f);
+				fclose(f);
+
+				if (!UI_driver->fGetSaveFilename(cart_filename, UI_atari_files_dir, UI_n_atari_files_dir))
+					break;
+
+				f = fopen(cart_filename, "wb");
+				if (f == NULL) {
+					CantSave(cart_filename);
+					break;
+				}
+				fwrite(image, 1, nbytes, f);
+				fclose(f);
+				free(image);
+				Created(cart_filename);
+			}
+			break;
+		case 2:
+			if (UI_driver->fGetLoadFilename(cart_filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+				int r = CARTRIDGE_Insert(cart_filename);
+				switch (r) {
+				case CARTRIDGE_CANT_OPEN:
+					CantLoad(cart_filename);
+					break;
+				case CARTRIDGE_BAD_FORMAT:
+					UI_driver->fMessage("Unknown cartridge format", 1);
+					break;
+				case CARTRIDGE_BAD_CHECKSUM:
+					UI_driver->fMessage("Warning: bad CART checksum", 1);
+					break;
+				case 0:
+					/* ok */
+					break;
+				default:
+					/* r > 0 */
+					CARTRIDGE_type = UI_SelectCartType(r);
+					break;
+				}
+				if (CARTRIDGE_type != CARTRIDGE_NONE) {
+					int for5200 = CARTRIDGE_IsFor5200(CARTRIDGE_type);
+					if (for5200 && Atari800_machine_type != Atari800_MACHINE_5200) {
+						Atari800_machine_type = Atari800_MACHINE_5200;
+						MEMORY_ram_size = 16;
+						Atari800_InitialiseMachine();
+					}
+					else if (!for5200 && Atari800_machine_type == Atari800_MACHINE_5200) {
+						Atari800_machine_type = Atari800_MACHINE_XLXE;
+						MEMORY_ram_size = 64;
+						Atari800_InitialiseMachine();
+					}
+				}
+				Atari800_Coldstart();
+				return;
+			}
+			break;
+		case 3:
+			CARTRIDGE_Remove();
+			Atari800_Coldstart();
+			return;
+		default:
+			return;
+		}
+	}
+}
+
+#if defined(SOUND) && !defined(DREAMCAST)
+static void SoundRecording(void)
+{
+	if (!SndSave_IsSoundFileOpen()) {
+		int no = 0;
+		do {
+			char buffer[32];
+			sprintf(buffer, "atari%03d.wav", no);
+			if (!Util_fileexists(buffer)) {
+				/* file does not exist - we can create it */
+				FilenameMessage(SndSave_OpenSoundFile(buffer)
+					? "Recording sound to file \"%s\""
+					: "Can't write to file \"%s\"", buffer);
+				return;
+			}
+		} while (++no < 1000);
+		UI_driver->fMessage("All atariXXX.wav files exist!", 1);
+	}
+	else {
+		SndSave_CloseSoundFile();
+		UI_driver->fMessage("Recording stopped", 1);
+	}
+}
+#endif /* defined(SOUND) && !defined(DREAMCAST) */
+
+static int AutostartFile(void)
+{
+	static char filename[FILENAME_MAX] = "";
+	if (UI_driver->fGetLoadFilename(filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+		if (AFILE_OpenFile(filename, TRUE, 1, FALSE))
+			return TRUE;
+		CantLoad(filename);
+	}
+	return FALSE;
+}
+
+static void LoadTape(void)
+{
+	static char filename[FILENAME_MAX] = "";
+	if (UI_driver->fGetLoadFilename(filename, UI_atari_files_dir, UI_n_atari_files_dir)) {
+		if (!CASSETTE_Insert(filename))
+			CantLoad(filename);
+	}
+}
+
+static void AdvancedHOptions(void)
+{
+	static char open_info[] = "0 currently open files";
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_ACTION(0, "Atari executables path"),
+		UI_MENU_ACTION_TIP(1, open_info, NULL),
+		UI_MENU_LABEL("Current directories:"),
+		UI_MENU_ACTION_PREFIX_TIP(2, "H1:", Devices_h_current_dir[0], NULL),
+		UI_MENU_ACTION_PREFIX_TIP(3, "H2:", Devices_h_current_dir[1], NULL),
+		UI_MENU_ACTION_PREFIX_TIP(4, "H3:", Devices_h_current_dir[2], NULL),
+		UI_MENU_ACTION_PREFIX_TIP(5, "H4:", Devices_h_current_dir[3], NULL),
+		UI_MENU_END
+	};
+	int option = 0;
+	for (;;) {
+		int i;
+		int seltype;
+		i = Devices_H_CountOpen();
+		open_info[0] = (char) ('0' + i);
+		open_info[21] = (i != 1) ? 's' : '\0';
+		menu_array[1].suffix = (i > 0) ? ((i == 1) ? "Backspace: close" : "Backspace: close all") : NULL;
+		for (i = 0; i < 4; i++)
+			menu_array[3 + i].suffix = Devices_h_current_dir[i][0] != '\0' ? "Backspace: reset to root" : NULL;
+		option = UI_driver->fSelect("Advanced H: options", 0, option, menu_array, &seltype);
+		switch (option) {
+		case 0:
+			{
+				char tmp_path[FILENAME_MAX];
+				strcpy(tmp_path, Devices_h_exe_path);
+				if (UI_driver->fEditString("Atari executables path", tmp_path, FILENAME_MAX))
+					strcpy(Devices_h_exe_path, tmp_path);
+			}
+			break;
+		case 1:
+			if (seltype == UI_USER_DELETE)
+				Devices_H_CloseAll();
+			break;
+		case 2:
+		case 3:
+		case 4:
+		case 5:
+			if (seltype == UI_USER_DELETE)
+				Devices_h_current_dir[option - 2][0] = '\0';
+			break;
+		default:
+			return;
+		}
+	}
+}
+
+static void ConfigureDirectories(void)
+{
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_LABEL("Directories with Atari software:"),
+		UI_MENU_FILESEL(0, UI_atari_files_dir[0]),
+		UI_MENU_FILESEL(1, UI_atari_files_dir[1]),
+		UI_MENU_FILESEL(2, UI_atari_files_dir[2]),
+		UI_MENU_FILESEL(3, UI_atari_files_dir[3]),
+		UI_MENU_FILESEL(4, UI_atari_files_dir[4]),
+		UI_MENU_FILESEL(5, UI_atari_files_dir[5]),
+		UI_MENU_FILESEL(6, UI_atari_files_dir[6]),
+		UI_MENU_FILESEL(7, UI_atari_files_dir[7]),
+		UI_MENU_FILESEL(8, "[add directory]"),
+		UI_MENU_LABEL("Directories for emulator-saved files:"),
+		UI_MENU_FILESEL(10, UI_saved_files_dir[0]),
+		UI_MENU_FILESEL(11, UI_saved_files_dir[1]),
+		UI_MENU_FILESEL(12, UI_saved_files_dir[2]),
+		UI_MENU_FILESEL(13, UI_saved_files_dir[3]),
+		UI_MENU_FILESEL(14, UI_saved_files_dir[4]),
+		UI_MENU_FILESEL(15, UI_saved_files_dir[5]),
+		UI_MENU_FILESEL(16, UI_saved_files_dir[6]),
+		UI_MENU_FILESEL(17, UI_saved_files_dir[7]),
+		UI_MENU_FILESEL(18, "[add directory]"),
+		UI_MENU_ACTION(9, "What's this?"),
+		UI_MENU_ACTION(19, "Back to Emulator Settings"),
+		UI_MENU_END
+	};
+	int option = 9;
+	int flags = 0;
+	for (;;) {
+		int i;
+		int seltype;
+		char tmp_dir[FILENAME_MAX];
+		for (i = 0; i < 8; i++) {
+			menu_array[1 + i].flags = (i < UI_n_atari_files_dir) ? (UI_ITEM_FILESEL | UI_ITEM_TIP) : UI_ITEM_HIDDEN;
+			menu_array[11 + i].flags = (i < UI_n_saved_files_dir) ? (UI_ITEM_FILESEL | UI_ITEM_TIP) : UI_ITEM_HIDDEN;
+			menu_array[1 + i].suffix = menu_array[11 + i].suffix = (flags != 0)
+				? "Up/Down:move Space:release"
+				: "Ret:change Bksp:delete Space:reorder";
+		}
+		if (UI_n_atari_files_dir < 2)
+			menu_array[1].suffix = "Return:change Backspace:delete";
+		if (UI_n_saved_files_dir < 2)
+			menu_array[11].suffix = "Return:change Backspace:delete";
+		menu_array[9].flags = (UI_n_atari_files_dir < 8) ? UI_ITEM_FILESEL : UI_ITEM_HIDDEN;
+		menu_array[19].flags = (UI_n_saved_files_dir < 8) ? UI_ITEM_FILESEL : UI_ITEM_HIDDEN;
+		option = UI_driver->fSelect("Configure Directories", flags, option, menu_array, &seltype);
+		if (option < 0)
+			return;
+		if (flags != 0) {
+			switch (seltype) {
+			case UI_USER_DRAG_UP:
+				if (option != 0 && option != 10) {
+					strcpy(tmp_dir, menu_array[1 + option].item);
+					strcpy(menu_array[1 + option].item, menu_array[option].item);
+					strcpy(menu_array[option].item, tmp_dir);
+					option--;
+				}
+				break;
+			case UI_USER_DRAG_DOWN:
+				if (option != UI_n_atari_files_dir - 1 && option != 10 + UI_n_saved_files_dir - 1) {
+					strcpy(tmp_dir, menu_array[1 + option].item);
+					strcpy(menu_array[1 + option].item, menu_array[2 + option].item);
+					strcpy(menu_array[2 + option].item, tmp_dir);
+					option++;
+				}
+				break;
+			default:
+				flags = 0;
+				break;
+			}
+			continue;
+		}
+		switch (option) {
+		case 8:
+			tmp_dir[0] = '\0';
+			if (UI_driver->fGetDirectoryPath(tmp_dir)) {
+				strcpy(UI_atari_files_dir[UI_n_atari_files_dir], tmp_dir);
+				option = UI_n_atari_files_dir++;
+			}
+			break;
+		case 18:
+			tmp_dir[0] = '\0';
+			if (UI_driver->fGetDirectoryPath(tmp_dir)) {
+				strcpy(UI_saved_files_dir[UI_n_saved_files_dir], tmp_dir);
+				option = 10 + UI_n_saved_files_dir++;
+			}
+			break;
+		case 9:
+#if 0
+			{
+				static const UI_tMenuItem help_menu_array[] = {
+					UI_MENU_LABEL("You can configure directories,"),
+					UI_MENU_LABEL("where you usually store files used by"),
+					UI_MENU_LABEL("Atari800, to make them available"),
+					UI_MENU_LABEL("at Tab key press in file selectors."),
+					UI_MENU_LABEL(""),
+					UI_MENU_LABEL("\"Directories with Atari software\""),
+					UI_MENU_LABEL("are for disk images, cartridge images,"),
+					UI_MENU_LABEL("tape images, executables and BASIC"),
+					UI_MENU_LABEL("programs."),
+					UI_MENU_LABEL(""),
+					UI_MENU_LABEL("\"Directories for emulator-saved files\""),
+					UI_MENU_LABEL("are for state files, disk sets and"),
+					UI_MENU_LABEL("screenshots taken via User Interface."),
+					UI_MENU_LABEL(""),
+					UI_MENU_LABEL(""),
+					UI_MENU_ACTION(0, "Back"),
+					UI_MENU_END
+				};
+				UI_driver->fSelect("Configure Directories - Help", 0, 0, help_menu_array, NULL);
+			}
+#else
+			UI_driver->fInfoScreen("Configure Directories - Help",
+				"You can configure directories,\0"
+				"where you usually store files used by\0"
+				"Atari800, to make them available\0"
+				"at Tab key press in file selectors.\0"
+				"\0"
+				"\"Directories with Atari software\"\0"
+				"are for disk images, cartridge images,\0"
+				"tape images, executables\0"
+				"and BASIC programs.\0"
+				"\0"
+				"\"Directories for emulator-saved files\"\0"
+				"are for state files, disk sets and\0"
+				"screenshots taken via User Interface.\0"
+				"\n");
+#endif
+			break;
+		case 19:
+			return;
+		default:
+			if (seltype == UI_USER_TOGGLE) {
+				if ((option < 10 ? UI_n_atari_files_dir : UI_n_saved_files_dir) > 1)
+					flags = UI_SELECT_DRAG;
+			}
+			else if (seltype == UI_USER_DELETE) {
+				if (option < 10) {
+					if (option >= --UI_n_atari_files_dir) {
+						option = 8;
+						break;
+					}
+					for (i = option; i < UI_n_atari_files_dir; i++)
+						strcpy(UI_atari_files_dir[i], UI_atari_files_dir[i + 1]);
+				}
+				else {
+					if (option >= --UI_n_saved_files_dir) {
+						option = 18;
+						break;
+					}
+					for (i = option - 10; i < UI_n_saved_files_dir; i++)
+						strcpy(UI_saved_files_dir[i], UI_saved_files_dir[i + 1]);
+				}
+			}
+			else
+				UI_driver->fGetDirectoryPath(menu_array[1 + option].item);
+			break;
+		}
+	}
+}
+
+static void AtariSettings(void)
+{
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_CHECK(0, "Disable BASIC when booting Atari:"),
+		UI_MENU_CHECK(1, "Boot from tape (hold Start):"),
+		UI_MENU_CHECK(2, "Enable R-Time 8:"),
+		UI_MENU_CHECK(3, "SIO patch (fast disk access):"),
+		UI_MENU_ACTION(4, "H: device (hard disk):"),
+		UI_MENU_CHECK(5, "P: device (printer):"),
+#ifdef R_IO_DEVICE
+		UI_MENU_CHECK(6, "R: device (Atari850 via net):"),
+#endif
+		UI_MENU_FILESEL_PREFIX(7, "H1: ", Devices_atari_h_dir[0]),
+		UI_MENU_FILESEL_PREFIX(8, "H2: ", Devices_atari_h_dir[1]),
+		UI_MENU_FILESEL_PREFIX(9, "H3: ", Devices_atari_h_dir[2]),
+		UI_MENU_FILESEL_PREFIX(10, "H4: ", Devices_atari_h_dir[3]),
+		UI_MENU_SUBMENU(20, "Advanced H: options"),
+		UI_MENU_ACTION_PREFIX(11, "Print command: ", Devices_print_command),
+		UI_MENU_FILESEL_PREFIX(12, " OS/A ROM: ", CFG_osa_filename),
+		UI_MENU_FILESEL_PREFIX(13, " OS/B ROM: ", CFG_osb_filename),
+		UI_MENU_FILESEL_PREFIX(14, "XL/XE ROM: ", CFG_xlxe_filename),
+		UI_MENU_FILESEL_PREFIX(15, " 5200 ROM: ", CFG_5200_filename),
+		UI_MENU_FILESEL_PREFIX(16, "BASIC ROM: ", CFG_basic_filename),
+		UI_MENU_FILESEL(17, "Find ROM images in a directory"),
+		UI_MENU_SUBMENU(18, "Configure directories"),
+		UI_MENU_ACTION(19, "Save configuration file"),
+		UI_MENU_END
+	};
+	char tmp_command[256];
+	char rom_dir[FILENAME_MAX];
+
+	int option = 0;
+
+	for (;;) {
+		int seltype;
+		SetItemChecked(menu_array, 0, Atari800_disable_basic);
+		SetItemChecked(menu_array, 1, CASSETTE_hold_start_on_reboot);
+		SetItemChecked(menu_array, 2, RTIME_enabled);
+		SetItemChecked(menu_array, 3, ESC_enable_sio_patch);
+		menu_array[4].suffix = Devices_enable_h_patch ? (Devices_h_read_only ? "Read-only" : "Read/write") : "No ";
+		SetItemChecked(menu_array, 5, Devices_enable_p_patch);
+#ifdef R_IO_DEVICE
+		SetItemChecked(menu_array, 6, Devices_enable_r_patch);
+#endif
+
+		option = UI_driver->fSelect("Emulator Settings", 0, option, menu_array, &seltype);
+
+		switch (option) {
+		case 0:
+			Atari800_disable_basic = !Atari800_disable_basic;
+			break;
+		case 1:
+			CASSETTE_hold_start_on_reboot = !CASSETTE_hold_start_on_reboot;
+			CASSETTE_hold_start = CASSETTE_hold_start_on_reboot;
+			break;
+		case 2:
+			RTIME_enabled = !RTIME_enabled;
+			break;
+		case 3:
+			ESC_enable_sio_patch = !ESC_enable_sio_patch;
+			break;
+		case 4:
+			if (!Devices_enable_h_patch) {
+				Devices_enable_h_patch = TRUE;
+				Devices_h_read_only = TRUE;
+			}
+			else if (Devices_h_read_only)
+				Devices_h_read_only = FALSE;
+			else {
+				Devices_enable_h_patch = FALSE;
+				Devices_h_read_only = TRUE;
+			}
+			break;
+		case 5:
+			Devices_enable_p_patch = !Devices_enable_p_patch;
+			break;
+#ifdef R_IO_DEVICE
+		case 6:
+			Devices_enable_r_patch = !Devices_enable_r_patch;
+			break;
+#endif
+		case 7:
+		case 8:
+		case 9:
+		case 10:
+			if (seltype == UI_USER_DELETE)
+				FindMenuItem(menu_array, option)->item[0] = '\0';
+			else
+				UI_driver->fGetDirectoryPath(FindMenuItem(menu_array, option)->item);
+			break;
+		case 20:
+			AdvancedHOptions();
+			break;
+		case 11:
+			strcpy(tmp_command, Devices_print_command);
+			if (UI_driver->fEditString("Print command", tmp_command, sizeof(tmp_command)))
+				if (!Devices_SetPrintCommand(tmp_command))
+					UI_driver->fMessage("Specified command is not allowed", 1);
+			break;
+		case 12:
+		case 13:
+		case 14:
+		case 15:
+		case 16:
+			if (seltype == UI_USER_DELETE)
+				FindMenuItem(menu_array, option)->item[0] = '\0';
+			else
+				UI_driver->fGetLoadFilename(FindMenuItem(menu_array, option)->item, NULL, 0);
+			break;
+		case 17:
+			Util_splitpath(CFG_xlxe_filename, rom_dir, NULL);
+			if (UI_driver->fGetDirectoryPath(rom_dir))
+				CFG_FindROMImages(rom_dir, FALSE);
+			break;
+		case 18:
+			ConfigureDirectories();
+			break;
+		case 19:
+			UI_driver->fMessage(CFG_WriteConfig() ? "Configuration file updated" : "Error writing configuration file", 1);
+			break;
+		default:
+			ESC_UpdatePatches();
+			return;
+		}
+	}
+}
+
+static char state_filename[FILENAME_MAX] = "";
+
+static void SaveState(void)
+{
+	if (UI_driver->fGetSaveFilename(state_filename, UI_saved_files_dir, UI_n_saved_files_dir)) {
+		int result;
+		UI_driver->fMessage("Please wait while saving...", 0);
+#ifdef XEP80_EMULATION
+		/* Save true XEP80 state */
+		PLATFORM_xep80 = saved_xep80;
+#endif
+		result = StateSav_SaveAtariState(state_filename, "wb", TRUE);
+#ifdef XEP80_EMULATION
+		PLATFORM_xep80 = FALSE;
+#endif
+		if (!result)
+			CantSave(state_filename);
+	}
+}
+
+static void LoadState(void)
+{
+	if (UI_driver->fGetLoadFilename(state_filename, UI_saved_files_dir, UI_n_saved_files_dir)) {
+		UI_driver->fMessage("Please wait while loading...", 0);
+		if (!StateSav_ReadAtariState(state_filename, "rb"))
+			CantLoad(state_filename);
+	}
+#ifdef XEP80_EMULATION
+	saved_xep80 = PLATFORM_xep80;
+	PLATFORM_xep80 = FALSE;
+#endif
+}
+
+/* CURSES_BASIC doesn't use artifacting or Atari800_collisions_in_skipped_frames,
+   but does use Atari800_refresh_rate. However, changing Atari800_refresh_rate on CURSES is mostly
+   useless, as the text-mode screen is normally updated infrequently by Atari.
+   In case you wonder how artifacting affects CURSES version without
+   CURSES_BASIC: it is visible on the screenshots (yes, they are bitmaps). */
+#ifndef CURSES_BASIC
+
+static void DisplaySettings(void)
+{
+	static const UI_tMenuItem artif_quality_menu_array[] = {
+		UI_MENU_ACTION(0, "off"),
+		UI_MENU_ACTION(1, "original"),
+		UI_MENU_ACTION(2, "new"),
+#ifdef NTSC_FILTER
+		UI_MENU_ACTION(3, "NTSC filter"),
+#endif
+		UI_MENU_END
+	};
+	static const UI_tMenuItem artif_mode_menu_array[] = {
+		UI_MENU_ACTION(0, "blue/brown 1"),
+		UI_MENU_ACTION(1, "blue/brown 2"),
+		UI_MENU_ACTION(2, "GTIA"),
+		UI_MENU_ACTION(3, "CTIA"),
+		UI_MENU_END
+	};
+	static char refresh_status[16];
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_SUBMENU_SUFFIX(0, "NTSC artifacting quality:", NULL),
+		UI_MENU_SUBMENU_SUFFIX(11, "NTSC artifacting mode:", NULL),
+		UI_MENU_SUBMENU_SUFFIX(1, "Current refresh rate:", refresh_status),
+		UI_MENU_CHECK(2, "Accurate skipped frames:"),
+		UI_MENU_CHECK(3, "Show percents of Atari speed:"),
+		UI_MENU_CHECK(4, "Show disk drive activity:"),
+		UI_MENU_CHECK(5, "Show sector counter:"),
+#ifdef _WIN32_WCE
+		UI_MENU_CHECK(6, "Enable linear filtering:"),
+#endif
+#ifdef DREAMCAST
+		UI_MENU_CHECK(7, "Double buffer video data:"),
+		UI_MENU_ACTION(8, "Emulator video mode:"),
+		UI_MENU_ACTION(9, "Display video mode:"),
+#ifdef HZ_TEST
+		UI_MENU_ACTION(10, "DO HZ TEST:"),
+#endif
+#endif
+		UI_MENU_END
+	};
+
+	int option = 0;
+	int option2;
+
+	/* Current artifacting quality, computed from
+	   PLATFORM_artifacting and ANTIC_artif_new */
+	int artif_quality;
+	for (;;) {
+		/* Computing current artifacting quality... */
+#ifdef NTSC_FILTER
+		if (PLATFORM_filter != PLATFORM_FILTER_NONE) {
+			/* NTSC filter is on */
+			FindMenuItem(menu_array, 0)->suffix = artif_quality_menu_array[2 + PLATFORM_filter].item;
+			FindMenuItem(menu_array, 11)->suffix = "N/A";
+			artif_quality = 2 + PLATFORM_filter;
+		} else
+#endif
+		if (ANTIC_artif_mode == 0) { /* artifacting is off */
+			FindMenuItem(menu_array, 0)->suffix = artif_quality_menu_array[0].item;
+			FindMenuItem(menu_array, 11)->suffix = "N/A";
+			artif_quality = 0;
+		} else { /* ANTIC artifacting is on */
+			FindMenuItem(menu_array, 0)->suffix = artif_quality_menu_array[1 + ANTIC_artif_new].item;
+			FindMenuItem(menu_array, 11)->suffix = artif_mode_menu_array[ANTIC_artif_mode - 1].item;
+			artif_quality = 1 + ANTIC_artif_new;
+		}
+
+		sprintf(refresh_status, "1:%-2d", Atari800_refresh_rate);
+		SetItemChecked(menu_array, 2, Atari800_collisions_in_skipped_frames);
+		SetItemChecked(menu_array, 3, Screen_show_atari_speed);
+		SetItemChecked(menu_array, 4, Screen_show_disk_led);
+		SetItemChecked(menu_array, 5, Screen_show_sector_counter);
+#ifdef _WIN32_WCE
+		FindMenuItem(menu_array, 6)->flags = filter_available ? (smooth_filter ? (UI_ITEM_CHECK | UI_ITEM_CHECKED) : UI_ITEM_CHECK) : UI_ITEM_HIDDEN;
+#endif
+#ifdef DREAMCAST
+		SetItemChecked(menu_array, 7, db_mode);
+		FindMenuItem(menu_array, 8)->suffix = Atari800_tv_mode == Atari800_TV_NTSC ? "NTSC" : "PAL";
+		FindMenuItem(menu_array, 9)->suffix = screen_tv_mode == Atari800_TV_NTSC ? "NTSC" : "PAL";
+#endif
+		option = UI_driver->fSelect("Display Settings", 0, option, menu_array, NULL);
+		switch (option) {
+		case 0:
+			option2 = UI_driver->fSelect(NULL, UI_SELECT_POPUP, artif_quality, artif_quality_menu_array, NULL);
+			if (option2 >= 0)
+			{
+#ifdef NTSC_FILTER
+				/* If switched between non-filter and NTSC filter,
+				   PLATFORM_filter must be updated. */
+				if (option2 >= 3 && artif_quality < 3)
+					PLATFORM_SetFilter(option2 - 2);
+				else if (option2 < 3 && artif_quality >= 3)
+					PLATFORM_SetFilter(PLATFORM_FILTER_NONE);
+#endif
+				/* ANTIC artifacting settings cannot be turned on
+				   when artifacting is off or NTSC filter. */
+				if (option2 == 0 || option2 >= 3) {
+					ANTIC_artif_new = ANTIC_artif_mode = 0;
+				} else {
+					/* Do not reset artifacting mode when switched between original and new. */
+					if (artif_quality >= 3 || artif_quality == 0)
+						/* switched from off/ntsc filter to ANTIC artifacting */
+						ANTIC_artif_mode = 1;
+
+					ANTIC_artif_new = option2 - 1;
+				}
+				ANTIC_UpdateArtifacting();
+			}
+			break;
+		case 11:
+			/* The artifacting mode option is only active for ANTIC artifacting. */
+			if (artif_quality > 0 && artif_quality < 3)
+			{
+				option2 = UI_driver->fSelect(NULL, UI_SELECT_POPUP, ANTIC_artif_mode - 1, artif_mode_menu_array, NULL);
+				if (option2 >= 0) {
+					ANTIC_artif_mode = option2 + 1;
+					ANTIC_UpdateArtifacting();
+				}
+			}
+			break;
+		case 1:
+			Atari800_refresh_rate = UI_driver->fSelectInt(Atari800_refresh_rate, 1, 99);
+			break;
+		case 2:
+			if (Atari800_refresh_rate == 1)
+				UI_driver->fMessage("No effect with refresh rate 1", 1);
+			Atari800_collisions_in_skipped_frames = !Atari800_collisions_in_skipped_frames;
+			break;
+		case 3:
+			Screen_show_atari_speed = !Screen_show_atari_speed;
+			break;
+		case 4:
+			Screen_show_disk_led = !Screen_show_disk_led;
+			break;
+		case 5:
+			Screen_show_sector_counter = !Screen_show_sector_counter;
+			break;
+#ifdef _WIN32_WCE
+		case 6:
+			smooth_filter = !smooth_filter;
+			break;
+#endif
+#ifdef DREAMCAST
+		case 7:
+			if (db_mode)
+				db_mode = FALSE;
+			else if (Atari800_tv_mode == screen_tv_mode)
+				db_mode = TRUE;
+			update_screen_updater();
+			Screen_EntireDirty();
+			break;
+		case 8:
+			Atari800_tv_mode = (Atari800_tv_mode == Atari800_TV_PAL) ? Atari800_TV_NTSC : Atari800_TV_PAL;
+			if (Atari800_tv_mode != screen_tv_mode) {
+				db_mode = FALSE;
+				update_screen_updater();
+			}
+			update_vidmode();
+			Screen_EntireDirty();
+			break;
+		case 9:
+			Atari800_tv_mode = screen_tv_mode = (screen_tv_mode == Atari800_TV_PAL) ? Atari800_TV_NTSC : Atari800_TV_PAL;
+			update_vidmode();
+			Screen_EntireDirty();
+			break;
+#ifdef HZ_TEST
+		case 10:
+			do_hz_test();
+			Screen_EntireDirty();
+			break;
+#endif
+#endif /* DREAMCAST */
+		default:
+			return;
+		}
+	}
+}
+
+#endif /* CURSES_BASIC */
+
+#ifndef USE_CURSES
+
+#ifdef SDL
+static char joys[2][5][16];
+static const UI_tMenuItem joy0_menu_array[] = {
+	UI_MENU_LABEL("Select joy direction"),
+	UI_MENU_LABEL("\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022"),
+	UI_MENU_SUBMENU_SUFFIX(0, "Left   : ", joys[0][0]),
+	UI_MENU_SUBMENU_SUFFIX(1, "Up     : ", joys[0][1]),
+	UI_MENU_SUBMENU_SUFFIX(2, "Right  : ", joys[0][2]),
+	UI_MENU_SUBMENU_SUFFIX(3, "Down   : ", joys[0][3]),
+	UI_MENU_SUBMENU_SUFFIX(4, "Trigger: ", joys[0][4]),
+	UI_MENU_END
+};
+static const UI_tMenuItem joy1_menu_array[] = {
+	UI_MENU_LABEL("Select joy direction"),
+	UI_MENU_LABEL("\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022\022"),
+	UI_MENU_SUBMENU_SUFFIX(0, "Left   : ", joys[1][0]),
+	UI_MENU_SUBMENU_SUFFIX(1, "Up     : ", joys[1][1]),
+	UI_MENU_SUBMENU_SUFFIX(2, "Right  : ", joys[1][2]),
+	UI_MENU_SUBMENU_SUFFIX(3, "Down   : ", joys[1][3]),
+	UI_MENU_SUBMENU_SUFFIX(4, "Trigger: ", joys[1][4]),
+	UI_MENU_END
+};
+
+static void KeyboardJoystickConfiguration(int joystick)
+{
+	char title[40];
+	int option2 = 0;
+	snprintf(title, sizeof(title), "Define keys for joystick %d", joystick);
+	for(;;) {
+		int j0d;
+		for(j0d = 0; j0d <= 4; j0d++)
+			PLATFORM_GetJoystickKeyName(joystick, j0d, joys[joystick][j0d], sizeof(joys[joystick][j0d]));
+		option2 = UI_driver->fSelect(title, UI_SELECT_POPUP, option2, joystick == 0 ? joy0_menu_array : joy1_menu_array, NULL);
+		if (option2 >= 0 && option2 <= 4) {
+			PLATFORM_SetJoystickKey(joystick, option2, GetRawKey());
+		}
+		if (option2 < 0) break;
+		if (++option2 > 4) option2 = 0;
+	}
+}
+#endif
+
+static void ControllerConfiguration(void)
+{
+#if !defined(_WIN32_WCE) && !defined(DREAMCAST)
+	static const UI_tMenuItem mouse_mode_menu_array[] = {
+		UI_MENU_ACTION(0, "None"),
+		UI_MENU_ACTION(1, "Paddles"),
+		UI_MENU_ACTION(2, "Touch tablet"),
+		UI_MENU_ACTION(3, "Koala pad"),
+		UI_MENU_ACTION(4, "Light pen"),
+		UI_MENU_ACTION(5, "Light gun"),
+		UI_MENU_ACTION(6, "Amiga mouse"),
+		UI_MENU_ACTION(7, "ST mouse"),
+		UI_MENU_ACTION(8, "Trak-ball"),
+		UI_MENU_ACTION(9, "Joystick"),
+		UI_MENU_END
+	};
+	static char mouse_port_status[2] = { '1', '\0' };
+	static char mouse_speed_status[2] = { '1', '\0' };
+#endif
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_ACTION(0, "Joystick autofire:"),
+		UI_MENU_CHECK(1, "Enable MultiJoy4:"),
+#if defined(_WIN32_WCE)
+		UI_MENU_CHECK(5, "Virtual joystick:"),
+#elif defined(DREAMCAST)
+		UI_MENU_CHECK(9, "Emulate Paddles:"),
+		UI_MENU_ACTION(10, "Button configuration"),
+#else
+		UI_MENU_SUBMENU_SUFFIX(2, "Mouse device: ", NULL),
+		UI_MENU_SUBMENU_SUFFIX(3, "Mouse port:", mouse_port_status),
+		UI_MENU_SUBMENU_SUFFIX(4, "Mouse speed:", mouse_speed_status),
+#endif
+#ifdef SDL
+		UI_MENU_CHECK(5, "Enable keyboard joystick 1:"),
+		UI_MENU_SUBMENU(6, "Define layout of keyboard joystick 1"),
+		UI_MENU_CHECK(7, "Enable keyboard joystick 2:"),
+		UI_MENU_SUBMENU(8, "Define layout of keyboard joystick 2"),
+#endif
+		UI_MENU_END
+	};
+
+	int option = 0;
+#if !defined(_WIN32_WCE) && !defined(DREAMCAST)
+	int option2;
+#endif
+	for (;;) {
+		menu_array[0].suffix = INPUT_joy_autofire[0] == INPUT_AUTOFIRE_FIRE ? "Fire"
+		                     : INPUT_joy_autofire[0] == INPUT_AUTOFIRE_CONT ? "Always"
+		                     : "No ";
+		SetItemChecked(menu_array, 1, INPUT_joy_multijoy);
+#if defined(_WIN32_WCE)
+		/* XXX: not on smartphones? */
+		SetItemChecked(menu_array, 5, virtual_joystick);
+#elif defined(DREAMCAST)
+		SetItemChecked(menu_array, 9, emulate_paddles);
+#else
+		menu_array[2].suffix = mouse_mode_menu_array[INPUT_mouse_mode].item;
+		mouse_port_status[0] = (char) ('1' + INPUT_mouse_port);
+		mouse_speed_status[0] = (char) ('0' + INPUT_mouse_speed);
+#endif
+#ifdef SDL
+		SetItemChecked(menu_array, 5, PLATFORM_kbd_joy_0_enabled);
+		SetItemChecked(menu_array, 7, PLATFORM_kbd_joy_1_enabled);
+#endif
+		option = UI_driver->fSelect("Controller Configuration", 0, option, menu_array, NULL);
+		switch (option) {
+		case 0:
+			switch (INPUT_joy_autofire[0]) {
+			case INPUT_AUTOFIRE_FIRE:
+				INPUT_joy_autofire[0] = INPUT_joy_autofire[1] = INPUT_joy_autofire[2] = INPUT_joy_autofire[3] = INPUT_AUTOFIRE_CONT;
+				break;
+			case INPUT_AUTOFIRE_CONT:
+				INPUT_joy_autofire[0] = INPUT_joy_autofire[1] = INPUT_joy_autofire[2] = INPUT_joy_autofire[3] = INPUT_AUTOFIRE_OFF;
+				break;
+			default:
+				INPUT_joy_autofire[0] = INPUT_joy_autofire[1] = INPUT_joy_autofire[2] = INPUT_joy_autofire[3] = INPUT_AUTOFIRE_FIRE;
+				break;
+			}
+			break;
+		case 1:
+			INPUT_joy_multijoy = !INPUT_joy_multijoy;
+			break;
+#if defined(_WIN32_WCE)
+		case 5:
+			virtual_joystick = !virtual_joystick;
+			break;
+#elif defined(DREAMCAST)
+		case 9:
+			emulate_paddles = !emulate_paddles;
+			break;
+		case 10:
+			ButtonConfiguration();
+			break;
+#else
+		case 2:
+			option2 = UI_driver->fSelect(NULL, UI_SELECT_POPUP, INPUT_mouse_mode, mouse_mode_menu_array, NULL);
+			if (option2 >= 0)
+				INPUT_mouse_mode = option2;
+			break;
+		case 3:
+			INPUT_mouse_port = UI_driver->fSelectInt(INPUT_mouse_port + 1, 1, 4) - 1;
+			break;
+		case 4:
+			INPUT_mouse_speed = UI_driver->fSelectInt(INPUT_mouse_speed, 1, 9);
+			break;
+#endif
+#ifdef SDL
+		case 5:
+			PLATFORM_kbd_joy_0_enabled = !PLATFORM_kbd_joy_0_enabled;
+			break;
+		case 6:
+			KeyboardJoystickConfiguration(0);
+			break;
+		case 7:
+			PLATFORM_kbd_joy_1_enabled = !PLATFORM_kbd_joy_1_enabled;
+			break;
+		case 8:
+			KeyboardJoystickConfiguration(1);
+			break;
+#endif
+		default:
+			return;
+		}
+	}
+}
+
+#endif /* USE_CURSES */
+
+#ifdef SOUND
+
+static int SoundSettings(void)
+{
+	static UI_tMenuItem menu_array[] = {
+		/* XXX: don't allow on smartphones? */
+		UI_MENU_CHECK(0, "High Fidelity POKEY:"),
+#ifdef STEREO_SOUND
+		UI_MENU_CHECK(1, "Dual POKEY (Stereo):"),
+#endif
+#ifdef CONSOLE_SOUND
+		UI_MENU_CHECK(2, "Speaker (Key Click):"),
+#endif
+#ifdef SERIO_SOUND
+		UI_MENU_CHECK(3, "Serial IO Sound:"),
+#endif
+		UI_MENU_ACTION(4, "Enable higher frequencies:"),
+#ifdef DREAMCAST
+		UI_MENU_CHECK(5, "Enable sound:"),
+#endif
+		UI_MENU_END
+	};
+
+	int option = 0;
+
+	for (;;) {
+		SetItemChecked(menu_array, 0, POKEYSND_enable_new_pokey);
+#ifdef STEREO_SOUND
+		SetItemChecked(menu_array, 1, POKEYSND_stereo_enabled);
+#endif
+#ifdef CONSOLE_SOUND
+		SetItemChecked(menu_array, 2, POKEYSND_console_sound_enabled);
+#endif
+#ifdef SERIO_SOUND
+		SetItemChecked(menu_array, 3, POKEYSND_serio_sound_enabled);
+#endif
+		FindMenuItem(menu_array, 4)->suffix = POKEYSND_enable_new_pokey ? "N/A" : POKEYSND_bienias_fix ? "Yes" : "No ";
+#ifdef DREAMCAST
+		SetItemChecked(menu_array, 5, glob_snd_ena);
+#endif
+
+#if 0
+		option = UI_driver->fSelect(NULL, UI_SELECT_POPUP, option, menu_array, NULL);
+#else
+		option = UI_driver->fSelect("Sound Settings", 0, option, menu_array, NULL);
+#endif
+
+		switch (option) {
+		case 0:
+			POKEYSND_enable_new_pokey = !POKEYSND_enable_new_pokey;
+			POKEYSND_DoInit();
+			/* According to the PokeySnd doc the POKEY switch can occur on
+			   a cold-restart only */
+			UI_driver->fMessage("Will reboot to apply the change", 1);
+			return TRUE; /* reboot required */
+#ifdef STEREO_SOUND
+		case 1:
+			POKEYSND_stereo_enabled = !POKEYSND_stereo_enabled;
+#ifdef SUPPORTS_SOUND_REINIT
+			Sound_Reinit();
+#endif
+			break;
+#endif
+#ifdef CONSOLE_SOUND
+		case 2:
+			POKEYSND_console_sound_enabled = !POKEYSND_console_sound_enabled;
+			break;
+#endif
+#ifdef SERIO_SOUND
+		case 3:
+			POKEYSND_serio_sound_enabled = !POKEYSND_serio_sound_enabled;
+			break;
+#endif
+		case 4:
+			if (! POKEYSND_enable_new_pokey) POKEYSND_bienias_fix = !POKEYSND_bienias_fix;
+			break;
+#ifdef DREAMCAST
+		case 5:
+			glob_snd_ena = !glob_snd_ena;
+			break;
+#endif
+		default:
+			return FALSE;
+		}
+	}
+}
+
+#endif /* SOUND */
+
+#if !defined(CURSES_BASIC) && !defined(DREAMCAST)
+
+#ifdef USE_CURSES
+extern void curses_clear_screen(void);
+#endif
+
+static void Screenshot(int interlaced)
+{
+	static char filename[FILENAME_MAX] = "";
+	if (UI_driver->fGetSaveFilename(filename, UI_saved_files_dir, UI_n_saved_files_dir)) {
+#ifdef USE_CURSES
+		/* must clear, otherwise in case of a failure we'll see parts
+		   of Atari screen on top of UI screen */
+		curses_clear_screen();
+#endif
+		ANTIC_Frame(TRUE);
+		if (!Screen_SaveScreenshot(filename, interlaced))
+			CantSave(filename);
+	}
+}
+
+#endif /* !defined(CURSES_BASIC) && !defined(DREAMCAST) */
+
+static void AboutEmulator(void)
+{
+	UI_driver->fInfoScreen("About the Emulator",
+		Atari800_TITLE "\0"
+		"Copyright (c) 1995-1998 David Firth\0"
+		"and\0"
+		"(c)1998-2008 Atari800 Development Team\0"
+		"See CREDITS file for details.\0"
+		"http://atari800.atari.org/\0"
+		"\0"
+		"\0"
+		"\0"
+		"This program is free software; you can\0"
+		"redistribute it and/or modify it under\0"
+		"the terms of the GNU General Public\0"
+		"License as published by the Free\0"
+		"Software Foundation; either version 2,\0"
+		"or (at your option) any later version.\0"
+		"\n");
+}
+
+void UI_Run(void)
+{
+#define MENU_CONTROLLER 19
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_FILESEL_ACCEL(UI_MENU_RUN, "Run Atari Program", "Alt+R"),
+		UI_MENU_SUBMENU_ACCEL(UI_MENU_DISK, "Disk Management", "Alt+D"),
+		UI_MENU_SUBMENU_ACCEL(UI_MENU_CARTRIDGE, "Cartridge Management", "Alt+C"),
+		UI_MENU_FILESEL(UI_MENU_CASSETTE, "Select Tape Image"),
+		UI_MENU_SUBMENU_ACCEL(UI_MENU_SYSTEM, "Select System", "Alt+Y"),
+#ifdef SOUND
+		UI_MENU_SUBMENU_ACCEL(UI_MENU_SOUND, "Sound Settings", "Alt+O"),
+#ifndef DREAMCAST
+		UI_MENU_ACTION_ACCEL(UI_MENU_SOUND_RECORDING, "Sound Recording Start/Stop", "Alt+W"),
+#endif
+#endif
+#ifndef CURSES_BASIC
+		UI_MENU_SUBMENU(UI_MENU_DISPLAY, "Display Settings"),
+#endif
+#ifndef USE_CURSES
+		UI_MENU_SUBMENU(MENU_CONTROLLER, "Controller Configuration"),
+#endif
+		UI_MENU_SUBMENU(UI_MENU_SETTINGS, "Emulator Configuration"),
+		UI_MENU_FILESEL_ACCEL(UI_MENU_SAVESTATE, "Save State", "Alt+S"),
+		UI_MENU_FILESEL_ACCEL(UI_MENU_LOADSTATE, "Load State", "Alt+L"),
+#if !defined(CURSES_BASIC) && !defined(DREAMCAST)
+#ifdef HAVE_LIBPNG
+		UI_MENU_FILESEL_ACCEL(UI_MENU_PCX, "Save Screenshot", "F10"),
+		/* there isn't enough space for "PNG/PCX Interlaced Screenshot Shift+F10" */
+		UI_MENU_FILESEL_ACCEL(UI_MENU_PCXI, "Save Interlaced Screenshot", "Shift+F10"),
+#else
+		UI_MENU_FILESEL_ACCEL(UI_MENU_PCX, "PCX Screenshot", "F10"),
+		UI_MENU_FILESEL_ACCEL(UI_MENU_PCXI, "PCX Interlaced Screenshot", "Shift+F10"),
+#endif
+#endif
+		UI_MENU_ACTION_ACCEL(UI_MENU_BACK, "Back to Emulated Atari", "Esc"),
+		UI_MENU_ACTION_ACCEL(UI_MENU_RESETW, "Reset (Warm Start)", "F5"),
+		UI_MENU_ACTION_ACCEL(UI_MENU_RESETC, "Reboot (Cold Start)", "Shift+F5"),
+#if defined(_WIN32_WCE)
+		UI_MENU_ACTION(UI_MENU_MONITOR, "About Pocket Atari"),
+#elif defined(DREAMCAST)
+		UI_MENU_ACTION(UI_MENU_MONITOR, "About AtariDC"),
+#else
+		UI_MENU_ACTION_ACCEL(UI_MENU_MONITOR, "Enter Monitor", "F8"),
+#endif
+		UI_MENU_ACTION_ACCEL(UI_MENU_ABOUT, "About the Emulator", "Alt+A"),
+		UI_MENU_ACTION_ACCEL(UI_MENU_EXIT, "Exit Emulator", "F9"),
+		UI_MENU_END
+	};
+
+	int option = UI_MENU_RUN;
+	int done = FALSE;
+#ifdef XEP80_EMULATION
+	saved_xep80 = PLATFORM_xep80;
+	if (PLATFORM_xep80) {
+		PLATFORM_SwitchXep80();
+	}
+#endif
+
+	UI_is_active = TRUE;
+
+	/* Sound_Active(FALSE); */
+	UI_driver->fInit();
+
+#ifdef CRASH_MENU
+	if (UI_crash_code >= 0) {
+		done = CrashMenu();
+		UI_crash_code = -1;
+	}
+#endif
+
+	while (!done) {
+
+		if (UI_alt_function < 0)
+			option = UI_driver->fSelect(Atari800_TITLE, 0, option, menu_array, NULL);
+		if (UI_alt_function >= 0) {
+			option = UI_alt_function;
+			UI_alt_function = -1;
+			done = TRUE;
+		}
+
+		switch (option) {
+		case -2:
+		case -1:				/* ESC key */
+			done = TRUE;
+			break;
+		case UI_MENU_DISK:
+			DiskManagement();
+			break;
+		case UI_MENU_CARTRIDGE:
+			CartManagement();
+			break;
+		case UI_MENU_RUN:
+			/* if (RunExe()) */
+			if (AutostartFile())
+				done = TRUE;	/* reboot immediately */
+			break;
+		case UI_MENU_CASSETTE:
+			LoadTape();
+			break;
+		case UI_MENU_SYSTEM:
+			SelectSystem();
+			break;
+		case UI_MENU_SETTINGS:
+			AtariSettings();
+			break;
+#ifdef SOUND
+		case UI_MENU_SOUND:
+			if (SoundSettings()) {
+				Atari800_Coldstart();
+				done = TRUE;	/* reboot immediately */
+			}
+			break;
+#ifndef DREAMCAST
+		case UI_MENU_SOUND_RECORDING:
+			SoundRecording();
+			break;
+#endif
+#endif
+		case UI_MENU_SAVESTATE:
+			SaveState();
+			break;
+		case UI_MENU_LOADSTATE:
+			/* Note: AutostartFile() handles state files, too,
+			   so we can remove LoadState() now. */
+			LoadState();
+			break;
+#ifndef CURSES_BASIC
+		case UI_MENU_DISPLAY:
+			DisplaySettings();
+			break;
+#ifndef DREAMCAST
+		case UI_MENU_PCX:
+			Screenshot(FALSE);
+			break;
+		case UI_MENU_PCXI:
+			Screenshot(TRUE);
+			break;
+#endif
+#endif
+#ifndef USE_CURSES
+		case MENU_CONTROLLER:
+			ControllerConfiguration();
+			break;
+#endif
+		case UI_MENU_BACK:
+			done = TRUE;		/* back to emulator */
+			break;
+		case UI_MENU_RESETW:
+			Atari800_Warmstart();
+			done = TRUE;		/* reboot immediately */
+			break;
+		case UI_MENU_RESETC:
+			Atari800_Coldstart();
+			done = TRUE;		/* reboot immediately */
+			break;
+		case UI_MENU_ABOUT:
+			AboutEmulator();
+			break;
+		case UI_MENU_MONITOR:
+#if defined(_WIN32_WCE)
+			AboutPocketAtari();
+			break;
+#elif defined(DREAMCAST)
+			AboutAtariDC();
+			break;
+#else
+			if (PLATFORM_Exit(TRUE)) {
+				done = TRUE;
+				break;
+			}
+			/* if 'quit' typed in monitor, exit emulator */
+#endif
+		case UI_MENU_EXIT:
+			Atari800_Exit(FALSE);
+			exit(0);
+		}
+	}
+	/* Sound_Active(TRUE); */
+	UI_is_active = FALSE;
+	/* flush keypresses */
+	while (PLATFORM_Keyboard() != AKEY_NONE)
+		Atari800_Sync();
+	UI_alt_function = -1;
+	/* restore XEP80 screen */
+#ifdef XEP80_EMULATION
+	if (saved_xep80 != PLATFORM_xep80) {
+		PLATFORM_SwitchXep80();
+	}
+#endif
+}
+
+
+#ifdef CRASH_MENU
+
+int CrashMenu(void)
+{
+	static char cim_info[42];
+	static UI_tMenuItem menu_array[] = {
+		UI_MENU_LABEL(cim_info),
+		UI_MENU_ACTION_ACCEL(0, "Reset (Warm Start)", "F5"),
+		UI_MENU_ACTION_ACCEL(1, "Reboot (Cold Start)", "Shift+F5"),
+		UI_MENU_ACTION_ACCEL(2, "Menu", "F1"),
+#if !defined(_WIN32_WCE) && !defined(DREAMCAST)
+		UI_MENU_ACTION_ACCEL(3, "Enter Monitor", "F8"),
+#endif
+		UI_MENU_ACTION_ACCEL(4, "Continue After CIM", "Esc"),
+		UI_MENU_ACTION_ACCEL(5, "Exit Emulator", "F9"),
+		UI_MENU_END
+	};
+
+	int option = 0;
+	sprintf(cim_info, "Code $%02X (CIM) at address $%04X", UI_crash_code, UI_crash_address);
+
+	for (;;) {
+		option = UI_driver->fSelect("!!! The Atari computer has crashed !!!", 0, option, menu_array, NULL);
+
+		if (UI_alt_function >= 0) /* pressed F5, Shift+F5 or F9 */
+			return FALSE;
+
+		switch (option) {
+		case 0:				/* Power On Reset */
+			UI_alt_function = UI_MENU_RESETW;
+			return FALSE;
+		case 1:				/* Power Off Reset */
+			UI_alt_function = UI_MENU_RESETC;
+			return FALSE;
+		case 2:				/* Menu */
+			return FALSE;
+#if !defined(_WIN32_WCE) && !defined(DREAMCAST)
+		case 3:				/* Monitor */
+			UI_alt_function = UI_MENU_MONITOR;
+			return FALSE;
+#endif
+		case -2:
+		case -1:			/* ESC key */
+		case 4:				/* Continue after CIM */
+			CPU_regPC = UI_crash_afterCIM;
+			return TRUE;
+		case 5:				/* Exit */
+			UI_alt_function = UI_MENU_EXIT;
+			return FALSE;
+		}
+	}
+}
+#endif
diff --git a/project/jni/application/atari800/src/ui.h b/project/jni/application/atari800/src/ui.h
new file mode 100644
index 000000000..14fd5df8e
--- /dev/null
+++ b/project/jni/application/atari800/src/ui.h
@@ -0,0 +1,195 @@
+/*
+ * ui.h - Atari user interface definitions
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+#ifndef UI_H_
+#define UI_H_
+
+#include "config.h"
+#include <stdio.h> /* FILENAME_MAX */
+#include "atari.h"
+
+/* Three legitimate entries to UI module. */
+int UI_SelectCartType(int k);
+void UI_Run(void);
+
+extern int UI_is_active;
+extern int UI_alt_function;
+
+#ifdef CRASH_MENU
+extern int UI_crash_code;
+extern UWORD UI_crash_address;
+extern UWORD UI_crash_afterCIM;
+#endif
+
+#define UI_MAX_DIRECTORIES 8
+
+extern char UI_atari_files_dir[UI_MAX_DIRECTORIES][FILENAME_MAX];
+extern char UI_saved_files_dir[UI_MAX_DIRECTORIES][FILENAME_MAX];
+extern int UI_n_atari_files_dir;
+extern int UI_n_saved_files_dir;
+
+#ifdef SDL
+void PLATFORM_SetJoystickKey(int joystick, int direction, int value);
+void PLATFORM_GetJoystickKeyName(int joystick, int direction, char *buffer, int bufsize);
+int GetRawKey(void);
+#endif
+
+/* Menu codes for Alt+letter shortcuts.
+   Store in UI_alt_function and put AKEY_UI in INPUT_key_code. */
+#define UI_MENU_DISK             0
+#define UI_MENU_CARTRIDGE        1
+#define UI_MENU_RUN              2
+#define UI_MENU_SYSTEM           3
+#define UI_MENU_SOUND            4
+#define UI_MENU_SOUND_RECORDING  5
+#define UI_MENU_DISPLAY          6
+#define UI_MENU_SETTINGS         7
+#define UI_MENU_SAVESTATE        8
+#define UI_MENU_LOADSTATE        9
+#define UI_MENU_PCX              10
+#define UI_MENU_PCXI             11
+#define UI_MENU_BACK             12
+#define UI_MENU_RESETW           13
+#define UI_MENU_RESETC           14
+#define UI_MENU_MONITOR          15
+#define UI_MENU_ABOUT            16
+#define UI_MENU_EXIT             17
+#define UI_MENU_CASSETTE         18
+
+/* Structure of menu item. Each menu is just an array of items of this structure
+   terminated by UI_MENU_END */
+typedef struct
+{
+	UWORD flags;   /* Flags, see values below */
+	SWORD retval;  /* Value returned by Select when this item is selected */
+	               /* < 0 means that item is strictly informative and cannot be selected */
+	char *prefix;  /* Text to prepend the item */
+	char *item;    /* Main item text */
+	const char *suffix;  /* Optional text to show after the item text (e.g. key shortcut) */
+	               /* or (if (flags & UI_ITEM_TIP) != 0) "tooltip" */
+} UI_tMenuItem;
+
+/* The following are item types, mutually exclusive. */
+#define UI_ITEM_HIDDEN  0x00  /* Item does not appear in the menu */
+#define UI_ITEM_ACTION  0x01  /* Item invokes an action */
+#define UI_ITEM_CHECK   0x02  /* Item represents a boolean value */
+#define UI_ITEM_FILESEL 0x03  /* Item invokes file/directory selection */
+#define UI_ITEM_SUBMENU 0x04  /* Item opens a submenu */
+/* UI_ITEM_CHECK means that the value of UI_ITEM_CHECKED is shown.
+   UI_ITEM_FILESEL and UI_ITEM_SUBMENU are just for optional decorations,
+   so the user knows what happens when he/she selects this item. */
+#define UI_ITEM_TYPE    0x0f
+
+/* The following are bit masks and should be combined with one of the above item types. */
+#define UI_ITEM_CHECKED 0x10  /* The boolean value for UI_ITEM_CHECK is true */
+#define UI_ITEM_TIP     0x20  /* suffix is shown when the item is selected rather than on its right */
+
+#if defined(_WIN32_WCE) || defined(DREAMCAST)
+/* No function keys nor Alt+letter on Windows CE, Sega DC */
+#define UI_MENU_ACCEL(keystroke) NULL
+#else
+#define UI_MENU_ACCEL(keystroke) keystroke
+#endif
+
+#define UI_MENU_LABEL(item)                                    { UI_ITEM_ACTION, -1, NULL, item, NULL }
+#define UI_MENU_ACTION(retval, item)                           { UI_ITEM_ACTION, retval, NULL, item, NULL }
+#define UI_MENU_ACTION_PREFIX(retval, prefix, item)            { UI_ITEM_ACTION, retval, prefix, item, NULL }
+#define UI_MENU_ACTION_PREFIX_TIP(retval, prefix, item, tip)   { UI_ITEM_ACTION | UI_ITEM_TIP, retval, prefix, item, tip }
+#define UI_MENU_ACTION_ACCEL(retval, item, keystroke)          { UI_ITEM_ACTION, retval, NULL, item, UI_MENU_ACCEL(keystroke) }
+#define UI_MENU_ACTION_TIP(retval, item, tip)                  { UI_ITEM_ACTION | UI_ITEM_TIP, retval, NULL, item, tip }
+#define UI_MENU_CHECK(retval, item)                            { UI_ITEM_CHECK, retval, NULL, item, NULL }
+#define UI_MENU_FILESEL(retval, item)                          { UI_ITEM_FILESEL, retval, NULL, item, NULL }
+#define UI_MENU_FILESEL_PREFIX(retval, prefix, item)           { UI_ITEM_FILESEL, retval, prefix, item, NULL }
+#define UI_MENU_FILESEL_PREFIX_TIP(retval, prefix, item, tip)  { UI_ITEM_FILESEL | UI_ITEM_TIP, retval, prefix, item, tip }
+#define UI_MENU_FILESEL_ACCEL(retval, item, keystroke)         { UI_ITEM_FILESEL, retval, NULL, item, UI_MENU_ACCEL(keystroke) }
+#define UI_MENU_FILESEL_TIP(retval, item, tip)                 { UI_ITEM_FILESEL | UI_ITEM_TIP, retval, NULL, item, tip }
+#define UI_MENU_SUBMENU(retval, item)                          { UI_ITEM_SUBMENU, retval, NULL, item, NULL }
+#define UI_MENU_SUBMENU_SUFFIX(retval, item, suffix)           { UI_ITEM_SUBMENU, retval, NULL, item, suffix }
+#define UI_MENU_SUBMENU_ACCEL(retval, item, keystroke)         { UI_ITEM_SUBMENU, retval, NULL, item, UI_MENU_ACCEL(keystroke) }
+#define UI_MENU_END                                            { UI_ITEM_HIDDEN, 0, NULL, NULL, NULL }
+
+/* UI driver entry prototypes */
+
+/* Select provides simple selection from menu.
+   title can be used as a caption.
+   If (flags & UI_SELECT_POPUP) != 0 the menu is a popup menu.
+   default_item is initially selected item (not item # but rather retval from menu structure).
+   menu is array of items of type UI_tMenuItem, must be termintated by UI_MENU_END.
+   If seltype is non-null, it is used to return selection type (see UI_USER_* below).
+   UI_USER_DRAG_UP and UI_USER_DRAG_DOWN are returned only if (flags & UI_SELECT_DRAG) != 0.
+   Returned is retval of the selected item or -1 if the user cancelled selection,
+   or -2 if the user pressed "magic key" (Tab). */
+typedef int (*UI_fnSelect)(const char *title, int flags, int default_item, const UI_tMenuItem *menu, int *seltype);
+/* SelectInt returns an integer chosen by the user from the range min_value..max_value.
+   default_value is the initial selection and the value returned if the selection is cancelled. */
+typedef int (*UI_fnSelectInt)(int default_value, int min_value, int max_value);
+/* EditString provides string input. pString is shown initially and can be modified by the user.
+   It won't exceed nSize characters, including NUL. Note that pString may be modified even
+   when the user pressed Esc. */
+typedef int (*UI_fnEditString)(const char *title, char *string, int size);
+/* GetSaveFilename and GetLoadFilename return fully qualified file name via pFilename.
+   pDirectories are "favourite" directories (there are nDirectories of them).
+   Selection starts in the directory of the passed pFilename (i.e. pFilename must be initialized)
+   or (if pFilename[0] == '\0') in the first "favourite" directory. */
+typedef int (*UI_fnGetSaveFilename)(char *filename, char directories[][FILENAME_MAX], int n_directories);
+typedef int (*UI_fnGetLoadFilename)(char *filename, char directories[][FILENAME_MAX], int n_directories);
+/* GetDirectoryPath is a directory browser */
+typedef int (*UI_fnGetDirectoryPath)(char *directory);
+/* Message is just some kind of MessageBox */
+typedef void (*UI_fnMessage)(const char *message, int waitforkey);
+/* InfoScreen displays a "long" message.
+   Caution: lines in pMessage should be ended with '\0', the message should be terminated with '\n'. */
+typedef void (*UI_fnInfoScreen)(const char *title, const char *message);
+/* Init is called to initialize driver every time UI code is executed.
+   Driver must be protected against multiple inits. */
+typedef void (*UI_fnInit)(void);
+
+/* Bit masks for flags */
+#define UI_SELECT_POPUP   0x01
+#define UI_SELECT_DRAG    0x02
+
+/* Values returned via seltype */
+#define UI_USER_SELECT    1
+#define UI_USER_TOGGLE    2
+#define UI_USER_DELETE    3
+#define UI_USER_DRAG_UP   4
+#define UI_USER_DRAG_DOWN 5
+
+typedef struct
+{
+	UI_fnSelect           fSelect;
+	UI_fnSelectInt        fSelectInt;
+	UI_fnEditString       fEditString;
+	UI_fnGetSaveFilename  fGetSaveFilename;
+	UI_fnGetLoadFilename  fGetLoadFilename;
+	UI_fnGetDirectoryPath fGetDirectoryPath;
+	UI_fnMessage          fMessage;
+	UI_fnInfoScreen       fInfoScreen;
+	UI_fnInit             fInit;
+} UI_tDriver;
+
+/* Current UI driver. Port can override it and set pointer to port
+   specific driver */
+extern UI_tDriver *UI_driver;
+
+#endif /* UI_H_ */
diff --git a/project/jni/application/atari800/src/ui_basic.c b/project/jni/application/atari800/src/ui_basic.c
new file mode 100644
index 000000000..ea9ae3a39
--- /dev/null
+++ b/project/jni/application/atari800/src/ui_basic.c
@@ -0,0 +1,1406 @@
+/*
+ * ui_basic.c - Atari look&feel user interface driver
+ *
+ * Copyright (C) 1995-1998 David Firth
+ * Copyright (C) 1998-2008 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h> /* free() */
+#ifdef HAVE_UNISTD_H
+#include <unistd.h> /* getcwd() */
+#endif
+#ifdef HAVE_DIRECT_H
+#include <direct.h> /* getcwd on MSVC*/
+#endif
+/* XXX: <sys/dir.h>, <ndir.h>, <sys/ndir.h> */
+#ifdef HAVE_DIRENT_H
+#include <dirent.h>
+#endif
+#ifdef HAVE_SYS_STAT_H
+#include <sys/stat.h>
+#endif
+#ifdef WIN32
+#include <windows.h>
+#endif
+
+#include "antic.h"
+#include "atari.h"
+#include "input.h"
+#include "akey.h"
+#include "log.h"
+#include "memory.h"
+#include "platform.h"
+#include "screen.h" /* Screen_atari */
+#include "ui.h"
+#include "util.h"
+
+#ifdef USE_CURSES
+extern void curses_clear_screen(void);
+extern void curses_clear_rectangle(int x1, int y1, int x2, int y2);
+extern void curses_putch(int x, int y, int ascii, UBYTE fg, UBYTE bg);
+#endif
+
+static int initialised = FALSE;
+static UBYTE charset[1024];
+
+const unsigned char UI_BASIC_key_to_ascii[256] =
+{
+	0x6C, 0x6A, 0x3B, 0x00, 0x00, 0x6B, 0x2B, 0x2A, 0x6F, 0x00, 0x70, 0x75, 0x9B, 0x69, 0x2D, 0x3D,
+	0x76, 0x00, 0x63, 0x00, 0x00, 0x62, 0x78, 0x7A, 0x34, 0x00, 0x33, 0x36, 0x1B, 0x35, 0x32, 0x31,
+	0x2C, 0x20, 0x2E, 0x6E, 0x00, 0x6D, 0x2F, 0x00, 0x72, 0x00, 0x65, 0x79, 0x7F, 0x74, 0x77, 0x71,
+	0x39, 0x00, 0x30, 0x37, 0x7E, 0x38, 0x3C, 0x3E, 0x66, 0x68, 0x64, 0x00, 0x00, 0x67, 0x73, 0x61,
+
+	0x4C, 0x4A, 0x3A, 0x00, 0x00, 0x4B, 0x5C, 0x5E, 0x4F, 0x00, 0x50, 0x55, 0x9B, 0x49, 0x5F, 0x7C,
+	0x56, 0x00, 0x43, 0x00, 0x00, 0x42, 0x58, 0x5A, 0x24, 0x00, 0x23, 0x26, 0x1B, 0x25, 0x22, 0x21,
+	0x5B, 0x20, 0x5D, 0x4E, 0x00, 0x4D, 0x3F, 0x00, 0x52, 0x00, 0x45, 0x59, 0x9F, 0x54, 0x57, 0x51,
+	0x28, 0x00, 0x29, 0x27, 0x9C, 0x40, 0x7D, 0x9D, 0x46, 0x48, 0x44, 0x00, 0x00, 0x47, 0x53, 0x41,
+
+	0x0C, 0x0A, 0x7B, 0x00, 0x00, 0x0B, 0x1E, 0x1F, 0x0F, 0x00, 0x10, 0x15, 0x9B, 0x09, 0x1C, 0x1D,
+	0x16, 0x00, 0x03, 0x00, 0x00, 0x02, 0x18, 0x1A, 0x00, 0x00, 0x9B, 0x00, 0x1B, 0x00, 0xFD, 0x00,
+	0x00, 0x20, 0x60, 0x0E, 0x00, 0x0D, 0x00, 0x00, 0x12, 0x00, 0x05, 0x19, 0x9E, 0x14, 0x17, 0x11,
+	0x00, 0x00, 0x00, 0x00, 0xFE, 0x00, 0x7D, 0xFF, 0x06, 0x08, 0x04, 0x00, 0x00, 0x07, 0x13, 0x01,
+
+	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
+	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
+	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
+	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
+};
+
+#define KB_DELAY       20
+#define KB_AUTOREPEAT  3
+
+static int GetKeyPress(void)
+{
+	int keycode;
+
+	if (UI_alt_function >= 0)
+		return 0x1b; /* escape - go to Main Menu */
+
+	PLATFORM_DisplayScreen();
+
+	for (;;) {
+		static int rep = KB_DELAY;
+		if (PLATFORM_Keyboard() == AKEY_NONE) {
+			rep = KB_DELAY;
+			break;
+		}
+		if (rep == 0) {
+			rep = KB_AUTOREPEAT;
+			break;
+		}
+		rep--;
+		Atari800_Sync();
+	}
+
+	do {
+		Atari800_Sync();
+		keycode = PLATFORM_Keyboard();
+		switch (keycode) {
+		case AKEY_WARMSTART:
+			UI_alt_function = UI_MENU_RESETW;
+			return 0x1b; /* escape */
+		case AKEY_COLDSTART:
+			UI_alt_function = UI_MENU_RESETC;
+			return 0x1b; /* escape */
+		case AKEY_EXIT:
+			UI_alt_function = UI_MENU_EXIT;
+			return 0x1b; /* escape */
+		case AKEY_UI:
+			if (UI_alt_function >= 0) /* Alt+letter, not F1 */
+				return 0x1b; /* escape */
+			break;
+		case AKEY_SCREENSHOT:
+			UI_alt_function = UI_MENU_PCX;
+			return 0x1b; /* escape */
+		case AKEY_SCREENSHOT_INTERLACE:
+			UI_alt_function = UI_MENU_PCXI;
+			return 0x1b; /* escape */
+		default:
+			UI_alt_function = -1; /* forget previous Main Menu shortcut */
+			break;
+		}
+	} while (keycode < 0);
+
+	return UI_BASIC_key_to_ascii[keycode];
+}
+
+static void Plot(int fg, int bg, int ch, int x, int y)
+{
+#ifdef USE_CURSES
+	curses_putch(x, y, ch, (UBYTE) fg, (UBYTE) bg);
+#else /* USE_CURSES */
+	const UBYTE *font_ptr = charset + (ch & 0x7f) * 8;
+	UBYTE *ptr = (UBYTE *) Screen_atari + 24 * Screen_WIDTH + 32 + y * (8 * Screen_WIDTH) + x * 8;
+	int i;
+	int j;
+
+	for (i = 0; i < 8; i++) {
+		UBYTE data = *font_ptr++;
+		for (j = 0; j < 8; j++) {
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+			ANTIC_VideoPutByte(ptr++, (UBYTE) colour_translation_table[data & 0x80 ? fg : bg]);
+#else
+			ANTIC_VideoPutByte(ptr++, (UBYTE) (data & 0x80 ? fg : bg));
+#endif
+			data <<= 1;
+		}
+		ptr += Screen_WIDTH - 8;
+	}
+#endif /* USE_CURSES */
+}
+
+static void Print(int fg, int bg, const char *string, int x, int y, int maxwidth)
+{
+	char tmpbuf[40];
+	if ((int) strlen(string) > maxwidth) {
+		int firstlen = (maxwidth - 3) >> 1;
+		int laststart = strlen(string) - (maxwidth - 3 - firstlen);
+		sprintf(tmpbuf, "%.*s...%s", firstlen, string, string + laststart);
+		string = tmpbuf;
+	}
+	while (*string != '\0')
+		Plot(fg, bg, *string++, x++, y);
+}
+
+static void CenterPrint(int fg, int bg, const char *string, int y)
+{
+	int length = strlen(string);
+	Print(fg, bg, string, (length < 38) ? (40 - length) >> 1 : 1, y, 38);
+}
+
+static void Box(int fg, int bg, int x1, int y1, int x2, int y2)
+{
+	int x;
+	int y;
+
+	for (x = x1 + 1; x < x2; x++) {
+		Plot(fg, bg, 18, x, y1);
+		Plot(fg, bg, 18, x, y2);
+	}
+
+	for (y = y1 + 1; y < y2; y++) {
+		Plot(fg, bg, 124, x1, y);
+		Plot(fg, bg, 124, x2, y);
+	}
+
+	Plot(fg, bg, 17, x1, y1);
+	Plot(fg, bg, 5, x2, y1);
+	Plot(fg, bg, 3, x2, y2);
+	Plot(fg, bg, 26, x1, y2);
+}
+
+static void ClearRectangle(int bg, int x1, int y1, int x2, int y2)
+{
+#ifdef USE_CURSES
+	curses_clear_rectangle(x1, y1, x2, y2);
+#else
+	UBYTE *ptr = (UBYTE *) Screen_atari + Screen_WIDTH * 24 + 32 + x1 * 8 + y1 * (Screen_WIDTH * 8);
+	int bytesperline = (x2 - x1 + 1) << 3;
+	UBYTE *end_ptr = (UBYTE *) Screen_atari + Screen_WIDTH * 32 + 32 + y2 * (Screen_WIDTH * 8);
+	while (ptr < end_ptr) {
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+		ANTIC_VideoMemset(ptr, (UBYTE) colour_translation_table[bg], bytesperline);
+#else
+		ANTIC_VideoMemset(ptr, (UBYTE) bg, bytesperline);
+#endif
+		ptr += Screen_WIDTH;
+	}
+#endif /* USE_CURSES */
+}
+
+static void ClearScreen(void)
+{
+#ifdef USE_CURSES
+	curses_clear_screen();
+#else
+#ifdef USE_COLOUR_TRANSLATION_TABLE
+	ANTIC_VideoMemset((UBYTE *) Screen_atari, colour_translation_table[0x00], Screen_HEIGHT * Screen_WIDTH);
+#else
+	ANTIC_VideoMemset((UBYTE *) Screen_atari, 0x00, Screen_HEIGHT * Screen_WIDTH);
+#endif
+	ClearRectangle(0x94, 0, 0, 39, 23);
+#endif /* USE_CURSES */
+}
+
+static void TitleScreen(const char *title)
+{
+	CenterPrint(0x9a, 0x94, title, 0);
+}
+
+static void BasicUIMessage(const char *msg, int waitforkey)
+{
+	ClearRectangle(0x94, 1, 22, 38, 22);
+	CenterPrint(0x94, 0x9a, msg, 22);
+	if (waitforkey)
+		GetKeyPress();
+	else
+		PLATFORM_DisplayScreen();
+}
+
+#ifdef SDL
+int GetRawKey(void)
+{
+	ClearRectangle(0x94, 13, 11, 25, 13);
+	Box(0x9a, 0x94, 13, 11, 25, 13);
+	CenterPrint(0x94, 0x9a, "Press a key", 12);
+	PLATFORM_DisplayScreen();
+	return PLATFORM_GetRawKey();
+}
+#endif
+
+static int Select(int default_item, int nitems, const char *item[],
+                  const char *prefix[], const char *suffix[],
+                  const char *tip[], const int nonselectable[],
+                  int nrows, int ncolumns, int xoffset, int yoffset,
+                  int itemwidth, int drag, const char *global_tip,
+                  int *seltype)
+{
+	int offset = 0;
+	int index = default_item;
+	int localseltype;
+
+	if (seltype == NULL)
+		seltype = &localseltype;
+
+	for (;;) {
+		int col;
+		int row;
+		int i;
+		const char *message = global_tip;
+
+		while (index < offset)
+			offset -= nrows;
+		while (index >= offset + nrows * ncolumns)
+			offset += nrows;
+
+		ClearRectangle(0x94, xoffset, yoffset, xoffset + ncolumns * (itemwidth + 1) - 2, yoffset + nrows - 1);
+		col = 0;
+		row = 0;
+		for (i = offset; i < nitems; i++) {
+			char szbuf[40 + FILENAME_MAX]; /* allow for prefix and suffix */
+			char *p = szbuf;
+			if (prefix != NULL && prefix[i] != NULL)
+				p = Util_stpcpy(szbuf, prefix[i]);
+			p = Util_stpcpy(p, item[i]);
+			if (suffix != NULL && suffix[i] != NULL) {
+				char *q = szbuf + itemwidth - strlen(suffix[i]);
+				while (p < q)
+					*p++ = ' ';
+				strcpy(p, suffix[i]);
+			}
+			else {
+				while (p < szbuf + itemwidth)
+					*p++ = ' ';
+				*p = '\0';
+			}
+			if (i == index)
+				Print(0x94, 0x9a, szbuf, xoffset + col * (itemwidth + 1), yoffset + row, itemwidth);
+			else
+				Print(0x9a, 0x94, szbuf, xoffset + col * (itemwidth + 1), yoffset + row, itemwidth);
+			if (++row >= nrows) {
+				if (++col >= ncolumns)
+					break;
+				row = 0;
+			}
+		}
+		if (tip != NULL && tip[index] != NULL)
+			message = tip[index];
+		else if (itemwidth < 38 && (int) strlen(item[index]) > itemwidth)
+			/* the selected item was shortened */
+			message = item[index];
+		if (message != NULL)
+			CenterPrint(0x94, 0x9a, message, 22);
+
+		for (;;) {
+			int ascii;
+			int tmp_index;
+			ascii = GetKeyPress();
+			switch (ascii) {
+			case 0x1c:				/* Up */
+				if (drag) {
+					*seltype = UI_USER_DRAG_UP;
+					return index;
+				}
+				tmp_index = index;
+				do
+					tmp_index--;
+				while (tmp_index >= 0 && nonselectable != NULL && nonselectable[tmp_index]);
+				if (tmp_index >= 0) {
+					index = tmp_index;
+					break;
+				}
+				continue;
+			case 0x1d:				/* Down */
+				if (drag) {
+					*seltype = UI_USER_DRAG_DOWN;
+					return index;
+				}
+				tmp_index = index;
+				do
+					tmp_index++;
+				while (tmp_index < nitems && nonselectable != NULL && nonselectable[tmp_index]);
+				if (tmp_index < nitems) {
+					index = tmp_index;
+					break;
+				}
+				continue;
+			case 0x1e:				/* Left */
+				if (drag)
+					continue;		/* cannot drag left */
+				index = (index > nrows) ? index - nrows : 0;
+				break;
+			case 0x1f:				/* Right */
+				if (drag)
+					continue;		/* cannot drag right */
+				index = (index + nrows < nitems) ? index + nrows : nitems - 1;
+				break;
+			case 0x7f:				/* Tab (for exchanging disk directories) */
+				return -2;			/* GOLDA CHANGED */
+			case 0x20:				/* Space */
+				*seltype = UI_USER_TOGGLE;
+				return index;
+			case 0x7e:				/* Backspace */
+				*seltype = UI_USER_DELETE;
+				return index;
+			case 0x9b:				/* Return=Select */
+				*seltype = UI_USER_SELECT;
+				return index;
+			case 0x1b:				/* Esc=Cancel */
+				return -1;
+			default:
+				if (drag || ascii <= 0x20 || ascii >= 0x7f)
+					continue;
+				tmp_index = index; /* old index */
+				do {
+					if (++index >= nitems)
+						index = 0;
+				} while (index != tmp_index && !Util_chrieq((char) ascii, item[index][0]));
+				break;
+			}
+			break;
+		}
+		if (message != NULL)
+			ClearRectangle(0x94, 1, 22, 38, 22);
+	}
+}
+
+static int BasicUISelect(const char *title, int flags, int default_item, const UI_tMenuItem *menu, int *seltype)
+{
+	int nitems;
+	int index;
+	const UI_tMenuItem *pmenu;
+	static const char *prefix[100];
+	static const char *item[100];
+	static const char *suffix[100];
+	static const char *tip[100];
+	static int nonselectable[100];
+	int w;
+	int x1, y1, x2, y2;
+
+	nitems = 0;
+	index = 0;
+	for (pmenu = menu; pmenu->item != NULL; pmenu++) {
+		if (pmenu->flags != UI_ITEM_HIDDEN) {
+			prefix[nitems] = pmenu->prefix;
+			item[nitems] = pmenu->item;
+			if (pmenu->flags & UI_ITEM_TIP) {
+				suffix[nitems] = NULL;
+				tip[nitems] = pmenu->suffix;
+			}
+			else {
+				if ((pmenu->flags & UI_ITEM_TYPE) == UI_ITEM_CHECK) {
+					if (pmenu->flags & UI_ITEM_CHECKED)
+						suffix[nitems] = "Yes";
+					else
+						suffix[nitems] = "No ";
+				}
+				else
+					suffix[nitems] = pmenu->suffix;
+				tip[nitems] = NULL;
+			}
+			nonselectable[nitems] = (pmenu->retval < 0);
+			if (pmenu->retval == default_item)
+				index = nitems;
+			nitems++;
+		}
+	}
+
+	if (nitems == 0)
+		return -1; /* cancel immediately */
+
+	if (flags & UI_SELECT_POPUP) {
+		int i;
+		w = 0;
+		for (i = 0; i < nitems; i++) {
+			int ws = strlen(item[i]);
+			if (prefix[i] != NULL)
+				ws += strlen(prefix[i]);
+			if (suffix[i] != NULL)
+				ws += strlen(suffix[i]);
+			if (ws > w)
+				w = ws;
+		}
+		if (w > 38)
+			w = 38;
+
+		x1 = (40 - w) / 2 - 1;
+		x2 = x1 + w + 1;
+		y1 = (24 - nitems) / 2 - 1;
+		y2 = y1 + nitems + 1;
+	}
+	else {
+		ClearScreen();
+		TitleScreen(title);
+		w = 38;
+		x1 = 0;
+		y1 = 1;
+		x2 = 39;
+		y2 = 23;
+	}
+
+	Box(0x9a, 0x94, x1, y1, x2, y2);
+	index = Select(index, nitems, item, prefix, suffix, tip, nonselectable,
+	                nitems, 1, x1 + 1, y1 + 1, w,
+	                (flags & UI_SELECT_DRAG) ? TRUE : FALSE, NULL, seltype);
+	if (index < 0)
+		return index;
+	for (pmenu = menu; pmenu->item != NULL; pmenu++) {
+		if (pmenu->flags != UI_ITEM_HIDDEN) {
+			if (index == 0)
+				return pmenu->retval;
+			index--;
+		}
+	}
+	/* shouldn't happen */
+	return -1;
+}
+
+static int BasicUISelectInt(int default_value, int min_value, int max_value)
+{
+	static char item_values[100][4];
+	static const char *items[100];
+	int value;
+	int nitems;
+	int nrows;
+	int ncolumns;
+	int x1, y1, x2, y2;
+	if (min_value < 0 || max_value > 99 || min_value > max_value)
+		return default_value;
+	nitems = 0;
+	for (value = min_value; value <= max_value; value++) {
+		items[nitems] = item_values[nitems];
+		sprintf(item_values[nitems], "%2d", value);
+		nitems++;
+	}
+	if (nitems <= 10) {
+		nrows = nitems;
+		ncolumns = 1;
+	}
+	else {
+		nrows = 10;
+		ncolumns = (nitems + 9) / 10;
+	}
+	x1 = (39 - 3 * ncolumns) >> 1;
+	y1 = (22 - nrows) >> 1;
+	x2 = x1 + 3 * ncolumns;
+	y2 = y1 + nrows + 1;
+	Box(0x9a, 0x94, x1, y1, x2, y2);
+	value = Select((default_value >= min_value && default_value <= max_value) ? default_value - min_value : 0,
+		nitems, items, NULL, NULL, NULL, NULL, nrows, ncolumns, x1 + 1, y1 + 1, 2, FALSE, NULL, NULL);
+	return value >= 0 ? value + min_value : default_value;
+}
+
+#ifdef WIN32
+
+static WIN32_FIND_DATA wfd;
+static HANDLE dh = INVALID_HANDLE_VALUE;
+
+#ifdef _WIN32_WCE
+/* WinCE's FindFirstFile/FindNext file don't return "." or "..". */
+/* We check if the parent folder exists and add ".." if necessary. */
+static char parentdir[FILENAME_MAX];
+#endif
+
+static int BasicUIOpenDir(const char *dirname)
+{
+#ifdef UNICODE
+	WCHAR wfilespec[FILENAME_MAX];
+	if (MultiByteToWideChar(CP_ACP, 0, dirname, -1, wfilespec, FILENAME_MAX - 4) <= 0)
+		return FALSE;
+	wcscat(wfilespec, (dirname[0] != '\0' && dirname[strlen(dirname) - 1] != '\\')
+		? L"\\*.*" : L"*.*");
+	dh = FindFirstFile(wfilespec, &wfd);
+#else /* UNICODE */
+	char filespec[FILENAME_MAX];
+	Util_strlcpy(filespec, dirname, FILENAME_MAX - 4);
+	strcat(filespec, (dirname[0] != '\0' && dirname[strlen(dirname) - 1] != '\\')
+		? "\\*.*" : "*.*");
+	dh = FindFirstFile(filespec, &wfd);
+#endif /* UNICODE */
+#ifdef _WIN32_WCE
+	Util_splitpath(dirname, parentdir, NULL);
+#endif
+	if (dh == INVALID_HANDLE_VALUE) {
+		/* don't raise error if the path is ok but has no entries:
+		   Win98 returns ERROR_FILE_NOT_FOUND,
+		   WinCE returns ERROR_NO_MORE_FILES */
+		DWORD err = GetLastError();
+		if (err != ERROR_FILE_NOT_FOUND && err != ERROR_NO_MORE_FILES)
+			return FALSE;
+	}
+	return TRUE;
+}
+
+static int BasicUIReadDir(char *filename, int *isdir)
+{
+	if (dh == INVALID_HANDLE_VALUE) {
+#ifdef _WIN32_WCE
+		if (parentdir[0] != '\0' && Util_direxists(parentdir)) {
+			strcpy(filename, "..");
+			*isdir = TRUE;
+			parentdir[0] = '\0';
+			return TRUE;
+		}
+#endif /* _WIN32_WCE */
+		return FALSE;
+	}
+#ifdef UNICODE
+	if (WideCharToMultiByte(CP_ACP, 0, wfd.cFileName, -1, filename, FILENAME_MAX, NULL, NULL) <= 0)
+		filename[0] = '\0';
+#else
+	Util_strlcpy(filename, wfd.cFileName, FILENAME_MAX);
+#endif /* UNICODE */
+#ifdef _WIN32_WCE
+	/* just in case they will implement it some day */
+	if (strcmp(filename, "..") == 0)
+		parentdir[0] = '\0';
+#endif
+	*isdir = (wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) ? TRUE : FALSE;
+	if (!FindNextFile(dh, &wfd)) {
+		FindClose(dh);
+		dh = INVALID_HANDLE_VALUE;
+	}
+	return TRUE;
+}
+
+#define DO_DIR
+
+#elif defined(HAVE_OPENDIR)
+
+static char dir_path[FILENAME_MAX];
+static DIR *dp = NULL;
+
+static int BasicUIOpenDir(const char *dirname)
+{
+	Util_strlcpy(dir_path, dirname, FILENAME_MAX);
+	dp = opendir(dir_path);
+	return dp != NULL;
+}
+
+static int BasicUIReadDir(char *filename, int *isdir)
+{
+	struct dirent *entry;
+	char fullfilename[FILENAME_MAX];
+	struct stat st;
+	entry = readdir(dp);
+	if (entry == NULL) {
+		closedir(dp);
+		dp = NULL;
+		return FALSE;
+	}
+	strcpy(filename, entry->d_name);
+	Util_catpath(fullfilename, dir_path, entry->d_name);
+	stat(fullfilename, &st);
+	*isdir = (st.st_mode & S_IFDIR) ? TRUE : FALSE;
+	return TRUE;
+}
+
+#define DO_DIR
+
+#elif defined(PS2)
+
+int Atari_OpenDir(const char *filename);
+
+static int BasicUIOpenDir(const char *dirname)
+{
+	char filename[FILENAME_MAX];
+	Util_catpath(filename, dirname, "*");
+	return Atari_OpenDir(filename);
+}
+
+int Atari_ReadDir(char *fullpath, char *filename, int *isdir,
+                  int *readonly, int *size, char *timetext);
+
+#define BasicUIReadDir(filename, isdir)  Atari_ReadDir(NULL, filename, isdir, NULL, NULL, NULL)
+
+#define DO_DIR
+
+#endif /* defined(PS2) */
+
+
+#ifdef DO_DIR
+
+static const char **filenames;
+#define FILENAMES_INITIAL_SIZE 256 /* preallocate 1 KB */
+static int n_filenames;
+
+/* filename must be malloc'ed or strdup'ed */
+static void FilenamesAdd(const char *filename)
+{
+	if (n_filenames >= FILENAMES_INITIAL_SIZE && (n_filenames & (n_filenames - 1)) == 0) {
+		/* n_filenames is a power of two: allocate twice as much */
+		filenames = (const char **) Util_realloc((void *) filenames, 2 * n_filenames * sizeof(const char *));
+	}
+	filenames[n_filenames++] = filename;
+}
+
+static int FilenamesCmp(const char *filename1, const char *filename2)
+{
+	if (filename1[0] == '[') {
+		if (filename2[0] != '[')
+			return -1;
+		if (filename1[1] == '.') {
+			if (filename2[1] != '.')
+				return -1;
+			/* return Util_stricmp(filename1, filename2); */
+		}
+		else if (filename2[1] == '.')
+			return 1;
+		/* return Util_stricmp(filename1, filename2); */
+	}
+	else if (filename2[0] == '[')
+		return 1;
+	return Util_stricmp(filename1, filename2);
+}
+
+/* quicksort */
+static void FilenamesSort(const char **start, const char **end)
+{
+	while (start + 1 < end) {
+		const char **left = start + 1;
+		const char **right = end;
+		const char *pivot = *start;
+		const char *tmp;
+		while (left < right) {
+			if (FilenamesCmp(*left, pivot) <= 0)
+				left++;
+			else {
+				right--;
+				tmp = *left;
+				*left = *right;
+				*right = tmp;
+			}
+		}
+		left--;
+		tmp = *left;
+		*left = *start;
+		*start = tmp;
+		FilenamesSort(start, left);
+		start = right;
+	}
+}
+
+static void FilenamesFree(void)
+{
+	while (n_filenames > 0)
+		free((void *) filenames[--n_filenames]);
+	free((void *) filenames);
+}
+
+static void GetDirectory(const char *directory)
+{
+#ifdef __DJGPP__
+	unsigned short s_backup = _djstat_flags;
+	_djstat_flags = _STAT_INODE | _STAT_EXEC_EXT | _STAT_EXEC_MAGIC | _STAT_DIRSIZE |
+		_STAT_ROOT_TIME | _STAT_WRITEBIT;
+	/* we do not need any of those 'hard-to-get' informations */
+#endif	/* DJGPP */
+
+	filenames = (const char **) Util_malloc(FILENAMES_INITIAL_SIZE * sizeof(const char *));
+	n_filenames = 0;
+
+	if (BasicUIOpenDir(directory)) {
+		char filename[FILENAME_MAX];
+		int isdir;
+
+		while (BasicUIReadDir(filename, &isdir)) {
+			char *filename2;
+
+			if (filename[0] == '\0' ||
+				(filename[0] == '.' && filename[1] == '\0'))
+				continue;
+
+			if (isdir) {
+				/* add directories as [dir] */
+				size_t len = strlen(filename);
+				filename2 = (char *) Util_malloc(len + 3);
+				memcpy(filename2 + 1, filename, len);
+				filename2[0] = '[';
+				filename2[len + 1] = ']';
+				filename2[len + 2] = '\0';
+			}
+			else
+				filename2 = Util_strdup(filename);
+
+			FilenamesAdd(filename2);
+		}
+
+		FilenamesSort(filenames, filenames + n_filenames);
+	}
+	else {
+		Log_print("Error opening '%s' directory", directory);
+	}
+#ifdef PS2
+	FilenamesAdd(Util_strdup("[mc0:]"));
+#endif
+#ifdef DOS_DRIVES
+	/* in DOS/Windows, add all existing disk letters */
+	{
+		char letter;
+#ifdef WIN32
+		DWORD drive_mask = GetLogicalDrives();
+		for (letter = 'A'; letter <= 'Z'; letter++) {
+			if (drive_mask & 1) {
+				static char drive2[5] = "[C:]";
+				drive2[1] = letter;
+				FilenamesAdd(Util_strdup(drive2));
+			}
+			drive_mask >>= 1;
+		}
+#else /* WIN32 */
+		for (letter = 'A'; letter <= 'Z'; letter++) {
+#ifdef __DJGPP__
+			static char drive[3] = "C:";
+			struct stat st;
+			drive[0] = letter;
+			/* don't check floppies - it's slow */
+			if (letter < 'C' || (stat(drive, &st) == 0 && (st.st_mode & S_IXUSR) != 0))
+#endif /* __DJGPP__ */
+			{
+				static char drive2[5] = "[C:]";
+				drive2[1] = letter;
+				FilenamesAdd(Util_strdup(drive2));
+			}
+		}
+#endif /* WIN32 */
+	}
+#endif /* DOS_DRIVES */
+#ifdef __DJGPP__
+	_djstat_flags = s_backup;	/* restore the original state */
+#endif
+}
+
+static void strcatchr(char *s, char c)
+{
+	while (*s != '\0')
+		s++;
+	s[0] = c;
+	s[1] = '\0';
+}
+
+/* Select file or directory.
+   The result is returned in path and path is where selection begins (i.e. it must be initialized).
+   pDirectories are "favourite" directories (there are nDirectories of them). */
+static int FileSelector(char *path, int select_dir, char pDirectories[][FILENAME_MAX], int nDirectories)
+{
+	char current_dir[FILENAME_MAX];
+	char highlighted_file[FILENAME_MAX + 2]; /* +2 for square brackets */
+	highlighted_file[0] = '\0';
+	if (path[0] == '\0' && nDirectories > 0)
+		strcpy(current_dir, pDirectories[0]);
+	else if (select_dir)
+		strcpy(current_dir, path);
+	else
+		Util_splitpath(path, current_dir, highlighted_file);
+#ifdef __DJGPP__
+	{
+		char help_dir[FILENAME_MAX];
+		_fixpath(current_dir, help_dir);
+		strcpy(current_dir, help_dir);
+	}
+#elif defined(HAVE_GETCWD)
+	if (current_dir[0] == '\0' || (current_dir[0] == '.' && current_dir[1] == '\0')) {
+		if (getcwd(current_dir, FILENAME_MAX) == NULL) {
+			current_dir[0] = '/';
+			current_dir[1] = '\0';
+		}
+	}
+#else
+	if (current_dir[0] == '\0') {
+		current_dir[0] = '.';
+		current_dir[1] = '\0';
+	}
+#endif
+	for (;;) {
+		int index = 0;
+		int i;
+
+#define NROWS 20
+#define NCOLUMNS 2
+#define MAX_FILES (NROWS * NCOLUMNS)
+
+		/* The WinCE version may spend several seconds when there are many
+		   files in the directory. */
+		/* The extra spaces are needed to clear the previous window title. */
+		TitleScreen("            Please wait...            ");
+		PLATFORM_DisplayScreen();
+
+		GetDirectory(current_dir);
+
+		if (n_filenames == 0) {
+			/* FIXME: change to a safe directory */
+			FilenamesFree();
+			BasicUIMessage("No files inside directory", 1);
+			return FALSE;
+		}
+
+		if (highlighted_file[0] != '\0') {
+			for (i = 0; i < n_filenames; i++) {
+				if (strcmp(filenames[i], highlighted_file) == 0) {
+					index = i;
+					break;
+				}
+			}
+		}
+
+		for (;;) {
+			int seltype;
+			const char *selected_filename;
+
+			ClearScreen();
+			TitleScreen(current_dir);
+			Box(0x9a, 0x94, 0, 1, 39, 23);
+
+			index = Select(index, n_filenames, filenames, NULL, NULL, NULL, NULL,
+			               NROWS, NCOLUMNS, 1, 2, 37 / NCOLUMNS, FALSE,
+			               select_dir ? "Space: select current directory" : NULL,
+			               &seltype);
+
+			if (index == -2) {
+				/* Tab = next favourite directory */
+				if (nDirectories > 0) {
+					/* default: pDirectories[0] */
+					int current_index = nDirectories - 1;
+					/* are we in one of pDirectories? */
+					for (i = 0; i < nDirectories; i++)
+						if (strcmp(pDirectories[i], current_dir) == 0) {
+							current_index = i;
+							break;
+						}
+					i = current_index;
+					do {
+						if (++i >= nDirectories)
+							i = 0;
+						if (Util_direxists(pDirectories[i])) {
+							strcpy(current_dir, pDirectories[i]);
+							break;
+						}
+					} while (i != current_index);
+				}
+				highlighted_file[0] = '\0';
+				break;
+			}
+			if (index < 0) {
+				/* Esc = cancel */
+				FilenamesFree();
+				return FALSE;
+			}
+			if (seltype == UI_USER_DELETE) {
+				/* Backspace = parent directory */
+				char new_dir[FILENAME_MAX];
+				Util_splitpath(current_dir, new_dir, highlighted_file + 1);
+				if (Util_direxists(new_dir)) {
+					strcpy(current_dir, new_dir);
+					highlighted_file[0] = '[';
+					strcatchr(highlighted_file, ']');
+					break;
+				}
+				BasicUIMessage("Cannot enter parent directory", 1);
+				continue;
+			}
+			if (seltype == UI_USER_TOGGLE && select_dir) {
+				/* Space = select current directory */
+				strcpy(path, current_dir);
+				FilenamesFree();
+				return TRUE;
+			}
+			selected_filename = filenames[index];
+			if (selected_filename[0] == '[') {
+				/* Change directory */
+				char new_dir[FILENAME_MAX];
+
+				highlighted_file[0] = '\0';
+				if (strcmp(selected_filename, "[..]") == 0) {
+					/* go up */
+					Util_splitpath(current_dir, new_dir, highlighted_file + 1);
+					highlighted_file[0] = '[';
+					strcatchr(highlighted_file, ']');
+				}
+#ifdef PS2
+				else if (strcmp(selected_filename, "[mc0:]") == 0) {
+					strcpy(new_dir, "mc0:/");
+				}
+#endif
+#ifdef DOS_DRIVES
+				else if (selected_filename[2] == ':' && selected_filename[3] == ']') {
+					/* disk selected */
+					new_dir[0] = selected_filename[1];
+					new_dir[1] = ':';
+					new_dir[2] = '\\';
+					new_dir[3] = '\0';
+				}
+#endif
+				else {
+					/* directory selected */
+					char *pbracket = strrchr(selected_filename, ']');
+					if (pbracket == NULL)
+						continue; /* XXX: regular file? */
+					*pbracket = '\0';	/*cut ']' */
+					Util_catpath(new_dir, current_dir, selected_filename + 1);
+				}
+				/* check if new directory is valid */
+				if (Util_direxists(new_dir)) {
+					strcpy(current_dir, new_dir);
+					break;
+				}
+				BasicUIMessage("Cannot enter selected directory", 1);
+				continue;
+			}
+			if (!select_dir) {
+				/* normal filename selected */
+				Util_catpath(path, current_dir, selected_filename);
+				FilenamesFree();
+				return TRUE;
+			}
+		}
+
+		FilenamesFree();
+	}
+}
+
+#endif /* DO_DIR */
+
+/* nDirectories >= 0 means we are editing a file name */
+static int EditString(int fg, int bg, const char *title,
+                      char *string, int size, int x, int y, int width,
+                      char pDirectories[][FILENAME_MAX], int nDirectories)
+{
+	int caret = strlen(string);
+	int offset = 0;
+	for (;;) {
+		int i;
+		char *p;
+		int ascii;
+		Box(fg, bg, x, y, x + 1 + width, y + 2);
+		Print(bg, fg, title, x + 1, y, width);
+		if (caret - offset >= width)
+			offset = caret - width + 1;
+		else if (caret < offset)
+			offset = caret;
+		p = string + offset;
+		for (i = 0; i < width; i++)
+			if (offset + i == caret)
+				Plot(bg, fg, *p != '\0' ? *p++ : ' ', x + 1 + i, y + 1);
+			else
+				Plot(fg, bg, *p != '\0' ? *p++ : ' ', x + 1 + i, y + 1);
+		ascii = GetKeyPress();
+		switch (ascii) {
+		case 0x1e:				/* Cursor Left */
+			if (caret > 0)
+				caret--;
+			break;
+		case 0x1f:				/* Cursor Right */
+			if (string[caret] != '\0')
+				caret++;
+			break;
+		case 0x7e:				/* Backspace */
+			if (caret > 0) {
+				caret--;
+				p = string + caret;
+				do
+					p[0] = p[1];
+				while (*p++ != '\0');
+			}
+			break;
+		case 0xfe:				/* Delete */
+			if (string[caret] != '\0') {
+				p = string + caret;
+				do
+					p[0] = p[1];
+				while (*p++ != '\0');
+			}
+			break;
+		case 0x7d:				/* Clear screen */
+		case 0x9c:				/* Delete line */
+			caret = 0;
+			string[0] = '\0';
+			break;
+		case 0x9b:				/* Return */
+			if (nDirectories >= 0) {
+				/* check filename */
+				char lastchar;
+				if (string[0] == '\0')
+					return FALSE;
+				lastchar = string[strlen(string) - 1];
+				return lastchar != '/' && lastchar != '\\';
+			}
+			return TRUE;
+		case 0x1b:				/* Esc */
+			return FALSE;
+#ifdef DO_DIR
+		case 0x7f:				/* Tab = select directory */
+			if (nDirectories >= 0) {
+				char temp_filename[FILENAME_MAX + 1];
+				char temp_path[FILENAME_MAX];
+				char temp_file[FILENAME_MAX];
+				char *s;
+				/* FIXME: now we append '*' and then discard it
+				   just to workaround Util_splitpath() not recognizing
+				   Util_DIR_SEP_CHAR when it's the last character */
+				strcpy(Util_stpcpy(temp_filename, string), "*");
+				Util_splitpath(temp_filename, temp_path, temp_file);
+				s = temp_file + strlen(temp_file) - 1;
+				if (*s == '*') { /* XXX: should be always... */
+					*s = '\0';
+					if (FileSelector(temp_path, TRUE, pDirectories, nDirectories)) {
+						Util_catpath(string, temp_path, temp_file);
+						caret = strlen(string);
+						offset = 0;
+					}
+				}
+			}
+			break;
+#endif
+		default:
+			/* Insert character */
+			i = strlen(string);
+			if (i + 1 < size && ascii >= ' ' && ascii < 0x7f) {
+				do
+					string[i + 1] = string[i];
+				while (--i >= caret);
+				string[caret++] = (char) ascii;
+			}
+			break;
+		}
+	}
+}
+
+/* returns TRUE if accepted filename */
+static int EditFilename(const char *title, char *filename, char directories[][FILENAME_MAX], int n_directories)
+{
+	char edited_filename[FILENAME_MAX];
+	strcpy(edited_filename, filename);
+	if (edited_filename[0] == '\0') {
+		if (n_directories > 0)
+			strcpy(edited_filename, directories[0]);
+#ifdef HAVE_GETCWD
+		if (edited_filename[0] == '\0') {
+			if (getcwd(edited_filename, FILENAME_MAX) == NULL) {
+				edited_filename[0] = '/';
+				edited_filename[1] = '\0';
+			}
+			if (edited_filename[0] != '\0' && strlen(edited_filename) < FILENAME_MAX - 1) {
+				char *p = edited_filename + strlen(edited_filename) - 1;
+				if (*p != '/' && *p != '\\') {
+					p[1] = Util_DIR_SEP_CHAR;
+					p[2] = '\0';
+				}
+			}
+		}
+#endif
+	}
+	if (!EditString(0x9a, 0x94, title, edited_filename, FILENAME_MAX, 1, 11, 36, directories, n_directories))
+		return FALSE;
+	strcpy(filename, edited_filename);
+	return TRUE;
+}
+
+static int BasicUIEditString(const char *title, char *string, int size)
+{
+	return EditString(0x9a, 0x94, title, string, size, 3, 11, 32, NULL, -1);
+}
+
+static int BasicUIGetSaveFilename(char *filename, char directories[][FILENAME_MAX], int n_directories)
+{
+#ifdef DO_DIR
+	return EditFilename("Save as ([Tab] = directory locator)", filename, directories, n_directories);
+#else
+	return EditFilename("Save as", filename, directories, n_directories);
+#endif
+}
+
+static int BasicUIGetLoadFilename(char *filename, char directories[][FILENAME_MAX], int n_directories)
+{
+#ifdef DO_DIR
+	return FileSelector(filename, FALSE, directories, n_directories);
+#else
+	return EditFilename("Filename", filename, directories, n_directories);
+#endif
+}
+
+static int BasicUIGetDirectoryPath(char *directory)
+{
+#ifdef DO_DIR
+	return FileSelector(directory, TRUE, NULL, 0);
+#else
+	return EditFilename("Path", directory, NULL, -1);
+#endif
+}
+
+static void BasicUIInfoScreen(const char *title, const char *message)
+{
+	int y = 2;
+	ClearScreen();
+	TitleScreen(title);
+	Box(0x9a, 0x94, 0, 1, 39, 23);
+	while (*message != '\n') {
+		CenterPrint(0x9a, 0x94, message, y++);
+		while (*message++ != '\0');
+	}
+	BasicUIMessage("Press any key to continue", 1);
+}
+
+static void BasicUIInit(void)
+{
+	if (!initialised) {
+		MEMORY_GetCharset(charset);
+		initialised = TRUE;
+	}
+}
+
+UI_tDriver UI_BASIC_driver = {
+	&BasicUISelect,
+	&BasicUISelectInt,
+	&BasicUIEditString,
+	&BasicUIGetSaveFilename,
+	&BasicUIGetLoadFilename,
+	&BasicUIGetDirectoryPath,
+	&BasicUIMessage,
+	&BasicUIInfoScreen,
+	&BasicUIInit
+};
+
+#ifdef USE_UI_BASIC_ONSCREEN_KEYBOARD
+
+int UI_BASIC_OnScreenKeyboard(const char *title, int layout)
+{
+#define LAYOUT_LEFT    2
+#define LAYOUT_TOP     5
+#define LAYOUT_WIDTH   36
+#define LAYOUT_HEIGHT  6
+	const char *layout_lines[LAYOUT_HEIGHT];
+	static int modifiers = 0;
+	static int key_x = 0;
+	static int key_y = 1;
+
+	BasicUIInit();
+	ClearScreen();
+	TitleScreen(title != NULL ? title : "Keyboard emulator");
+	Box(0x9a, 0x94, 0, 1, 39, 23);
+#ifdef DREAMCAST
+	CenterPrint(0x9a, 0x94, "Dreamcast controller buttons:", 20);
+	if (title != NULL) {
+		CenterPrint(0x9a, 0x94, "A  --  leave with key selected", 21);
+		CenterPrint(0x9a, 0x94, "L, R, B  --  leave without selection", 22);
+	}
+	else {
+		CenterPrint(0x9a, 0x94, "A  --  leave with key pressed", 21);
+		CenterPrint(0x9a, 0x94, "L, R, B  --  leave without keypress", 22);
+	}
+#endif
+	modifiers &= AKEY_SHFT;
+	switch (layout) {
+	case MACHINE_OSA:
+	case MACHINE_OSB:
+		layout_lines[0] = "     Start Select Option Atari Break";
+		break;
+	case MACHINE_XLXE:
+		layout_lines[0] = "  Help Start Select Option Inv Break";
+		break;
+	case MACHINE_5200:
+		layout_lines[0] = NULL;
+		break;
+	default:
+		layout_lines[0] = NULL;
+		break;
+	}
+	for (;;) {
+		int x;
+		int y;
+		int code;
+		const char *layout_line;
+		if (layout == MACHINE_5200) {
+			layout_lines[1] = "        Start  Pause  Reset         ";
+			layout_lines[2] = "        --1--  --2--  --3--         ";
+			layout_lines[3] = "        --4--  --5--  --6--         ";
+			layout_lines[4] = "        --7--  --8--  --9--         ";
+			layout_lines[5] = "        --*--  --0--  --#--         ";
+		}
+		else {
+			if ((modifiers & AKEY_CTRL) == 0)
+				Print(0x9a, 0x94, "         ", 10, 17, 40);
+			else
+				Print(0x94, 0x9a, " CONTROL ", 10, 17, 40);
+			if ((modifiers & AKEY_SHFT) == 0) {
+				Print(0x9a, 0x94, "       ", 2, 17, 40);
+				layout_lines[1] = "-Esc 1 2 3 4 5 6 7 8 9 0 < > BackSpc";
+				layout_lines[2] = "-Tab- Q W E R T Y U I O P - = Return";
+				layout_lines[3] = "-Ctrl- A S D F G H J K L ; + * -Caps";
+				layout_lines[4] = "-Shift- Z X C V B N M , . / --Shift-";
+			}
+			else {
+				Print(0x94, 0x9a, " SHIFT ", 2, 17, 40);
+				layout_lines[1] = "-Esc ! \" # $ % & ' @ ( ) Clr Ins Del";
+				layout_lines[2] = "-Tab- Q W E R T Y U I O P _ | Return";
+				layout_lines[3] = "-Ctrl- A S D F G H J K L : \\ ^ -Caps";
+				layout_lines[4] = "-Shift- Z X C V B N M [ ] ? --Shift-";
+			}
+			layout_lines[5] = "        -------Space-------         ";
+		}
+		for (y = 0; y < LAYOUT_HEIGHT; y++)
+			if (layout_lines[y] != NULL)
+				Print(0x9a, 0x94, layout_lines[y], LAYOUT_LEFT, LAYOUT_TOP + 2 * y, LAYOUT_WIDTH);
+		if (layout_lines[key_y] == NULL)
+			key_y = 1;
+		layout_line = layout_lines[key_y];
+		x = key_x;
+		/* key_x normally points to inside of a key... */
+		if (layout_line[x] != ' ')
+			/* find the beginning of this key */
+			while (x > 0 && layout_line[x - 1] != ' ')
+				x--;
+		/* ... if it does not, take the first key in this line. */
+		else
+			for (x = 0; layout_line[x] == ' '; x++);
+		/* highlight the key */
+		do
+			Plot(0x94, 0x9a, layout_line[x], LAYOUT_LEFT + x, LAYOUT_TOP + 2 * key_y);
+		while (layout_line[++x] > ' ');
+		/* handle user input */
+		switch (GetKeyPress()) {
+		case 0x1c:
+			if (key_y == 0 || layout_lines[key_y - 1] == NULL)
+				break;
+			key_y--;
+			if (key_x > 0 && layout_lines[key_y][key_x] == ' ')
+				key_x--;
+			break;
+		case 0x1d:
+			if (key_y >= LAYOUT_HEIGHT - 1)
+				break;
+			key_y++;
+			if (layout_lines[key_y][key_x] == ' ' && layout_lines[key_y][key_x + 1] != ' ')
+				key_x++;
+			break;
+		case 0x1e:
+			while (x > 0) {
+				if (layout_line[--x] == ' ') {
+					while (x > 0) {
+						if (layout_line[--x] > ' ') {
+							key_x = x;
+							break;
+						}
+					}
+					break;
+				}
+			}
+			break;
+		case 0x1f:
+			while (layout_line[x] == ' ')
+				x++;
+			if (layout_line[x] > ' ')
+				key_x = x;
+			break;
+		case 0x1b:
+			return AKEY_NONE;
+		case 0x9b:
+#ifdef _WIN32_WCE
+		case 0x20:
+#endif
+			code = 0;
+			while (--x > 0) {
+				if (layout_line[x] == ' ') {
+					while (x > 0) {
+						if (layout_line[--x] > ' ') {
+							code++;
+							break;
+						}
+					}
+				}
+			}
+			if (layout == MACHINE_5200) {
+				static const UBYTE keycodes_5200[5][3] = {
+					{ AKEY_5200_START, AKEY_5200_PAUSE, AKEY_5200_RESET },
+					{ AKEY_5200_1, AKEY_5200_2, AKEY_5200_3 },
+					{ AKEY_5200_4, AKEY_5200_5, AKEY_5200_6 },
+					{ AKEY_5200_7, AKEY_5200_8, AKEY_5200_9 },
+					{ AKEY_5200_ASTERISK, AKEY_5200_0, AKEY_5200_HASH }
+				};
+				return keycodes_5200[key_y - 1][code];
+			}
+			else {
+				static const UBYTE keycodes_normal[4][14] = {
+					{ AKEY_ESCAPE, AKEY_1, AKEY_2, AKEY_3, AKEY_4, AKEY_5, AKEY_6,
+					  AKEY_7, AKEY_8, AKEY_9, AKEY_0, AKEY_LESS, AKEY_GREATER, AKEY_BACKSPACE },
+					{ AKEY_TAB, AKEY_q, AKEY_w, AKEY_e, AKEY_r, AKEY_t, AKEY_y,
+					  AKEY_u, AKEY_i, AKEY_o, AKEY_p, AKEY_MINUS, AKEY_EQUAL, AKEY_RETURN },
+					{ AKEY_CTRL, AKEY_a, AKEY_s, AKEY_d, AKEY_f, AKEY_g, AKEY_h,
+					  AKEY_j, AKEY_k, AKEY_l, AKEY_SEMICOLON, AKEY_PLUS, AKEY_ASTERISK, AKEY_CAPSTOGGLE },
+					{ AKEY_SHFT, AKEY_z, AKEY_x, AKEY_c, AKEY_v, AKEY_b, AKEY_n,
+					  AKEY_m, AKEY_COMMA, AKEY_FULLSTOP, AKEY_SLASH, AKEY_SHFT, AKEY_SHFT, AKEY_SHFT }
+				};
+				switch (key_y) {
+				case 0:
+					switch (code + (layout != MACHINE_XLXE ? 1 : 0)) {
+					case 0:
+						return AKEY_HELP ^ modifiers;
+					case 1:
+						return AKEY_START;
+					case 2:
+						return AKEY_SELECT;
+					case 3:
+						return AKEY_OPTION;
+					case 4:
+						return AKEY_ATARI ^ modifiers;
+					case 5:
+						return AKEY_BREAK;
+					}
+				case 5:
+					return AKEY_SPACE ^ modifiers;
+				default:
+					code = keycodes_normal[key_y - 1][code];
+					if (code == AKEY_SHFT || code == AKEY_CTRL)
+						modifiers ^= code;
+					else
+						return code ^ modifiers;
+					break;
+				}
+			}
+			break;
+		default:
+			break;
+		}
+	}
+}
+
+#endif /* USE_UI_BASIC_ONSCREEN_KEYBOARD */
diff --git a/project/jni/application/atari800/src/ui_basic.h b/project/jni/application/atari800/src/ui_basic.h
new file mode 100755
index 000000000..43cf62abb
--- /dev/null
+++ b/project/jni/application/atari800/src/ui_basic.h
@@ -0,0 +1,20 @@
+#ifndef UI_BASIC_H_
+#define UI_BASIC_H_
+
+#include "ui.h"
+
+/* "Basic" UI driver. Always present and guaranteed to work. Override
+   driver may call into this one to implement filtering */
+extern UI_tDriver UI_BASIC_driver;
+
+/* for Windows CE and Dreamcast */
+#ifdef USE_UI_BASIC_ONSCREEN_KEYBOARD
+int UI_BASIC_OnScreenKeyboard(const char *title, int layout);
+/* layout must be one of MACHINE_* values (see atari.h)
+   or -1 for base keyboard with no function keys */
+#endif
+
+/* used only in the Dreamcast port */
+extern const unsigned char UI_BASIC_key_to_ascii[256];
+
+#endif /* UI_BASIC_H_ */
diff --git a/project/jni/application/atari800/src/util.c b/project/jni/application/atari800/src/util.c
new file mode 100644
index 000000000..8f8f085d8
--- /dev/null
+++ b/project/jni/application/atari800/src/util.c
@@ -0,0 +1,419 @@
+/*
+ * util.c - utility functions
+ *
+ * Copyright (c) 2005 Piotr Fusik
+ * Copyright (c) 2005 Atari800 development team (see DOC/CREDITS)
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+*/
+
+#include "config.h"
+/* suppress -ansi -pedantic warning for fdopen: */
+#ifdef __STRICT_ANSI__
+#undef __STRICT_ANSI__
+#include <stdio.h>
+#define __STRICT_ANSI__ 1
+#else
+#include <stdio.h>
+#endif /* __STRICT_ANSI__ */
+#include <stdlib.h>
+#include <string.h>
+#ifdef HAVE_SYS_STAT_H
+#include <sys/stat.h>
+#endif
+#ifdef WIN32
+#include <windows.h>
+#endif
+
+#include "atari.h"
+#include "util.h"
+
+int Util_chrieq(char c1, char c2)
+{
+	switch (c1 ^ c2) {
+	case 0x00:
+		return TRUE;
+	case 0x20:
+		return (c1 >= 'A' && c1 <= 'Z') || (c1 >= 'a' && c1 <= 'z');
+	default:
+		return FALSE;
+	}
+}
+
+#ifdef __STRICT_ANSI__
+/*
+**  STRICMP.C - Comapres strings, case-insensitive.
+**
+**  public domain by Bob Stout
+**
+*/
+
+/* from http://c.snippets.org/code/stricmp.c */
+int Util_stricmp(const char *str1, const char *str2)
+{
+      int retval = 0;
+
+      while (1)
+      {
+            retval = tolower(*str1++) - tolower(*str2++);
+
+            if (retval)
+                  break;
+
+            if (*str1 && *str2)
+                  continue;
+            else  break;
+      }
+      return retval;
+}
+#endif
+
+char *Util_stpcpy(char *dest, const char *src)
+{
+	size_t len = strlen(src);
+	memcpy(dest, src, len + 1);
+	return dest + len;
+}
+
+#ifndef HAVE_STRNCPY
+char *Util_strncpy(char *dest, const char *src, size_t size) {
+	while (size-- > 0) {
+		if ((*dest++ = *src++) == '\0')
+			break;
+	}
+	while (size-- > 0)
+		*dest++ = '\0';
+	return dest;
+}
+#endif
+
+char *safe_strncpy(char *buffer, const char *source, int bufsize)
+{
+	if (buffer == NULL) return NULL;
+	if (bufsize > 0) {
+		strncpy(buffer, source != NULL ? source : "", bufsize);
+		buffer[bufsize-1] = '\0';
+	}
+	return buffer;
+}
+
+char *Util_strlcpy(char *dest, const char *src, size_t size)
+{
+	Util_strncpy(dest, src, size);
+	dest[size - 1] = '\0';
+	return dest;
+}
+
+char *Util_strupper(char *s)
+{
+	char *p;
+	for (p = s; *p != '\0'; p++)
+		if (*p >= 'a' && *p <= 'z')
+			*p += 'A' - 'a';
+	return s;
+}
+
+char *Util_strlower(char *s)
+{
+	char *p;
+	for (p = s; *p != '\0'; p++)
+		if (*p >= 'A' && *p <= 'Z')
+			*p += 'a' - 'A';
+	return s;
+}
+
+void Util_chomp(char *s)
+{
+	int len;
+
+	len = strlen(s);
+	if (len >= 2 && s[len - 1] == '\n' && s[len - 2] == '\r')
+		s[len - 2] = '\0';
+	else if (len >= 1 && (s[len - 1] == '\n' || s[len - 1] == '\r'))
+		s[len - 1] = '\0';
+}
+
+void Util_trim(char *s)
+{
+	char *p = s;
+	char *q;
+	/* skip leading whitespace */
+	while (*p == ' ' || *p == '\t' || *p == '\r' || *p == '\n')
+		p++;
+	/* now p points at the first non-whitespace character */
+
+	if (*p == '\0') {
+		/* only whitespace */
+		*s = '\0';
+		return;
+	}
+
+	q = s + strlen(s);
+	/* skip trailing whitespace */
+	/* we have found p < q such that *p is non-whitespace,
+	   so this loop terminates with q >= p */
+	do
+		q--;
+	while (*q == ' ' || *q == '\t' || *q == '\r' || *q == '\n');
+
+	/* now q points at the last non-whitespace character */
+	/* cut off trailing whitespace */
+	*++q = '\0';
+
+	/* move to string */
+	memmove(s, p, q + 1 - p);
+}
+
+int Util_sscandec(const char *s)
+{
+	int result;
+	if (*s == '\0')
+		return -1;
+	result = 0;
+	for (;;) {
+		if (*s >= '0' && *s <= '9')
+			result = 10 * result + *s - '0';
+		else if (*s == '\0')
+			return result;
+		else
+			return -1;
+		s++;
+	}
+}
+
+int Util_sscanhex(const char *s)
+{
+	int result;
+	if (*s == '\0')
+		return -1;
+	result = 0;
+	for (;;) {
+		if (*s >= '0' && *s <= '9')
+			result = 16 * result + *s - '0';
+		else if (*s >= 'A' && *s <= 'F')
+			result = 16 * result + *s - 'A' + 10;
+		else if (*s >= 'a' && *s <= 'f')
+			result = 16 * result + *s - 'a' + 10;
+		else if (*s == '\0')
+			return result;
+		else
+			return -1;
+		s++;
+	}
+}
+
+int Util_sscanbool(const char *s)
+{
+	if (*s == '0' && s[1] == '\0')
+		return 0;
+	if (*s == '1' && s[1] == '\0')
+		return 1;
+	return -1;
+}
+
+void *Util_malloc(size_t size)
+{
+	void *ptr = malloc(size);
+	if (ptr == NULL) {
+		Atari800_Exit(FALSE);
+		printf("Fatal error: out of memory\n");
+		exit(1);
+	}
+	return ptr;
+}
+
+void *Util_realloc(void *ptr, size_t size)
+{
+	ptr = realloc(ptr, size);
+	if (ptr == NULL) {
+		Atari800_Exit(FALSE);
+		printf("Fatal error: out of memory\n");
+		exit(1);
+	}
+	return ptr;
+}
+
+char *Util_strdup(const char *s)
+{
+	/* don't use strdup(): it is unavailable on WinCE */
+	size_t size = strlen(s) + 1;
+	char *ptr = (char *) Util_malloc(size);
+	memcpy(ptr, s, size); /* faster than strcpy(ptr, s) */
+	return ptr;
+}
+
+void Util_splitpath(const char *path, char *dir_part, char *file_part)
+{
+	const char *p;
+	/* find the last Util_DIR_SEP_CHAR except the last character */
+	for (p = path + strlen(path) - 2; p >= path; p--) {
+		if (*p == Util_DIR_SEP_CHAR
+#ifdef DIR_SEP_BACKSLASH
+/* on DOSish systems slash can be also used as a directory separator */
+		 || *p == '/'
+#endif
+		   ) {
+			if (dir_part != NULL) {
+				int len = p - path;
+				if (p == path || (p == path + 2 && path[1] == ':'))
+					/* root dir: include Util_DIR_SEP_CHAR in dir_part */
+					len++;
+				memcpy(dir_part, path, len);
+				dir_part[len] = '\0';
+			}
+			if (file_part != NULL)
+				strcpy(file_part, p + 1);
+			return;
+		}
+	}
+	/* no Util_DIR_SEP_CHAR: current dir */
+	if (dir_part != NULL)
+		dir_part[0] = '\0';
+	if (file_part != NULL)
+		strcpy(file_part, path);
+}
+
+void Util_catpath(char *result, const char *path1, const char *path2)
+{
+#ifdef HAVE_SNPRINTF
+	snprintf(result, FILENAME_MAX,
+#else
+	sprintf(result,
+#endif
+		path1[0] == '\0' || path2[0] == Util_DIR_SEP_CHAR || path1[strlen(path1) - 1] == Util_DIR_SEP_CHAR
+#ifdef DIR_SEP_BACKSLASH
+		 || path2[0] == '/' || path1[strlen(path1) - 1] == '/'
+#endif
+			? "%s%s" : "%s" Util_DIR_SEP_STR "%s", path1, path2);
+}
+
+int Util_fileexists(const char *filename)
+{
+	FILE *fp;
+	fp = fopen(filename, "rb");
+	if (fp == NULL)
+		return FALSE;
+	fclose(fp);
+	return TRUE;
+}
+
+#ifdef WIN32
+
+int Util_direxists(const char *filename)
+{
+	DWORD attr;
+#ifdef UNICODE
+	WCHAR wfilename[FILENAME_MAX];
+	if (MultiByteToWideChar(CP_ACP, 0, filename, -1, wfilename, FILENAME_MAX) <= 0)
+		return FALSE;
+	attr = GetFileAttributes(wfilename);
+#else
+	attr = GetFileAttributes(filename);
+#endif /* UNICODE */
+	if (attr == 0xffffffff)
+		return FALSE;
+#ifdef _WIN32_WCE
+	/* WinCE: Make sure user does not up-dir from the root */
+	if (*filename == 0)
+		return FALSE;
+#endif
+	return (attr & FILE_ATTRIBUTE_DIRECTORY) ? TRUE : FALSE;
+}
+
+#elif defined(HAVE_STAT)
+
+int Util_direxists(const char *filename)
+{
+	struct stat filestatus;
+	return stat(filename, &filestatus) == 0 && (filestatus.st_mode & S_IFDIR);
+}
+
+#else
+
+int Util_direxists(const char *filename)
+{
+	return TRUE;
+}
+
+#endif /* defined(HAVE_STAT) */
+
+
+int Util_flen(FILE *fp)
+{
+	fseek(fp, 0, SEEK_END);
+	return (int) ftell(fp);
+}
+
+/* Creates a file that does not exist and fills in filename with its name.
+   filename must point to FILENAME_MAX characters buffer which doesn't need
+   to be initialized. */
+FILE *Util_uniqopen(char *filename, const char *mode)
+{
+	/* We cannot simply call tmpfile(), because we don't want the file
+	   to be deleted when we close it, and we need the filename. */
+
+#if defined(HAVE_MKSTEMP) && defined(HAVE_FDOPEN)
+	/* this is the only implementation without a race condition */
+	strcpy(filename, "a8XXXXXX");
+	/* mkstemp() modifies the 'X'es and returns an open descriptor */
+	return fdopen(mkstemp(filename), mode);
+#elif defined(HAVE_TMPNAM)
+	/* tmpnam() is better than mktemp(), because it creates filenames
+	   in system's temporary directory. It is also more portable. */
+	return fopen(tmpnam(filename), mode);
+#elif defined(HAVE_MKTEMP)
+	strcpy(filename, "a8XXXXXX");
+	/* mktemp() modifies the 'X'es and returns filename */
+	return fopen(mktemp(filename), mode);
+#else
+	/* Roll-your-own */
+	int no;
+	for (no = 0; no < 1000000; no++) {
+		sprintf(filename, "a8%06d", no);
+		if (!Util_fileexists(filename))
+			return fopen(filename, mode);
+	}
+	return NULL;
+#endif
+}
+
+#if defined(WIN32) && defined(UNICODE)
+int Util_unlink(const char *filename)
+{
+	WCHAR wfilename[FILENAME_MAX];
+#ifdef _WIN32_WCE
+	char cwd[FILENAME_MAX];
+	char fullfilename[FILENAME_MAX];
+	if (filename[0] != '\\' && filename[0] != '/') {
+		getcwd(cwd, FILENAME_MAX);
+		Util_catpath(fullfilename, cwd, filename);
+		if (MultiByteToWideChar(CP_ACP, 0, fullfilename, -1, wfilename, FILENAME_MAX) <= 0)
+			return -1;
+	}
+	else
+#endif
+	if (MultiByteToWideChar(CP_ACP, 0, filename, -1, wfilename, FILENAME_MAX) <= 0)
+		return -1;
+	return (DeleteFile(wfilename) != 0) ? 0 : -1;
+}
+#elif defined(WIN32) && !defined(UNICODE)
+int Util_unlink(const char *filename)
+{
+	return (DeleteFile(filename) != 0) ? 0 : -1;
+}
+#endif /* defined(WIN32) && defined(UNICODE) */
diff --git a/project/jni/application/atari800/src/util.h b/project/jni/application/atari800/src/util.h
new file mode 100644
index 000000000..ab51732f6
--- /dev/null
+++ b/project/jni/application/atari800/src/util.h
@@ -0,0 +1,178 @@
+#ifndef UTIL_H_
+#define UTIL_H_
+
+#include "config.h"
+#include <stdio.h>
+#include <string.h>
+#include <ctype.h>
+#ifdef WIN32
+#include <windows.h>
+#endif
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+
+/* String functions ------------------------------------------------------ */
+
+/* Returns TRUE if the characters are equal or represent the same letter
+   in different case. */
+int Util_chrieq(char c1, char c2);
+
+#ifdef __STRICT_ANSI__
+/* Returns a positive integer if str1>str2, negative if str1<str2
+ * 0 if str1 == str2, case insensitive */
+int Util_stricmp(const char *str1, const char *str2);
+#elif defined(WIN32)
+#define Util_stricmp _stricmp
+#elif defined(HAVE_STRCASECMP)
+#define Util_stricmp strcasecmp
+#else
+#define Util_stricmp stricmp
+#endif
+
+/* Same as stpcpy() in some C libraries: copies src to dest
+   and returns a pointer to the trailing NUL in dest. */
+char *Util_stpcpy(char *dest, const char *src);
+
+/* NestedVM strncpy from newlib has a bug */
+#ifdef HAVE_STRNCPY
+#define Util_strncpy strncpy
+#else
+char *Util_strncpy(char *dest, const char *src, size_t size);
+#endif
+
+/* Same as strlcpy() in some C libraries: copies src to dest
+   and terminates the string. Never writes more than size characters
+   to dest (the result may be truncated). Returns dest. */
+char *Util_strlcpy(char *dest, const char *src, size_t size);
+
+/* Modifies the string to uppercase and returns it. */
+char *Util_strupper(char *s);
+
+/* Modifies the string to lowercase and returns it. */
+char *Util_strlower(char *s);
+
+/* Similar to Perl's chomp(): removes trailing LF, CR or CR/LF. */
+void Util_chomp(char *s);
+
+/* Similar to Basic's trim(): removes leading and trailing whitespace. */
+void Util_trim(char *s);
+
+/* Converts the string to a non-negative integer and returns it.
+   The string must represent the number and nothing else.
+   -1 indicates an error. */
+int Util_sscandec(const char *s);
+
+/* Likewise, but parses hexadecimal numbers. */
+int Util_sscanhex(const char *s);
+
+/* Likewise, but allows only 0 and 1. */
+int Util_sscanbool(const char *s);
+
+/* safe_strncpy guarantees that the dest. buffer ends with '\0' */
+char *safe_strncpy(char *, const char *, int);
+
+/* Memory management ----------------------------------------------------- */
+
+/* malloc() with out-of-memory checking. Never returns NULL. */
+void *Util_malloc(size_t size);
+
+/* realloc() with out-of-memory checking. Never returns NULL. */
+void *Util_realloc(void *ptr, size_t size);
+
+/* strdup() with out-of-memory checking. Never returns NULL. */
+char *Util_strdup(const char *s);
+
+
+/* Filenames ------------------------------------------------------------- */
+
+/* I assume here that '\n' is not valid in filenames,
+   at least not as their first character. */
+#define Util_FILENAME_NOT_SET               "\n"
+#define Util_filenamenotset(filename)  ((filename)[0] == '\n')
+
+#ifdef DIR_SEP_BACKSLASH
+#define Util_DIR_SEP_CHAR '\\'
+#define Util_DIR_SEP_STR  "\\"
+#else
+#define Util_DIR_SEP_CHAR '/'
+#define Util_DIR_SEP_STR  "/"
+#endif
+
+/* Splits a filename into directory part and file part. */
+/* dir_part or file_part may be NULL. */
+void Util_splitpath(const char *path, char *dir_part, char *file_part);
+
+/* Concatenates file paths.
+   Places directory separator char between paths, unless path1 is empty
+   or ends with the separator char, or path2 starts with the separator char. */
+void Util_catpath(char *result, const char *path1, const char *path2);
+
+
+/* File I/O -------------------------------------------------------------- */
+
+/* Returns TRUE if the specified file exists. */
+int Util_fileexists(const char *filename);
+
+/* Returns TRUE if the specified directory exists. */
+int Util_direxists(const char *filename);
+
+/* Rewinds the stream to its beginning. */
+#ifdef HAVE_REWIND
+#define Util_rewind(fp) rewind(fp)
+#else
+#define Util_rewind(fp) fseek(fp, 0, SEEK_SET)
+#endif
+
+/* Returns the length of an open stream.
+   May change the current position. */
+int Util_flen(FILE *fp);
+
+/* Deletes a file, returns 0 on success, -1 on failure. */
+#ifdef WIN32
+int Util_unlink(const char *filename);
+#define HAVE_UTIL_UNLINK
+#elif defined(HAVE_UNLINK)
+#define Util_unlink  unlink
+#define HAVE_UTIL_UNLINK
+#endif /* defined(HAVE_UNLINK) */
+
+/* Creates a file that does not exist and fills in filename with its name. */
+FILE *Util_uniqopen(char *filename, const char *mode);
+
+/* Support for temporary files.
+
+   Util_tmpbufdef() defines storage for names of temporary files, if necessary.
+     Example use:
+     Util_tmpbufdef(static, mytmpbuf[4]) // four buffers with "static" storage
+   Util_fopen() opens a *non-temporary* file and marks tmpbuf
+   as *not containing* name of a temporary file.
+   Util_tmpopen() creates a temporary file with "wb+" mode.
+   Util_fclose() closes a file. If it was temporary, it gets deleted.
+
+   There are 3 implementations of the above:
+   - one that uses tmpfile() (preferred)
+   - one that stores names of temporary files and deletes them when they
+     are closed
+   - one that creates unique files but doesn't delete them
+     because Util_unlink is not available
+*/
+#ifdef HAVE_TMPFILE
+#define Util_tmpbufdef(modifier, def)
+#define Util_fopen(filename, mode, tmpbuf)  fopen(filename, mode)
+#define Util_tmpopen(tmpbuf)                tmpfile()
+#define Util_fclose(fp, tmpbuf)             fclose(fp)
+#elif defined(HAVE_UTIL_UNLINK)
+#define Util_tmpbufdef(modifier, def)       modifier char def [FILENAME_MAX];
+#define Util_fopen(filename, mode, tmpbuf)  (tmpbuf[0] = '\0', fopen(filename, mode))
+#define Util_tmpopen(tmpbuf)                Util_uniqopen(tmpbuf, "wb+")
+#define Util_fclose(fp, tmpbuf)             (fclose(fp), tmpbuf[0] != '\0' && Util_unlink(tmpbuf))
+#else
+/* if we can't delete the created file, leave it to the user */
+#define Util_tmpbufdef(modifier, def)
+#define Util_fopen(filename, mode, tmpbuf)  fopen(filename, mode)
+#define Util_tmpopen(tmpbuf)                Util_uniqopen(NULL, "wb+")
+#define Util_fclose(fp, tmpbuf)             fclose(fp)
+#endif
+
+#endif /* UTIL_H_ */
diff --git a/project/jni/application/atari800/src/votrax.c b/project/jni/application/atari800/src/votrax.c
new file mode 100755
index 000000000..bc4622a88
--- /dev/null
+++ b/project/jni/application/atari800/src/votrax.c
@@ -0,0 +1,470 @@
+/* License note by perry_m:
+Permission has been granted by the authors Mike Coates and Tom Haukap
+to distribute this file under the terms of the GNU GPL license of Atari800.
+The original version written by Mike Coates is from MAME.
+This extensively modified version with new samples and mixing written
+by Tom Haukap is from PinMAME.
+I have also made modifications to this file for use in Atari800 and
+allow any modifications to be distributed under any of the licenses
+of Atari800, MAME and PinMAME. */
+
+/**************************************************************************
+
+	Votrax SC-01 Emulator
+
+ 	Mike@Dissfulfils.co.uk
+	Tom.Haukap@t-online.de
+	modified for Atari800 by perry_m@fastmail.fm
+
+**************************************************************************
+
+Votrax_Start         - Start emulation, load samples from Votrax subdirectory
+Votrax_Stop          - End emulation, free memory used for samples
+Votrax_PutByte       - Write data to votrax port
+Votrax_GetStatus     - Return busy status (1 = busy)
+
+**************************************************************************/
+
+#ifdef PBI_DEBUG
+#define VERBOSE 1
+#endif
+
+#if VERBOSE
+#define LOG(x) printf x
+#else
+#define LOG(x)
+#endif
+
+#include "votrax.h"
+#include <stdio.h>
+#include <math.h>
+#include <stdlib.h>
+#include <string.h>
+#include "util.h"
+
+static struct {
+	int busy;
+
+	int actPhoneme;
+	int actIntonation;
+
+	struct Votrax_interface *intf;
+
+	SWORD* pActPos;
+	int	iRemainingSamples;
+
+	SWORD *lpBuffer;
+	SWORD* pBufferPos;
+
+	int   iSamplesInBuffer;
+	int	  iDelay;  /* a count of samples to output '0' in a Delay state */
+
+} votraxsc01_locals;
+
+#define INT16 SWORD
+#define UINT16 UWORD
+#include "vtxsmpls.inc"
+
+#if VERBOSE
+static const char *PhonemeNames[65] =
+{
+ "EH3","EH2","EH1","PA0","DT" ,"A2" ,"A1" ,"ZH",
+ "AH2","I3" ,"I2" ,"I1" ,"M"  ,"N"  ,"B"  ,"V",
+ "CH" ,"SH" ,"Z"  ,"AW1","NG" ,"AH1","OO1","OO",
+ "L"  ,"K"  ,"J"  ,"H"  ,"G"  ,"F"  ,"D"  ,"S",
+ "A"  ,"AY" ,"Y1" ,"UH3","AH" ,"P"  ,"O"  ,"I",
+ "U"  ,"Y"  ,"T"  ,"R"  ,"E"  ,"W"  ,"AE" ,"AE1",
+ "AW2","UH2","UH1","UH" ,"O2" ,"O1" ,"IU" ,"U1",
+ "THV","TH" ,"ER" ,"EH" ,"E1" ,"AW" ,"PA1","STOP",
+ 0
+};
+#endif
+
+/* phoneme types*/
+#define PT_NS 0
+#define PT_V  1
+#define PT_VF 2
+#define PT_F  3
+#define PT_N  4
+#define PT_VS 5
+#define PT_FS 6
+
+
+static int sample_rate[4] = {22050, 22050, 22050, 22050};
+
+/* converts milliseconds to a count of samples */
+static int time_to_samples(int ms)
+{
+	return sample_rate[votraxsc01_locals.actIntonation]*ms/1000;
+}
+
+static void PrepareVoiceData(int nextPhoneme, int nextIntonation)
+{
+	int iNextRemainingSamples;
+	SWORD *pNextPos, *lpHelp;
+
+	int iFadeOutSamples;
+	int iFadeOutPos;
+	
+	int iFadeInSamples;
+	int iFadeInPos;
+
+	int doMix;
+	/* used only for SecondStart phonemes */
+	int AdditionalSamples;
+	/* dwCount is the length of samples to produce in ms from iLengthms */
+	int dwCount, i;
+
+	SWORD data;
+
+	AdditionalSamples = 0;
+	/* some phonenemes have a SecondStart */
+	if ( PhonemeData[votraxsc01_locals.actPhoneme].iType>=PT_VS && votraxsc01_locals.actPhoneme!=nextPhoneme ) {
+		AdditionalSamples = PhonemeData[votraxsc01_locals.actPhoneme].iSecondStart;
+	}
+
+	if ( PhonemeData[nextPhoneme].iType>=PT_VS ) {
+		/* 'stop phonemes' will stop playing until the next phoneme is sent*/
+		votraxsc01_locals.iRemainingSamples = 0;
+		return;
+	}
+
+	/* length of samples to produce*/
+	dwCount = time_to_samples(PhonemeData[nextPhoneme].iLengthms);
+
+	votraxsc01_locals.iSamplesInBuffer = dwCount+AdditionalSamples;
+
+	if ( AdditionalSamples )
+		memcpy(votraxsc01_locals.lpBuffer, PhonemeData[votraxsc01_locals.actPhoneme].lpStart[votraxsc01_locals.actIntonation], AdditionalSamples*sizeof(SWORD));
+
+	lpHelp = votraxsc01_locals.lpBuffer + AdditionalSamples;
+
+	iNextRemainingSamples = 0;
+	pNextPos = NULL;
+
+	iFadeOutSamples = 0;
+	iFadeOutPos     = 0;
+	
+	iFadeInSamples   = 0;
+	iFadeInPos       = 0;
+
+	doMix = 0;
+
+	/* set up processing*/
+	if ( PhonemeData[votraxsc01_locals.actPhoneme].sameAs!=PhonemeData[nextPhoneme].sameAs  ) {
+		/* do something, if they are the same all FadeIn/Out values are 0, */
+		/* the buffer is simply filled with the samples of the new phoneme */
+
+		switch ( PhonemeData[votraxsc01_locals.actPhoneme].iType ) {
+			case PT_NS:
+				/* "fade" out NS:*/
+				iFadeOutSamples = time_to_samples(30);
+				iFadeOutPos = 0;
+
+				/* fade in new phoneme*/
+				iFadeInPos = -time_to_samples(30);
+				iFadeInSamples = time_to_samples(30);
+				break;
+
+			case PT_V:
+			case PT_VF:
+				switch ( PhonemeData[nextPhoneme].iType ){
+					case PT_F:
+					case PT_VF:
+						/* V-->F, V-->VF: fade out 30 ms fade in from 30 ms to 60 ms without mixing*/
+						iFadeOutPos = 0;
+						iFadeOutSamples = time_to_samples(30);
+
+						iFadeInPos = -time_to_samples(30);
+						iFadeInSamples = time_to_samples(30);
+						break;
+
+					case PT_N:
+						/* V-->N: fade out 40 ms fade from 0 ms to 40 ms without mixing*/
+						iFadeOutPos = 0;
+						iFadeOutSamples = time_to_samples(40);
+
+						iFadeInPos = -time_to_samples(10);
+						iFadeInSamples = time_to_samples(10);
+						break;
+
+					default:
+						/* fade out 20 ms, no fade in from 10 ms to 30 ms*/
+						iFadeOutPos = 0;
+						iFadeOutSamples = time_to_samples(20);
+
+						iFadeInPos = -time_to_samples(0);
+						iFadeInSamples = time_to_samples(20);
+						break;
+				}
+				break;
+
+			case PT_N:
+				switch ( PhonemeData[nextPhoneme].iType ){
+					case PT_V:
+					case PT_VF:
+						/* N-->V, N-->VF: fade out 30 ms fade in from 10 ms to 50 ms without mixing*/
+						iFadeOutPos = 0;
+						iFadeOutSamples = time_to_samples(30);
+
+						iFadeInPos = -time_to_samples(10);
+						iFadeInSamples = time_to_samples(40);
+						break;
+
+					default:
+						break;
+				}
+
+			case PT_VS:
+			case PT_FS:
+				iFadeOutPos = 0;
+				iFadeOutSamples = PhonemeData[votraxsc01_locals.actPhoneme].iLength[votraxsc01_locals.actIntonation] - PhonemeData[votraxsc01_locals.actPhoneme].iSecondStart;
+				votraxsc01_locals.pActPos = PhonemeData[votraxsc01_locals.actPhoneme].lpStart[votraxsc01_locals.actIntonation] + PhonemeData[votraxsc01_locals.actPhoneme].iSecondStart;
+				votraxsc01_locals.iRemainingSamples = iFadeOutSamples;
+				doMix = 1;
+
+				iFadeInPos = -time_to_samples(0);
+				iFadeInSamples = time_to_samples(0);
+
+				break;
+
+			default:
+				/* fade out 30 ms, no fade in*/
+				iFadeOutPos = 0;
+				iFadeOutSamples = time_to_samples(20);
+
+				iFadeInPos = -time_to_samples(20);
+				break;
+		}
+
+		if ( !votraxsc01_locals.iDelay ) {
+			/* this is true if after a stop and a phoneme was sent a second phoneme is sent*/
+			/* during the delay time of the chip. Ignore the first phoneme data*/
+			iFadeOutPos = 0;
+			iFadeOutSamples = 0;
+		}
+
+	}
+	else {
+		/* the next one is of the same type as the previous one; continue to use the samples of the last phoneme*/
+		iNextRemainingSamples = votraxsc01_locals.iRemainingSamples;
+		pNextPos = votraxsc01_locals.pActPos;
+	}
+
+	for (i=0; i<dwCount; i++)
+	{
+		data = 0x00;
+
+		/* fade out*/
+		if ( iFadeOutPos<iFadeOutSamples ) 
+		{
+			double dFadeOut = 1.0;
+
+			if ( !doMix )
+				dFadeOut = 1.0-sin((1.0*iFadeOutPos/iFadeOutSamples)*3.1415/2);
+
+			if ( !votraxsc01_locals.iRemainingSamples ) {
+				votraxsc01_locals.iRemainingSamples = PhonemeData[votraxsc01_locals.actPhoneme].iLength[votraxsc01_locals.actIntonation];
+				votraxsc01_locals.pActPos = PhonemeData[votraxsc01_locals.actPhoneme].lpStart[votraxsc01_locals.actIntonation];
+			}
+
+			data = (SWORD) (*votraxsc01_locals.pActPos++ * dFadeOut);
+
+			votraxsc01_locals.iRemainingSamples--;
+			iFadeOutPos++;
+		}
+
+		/* fade in or copy*/
+		if ( iFadeInPos>=0 )
+		{
+			double dFadeIn = 1.0;
+			
+			if ( iFadeInPos<iFadeInSamples ) {
+				dFadeIn = sin((1.0*iFadeInPos/iFadeInSamples)*3.1415/2);
+				iFadeInPos++;
+			}
+
+			if ( !iNextRemainingSamples ) {
+				iNextRemainingSamples = PhonemeData[nextPhoneme].iLength[nextIntonation];
+				pNextPos = PhonemeData[nextPhoneme].lpStart[nextIntonation];
+			}
+
+			data += (SWORD) (*pNextPos++ * dFadeIn);
+			
+			iNextRemainingSamples--;
+		}
+		iFadeInPos++;
+
+		*lpHelp++ = data;
+	}
+
+	votraxsc01_locals.pBufferPos = votraxsc01_locals.lpBuffer;
+
+	votraxsc01_locals.pActPos = pNextPos;
+	votraxsc01_locals.iRemainingSamples = iNextRemainingSamples;
+}
+
+void Votrax_PutByte(UBYTE data)
+{
+	int Phoneme, Intonation;
+
+	Phoneme = data & 0x3F;
+	Intonation = (data >> 6)&0x03;
+
+#ifdef VERBOSE
+	if (!votraxsc01_locals.intf) {
+		LOG(("Error: votraxsc01_locals.intf not set"));
+		return;
+	}
+#endif /* VERBOSE */
+	LOG(("Votrax SC-01: %s at intonation %d\n", PhonemeNames[Phoneme], Intonation));
+	PrepareVoiceData(Phoneme, Intonation);
+
+	if ( votraxsc01_locals.actPhoneme==0x3f )
+		votraxsc01_locals.iDelay = time_to_samples(20);
+		
+	if ( !votraxsc01_locals.busy ) 
+	{
+		votraxsc01_locals.busy = 1;
+		if ( votraxsc01_locals.intf->BusyCallback )
+			(*votraxsc01_locals.intf->BusyCallback)(votraxsc01_locals.busy);
+	}
+
+	votraxsc01_locals.actPhoneme = Phoneme;
+	votraxsc01_locals.actIntonation = Intonation;
+}
+
+UBYTE Votrax_GetStatus(void)
+{
+	return votraxsc01_locals.busy;
+}
+
+void Votrax_Update(int num, SWORD *buffer, int length)
+{
+	int samplesToCopy;
+
+	/* if it is a different intonation */
+	if ( num!=votraxsc01_locals.actIntonation ) {
+		/* clear buffer */
+		memset(buffer, 0x00, length*sizeof(SWORD));
+		return;
+	}
+
+	while ( length ) {
+		/* Case 1: if in a delay state, output 0's*/
+		if ( votraxsc01_locals.iDelay ) {
+			samplesToCopy = (length<=votraxsc01_locals.iDelay)?length:votraxsc01_locals.iDelay;
+
+			memset(buffer, 0x00, samplesToCopy*sizeof(SWORD));
+			buffer += samplesToCopy;
+
+			votraxsc01_locals.iDelay -= samplesToCopy;
+			length -= samplesToCopy; /* missing in the original */
+		}
+		/* Case 2: there are no samples left in the buffer */
+		else if ( votraxsc01_locals.iSamplesInBuffer==0 ) {
+			if ( votraxsc01_locals.busy ) {
+				/* busy -> idle */
+				votraxsc01_locals.busy = 0;
+				if ( votraxsc01_locals.intf->BusyCallback )
+					(*votraxsc01_locals.intf->BusyCallback)(votraxsc01_locals.busy);
+			}
+
+			if ( votraxsc01_locals.iRemainingSamples==0 ) {
+				if ( PhonemeData[votraxsc01_locals.actPhoneme].iType>=PT_VS ) {
+					votraxsc01_locals.pActPos = PhonemeData[0x3f].lpStart[0];
+					votraxsc01_locals.iRemainingSamples = PhonemeData[0x3f].iLength[0];
+				}
+				else {
+					votraxsc01_locals.pActPos = PhonemeData[votraxsc01_locals.actPhoneme].lpStart[votraxsc01_locals.actIntonation];
+					votraxsc01_locals.iRemainingSamples = PhonemeData[votraxsc01_locals.actPhoneme].iLength[votraxsc01_locals.actIntonation];
+				}
+
+			}
+
+			/* if there aren't enough remaining, reduce the amount */
+			samplesToCopy = (length<=votraxsc01_locals.iRemainingSamples)?length:votraxsc01_locals.iRemainingSamples;
+
+			memcpy(buffer, votraxsc01_locals.pActPos, samplesToCopy*sizeof(SWORD));
+			buffer += samplesToCopy;
+
+			votraxsc01_locals.pActPos += samplesToCopy;
+			votraxsc01_locals.iRemainingSamples -= samplesToCopy;
+
+			length -= samplesToCopy;
+		}
+		/* Case 3: output the samples in the buffer */
+		else {
+			samplesToCopy = (length<=votraxsc01_locals.iSamplesInBuffer)?length:votraxsc01_locals.iSamplesInBuffer;
+
+			memcpy(buffer, votraxsc01_locals.pBufferPos, samplesToCopy*sizeof(SWORD));
+			buffer += samplesToCopy;
+
+			votraxsc01_locals.pBufferPos += samplesToCopy;
+			votraxsc01_locals.iSamplesInBuffer -= samplesToCopy;
+
+			length -= samplesToCopy;
+		}
+	}
+}
+
+int Votrax_Start(void *sound_interface)
+{
+	int i, buffer_size;
+	/* clear local variables */
+	memset(&votraxsc01_locals, 0x00, sizeof votraxsc01_locals);
+
+	/* copy interface */
+	votraxsc01_locals.intf = (struct Votrax_interface *)sound_interface;
+
+	votraxsc01_locals.actPhoneme = 0x3f;
+
+	/* find the largest possible size of iSamplesInBuffer */
+	buffer_size = 0;
+	for (i = 0; i <= 0x3f; i++) {
+		int dwCount;
+		int size;
+		int AdditionalSamples;
+		AdditionalSamples = PhonemeData[i].iSecondStart;
+		dwCount = time_to_samples(PhonemeData[i].iLengthms);
+		size = dwCount + AdditionalSamples;
+		if (size > buffer_size)  buffer_size = size;
+	}
+	votraxsc01_locals.lpBuffer = (SWORD*) Util_malloc(buffer_size*sizeof(SWORD));
+	PrepareVoiceData(votraxsc01_locals.actPhoneme, votraxsc01_locals.actIntonation);
+	return 0;
+}
+
+void Votrax_Stop(void)
+{
+	if ( votraxsc01_locals.lpBuffer ) {
+		free(votraxsc01_locals.lpBuffer);
+		votraxsc01_locals.lpBuffer = NULL;
+	}
+}
+
+int Votrax_Samples(int currentP, int nextP, int cursamples)
+{
+	int AdditionalSamples = 0;
+	int dwCount;
+	int delay = 0;
+	/* some phonemes have a SecondStart */
+	if ( PhonemeData[currentP].iType>=PT_VS && currentP!=nextP) {
+		AdditionalSamples = PhonemeData[currentP].iSecondStart;
+	}
+
+	if ( PhonemeData[nextP].iType>=PT_VS ) {
+		/* 'stop phonemes' will stop playing until the next phoneme is sent*/
+		/* votraxsc01_locals.iRemainingSamples = 0; */
+		return cursamples;
+	}
+	if (currentP == 0x3f) delay = time_to_samples(20);
+
+	/* length of samples to produce*/
+	dwCount = time_to_samples(PhonemeData[nextP].iLengthms);
+	return dwCount + AdditionalSamples + delay ;
+}
+
+/*
+vim:ts=4:sw=4:
+*/
diff --git a/project/jni/application/atari800/src/votrax.h b/project/jni/application/atari800/src/votrax.h
new file mode 100755
index 000000000..80e2db043
--- /dev/null
+++ b/project/jni/application/atari800/src/votrax.h
@@ -0,0 +1,23 @@
+#ifndef VOTRAX_H_
+#define VOTRAX_H_
+
+#include "atari.h"
+
+typedef void (*Votrax_BusyCallBack)(int);
+
+struct Votrax_interface
+{
+        int num;	/* total number of chips */
+	Votrax_BusyCallBack BusyCallback;	/* callback function when busy signal changes */
+};
+
+int Votrax_Start(void *sound_interface);
+void Votrax_Stop(void);
+
+void Votrax_PutByte(UBYTE data);
+UBYTE Votrax_GetStatus(void);
+
+void Votrax_Update(int num, SWORD *buffer, int length);
+int Votrax_Samples(int currentP, int nextP, int cursamples);
+
+#endif /* VOTRAX_H_ */
diff --git a/project/jni/application/atari800/src/vtxsmpls.inc b/project/jni/application/atari800/src/vtxsmpls.inc
new file mode 100755
index 000000000..49289379d
--- /dev/null
+++ b/project/jni/application/atari800/src/vtxsmpls.inc
@@ -0,0 +1,6917 @@
+static const UINT16 DT[] = {
+	0xff6c,0x0165,0x0450,0x057e,0x069d,0x06ba,0x067d,0x0703,
+	0x05ec,0x079d,0x0a46,0x0e70,0x0fa4,0x0f57,0x0b90,0x092b,
+	0x084e,0x06cb,0x0762,0x084d,0x0b52,0x0cdc,0x0d89,0x0ae8,
+	0x0a29,0x0aa6,0x0cdb,0x1059,0x1194,0x1288,0x1207,0x13be,
+	0x1340,0x1387,0x1200,0x11a3,0x125b,0x12b9,0x12bb,0x100a,
+	0x0e6b,0x0c4c,0x0d61,0x0dd6,0x0ea6,0x0d83,0x0d7f,0x0e23,
+	0x0dac,0x0b9c,0x08a0,0x084c,0x08b3,0x09e1,0x086a,0x0837,
+	0x08a1,0x0ab4,0x0a83,0x077e,0x05e5,0x05b4,0x07ef,0x0670,
+	0x04e4,0x0346,0x04bc,0x067f,0x0787,0x055a,0x034e,0x0390,
+	0x0450,0x0514,0x02a1,0x022a,0x01a7,0x03e8,0x0454,0x03bf,
+	0x0209,0x0142,0x02a1,0x0351,0x0457,0x025c,0x01c0,0x0118,
+	0x0259,0x02c5,0x0252,0x01dc,0x019e,0x0306,0x0261,0x0213,
+	0x0043,0x0105,0x01b0,0x01e7,0x0082,0x001c,0x01c8,0x02d8,
+	0x0342,0x00cb,0xfff0,0xff2e,0x00c3,0x00f3,0x006b,0x0048,
+	0x0045,0x0216,0x01a2,0x013e,0xff4d,0xff67,0xff62,0x00a4,
+	0x0004,0xff33,0xff1d,0xff76,0x00a4,0xfff1,0x005c,0xff96,
+	0x007a,0x0045,0x0053,0xff2b,0xfe76,0xfe88,0xfedd,0xfff1,
+	0xff42,0xff5d,0xfe65,0xffa7,0xfff2,0x0052,0xff77,0xfe80,
+	0xfe64,0xfeaa,0xffd2,0xff34,0xff9e,0xfe68,0xff77,0xffd0,
+	0x001c,0xffc0,0xfeb1,0xff25,0xff16,0xffa9,0xfe48,0xfe10,
+	0xfd95,0xff34,0x008e,0x00e1,0xffd5,0xfe0b,0xfddf,0xfd6d,
+	0xfea4,0xfe1f,0xfee1,0xfece,0xff87,0xffb3,0xfe94,0xfddb,
+	0xfd2f,0xff39,0xffad,0x00a0,0xff14,0xfe22,0xfd58,0xfd6f,
+	0xfdef,0xfe62,0xff71,0xffa4,0x0100,0xffc3,0xfee4,0xfcb9,
+	0xfd10,0xfe35,0x0024,0x00ed,0xffef,0xfe93,0xfd1e,0xfe00,
+	0xfdde,0xff3f,0xff36,0x0014,0x000e,0xff38,0xfe59,0xfd21,
+	0xfddd,0xfdb1,0xfed0,0xfeb7,0xffcc,0xffb0,0xffb4,0xfe03,
+	0xfc3d,0xfc24,0xfd67,0xffbd,0xff8f,0xff95,0xfe30,0xff38,
+	0xff4d,0xfea7,0xfc74,0xfbbd,0xfdc9,0xffca,0x0105,0xfea6,
+	0xfd2d,0xfc03,0xfe2e,0xff7a,0xff14,0xfe58,0xfddd,0xffb6,
+	0xff2e,0xfe6e,0xfbde,0xfc86,0xfdd3,0xff8c,0xfffa,0xff15,
+	0xff1d,0xff02,0xffb9,0xfe27,0xfd3d,0xfc57,0xfe2e,0xff33,
+	0xffca,0xfeeb,0xfe36,0xfea8,0xfe9e,0xfe8e,0xfcd8,0xfd1d,
+	0xfd22,0xfe7a,0xfe1b,0xfd95,0xfd0d,0xfd96,0xfea2,0xfdcd,
+	0xfd85,0xfc18,0xfce1,0xfd02,0xfdaa,0xfcf3,0xfceb,0xfd1c,
+	0xfd9d,0xfdcc,0xfccd,0xfcdf,0xfc45,0xfde5,0xfe4d,0xff2d,
+	0xfe2d,0xfd71,0xfcd5,0xfc96,0xfcf4,0xfcfe,0xfe17,0xfdac,
+	0xfe7d,0xfdbe,0xfd6c,0xfc0a,0xfb6e,0xfc29,0xfce2,0xfe43,
+	0xfdb9,0xfdef,0xfd25,0xfded,0xfd6f,0xfcf0,0xfc32,0xfd2e,
+	0xfe29,0xfe47,0xfe1c,0xfc9f,0xfd5e,0xfd5f,0xfe6c,0xfdda,
+	0xfd7a,0xfd4f,0xfe21,0xfebb,0xfda3,0xfcc1,0xfbf2,0xfdf4,
+	0xff08,0x0016,0xfe3c,0xfcc3,0xfcce,0xfd7e,0xfe77,0xfd04,
+	0xfd3c,0xfd7f,0xfef6,0xfe8e,0xfd80,0xfbea,0xfc3e,0xfd8c,
+	0xfe5a,0xfe3a,0xfcb5,0xfd48,0xfd9b,0xfe9d,0xfd2a,0xfcc0,
+	0xfcb7,0xfe34,0xff2a,0xfe74,0xfd59,0xfc1e,0xfd7a,0xfd8c,
+	0xfdf9,0xfce2,0xfd56,0xfde5,0xfee5,0xfe69,0xfcaa,0xfc16,
+	0xfbf9,0xfd22,0xfc6c,0xfc82,0xfc91,0xfe19,0xfec6,0xfe93,
+	0xfd30,0xfc3b,0xfd38,0xfd31,0xfd50,0xfb85,0xfb9f,0xfc5b,
+	0xfe62,0xfed0,0xfdef,0xfd15,0xfc75,0xfd4f,0xfcb2,0xfc6d,
+	0xfb9a,0xfcf5,0xfe14,0xff8b,0xfeee,0xfdb1,0xfd3f,0xfc94,
+	0xfcec,0xfbf9,0xfc97,0xfcb3,0xfe4b,0xfea4,0xfe64,0xfdb8,
+	0xfd41,0xfe79,0xfe86,0xfe96,0xfcb6,0xfc33,0xfc1e,0xfd7b,
+	0xfe4e,0xfe75,0xfead,0xfe3b,0xfe35,0xfd1f,0xfc84,0xfb57,
+	0xfc8f,0xfd4e,0xfe39,0xfe3c,0xfdc6,0xfd3a,0xfcfa,0xfd1a,
+	0xfbf2,0xfc5f,0xfc70,0xfd95,0xfd46,0xfd32,0xfcb5,0xfd08,
+	0xfe05,0xfdc6,0xfd58,0xfbd5,0xfc42,0xfc06,0xfd06,0xfcb8,
+	0xfd27,0xfe05,0xfe71,0xfedd,0xfd10,0xfbec,0xf773,0xf2b3,
+	0xedf9,0xeab5,0xe87b,0xe746,0xe683,0xe608,0xe646,0xe5c9,
+	0xe6c7,0xe70b,0xe82a,0xe831,0xe8f0,0xe90e,0xe9ad,0xea8a,
+	0xeaa3,0xeba2,0xeb77,0xecd3,0xec8a,0xed83,0xedb1,0xee62,
+	0xeea5,0xef1e,0xefca,0xefa2,0xf098,0xf087,0xf154,0xf0ee,
+	0xf1ff,0xf1bb,0xf256,0xf284,0xf2ba,0xf363,0xf32e,0xf3fa,
+	0xf3a9,0xf479,0xf421,0xf4e5,0xf4a0,0xf518,0xf53f,0xf557,
+	0xf5d1,0xf578,0xf639,0xf5d6,0xf6bb,0xf637,0xf6c2,0xf6a6,
+	0xf6ec,0xf719,0xf702,0xf773,0xf6f6,0xf7b9,0xf724,0xf7f2,
+	0xf78a,0xf7d3,0xf7d5,0xf7f6,0xf7e9,0xf787,0xf912,0xfb06,
+	0xfde5,0xff35,0x00b3,0x00b7,0x017d,0x019a,0x017b,0x031f,
+	0x04fb,0x0776,0x0811,0x082d,0x0544,0x0342,0x00c3,0x000a,
+	0x00d4,0x02b1,0x04b1,0x0510,0x0568,0x0419,0x044e,0x0348,
+	0x040b,0x05df,0x0903,0x0b74,0x0be4,0x0b69,0x09aa,0x0916,
+	0x08ee,0x0b48,0x0da0,0x109b,0x11b8,0x116e,0x0fba,0x0d60,
+	0x0c4d,0x0bbe,0x0d15,0x0ea9,0x1147,0x1257,0x12e1,0x11be,
+	0x0ff8,0x0e4b,0x0d03,0x0ce5,0x0c64,0x0cc3,0x0c38,0x0c50,
+	0x0b61,0x0aaf,0x0992,0x0852,0x06dd,0x04ea,0x0329,0x00fd,
+	0x0001,0xff03,0xffd3,0xffb1,0xffb5,0xfe53,0xfc42,0xf9e0,
+	0xf718,0xf5ec,0xf4fd,0xf680,0xf7bc,0xf9f2,0xfa25,0xf94c,
+	0xf76b,0xf57b,0xf49b,0xf439,0xf5f9,0xf77f,0xfa46,0xfb32,
+	0xfc16,0xfb7a,0xfb20,0xfb29,0xfb88,0xfcfe,0xfe11,0xffca,
+	0x006b,0x01c3,0x021f,0x02fc,0x033c,0x03e9,0x048d,0x04b0,
+	0x04ed,0x0438,0x04ab,0x047a,0x05bc,0x0622,0x06ef,0x06af,
+	0x05ec,0x04e8,0x032f,0x0291,0x01ae,0x0295,0x02c9,0x039a,
+	0x02be,0x01d4,0xfff5,0xfe6e,0xfd8c,0xfc59,0xfc9a,0xfc39,
+	0xfce3,0xfc27,0xfbfd,0xfaa4,0xf9d7,0xf97b,0xf90a,0xf922,
+	0xf8b4,0xf8f6,0xf8e7,0xf95b,0xf920,0xf91e,0xf925,0xf971,
+	0xfa04,0xf9eb,0xfa25,0xfa0f,0xfb2b,0xfbf5,0xfd7b,0xfd77,
+	0xfddd,0xfdd7,0xfdbc,0xfe77,0xfdf9,0xff06,0xff29,0x00e0,
+	0x015c,0x0282,0x0278,0x0248,0x0250,0x01b8,0x01cd,0x00f9,
+	0x01cf,0x019a,0x0319,0x02ed,0x03a7,0x02d0,0x023c,0x0166,
+	0xffe1,0xffa0,0xfe85,0xffc3,0xff44,0x0062,0xff9f,0xffac,
+	0xfe80,0xfdc0,0xfd39,0xfbe6,0xfbe3,0xfac9,0xfbed,0xfb2d,
+	0xfc40,0xfba4,0xfbfc,0xfba6,0xfaf0,0xfa88,0xf93b,0xf99f,
+	0xf930,0xfb05,0xfae2,0xfc63,0xfc92,0xfcb4,0xfc35,0xfb21,
+	0xfb12,0xfa5e,0xfbfb,0xfc8d,0xfeac,0xfef7,0xffd0,0xff1f,
+	0xfe72,0xfe12,0xfd72,0xfe6e,0xfe7f,0x006d,0x00c3,0x01eb,
+	0x0127,0x00fe,0x004c,0xffe9,0x0043,0x0007,0x012a,0x00bb,
+	0x01a0,0x00c3,0x0127,0xfff5,0x0006,0xffb0,0xff8c,0xffee,
+	0xff41,0xff99,0xfe26,0xfed1,0xfdc4,0xfe59,0xfdbf,0xfdfc,
+	0xfde6,0xfd07,0xfcc7,0xfb72,0xfc1e,0xfb8f,0xfd1e,0xfce4,
+	0xfd98,0xfcb7
+};
+
+static const UINT16 ZH0[] = {
+	0xfede,0x0030,0xfe52,0xfa8e,0xf8c8,0xfa22,0xfdfe,0xffb8,
+	0x00a9,0xff25,0xff1d,0xfe07,0xfc2e,0xf7eb,0xf572,0xf932,
+	0x00fa,0x07bb,0x05c3,0xfec4,0xf769,0xf806,0xfcde,0x019b,
+	0x0118,0xfe8a,0xfcbe,0xfca2,0xfdfd,0xfdb8,0x0037,0x0282,
+	0x05dd,0x044f,0xfdb7,0xf6d6,0xf58c,0xfaf3,0x0176,0x071c,
+	0x07cb,0x0623,0x001d,0xfa2f,0xf65e,0xf865,0xff3f,0x0578,
+	0x0892,0x04bd,0xfe17,0xf765,0xf72e,0xfa2d,0x007b,0x052b,
+	0x0777,0x04db,0xfd2b,0xf69a,0xf3bb,0xf8a8,0xff3e,0x04e9,
+	0x04ad,0x0174,0xfe3e,0xfbf6,0xfa46,0xf8ec,0xfb48,0xfe7e,
+	0x0272,0x007f,0xfc1d,0xf98f,0xfc63,0x00b6,0x01df,0xff21,
+	0xfaaf,0xfaf5,0xfc7e,0xfefb,0xff4b,0x0007,0x0060,0x006f,
+	0xfec0,0xfc04,0xfb52,0xfb42,0xfe65,0x0017,0x0105,0xfe61,
+	0xfcb6,0xfd92,0x011a,0x03fd,0x014b,0xfd83,0xfa8c,0xfc02,
+	0xfc89,0xfbe3,0xfaf9,0xfe98,0x0659,0x0ad2,0x06f4,0xfb32,
+	0xf3d8,0xf362,0xf951,0xfdc7,0x02a1,0x063d,0x08c0,0x0740,
+	0xfdf9,0xf447,0xeff4,0xf73b,0x00a1,0x0692,0x0465,0x001c,
+	0xfd05,0xfbf5,0xfb29,0xf927,0xfa55,0xfd33,0x016d,0x0051,
+	0xfc92,0xf91a,0xfb1d,0x0041,0x039e,0x0392,0xffb1,0xfd9e,
+	0xfbc9,0xfbfc,0xfbaf,0xfdef,0x01f4,0x0651,0x0797,0x0333,
+	0xfdbb,0xf983,0xfb0d,0xfdb7,0x01b8,0x031e,0x03e3,0x03a8,
+	0x01e3,0xff1d,0xfbd6,0xfc40,0xfdd8,0x011f,0x0140,0x005b,
+	0xfe09,0xfd29,0xfd7e,0xfdb5,0xfe60,0xfdb6,0xfe5e,0xfcf3,
+	0xfc00,0xf9dc,0xf9e8,0xfb6f,0xfdce,0xff28,0xfdee,0xfc36,
+	0xf977,0xf91d,0xf87c,0xf9d3,0xfadc,0xfcef,0xfdf5,0xfd87,
+	0xfc66,0xfa0b,0xf9f5,0xf9ec,0xfc13,0xfc7a,0xfd31,0xfcde,
+	0xfd2c,0xfd3c,0xfcf4,0xfda6,0xfd74,0xfe77,0xfdbd,0xfdfc,
+	0xfd00,0xfd67,0xfe3a,0xffa6,0x00d5,0x009c,0x00f5,0xff93,
+	0xff4a,0xfe17,0xfeb8,0xff3c,0x00e2,0x01f0,0x021b,0x019f,
+	0xfff6,0xff9e,0xfe9c,0xff7e,0xff54,0x0069,0x0070,0x00b1,
+	0x0048,0xff2e,0xfeca,0xfe47,0xff9c,0xff42,0xffb2,0xfe80,
+	0xfe19,0xfd3d,0xfd0d,0xfdd8,0xfde5,0xff16,0xfee7,0xff0f,
+	0xfd3a,0xfc8a,0xfb4f,0xfacf,0xfbc0,0xfe37,0x00ff,0xffe2,
+	0xfd49,0xf9d2,0xf9c4,0xfae3,0xfe81,0xff50,0xfe7f,0xfcdc,
+	0xfc85,0xfdea,0xfcdd,0xfae6,0xf8f4,0xfd6e,0x0251,0x0392,
+	0xfec9,0xfa06,0xfaef,0xfed9,0x0133,0xfe40,0xfd16,0xfd96,
+	0x0040,0xff98,0xfce6,0xfc5c,0xfeee,0x03b0,0x03ec,0x00b9,
+	0xfbef,0xfb61,0xfbab,0xfd94,0xff55,0x0245,0x0575,0x053e,
+	0x00fb,0xf9d7,0xf7cc,0xfa5a,0x0107,0x046e,0x049d,0x011d,
+	0xff21,0xfd8d,0xfb5a,0xfa5b,0xfa56,0xff02,0x0330,0x05a8,
+	0x031b,0xfefd,0xfa6d,0xf7cc,0xf818,0xfa0a,0xff18,0x02b0,
+	0x0505,0x02b6,0xff49,0xfbef,0xfbfc,0xfc91,0xfbc3,0xf9c8,
+	0xf82a,0xfbb1,0x0085,0x052a,0x0417,0x00c5,0xfccd,0xf9ce,
+	0xf8b7,0xf8d2,0xfbfc,0xfe69,0x0186,0x0239,0x0240,0xfea4,
+	0xfb7d,0xfb16,0xfdc0,0x009f,0xffba,0xfd35,0xf9c1,0xfa8a,
+	0xfd92,0x03a2,0x06e4,0x05fd,0x0006,0xfa2d,0xf755,0xf786,
+	0xfb37,0xfe71,0x040d,0x0746,0x0748,0x011e,0xf87f,0xf545,
+	0xf7e5,0xff95,0x04a3,0x0651,0x02c0,0xff77,0xfb02,0xf8ea,
+	0xf9a0,0xfec0,0x052f,0x06e9,0x029a,0xf919,0xf397,0xf3c7,
+	0xfb2e,0x023d,0x0642,0x056c,0x0101,0xfb5e,0xf51b,0xf373,
+	0xf656,0xff09,0x0691,0x09f5,0x05aa,0xfe4e,0xf89c,0xf6cd,
+	0xfa2e,0xfe38,0x032e,0x0556,0x05e1,0x01c5,0xfd82,0xfaa1,
+	0xfbf2,0x00a9,0x0447,0x0607,0x029d,0xff3f,0xfbc3,0xfbd4,
+	0xfd28,0x008d,0x03bb,0x04bd,0x0350,0xfe51,0xfa47,0xf7b8,
+	0xfa8e,0xfe42,0x024c,0x02e3,0x00cd,0xfd59,0xf9be,0xf869,
+	0xf84c,0xfb85,0xfe1d,0x00c5,0xff63,0xfc99,0xf8fb,0xf767,
+	0xf8a2,0xfac9,0xfdd9,0xfe47,0xfe5c,0xfb6b,0xf972,0xf7ac,
+	0xf883,0xfb23,0xfe41,0x0058,0xfeb3,0xfc99,0xf97b,0xf967,
+	0xf9fe,0xfcf7,0xfef6,0x009e,0x0048,0xfe24,0xfc71,0xfaba,
+	0xfc2d,0xfe19,0x0175,0x01e9,0x01ab,0xff9e,0xfd9e,0xfce5,
+	0xfce1,0xff07,0x0039,0x0252,0x01bd,0x0141,0xff02,0xfe29,
+	0xfddf,0xfef4,0x0092,0x00f7,0x0168,0xff9f,0xff3b,0xfde3,
+	0xfe47,0xfe7b,0xff79,0x0063,0xffd0,0xff1e,0xfd29,0xfd0e,
+	0xfc7b,0xfe1a,0xfee3,0xff90,0xfeda,0xfddd,0xfcc7,0xfb77,
+	0xfbef,0xfc27,0xfe01,0xfdec,0xfe9f,0xfd94,0xfc9d,0xfb0c,
+	0xfa40,0xfcea,0xff89,0x0149,0xfe83,0xfc0e,0xfa0d,0xfabd,
+	0xfaaa,0xfbd9,0xfe41,0x0101,0x021e,0xfeb9,0xfae7,0xf7e8,
+	0xfacd,0xfe8c,0x0254,0x0363,0x02d7,0xfffe,0xfa5b,0xf768,
+	0xf7ca,0xfe0f,0x0405,0x07e4,0x055d,0xffe3,0xf974,0xf67f,
+	0xf910,0xff94,0x0765,0x093d,0x0628,0xfd7b,0xf72d,0xf466,
+	0xf77e,0xfe3f,0x067b,0x0c92,0x0a4b,0x00e8,0xf3b9,0xef35,
+	0xf3f8,0xfed5,0x0732,0x0a50,0x08a8,0x0307,0xfc4f,0xf4e7,
+	0xf362,0xf673,0xfe40,0x043f,0x0681,0x02ed,0xfcdb,0xfa62,
+	0xfafa,0xfe58,0xff74,0xffde,0xfd34,0xfb02,0xf888,0xf80a,
+	0xfb22,0x01d0,0x0802,0x08c4,0x04a9,0xfb77,0xf48e,0xf09f,
+	0xf39b,0xfaee,0x04e1,0x0c96,0x0c61,0x04e9,0xf7a0,0xef2f,
+	0xeee7,0xf8f1,0x0557,0x0cf5,0x0a84,0x013b,0xf8ed,0xf4e8,
+	0xf7b7,0xfb89,0x0093,0x0403,0x0645,0x033e,0xfc21,0xf611,
+	0xf6ef,0xfe74,0x04c2,0x0764,0x040f,0x002b,0xfb1a,0xf6ea,
+	0xf50f,0xf8ab,0x0116,0x0988,0x0d7a,0x06a0,0xfa6b,0xeff9,
+	0xf0e6,0xf8fe,0x025e,0x0604,0x04cd,0x01b4,0xfd2b,0xf970,
+	0xf590,0xf6ba,0xfb96,0x02d5,0x048f,0x009a,0xfa6e,0xf77d,
+	0xfa50,0xfeb6,0x0319,0x030d,0x0278,0xff74,0xfcc8,0xf98b,
+	0xf8e7,0xfcca,0x0321,0x08c5,0x0796,0x0300,0xfc49,0xf9f8,
+	0xfa4a,0xfda3,0x0105,0x03af,0x05a7,0x0476,0x0179,0xfc1b,
+	0xfa92,0xfb7a,0xffc2,0x0249,0x0252,0xffc8,0xfd4c,0xfc86,
+	0xfc02,0xfd67,0xfdb3,0xff96,0xff58,0xfe6c,0xfb14,0xf874,
+	0xf857,0xfa54,0xfe47,0xff7d,0xff5b,0xfc13,0xfa60,0xf829,
+	0xf819,0xf8e1,0xfb4e,0xfe4d,0xfefb,0xfe51,0xfaad,0xf8db,
+	0xf7e1,0xfa2c,0xfc1b,0xfde0,0xfe79,0xfdea,0xfd48,0xfb35,
+	0xfb15,0xfb19,0xfd9c,0xfec6,0x0017,0xfed3,0xfd5b,0xfc9a,
+	0xfcb0,0xfe5a,0xff4b,0x0116,0x009e,0x00a0,0xfee0,0xfe02,
+	0xfd73,0xfe75,0x0089,0x0199,0x028d,0x00e1,0x0059,0xfe6c,
+	0xfe5f,0xfe69,0xffbe,0x0105,0x0167,0x018a,0xff92,0xfe9e,
+	0xfd13,0xfe37,0xfec0,0x000c,0x0013,0xffa0,0xfedb,0xfd41,
+	0xfce4,0xfc37,0xfd6b,0xfdab,0xfedd,0xfe1b,0xfdb9,0xfc9a,
+	0xfbd3,0xfc0c,0xfc4c,0xfdd9,0xfd35
+};
+
+static const UINT16 M0[] = {
+	0x00a1,0x0014,0x0005,0xff3e,0xfe8b,0xfe25,0xfd30,0xfd61,
+	0xfc54,0xfca8,0xfbd2,0xfc39,0xfb92,0xfb39,0xfa9d,0xf9eb,
+	0xfa01,0xf997,0xfa2c,0xf956,0xf9f2,0xf98d,0xfa1b,0xf9c4,
+	0xf964,0xf96b,0xf90b,0xf9a9,0xf945,0xfa1d,0xf990,0xfa29,
+	0xf9d3,0xfa02,0xf9a9,0xf937,0xf948,0xf87f,0xf8b7,0xf7f6,
+	0xf879,0xf842,0xf93e,0xf9d0,0xfb0c,0xfc2f,0xfd1e,0xff20,
+	0x000f,0x020d,0x02ff,0x04db,0x0611,0x0808,0x095d,0x0ab8,
+	0x0c27,0x0ceb,0x0e9b,0x0f00,0x105e,0x1083,0x1191,0x11ae,
+	0x1258,0x12a8,0x12ad,0x12cd,0x11f3,0x11e8,0x1081,0x1069,
+	0x0f14,0x0e77,0x0d3c,0x0c30,0x0b0f,0x095d,0x0845,0x0623,
+	0x0535,0x02e0,0x0195,0xff60,0xfe0d,0xfc72,0xfb2f,0xfa0a,
+	0xf82a,0xf6ad,0xf45c,0xf38b,0xf17f,0xf052,0xeeb9,0xedf3,
+	0xed63,0xec82,0xebc3,0xea2b,0xe9d5,0xe8bc,0xe8de,0xe830,
+	0xe844,0xe822,0xe89b,0xe925,0xe8b7,0xe907,0xe8c2,0xe9cc,
+	0xea01,0xeb3d,0xeb80,0xecb0,0xedaf,0xeebe,0xeff7,0xf0a6,
+	0xf261,0xf2fe,0xf4ca,0xf57d,0xf74e,0xf847,0xf9f4,0xfba0,
+	0xfcbd,0xfe22,0xfe7d,0x0046,0x011c,0x02ed,0x03b8,0x0559,
+	0x05f5,0x0720,0x0881,0x08d1,0x09c4,0x09a1,0x0b00,0x0b53,
+	0x0c5e,0x0c5b,0x0ccc,0x0cc1,0x0cda,0x0d2c,0x0c66,0x0cc6,
+	0x0be8,0x0c84,0x0bde,0x0bed,0x0b30,0x0aa0,0x0a02,0x0911,
+	0x08df,0x075b,0x0712,0x05c5,0x05d6,0x0495,0x03bf,0x0294,
+	0x0171,0x00d7,0xffa6,0xff62,0xfdc3,0xfd77,0xfc65,0xfc43,
+	0xfb09,0xfa08,0xf95e,0xf870,0xf815,0xf715,0xf6dc,0xf5d0,
+	0xf606,0xf553,0xf586,0xf499,0xf435,0xf424,0xf3f8,0xf46b,
+	0xf3de,0xf490,0xf445,0xf546,0xf4eb,0xf543,0xf51e,0xf514,
+	0xf5bb,0xf5c7,0xf705,0xf70b,0xf82b,0xf82d,0xf928,0xf96f,
+	0xfa17,0xfaae,0xfadc,0xfc09,0xfc3a,0xfd9c,0xfdc4,0xfeb6,
+	0xfeb4,0xff92,0x0027,0x00cf,0x0182,0x0187,0x02aa,0x02f2,
+	0x0437,0x03d7,0x04b7,0x04c2,0x0521,0x0541,0x0559,0x05ce,
+	0x058f,0x0657,0x05de,0x0667,0x05d8,0x0610,0x0592,0x056e,
+	0x0561,0x04f9,0x04fe,0x044e,0x04ac,0x03bd,0x03da,0x02fb,
+	0x02d5,0x026c,0x01c9,0x016e,0x007a,0x006c,0xff85,0xffc8,
+	0xfec1,0xfeb4,0xfdd3,0xfdb7,0xfd6c,0xfcc8,0xfcc9,0xfc04,
+	0xfc5a,0xfb6d,0xfbc2,0xfad7,0xfaf9,0xfa32,0xf9f1,0xf9e5,
+	0xf97e,0xf9de,0xf916,0xf9b9,0xf919,0xf9ed,0xf95d,0xf95e,
+	0xf947,0xf929,0xf99b,0xf94b,0xfa08,0xf991,0xf9f8,0xf965,
+	0xf986,0xf88e,0xf821,0xf7e2,0xf7b4,0xf86d,0xf85e,0xf9fc,
+	0xfa6c,0xfc23,0xfcb9,0xfe1e,0xfef2,0x007d,0x021d,0x036a,
+	0x055c,0x0682,0x08c7,0x099d,0x0b87,0x0c3f,0x0d61,0x0e1d,
+	0x0eb6,0x1010,0x109f,0x1208,0x11e1,0x12c7,0x1231,0x127f,
+	0x1249,0x11ce,0x1100,0x1028,0x1031,0x0f27,0x0ed1,0x0cc5,
+	0x0c02,0x0a1c,0x08f2,0x0751,0x0598,0x0472,0x02c2,0x01d1,
+	0xff8c,0xfe2f,0xfbac,0xfa83,0xf863,0xf6e9,0xf563,0xf3d0,
+	0xf2df,0xf155,0xf0a7,0xeea9,0xee05,0xeca1,0xebf9,0xeaea,
+	0xea2b,0xe9a6,0xe903,0xe93d,0xe86c,0xe89d,0xe788,0xe7df,
+	0xe7cf,0xe84c,0xe855,0xe8a5,0xe9e6,0xeac8,0xec30,0xec49,
+	0xed87,0xedc6,0xef4c,0xf03b,0xf136,0xf264,0xf38f,0xf591,
+	0xf698,0xf85c,0xf8c4,0xfa7a,0xfb30,0xfcdc,0xfe4a,0xffb4,
+	0x00dc,0x0198,0x0379,0x0433,0x05a7,0x05d4,0x072d,0x07e4,
+	0x08e5,0x098a,0x09f9,0x0ae3,0x0ada,0x0bbe,0x0b81,0x0c36,
+	0x0c21,0x0d03,0x0ce3,0x0cca,0x0cc4,0x0c92,0x0caf,0x0bfd,
+	0x0c1a,0x0aac,0x0a73,0x0950,0x0907,0x0814,0x0765,0x0702,
+	0x05fe,0x05d5,0x043f,0x03f3,0x0259,0x01c8,0x00a2,0x001d,
+	0xff58,0xfe3b,0xfdce,0xfc6c,0xfbf1,0xfa4b,0xfa0e,0xf8ab,
+	0xf83e,0xf78e,0xf73c,0xf716,0xf67b,0xf653,0xf50f,0xf54b,
+	0xf482,0xf4b0,0xf417,0xf42b,0xf472,0xf4a7,0xf521,0xf4ab,
+	0xf524,0xf48c,0xf55f,0xf508,0xf5e1,0xf60d,0xf6b5,0xf77e,
+	0xf7cb,0xf8d1,0xf870,0xf956,0xf924,0xfa47,0xfab5,0xfbe5,
+	0xfc86,0xfd32,0xfdee,0xfe20,0xfef7,0xfead,0xffda,0xffed,
+	0x013e,0x018f,0x0287,0x02e2,0x0321,0x03a9,0x0365,0x0410,
+	0x03df,0x04e6,0x04b2,0x0540,0x0522,0x059b,0x059c,0x0547,
+	0x0563,0x04df,0x05af,0x0539,0x05a6,0x04b6,0x04ca,0x0489,
+	0x0472,0x0489,0x03a1,0x03aa,0x02ac,0x0305,0x01ff,0x01df,
+	0x00e9,0x00e2,0x00c6
+};
+
+static const UINT16 N0[] = {
+	0x0013,0x0275,0x043f,0x075a,0x0997,0x0bd1,0x0d55,0x0e4d,
+	0x0f76,0x1016,0x1239,0x1360,0x158a,0x1620,0x1767,0x177f,
+	0x17a1,0x1764,0x16c5,0x1723,0x16e2,0x175b,0x161e,0x1585,
+	0x1362,0x1260,0x1091,0x0f0c,0x0d7b,0x0c18,0x0b12,0x086c,
+	0x069c,0x036a,0x01d5,0xff39,0xfdd5,0xfbb4,0xf9a4,0xf786,
+	0xf549,0xf3a9,0xf110,0xef9f,0xed7d,0xecbf,0xeadf,0xe9b3,
+	0xe78f,0xe628,0xe54e,0xe442,0xe420,0xe322,0xe30c,0xe21b,
+	0xe250,0xe183,0xe19d,0xe194,0xe251,0xe37e,0xe3f1,0xe4b7,
+	0xe498,0xe60b,0xe6b0,0xe887,0xe972,0xeb5e,0xecaf,0xee0f,
+	0xef85,0xf093,0xf2a9,0xf3ca,0xf673,0xf7cb,0xfa05,0xfb10,
+	0xfce9,0xfe2e,0xffb9,0x01b9,0x032b,0x0532,0x0660,0x084a,
+	0x08c3,0x0a05,0x0a9e,0x0bec,0x0d05,0x0dfb,0x0ede,0x0f32,
+	0x1020,0x0fd7,0x10ae,0x102a,0x1096,0x1042,0x10d7,0x10be,
+	0x1050,0x1006,0x0ee1,0x0ea8,0x0d7d,0x0d45,0x0bc0,0x0ba0,
+	0x0a75,0x09e6,0x089e,0x071d,0x060e,0x04ab,0x0443,0x02dd,
+	0x0266,0x00b3,0x0001,0xfea5,0xfd68,0xfbcf,0xfaa1,0xf9e6,
+	0xf8c3,0xf84e,0xf71e,0xf6fd,0xf598,0xf567,0xf468,0xf3e8,
+	0xf32f,0xf2e2,0xf2a5,0xf205,0xf226,0xf155,0xf219,0xf16c,
+	0xf1ae,0xf14b,0xf1c3,0xf244,0xf2bd,0xf358,0xf32d,0xf411,
+	0xf3f6,0xf500,0xf4fd,0xf617,0xf699,0xf7cd,0xf8af,0xf91e,
+	0xf9e9,0xfa44,0xfbd9,0xfc47,0xfdb7,0xfdf2,0xff38,0xff99,
+	0x00af,0x015a,0x01c8,0x02ca,0x02f3,0x0412,0x0416,0x0538,
+	0x04f1,0x05df,0x05ef,0x0670,0x06e7,0x0756,0x07ab,0x074c,
+	0x07f9,0x0765,0x0802,0x0761,0x07b8,0x0758,0x0734,0x06fa,
+	0x0688,0x0691,0x057d,0x0579,0x04c2,0x04f8,0x03db,0x03a4,
+	0x02bd,0x028a,0x022d,0x015b,0x00e5,0xffaa,0xffc8,0xfea7,
+	0xfe93,0xfd9b,0xfdbb,0xfcda,0xfc2e,0xfbb8,0xfb08,0xfb16,
+	0xfa2d,0xfa6e,0xf949,0xf975,0xf8f1,0xf902,0xf871,0xf807,
+	0xf7fc,0xf7e9,0xf856,0xf7f7,0xf8e3,0xf834,0xf87d,0xf81b,
+	0xf869,0xf7f0,0xf836,0xf8aa,0xf8be,0xf93f,0xf8e9,0xf90e,
+	0xf77c,0xf6ed,0xf558,0xf522,0xf4f7,0xf63c,0xf803,0xf9fd,
+	0xfc3b,0xfd0e,0xfeb4,0xff95,0x026a,0x049a,0x0759,0x096a,
+	0x0b61,0x0d0b,0x0dee,0x0f4b,0x0ffd,0x127d,0x13c2,0x1625,
+	0x16d0,0x172a,0x16fe,0x171d,0x1774,0x1754,0x17f1,0x1763,
+	0x17a7,0x1666,0x15b8,0x135f,0x11db,0x106c,0x0f9c,0x0ec4,
+	0x0cb4,0x0b12,0x0868,0x06c7,0x03ba,0x0204,0xff95,0xfe0d,
+	0xfc37,0xfa4a,0xf817,0xf526,0xf358,0xf0a7,0xefbe,0xedb7,
+	0xecc6,0xeae0,0xe9a2,0xe85d,0xe6b0,0xe582,0xe3e4,0xe3c7,
+	0xe2ea,0xe330,0xe230,0xe23f,0xe1c9,0xe218,0xe239,0xe274,
+	0xe335,0xe392,0xe4d5,0xe4fa,0xe63b,0xe661,0xe7fe,0xe937,
+	0xeb06,0xecb5,0xee10,0xefa6,0xf0ba,0xf2a7,0xf390,0xf5f4,
+	0xf761,0xfa03,0xfb4d,0xfd1d,0xfe9a,0xffb3,0x01bc,0x02a9,
+	0x04ad,0x05d0,0x07ee,0x08a1,0x0a42,0x0ad3,0x0bdc,0x0ce4,
+	0x0dad,0x0ea6,0x0ee5,0x100e,0x0fed,0x10ce,0x105f,0x1148,
+	0x10ab,0x10c6,0x10b1,0x0ff3,0x0fb9,0x0ec8,0x0f0e,0x0dc7,
+	0x0d87,0x0c2e,0x0bcb,0x0a79,0x0993,0x08a2,0x078e,0x06e0,
+	0x0558,0x04e9,0x031b,0x0233,0x0087,0xffd8,0xfe2f,0xfd00,
+	0xfc25,0xfb0f,0xfa80,0xf922,0xf88a,0xf6d8,0xf682,0xf543,
+	0xf52f,0xf453,0xf3dc,0xf353,0xf272,0xf22a,0xf152,0xf19a,
+	0xf121,0xf1bc,0xf167,0xf1c6,0xf18a,0xf1ae,0xf1ec,0xf1f1,
+	0xf2d9,0xf305,0xf465,0xf43b,0xf526,0xf526,0xf5f4,0xf69c,
+	0xf7b0,0xf8ba,0xf95c,0xfa84,0xfadf,0xfc0c,0xfc09,0xfd37,
+	0xfdaa,0xfefb,0xffd0,0x00dc,0x0180,0x01bb,0x02b0,0x02bc,
+	0x0402,0x03f3,0x053a,0x0540,0x05f3,0x05f9,0x0658,0x06e3,
+	0x06eb,0x07be,0x0732,0x07de,0x073c,0x07c7,0x074d,0x0777,
+	0x077a,0x0789,0x0766,0x0694,0x0656,0x0526,0x052f,0x049d,
+	0x04ef,0x0408,0x040e,0x0353,0x02c4,0x0239,0x0126,0x00bd,
+	0xffae,0xfff7,0xfee5,0xfebf,0xfd7a,0xfcf6,0xfc3b,0xfbe7,
+	0xfc09,0xfba2,0xfbac,0xfa73,0xfa65,0xf973,0xf99c,0xf8d8,
+	0xf8b1,0xf87d,0xf898,0xf922,0xf89f,0xf890,0xf7d6,0xf869,
+	0xf7f7,0xf8b8,0xf87e,0xf8d1,0xf8cc,0xf8e2,0xf8e4,0xf87a,
+	0xf90a,0xf89e,0xf954,0xf833,0xf76f,0xf599,0xf50e,0xf4f1,
+	0xf5bc,0xf7b7,0xf988,0xfc19,0xfd44,0xff3d,0x0001
+};
+
+static const UINT16 B[] = {
+	0xfdfc,0xfe86,0xfe29,0xfe70,0xfe71,0xfe2c,0xfe55,0xfdb0,
+	0xfed4,0x0034,0x02a2,0x03db,0x0511,0x0576,0x05af,0x066a,
+	0x05f3,0x0737,0x0889,0x0ab1,0x0b90,0x0c2a,0x0b27,0x08a0,
+	0x0700,0x04f4,0x054e,0x0635,0x07e4,0x086e,0x08d6,0x08fe,
+	0x08fc,0x099c,0x08ce,0x09b8,0x0b1f,0x0ddc,0x0f3f,0x0fce,
+	0x1008,0x0f9f,0x1046,0x0fd5,0x0fe5,0x0f18,0x0eda,0x0e51,
+	0x0dbb,0x0d83,0x0c87,0x0c8f,0x0bbb,0x0bbb,0x0b28,0x0aff,
+	0x0a8f,0x09eb,0x099d,0x08b4,0x08a8,0x081d,0x0839,0x080b,
+	0x07eb,0x07b4,0x0747,0x06ec,0x05f5,0x0593,0x052e,0x058b,
+	0x05a2,0x0595,0x056e,0x04e6,0x04cb,0x03df,0x03e0,0x0320,
+	0x0395,0x0372,0x035a,0x032e,0x0280,0x025d,0xff53,0xfb33,
+	0xf712,0xf47d,0xf26c,0xf10b,0xf062,0xefb2,0xeff7,0xef87,
+	0xf018,0xeffb,0xf079,0xf0cb,0xf116,0xf1af,0xf1cf,0xf298,
+	0xf280,0xf340,0xf348,0xf3d8,0xf438,0xf464,0xf50d,0xf4e7,
+	0xf595,0xf57c,0xf622,0xf62a,0xf66f,0xf6df,0xf6d4,0xf765,
+	0xf73f,0xf7db,0xf7a8,0xf81e,0xf814,0xf858,0xf8a0,0xf889,
+	0xf916,0xf8c6,0xf94f,0xf92f,0xf97b,0xf970,0xf9b6,0xf9f7,
+	0xf9bc,0xfa2e,0xfa1c,0xfa8d,0xfa46,0xfaa0,0xfaaf,0xfaa1,
+	0xfaf7,0xfac9,0xfb59,0xfb12,0xfb47,0xfb2b,0xfb5f,0xfb9d,
+	0xfb6c,0xfbc2,0xfb9b,0xfbea,0xfbda,0xfc07,0xfc04,0xfc1a,
+	0xfc30,0xfbec,0xfc47,0xfc31,0xfc7e,0xfc44,0xfc6c,0xfc71,
+	0xfc3f,0xfc86,0xfc6f,0xfc91,0xfc60,0xfcb4,0xfca0,0xfcab,
+	0xfcbe,0xfcbc,0xfcf0,0xfcb0,0xfccf,0xfcab,0xfcf6,0xfcbb,
+	0xfcc5,0xfcde,0xfc97,0xfcc9,0xfc93,0xfcf0,0xfc78,0xfce4,
+	0xfc87,0xfcd4,0xfcad,0xfca2,0xfcda,0xfc80,0xfceb,0xfc8e,
+	0xfcef,0xfc8e,0xfcd8,0xfce4,0xfcda,0xfd09,0xfc98,0xfd1e,
+	0xfcac,0xfd05,0xfccb,0xfcff,0xfd20,0xfccd,0xfd1f,0xfcc1,
+	0xfd3c,0xfccc,0xfd21,0xfd1d,0xfd03,0xfd26,0xfd16,0xfd4e,
+	0xfd0a,0xfd5e,0xfd3e,0xfd68,0xfd5e,0xfd46,0xfd8b,0xfd49,
+	0xfd83,0xfd40,0xfd9d,0xfd62,0xfd7d,0xfd70,0xfd5d,0xfd83,
+	0xfd5a,0xfdac,0xfd51,0xfd8e,0xfd63,0xfd78,0xfd7c,0xfd5f,
+	0xfda5,0xfd42,0xfd77,0xfd2e,0xfd87,0xfd41,0xfd4a,0xfd7b,
+	0xfd44,0xfd80,0xfd1b,0xfd71,0xfd29,0xfd70,0xfd2e,0xfd26,
+	0xfd64,0xfd17,0xfd91,0xfd22,0xfd85,0xfd29,0xfd79,0xfd60,
+	0xfd6c,0xfd86,0xfd50,0xfda8,0xfd2f,0xfd87,0xfd36,0xfd78,
+	0xfd64,0xfd3c,0xfd8e,0xfd49,0xfd9c,0xfd32,0xfdab,0xfd68,
+	0xfd71,0xfd73,0xfd58,0xfdae,0xfd47,0xfdab,0xfd56,0xfd94,
+	0xfd6b,0xfd8f,0xfd9d,0xfd6e,0xfdc3,0xfd62,0xfdd1,0xfd72,
+	0xfdbc,0xfd8d,0xfd98,0xfdab,0xfd54,0xfdbe,0xfd59,0xfdbf,
+	0xfd73,0xfdc6,0xfdad,0xfda6,0xfdcb,0xfd85,0xfdf0,0xfd89,
+	0xfde1,0xfd8d,0xfdc9,0xfdba,0xfda5,0xfdc9,0xfd76,0xfdfa,
+	0xfdb3,0xfdf6,0xfddc,0xfdd9,0xfdf8,0xfdba,0xfdee,0xfdc1,
+	0xfe1b,0xfda8,0xfddb,0xfdad,0xfda8,0xfdb3,0xfd99,0xfe07,
+	0xfd96,0xfdf1,0xfda0,0xfdd9,0xfdd2,0xfdc8,0xfdfc,0xfdae,
+	0xfe11,0xfdc1,0xfdfa,0xfdb7,0xfde8,0xfdcb,0xfdbd,0xfdf3,
+	0xfd98,0xfdf7,0xfdaf,0xfdfd,0xfdee,0xfe19,0xfe06,0xfdf0,
+	0xfe31,0xfde5,0xfe30,0xfdf1,0xfe22,0xfdda,0xfe17,0xfe13,
+	0xfdec,0xfe0c,0xfdd1,0xfe24,0xfde0,0xfe57,0xfdfd,0xfe08,
+	0xfe14,0xfddb,0xfe09,0xfdb6,0xfdea,0xfdaf,0xfdd7,0xfdb1,
+	0xfdc4,0xfdd3,0xfda1,0xfdea,0xfda0,0xfdc6,0xfd87,0xfda5,
+	0xfdb3,0xfdb3,0xfdb1,0xfd6d,0xfdcc,0xfd73,0xfdd4,0xfd96,
+	0xfdd2,0xfda9,0xfdbc,0xfdeb,0xfd9e,0xfe08,0xfdaf,0xfe10,
+	0xfdaf,0xfde1,0xfdef,0xfdb9,0xfe01,0xfdbc,0xfe1d,0xfdd8,
+	0xfe3f,0xfdf8,0xfe2d,0xfe1e,0xfde8,0xfe23,0xfde3,0xfe27,
+	0xfdc6,0xfe13,0xfdf8,0xfdfb,0xfe12,0xfdf9,0xfe35,0xfdd9,
+	0xfe3f,0xfde8,0xfe1e,0xfdf6,0xfdf6,0xfe1c,0xfddc,0xfe1d,
+	0xfdb4,0xfe00,0xfdb7,0xfdec,0xfdd2,0xfdb5,0xfde8,0xfdaa,
+	0xfe10,0xfdb7,0xfddb,0xfdad,0xfddb,0xfdc3,0xfda3,0xfde2,
+	0xfd95,0xfdef,0xfda1,0xfde4,0xfdb7,0xfdbe,0xfdbe,0xfdba,
+	0xfdf5,0xfdb0,0xfe30,0xfdc4,0xfdff,0xfdbe,0xfdda,0xfddd,
+	0xfdcf,0xfdfb,0xfda7,0xfdff,0xfdba,0xfe0c,0xfddb,0xfdf4,
+	0xfe13,0xfdca,0xfe52,0xfdc8,0xfe3f,0xfdc0,0xfe22,0xfe00,
+	0xfdce,0xfe41,0xfdbb,0xfe28,0xfdd0,0xfe4c,0xfdde,0xfe0e,
+	0xfe0a,0xfdd3,0xfe38,0xfd9a,0xfe37,0xfde0,0xfe1f,0xfdc6,
+	0xfde5,0xfe02,0xfdca,0xfe1f,0xfd93,0xfdf8,0xfd75,0xfdd3,
+	0xfda0,0xfdb0,0xfdc3,0xfd61,0xfdf2,0xfd79,0xfde3,0xfd85,
+	0xfdde,0xfdc3,0xfda6,0xfde1,0xfd7b,0xfe00,0xfd7d,0xfe04,
+	0xfd96,0xfdd0,0xfdc5,0xfdaf,0xfdf4,0xfd7b,0xfe1f,0xfda5,
+	0xfe0d,0xfdc6,0xfdf8,0xfdf7,0xfdb0,0xfe1f,0xfd9f,0xfe17,
+	0xfdbd,0xfe26,0xfddd,0xfdf9,0xfe0a,0xfdbb,0xfe34,0xfda1,
+	0xfe36,0xfdbe,0xfe27,0xfde8,0xfde3,0xfe2b,0xfdb2,0xfe1e,
+	0xfd89,0xfe0d,0xfdc8,0xfdec,0xfddb,0xfdcd,0xfe1c,0xfdaf,
+	0xfe3e,0xfdaa,0xfe2f,0xfdce,0xfe08,0xfe3a,0xfe0b,0xfe29,
+	0xfddd,0xfe6b,0xfdea,0xfe33,0xfe0c,0xfe25,0xfe54,0xfe06,
+	0xfe62,0xfdfb,0xfe6f,0xfe01,0xfe59,0xfe2f,0xfe41,0xfe50,
+	0xfe1b,0xfe6c,0xfe17,0xfe79,0xfe24,0xfe56,0xfe4a,0xfe1b,
+	0xfe3f,0xfe1c,0xfe53,0xfe11,0xfe61,0xfe0a,0xfe2c,0xfe12,
+	0xfe10,0xfe5e,0xfe0b,0xfe59,0xfdf8,0xfe4d,0xfe04,0xfe41,
+	0xfe26,0xfe10,0xfe5e,0xfe21,0xfe6f,0xfe12,0xfe7f,0xfe31,
+	0xfe69,0xfe60,0xfe34,0xfe7e,0xfe38,0xfe81,0xfe10,0xfe57,
+	0xfe07,0xfe44,0xfe42,0xfe1d,0xfe85,0xfe22,0xfe7d,0xfe0c,
+	0xfe66,0xfe36,0xfe28,0xfe32,0xfe01,0xfe48,0xfded,0xfe29,
+	0xfde8,0xfe1a,0xfde7,0xfdea,0xfe1c,0xfdc9,0xfe17,0xfdc7,
+	0xfe25,0xfdc8,0xfdde,0xfdd2,0xfdd9,0xfdf9,0xfdbc,0xfe33,
+	0xfdc2,0xfe26,0xfdec,0xfe22,0xfe1f,0xfe05,0xfe37,0xfdfe,
+	0xfe4d,0xfde3,0xfe1b,0xfe00,0xfe2c,0xfe36,0xfe19,0xfe51,
+	0xfe19,0xfe8d,0xfe56,0xfe6b,0xfe41,0xfe4c,0xfe77,0xfe29,
+	0xfe64,0xfe18,0xfe6c,0xfe18,0xfe61,0xfe36,0xfe36,0xfe51,
+	0xfe0a,0xfe6f,0xfe25,0xfea3,0xfe2b,0xfe57,0xfe50,0xfe42,
+	0xfe7c,0xfe17,0xfe61,0xfdf0,0xfe6e,0xfe27,0xfe31,0xfe23,
+	0xfe0e,0xfe5b,0xfdf3,0xfe41,0xfdf1,0xfe54,0xfe12,0xfe25,
+	0xfe45,0xfe04,0xfe4d,0xfdea,0xfe4b,0xfdda,0xfe20,0xfe11,
+	0xfe0a,0xfe0c,0xfde0,0xfe40,0xfdd5,0xfe3a,0xfde8,0xfe19,
+	0xfdf7,0xfde6,0xfe1c,0xfdd3,0xfe33,0xfdc9,0xfe27,0xfdec,
+	0xfe15,0xfdfc,0xfdf9,0xfe39,0xfdf4,0xfe5c,0xfe09,0xfe66,
+	0xfe2b,0xfe56,0xfe73,0xfe53,0xfe86,0xfe3c,0xfe7e,0xfe2f,
+	0xfe8c,0xfe56,0xfe79,0xfe7d,0xfe3b,0xfeb2,0xfe3d,0xfe80,
+	0xfe3b,0xfe89,0xfe4c,0xfe50,0xfe7d,0xfe38,0xfe70,0xfdf3,
+	0xfe69,0xfe05,0xfe60,0xfe24,0xfe20,0xfe3a,0xfdd2,0xfe3e,
+	0xfdea,0xfe31,0xfde0,0xfe0e,0xfe01,0xfde3,0xfe34,0xfde8,
+	0xfe28,0xfdc3,0xfe13,0xfdcf,0xfdf7,0xfddd,0xfdab,0xfe1b,
+	0xfdc2,0xfe1c,0xfdc9,0xfe23,0xfdcf,0xfdf2,0xfe06,0xfdf6,
+	0xfe5a,0xfddd,0xfe1d,0xfdbb,0xfe32,0xfde1,0xfde4,0xfe10,
+	0xfdc9,0xfe1a,0xfdd4,0xfe26,0xfdc2,0xfe22,0xfe05,0xfdf9,
+	0xfe21,0xfddd,0xfe68,0xfdf6,0xfe43,0xfdf6,0xfe43,0xfe36,
+	0xfe16,0xfe62,0xfdf4,0xfe5d,0xfdfa,0xfe84,0xfe28,0xfe70,
+	0xfe5d,0xfe42,0xfe81,0xfe38,0xfeba,0xfe41,0xfea4,0xfe53,
+	0xfe7d,0xfe6d,0xfe2c,0xfe87,0xfe24,0xfe87,0xfe1b,0xfe7e,
+	0xfe54,0xfe7c,0xfe7f,0xfe43,0xfea8,0xfe1b,0xfe9d,0xfe5d,
+	0xfe73,0xfe56,0xfe33,0xfe6b,0xfe2e,0xfe79,0xfe1e,0xfe6c,
+	0xfe08,0xfe34,0xfe3b,0xfe23,0xfe5f,0xfe01,0xfe86,0xfe39,
+	0xfe88,0xfe4c,0xfe9f,0xfe92,0xfe6f,0xfea8,0xfe55,0xfecf,
+	0xfe5c,0xfea6,0xfe65,0xfe71,0xfe7f,0xfe44,0xfea9,0xfe54,
+	0xfec5,0xfe6d,0xfecb,0xfe92,0xfe96,0xfe9f,0xfe71,0xfebe,
+	0xfe2f,0xfeb0,0xfe3c,0xfe8c,0xfe52,0xfe4e,0xfe5d,0xfe09,
+	0xfe82,0xfe1e,0xfe93,0xfe2f,0xfe8c,0xfe6e,0xfe4c,0xfe5e,
+	0xfe0f,0xfe77,0xfdf6,0xfe56,0xfe04,0xfe30,0xfe21,0xfe15,
+	0xfe6d,0xfe12,0xfe92,0xfe38,0xfeb6,0xfe55,0xfe75,0xfeac,
+	0xfe5f,0xfe93,0xfe2b,0xfeae,0xfe58,0xfea6,0xfe7b,0xfe91,
+	0xfeaf,0xfe60,0xfed5,0xfe74,0xfeeb,0xfe76,0xfebd,0xfebd,
+	0xfe90,0xfeae,0xfe6b,0xfec5,0xfe4c,0xfec9,0xfe81,0xfec1,
+	0xfe92,0xfe94,0xfec9,0xfe5b,0xfed0,0xfe6d,0xfee6,0xfe8d,
+	0xfecb,0xfea0,0xfe70,0xfec1,0xfe74,0xfebb,0xfe3b,0xfe9a,
+	0xfe67,0xfe8b,0xfe99,0xfe70,0xfece,0xfe76,0xfed7,0xfe56,
+	0xfea8,0xfe66,0xfe81,0xfe95,0xfe73,0xfec2,0xfe4b,0xfe9f,
+	0xfe43,0xfea9,0xfe79,0xfe70,0xfe8f,0xfe42,0xfea2,0xfe56,
+	0xfeac,0xfe44,0xfeaa,0xfe70,0xfe74,0xfe9d,0xfe47,0xfecc,
+	0xfe56,0xfec0,0xfe87,0xfea0,0xfe97,0xfe91,0xfede,0xfe72,0xff0d,0xfea2,0xff26,0xfecd,0xfee6,0xfefb,0xfedd,0xff12,
+	0xfedb,0xff4b,0xfeec,0xff33,0xfeee,0xff12,0xff39,0xfee8,
+	0xff33,0xfed8,0xff24,0xfe98,0xff1c,0xfef4,0xfef4,0xff12,
+	0xfeb6,0xff11,0xfe9c,0xfee4,0xfe96,0xfed9,0xfe9c,0xfeb2,
+	0xfed3,0xfe84,0xfefc,0xfe7b,0xfee9,0xfe98,0xfed5,0xfec0,
+	0xfe99,0xfec9,0xfe8b,0xfef0,0xfe89,0xfed8,0xfe91,0xfec8,
+	0xfea8,0xfe89,0xfed9,0xfe7d,0xfeee,0xfe5e,0xfecb,0xfe79,
+	0xfeba,0xfeaf,0xfe95,0xfee6,0xfe5e,0xfec5,0xfe6c,0xfecb,
+	0xfeae,0xfea3,0xfed7,0xfea4,0xfee1,0xfe73,0xff09,0xfe85,
+	0xfed3,0xfeab,0xfebf,0xfeda,0xfe8f,0xfef1,0xfe98,0xff00,
+	0xfe9f,0xfed3,0xfecb,0xfeb4,0xfef9,0xfeb1,0xff0a,0xfea1,
+	0xff06,0xfec5,0xfefb,0xfed2,0xfed0,0xff15,0xfec8,0xff37,
+	0xfebb,0xff2a,0xfec3,0xff00,0xff2f,0xfeeb,0xff37,0xfed8,
+	0xff2f,0xfeb8,0xff1c,0xfed8,0xff27,0xfe18,0xfdaf,0xff5a,
+	0xff01,0xff95,0xff33,0xff90,0xff59,0xff55,0xff92,0xff20,
+	0xffa8,0xff3c,0xffb6,0xff62,0xffc8,0xffa2,0xff98,0xffcb,
+	0xff7e,0x0002,0xff90,0xfff8,0xffa8,0xffd2,0xffcf,0xff99,
+	0xffd7,0xff76,0x0005,0xff78,0xffe4,0xffa1,0xffc9,0xffcf,
+	0xff88,0xfff3,0xff79,0xfff1,0xff71,0xffc0,0xff82,0xff77,
+	0xff90,0xff36,0xffa5,0xff00,0xff94,0xff32,0xff95,0xff4d,
+	0xff52,0xff5d,0xfeff,0xff7d,0xfefd,0xff77,0xfeff,0xff2d,
+	0xff2a,0xff00,0xff51,0xfef7,0xff79,0xfefa,0xff52,0xff23,
+	0xff3f,0xff45,0xff41,0xff9e,0xff29,0xffb1,0xff2f,0xff95,
+	0xff43,0xff47,0xff69,0xff2e,0xff9d,0xff21,0xff9d,0xff3d,
+	0xff99,0xff64,0xff82,0xffc4,0xff48,0xffb3,0xff62,0xffad,
+	0xff4c,0xff99,0xff66,0xff4f,0xff73,0xff20,0xffa4,0xff26,
+	0xff84,0xff40,0xff73,0xff4e,0xff33,0xff76,0xff08,0xff6c,
+	0xfef6,0xff66,0xff10,0xff33,0xff44,0xff19,0xff63,0xfee2,
+	0xff76,0xfef6,0xff53,0xff05,0xff27,0xff3a,0xfedb,0xff27,
+	0xfee5,0xff3a,0xfec9,0xff17,0xfee3,0xfef2,0xff0e,0xfeb4,
+	0xff2f,0xfec0,0xff29,0xfece,0xff1d,0xfef3,0xfeca,0xff18,
+	0xfec5,0xff2b,0xfeba,0xff47,0xfec9,0xff04,0xff04,0xfee1,
+	0xff27,0xfebf,0xff55,0xfed8,0xff4c,0xfefd,0xff20,0xff26,
+	0xfefd,0xff4b,0xff01,0xff62,0xff01,0xff6e,0xff34,0xff3e,
+	0xff60,0xff3e,0xff8e,0xff1a,0xff8e,0xff1f,0xff75,0xff2e,
+	0xff37,0xff67,0xff1f,0xff7d,0xff0e,0xff7e,0xff12,0xff4c,
+	0xff3a,0xff24,0xff64,0xff02,0xff58,0xfedb,0xff59,0xfedc,
+	0xff15,0xfefb,0xfee2,0xff1d,0xfeb9,0xff2c,0xfe92,0xff18,
+	0xfedc,0xff05,0xfef6,0xfed3,0xff32,0xfebc,0xff2f,0xfeb7,
+	0xff15,0xfecd,0xfeff,0xff02,0xfec9,0xff3e,0xfec5,0xff5a,
+	0xfed5,0xff39,0xff11,0xff5e,0x010c,0x02d4,0x050a,0x05c8,
+	0x06ca,0x06d4,0x076e,0x0761,0x07ab,0x0961,0x0b22,0x0d3f,
+	0x0df3,0x0e3f,0x0c6b,0x0b0d,0x09e2,0x091d,0x0a17,0x0b3d,
+	0x0ce3,0x0d20,0x0dd5,0x0da6,0x0e07,0x0e53,0x0e66,0x1015,
+	0x11d1,0x13a9,0x1413,0x14db,0x14e1,0x154a,0x153c,0x14d5,
+	0x144f,0x12c6,0x1218,0x1065,0x0fd0,0x0e83,0x0d9e,0x0ca9,
+	0x0b60,0x0a5e,0x08b0,0x0829,0x06c1,0x05c3,0x0376,0x00c1,
+	0xfd28,0xf8e7,0xf608,0xf3c0,0xf487,0xf6ae,0xfb4a,0x0009,
+	0x0521,0x0a19,0x0df6,0x11a7,0x138c,0x15e0,0x1674,0x16e7,
+	0x164f,0x1518,0x13e3,0x1228,0x11e8,0x11e6,0x13c7,0x15b2,
+	0x1894,0x1b10,0x1d1a,0x1e5e,0x1d80,0x1c6f,0x198b,0x1703,
+	0x1320,0x0f4a,0x0b01,0x06a9,0x0348,0xffbe,0xfdc0,0xfba0,
+	0xfb24,0xfad8,0xfb24,0xfb07,0xf9cc,0xf82b,0xf4ce,0xf1d0,
+	0xedfe,0xead3,0xe72d,0xe40c,0xe1b2,0xdfa4,0xdf32,0xdec5,
+	0xe04e,0xe19a,0xe48d,0xe69b,0xe887,0xe9d5,0xe9d3,0xea16,
+	0xe932,0xe94a,0xe898,0xe91b,0xe9a2,0xeadf,0xed28,0xef27,
+	0xf28c,0xf54c,0xf9d2,0xfd5d,0x013f,0x040d,0x05d9,0x0793,
+	0x0774,0x083b,0x07c7,0x089d,0x0889,0x096e,0x0a7e,0x0b8d,
+	0x0d86,0x0f06,0x11d6,0x1366,0x1586,0x165a,0x16e5,0x1673,
+	0x14ec,0x1373,0x1093,0x0e96,0x0beb,0x0afd,0x099e,0x08b1,
+	0x07ed,0x071f,0x0762,0x06b9,0x0711,0x0611,0x0546,0x03ac,
+	0x019b,0xff5b,0xfbe7,0xf9ad,0xf6bb,0xf518,0xf32a,0xf27c,
+	0xf1e2,0xf170,0xf1e1,0xf17b,0xf232,0xf237,0xf30e,0xf2f7,
+	0xf298,0xf1d9,0xf0a3,0xf028,0xeef3,0xef0a,0xee8f,0xef85,
+	0xf061,0xf1b8,0xf397,0xf540,0xf779,0xf86f,0xfa68,0xfb70,
+	0xfd0f,0xfde0,0xfea5,0xff26,0xfef9,0xff90,0xff7b,0x0082,
+	0x010f,0x026b,0x03e6,0x054a,0x06ef,0x07f7,0x0999,0x0a29,
+	0x0b50,0x0b3e,0x0b2f,0x0ab4,0x09c9,0x0975,0x0857,0x0834,
+	0x0761,0x079a,0x073f,0x075b,0x072b,0x06b8,0x0701,0x066b,
+	0x0692,0x0550,0x04a4,0x0308,0x019b,0x0046,0xfe7d,0xfd98,
+	0xfc20,0xfbcc,0xfac1,0xfa71,0xf9d5,0xf98a,0xf9a4,0xf94e,
+	0xf991,0xf896,0xf887,0xf786,0xf739,0xf659,0xf597,0xf54b,
+	0xf460,0xf4cd,0xf49a,0xf5b6,0xf5a2,0xf693,0xf71d,0xf7de,
+	0xf911,0xf957,0xfa80,0xfa20,0xfac7,0xfa71,0xfadd,0xfb0b,
+	0xfb3c,0xfc1c,0xfc67,0xfdda,0xfe3c,0xffdb,0x009b,0x019d,
+	0x0246,0x028c,0x0370,0x032c,0x041e,0x03b4,0x0411,0x0390,
+	0x035a,0x036c,0x032e,0x03cf,0x035a,0x0425,0x0400,0x04da,
+	0x04da,0x04e4,0x04b0,0x03f6,0x03d2,0x026e,0x0246,0x00ec,
+	0x007d,0xffb4,0xff52,0xff4f,0xfea9,0xfe98,0xfd91,0xfdcd,
+	0xfd23,0xfd05,0xfc13,0xfab7,0xf97e,0xf6e7,0xf5ae,0xf3dd,
+	0xf416,0xf47a,0xf67e,0xf8fb,0xfb0c,0xfd84,0xfec1,0x00ed,
+	0x0193,0x02ce,0x0303,0x0378,0x0363,0x02c5,0x029d,0x0113,
+	0x00df,0x001d,0x0120,0x022d,0x03da,0x05bc,0x0701,0x0898,
+	0x08a7,0x0920,0x07c2,0x06cd,0x0503,0x0376,0x0251,0x004f,
+	0xff89,0xfdc2,0xfd5d,0xfc7a,0xfc85,0xfca5,0xfd0b,0xfd8c,
+	0xfd3f,0xfd69,0xfbe4,0xfb64,0xf9ad,0xf874,0xf6be,0xf509,
+	0xf452,0xf2c0,0xf2bb,0xf1ac,0xf271,0xf294,0xf39b,0xf476,
+	0xf516,0xf658,0xf679,0xf782,0xf6ac,0xf6b1,0xf5de,0xf5d4,
+	0xf5a7,0xf501,0xf58b,0xf584,0xf71d,0xf7a1,0xf98e,0xfabb,
+	0xfc3d,0xfdeb,0xfea2,0x0027,0x0032,0x0105,0x00b8,0x00c7,
+	0x0091,0x006f,0x00e8,0x00aa,0x0181,0x0191,0x02d8,0x0390,
+	0x049a,0x0552,0x05a4,0x065f,0x05b0,0x05fc,0x04e6,0x045b,
+	0x0336,0x0277,0x01c5,0x00ae,0x00a1,0x0046,0xffe4,0xfdc3,
+	0xfe7f,0xfe3d,0xfe2c,0xfe12,0xfd5e,0xfd26,0xfbb1,0xfb5f,
+	0xfa43,0xf988,0xf855,0xf77f,0xf6c0,0xf6e0,0xf900,0xf8c6,
+	0xf9d1,0xf9b1,0xfa7e,0xfa87,0xfa32,0xfa27,0xf925,0xf92f,
+	0xf845,0xf8ca,0xf870,0xf8a1,0xf862,0xf827,0xf8cb,0xf8ec,
+	0xfa5b,0xfa6d,0xfba3,0xfbfe,0xfce6,0xfd83,0xfd8c,0xfddf,
+	0xfd37,0xfda3,0xfd4a,0xfe07,0xfdd3,0xfe34,0xfed3,0xff22,
+	0x003f,0x0040,0x0156,0x0102,0x01f7,0x020f,0x0254,0x0296,
+	0x0212,0x01ea,0x00c7,0x00e0,0x0026,0x00a1,0x00a2,0x009d,
+	0x00af,0x0057,0x0102,0x0094,0x011a,0x0068,0x007e,0x0047,
+	0xfff1,0xffae,0xfe3e,0xfdeb,0xfd27,0xfd8c,0xfcf8,0xfcf1,
+	0xfc96,0xfbd7,0xfc27,0xfb92,0xfc0e,0xfb5d,0xfbca,0xfbb3,
+	0xfbfe,0xfbcb,0xfb2b,0xfb2a,0xfa47,0xfad4,0xfa44,0xfaa8,
+	0xfa71,0xfa80,0xfb10,0xfb22,0xfbed,0xfb6c,0xfc23,0xfbf2,
+	0xfc8c,0xfcca,0xfce6,0xfd4e,0xfd04,0xfd8f,0xfcc7,0xfd22,
+	0xfca4,0xfd25,0xfdb8,0xfe26,0xff2c,0xff26,0xffe4,0xff35,
+	0xff76,0xff06,0xff5d,0xff8f,0xff85,0x0004,0xff63,0xffc8,
+	0xfefc,0xff55,0xfef5,0xff52,0xffae,0xffa3,0x0024,0xff8e,
+	0x0009,0xff1b,0xff44,0xfec7,0xfe9b,0xfec6,0xfe6c,0xfece,
+	0xfdfc,0xfe1f,0xfd03,0xfd59,0xfd45,0xfd61,0xfd8c,0xfc9a,
+	0xfc9b,0xfafd,0xfac0,0xf9f3,0xfa1b,0xfa7f,0xfb34,0xfcb0,
+	0xfd63,0xfead,0xfeb7,0xff54,0xff1a,0xff32,0xff92,0xff53,
+	0xff66,0xfe69,0xfe70,0xfd93,0xfda4,0xfd85,0xfdf2,0xfec9,
+	0xff6f,0x0096,0x0086,0x0109,0x00a0,0x00e5,0x00c3,0x0087,
+	0xfff6,0xfee0,0xfee9,0xfddb,0xfdcd,0xfce7,0xfcf1,0xfd1b,
+	0xfd81,0xfdf1,0xfdc1,0xfe59,0xfe04,0xfe97,0xfdc0,0xfd7d,
+	0xfce1,0xfc69,0xfc03,0xfada,0xfac4,0xf9d6,0xfa42,0xfa19,
+	0xfaa1,0xfade,0xfb1f,0xfbfe,0xfbd2,0xfc7c,0xfbe5,0xfc3c,
+	0xfbce,0xfbb5,0xfb6b,0xfaf5,0xfb27,0xfa82,0xfb1e,0xfac3,
+	0xfb93,0xfbb7,0xfc68,0xfd4f,0xfd71,0xfe5b,0xfe0d,0xfec9,
+	0xfe4f,0xfe9a,0xfe36,0xfe18,0xfe47,0xfe09,0xfecb,0xfe15,
+	0xfe79,0xfe14,0xfee8,0xff4e,0xff92,0xffdf,0xff8c,0x0049,
+	0xffc6,0x000b,0xff3a,0xff55,0xff5a,0xff69,0xff92,0xfebe,
+	0xfedf,0xfe42,0xfe81,0xfdf9,0xfe55,0xfebb,0xfe99,0xff0f,
+	0xfe47,0xfe5a,0xfd47,0xfd5e,0xfd37,0xfd47,0xfd1c,0xfcaf,
+	0xfd06,0xfc49,0xfc8f,0xfbac,0xfc0e,0xfc03,0xfc5a,0xfcfa,0xfcc7,0xfd27,0xfc4a,0xfca9,0xfbe6,0xfbdc,0xfba1,0xfb9c,
+	0xfc74,0xfc48,0xfce3,0xfc40,0xfca6,0xfc3e,0xfcda,0xfd16,
+	0xfd4b,0xfddc,0xfd85,0xfe34,0xfd58,0xfd99,0xfce2,0xfd1c,
+	0xfd29,0xfd4d,0xfdec,0xfda4,0xfe71,0xfe1c,0xfee8,0xfe75,
+	0xfebf,0xff10,0xfefd,0xff3d,0xfe75,0xfef4,0xfe33,0xfe78,
+	0xfe0f,0xfe2e,0xfe5c,0xfe1d,0xfeca,0xfe53,0xfed9,0xfe38,
+	0xfeae,0xfeb2,0xfea4,0xfe9c,0xfdec,0xfe42,0xfd8a,0xfe0f,
+	0xfd73,0xfda2,0xfd82,0xfd6a,0xfdc0,0xfd2c,0xfdac,0xfd32,
+	0xfde6,0xfdb6,0xfd9a,0xfd38,0xfcc0,0xfce0,0xfc3d,0xfcb9,
+	0xfc28,0xfcc6,0xfc9a,0xfce4,0xfd04,0xfc94,0xfcfc,0xfc96,
+	0xfd74,0xfd15,0xfdaf,0xfd7b,0xfd76,0xfd91,0xfd14,0xfd49,
+	0xfc7e,0xfd1c,0xfcca,0xfd8d,0xfd9a,0xfdd1,0xfe17,0xfddf,
+	0xfe7c,0xfdf4,0xfe66,0xfdd2,0xfe19,0xfe26,0xfe2d,0xfe38,
+	0xfd7f,0xfdfa,0xfd61,0xfdf3,0xfdac,0xfe40,0xfe73,0xfe93,
+	0xff26,0xfeac,0xff01,0xfe01,0xfe46,0xfd9d,0xfdd8,0xfdc5,
+	0xfd52,0xfda2,0xfcef
+};
+
+static const UINT16 V0[] = {
+	0xfffb,0x000a,0xfeb8,0xfdfb,0xfc9c,0xfd84,0xfd78,0xfc96,
+	0xfc96,0xfbbe,0xfb5a,0xfa66,0xfa3c,0xf9f0,0xfb25,0xfafe,
+	0xfc5a,0xfcba,0xfc85,0xfc0e,0xfb1c,0xfb3f,0xfa69,0xfad3,
+	0xfa10,0xfaf4,0xfb7a,0xfc64,0xfc4f,0xfbae,0xfbfb,0xfb89,
+	0xfbfb,0xfb95,0xfc47,0xfc20,0xfd62,0xfdcb,0xfe2c,0xfdc0,
+	0xfd28,0xfd64,0xfd13,0xfded,0xfdc4,0xfeec,0xff16,0x0002,
+	0x0002,0xffbc,0xff64,0xfed0,0xff74,0xff15,0xffbb,0xff21,
+	0xfff7,0x002c,0x008e,0x0021,0xff94,0xffb0,0xff9c,0x0064,
+	0xffd3,0x0012,0xff8a,0x0017,0xfff2,0xff98,0xff18,0xfe7d,
+	0xfef5,0xfebe,0xff45,0xfe5d,0xfe95,0xfe20,0xfe62,0xfdcf,
+	0xfd1a,0xfcb6,0xfca3,0xfd51,0xfd15,0xfe1d,0xfd76,0xfde9,
+	0xfcb1,0xfc8d,0xfc83,0xfc6a,0xfca9,0xfc8c,0xfdde,0xfede,
+	0x0044,0xfe84,0xfcd3,0xfa0a,0xf97e,0xfa8d,0xfbe6,0xfd88,
+	0xfdb9,0xfedd,0xff47,0x00da,0x0050,0xfef7,0xfc93,0xfbe4,
+	0xfd5b,0xff23,0x0046,0xfeb3,0xfe41,0xfdfc,0xff7e,0xffa3,
+	0xff54,0xff98,0x0045,0x011f,0x009e,0xffe1,0xfd9d,0xfd54,
+	0xfdf2,0x0064,0x0077,0xffb1,0xffca,0x003b,0x0115,0xff68,
+	0xfdc0,0xfc53,0xfdfa,0xff22,0x00d7,0x0056,0xfff8,0x0021,
+	0xff63,0xfe95,0xfbec,0xfb55,0xfc67,0xff9d,0x00f9,0xffb3,
+	0xfcf5,0xfb9a,0xfd51,0xfe97,0xfeb8,0xfccb,0xfd72,0xff12,
+	0x013a,0x0006,0xfda0,0xfc18,0xfc0c,0xfda5,0xfd0a,0xfc20,
+	0xfb01,0xfcfd,0xfe01,0xfdb6,0xfcc8,0xfd02,0xff33,0x0093,
+	0x00b2,0xfe23,0xfcc2,0xfc80,0xfe52,0xff18,0xff70,0xfeb1,
+	0xfefc,0x0035,0xffe3,0xfea6,0xfbb4,0xfc6d,0xfdf0,0x0031,
+	0x0038,0xfeb0,0xfe16,0xff1c,0x00fd,0xff96,0xfe69,0xfdd2,
+	0x0052,0x01b4,0x0119,0xfeb5,0xfd42,0xfebb,0x0048,0x00d8,
+	0xfe11,0xfc37,0xfb70,0xfddb,0xfee6,0xfebd,0xfe42,0xfed5,
+	0x00c4,0x002b,0xfe8d,0xfb6f,0xfb77,0xfc51,0xfdf0,0xfd76,
+	0xfc9f,0xfccf,0xfd43,0xfdf0,0xfc30,0xfb63,0xfb00,0xfd5f,
+	0xff03,0x003c,0x0028,0x0022,0x0100,0x00c7,0x0073,0xfe87,
+	0xfeaf,0xff1a,0x00c5,0x0113,0x00c2,0x0059,0x0030,0x00aa,
+	0xffe9,0xfff2,0xff68,0x00ac,0x015b,0x0201,0x0127,0x001f,
+	0xff7d,0xfec1,0xfead,0xfd94,0xfde8,0xfd79,0xfe68,0xfe1d,
+	0xfdac,0xfca7,0xfbf3,0xfc4c,0xfc07,0xfc82,0xfc11,0xfccf,
+	0xfc6f,0xfcdb,0xfc08,0xfb3e,0xfa8c,0xf9fe,0xfa9a,0xfa73,
+	0xfaf6,0xfab9,0xfb9b,0xfb60,0xfbb7,0xfb69,0xfb4f,0xfbc4,
+	0xfc0a,0xfd1f,0xfcd9,0xfd9b,0xfd0a,0xfda2,0xfd2b,0xfd61,
+	0xfd15,0xfd23,0xfdcc,0xfdd2,0xfea3,0xfe39,0xfefd,0xfed9,
+	0xff83,0xff53,0xff9e,0x0006,0x000c,0x00a9,0x000e,0x008b,
+	0xff88,0xffcc,0xff49,0xff5e,0xff40,0xff4e,0xffa9,0xff99,
+	0x0077,0xfff5,0x0040,0xff27,0xff70,0xff31,0xff2a,0xfef9,
+	0xfeb2,0xfef7,0xfe65,0xfeb6,0xfdac,0xfda9,0xfccb,0xfd3e,
+	0xfd0d,0xfd20,0xfd42,0xfd55,0xfe2d,0xfd70,0xfcca,0xfba0,
+	0xfd3d,0xfe89,0xff9b,0xfe0a,0xfc07,0xfc2d,0xfc73,0xfc54,
+	0xfa12,0xfa12,0xfbff,0xffc3,0x0038,0xfdcb,0xfbdc,0xfc20,
+	0xfe3e,0xfe97,0xfdf5,0xfb99,0xfc54,0xfe74,0x008a,0xff7e,
+	0xfe2f,0xfd81,0xfe0a,0xff3f,0xfe52,0xfe22,0xfd4c,0xff27,
+	0x0026,0x0168,0x00d1,0x0038,0x0004,0xfefd,0xfeb0,0xfdf2,
+	0xff9a,0x0068,0x010d,0x003c,0xffa3,0xff74,0xffbf,0x00db,
+	0x0002,0xff10,0xfd70,0xfe2e,0xff0f,0x00fb,0x0111,0xffbb,
+	0xfdfb,0xfd15,0xfe55,0xfe64,0xfe82,0xfd09,0xfca5,0xfce8,
+	0xfdf1,0xfe64,0xfe15,0xfeb5,0xfe63,0xfe85,0xfd70,0xfd11,
+	0xfc85,0xfcfd,0xfd97,0xfe8e,0xff14,0xfdf8,0xfc65,0xfabb,
+	0xfb7c,0xfc61,0xfefc,0x004a,0x0082,0xff2d,0xfe0f,0xfd9e,
+	0xfce3,0xfd09,0xfcf5,0xff2b,0x006a,0x0082,0xfec0,0xfd54,
+	0xfd0b,0xfc65,0xfc45,0xfbfa,0xfdd4,0x0024,0x035f,0x0210,
+	0xff07,0xfcd3,0xfb43,0xface,0xfa8a,0xfb43,0xfc2f,0xffa0,
+	0x01ae,0x0159,0xfd24,0xf9d7,0xf8df,0xfa92,0xfe2b,0x0057,
+	0x0125,0x006d,0x0059,0xfe78,0xfd34,0xfbdb,0xfc78,0xfdd9,
+	0xfefe,0xffc7,0xff2e,0xff45,0xfdc9,0xfd0c,0xfb60,0xfb20,
+	0xfb04,0xfc3b,0xfdc2,0xfe40,0xfee9,0xfe3a,0xfe86,0xfde5,
+	0xfe4b,0xfe1a,0xff0e,0x0074,0x0182,0x0212,0x016e,0x0111,
+	0xff90,0xffa1,0xfed5,0xff4b,0xff94,0x009d,0x0151,0x0144,
+	0x0154,0x0071,0x008d,0xffa7,0x0033,0xff9e,0x0049,0x0048,
+	0x005d,0xffea,0xfe8e,0xfe13,0xfce8,0xfcd5,0xfc07,0xfcb2,
+	0xfca4,0xfd4e,0xfd42,0xfcb3,0xfc3b,0xfb48,0xfbae,0xfb26,
+	0xfb82,0xfb62,0xfc0c,0xfbb6,0xfbee,0xfba4,0xfaeb,0xfad1,
+	0xfa41,0xfae6,0xfabe,0xfbd0,0xfba7,0xfc32,0xfbf4,0xfc05,
+	0xfc31,0xfbdf,0xfc71,0xfc43,0xfd49,0xfd1c,0xfddd,0xfdca,
+	0xfe0c,0xfe1a,0xfe23,0xfea3,0xfea9,0xff6d,0xff3c,0xffef,
+	0xff45,0xffa6,0xff7f,0xff64,0xff85,0xffb5,0x0095,0x0059,
+	0x00e2,0x0028,0x0073,0xffe4,0x002e,0x0004,0x0014,0x0038,
+	0x0019,0x0093,0xff7f,0xff5a,0xfe90,0xfed0,0xfe6e,0xfeb2,
+	0xfea0,0xfe68,0xfea8,0xfe34,0xfe7c,0xfd61,0xfd89,0xfcde,
+	0xfd65,0xfd45,0xfd4e,0xfd7a,0xfcbb,0xfca5,0xfc06,0xfc1f,
+	0xfba8,0xfd1b,0xfdbe,0xfe0d,0xfd2b,0xfcfe,0xfd29,0xfc94,
+	0xfc1b,0xfa92,0xfb7c,0xfc49,0xfdd4,0xfe0f,0xfe4d,0xff1f,
+	0xffef,0x0016,0xfdef,0xfc2c,0xfb09,0xfd7c,0xff5d,0x00b5,
+	0xfed4,0xfd34,0xfd38,0xfeb2,0x00e1,0x0080,0x003d,0xff02,
+	0xffa6,0xfff6,0xffe3,0xff6e,0xff52,0x0021,0x00ab,0x010d,
+	0xff01,0xfe41,0xfde3,0xfeb0,0xfeaa,0xff4f,0xff82,0xffeb,
+	0x012a,0x014a,0x00de,0xfdd3,0xfcb5,0xfc76,0xfe96,0xffc5,
+	0xff66,0xfeb0,0xfe9c,0xff56,0xfe21,0xfd35,0xfb60,0xfc3e,
+	0xfdb8,0xffee,0xffea,0xfe7c,0xfda4,0xfcca,0xfc99,0xfad5,
+	0xfb08,0xfbc6,0xfe59,0x0002,0x0094,0xff2b,0xfdd8,0xfdaf,
+	0xfcea,0xfce2,0xfb8d,0xfbfd,0xfd6d,0xffe1,0x0051,0xfee7,
+	0xfd0f,0xfc6a,0xfdf8,0xfe40,0xfea6,0xfe80,0x0036,0x00aa,
+	0x00f9,0xff86,0xfe56,0xfe92,0xfe17,0xfe20,0xfcec,0xfe25,
+	0xffdc,0x015a,0x002e,0xfee7,0xfe59,0xfe0a,0xfec4,0xfeeb,
+	0x0016,0xffc7,0xffbb,0xfe38,0xfe2c,0xfe89,0xfed7,0xfe80,
+	0xfc88,0xfcd0,0xfe42,0x0106,0x0074,0xfefc,0xfca4,0xfc85,
+	0xfceb,0xfcc6,0xfc42,0xfba8,0xfd53,0xfe51,0xfec7,0xfc8b,
+	0xfb4f,0xfafd,0xfc17,0xfd3c,0xfd29,0xfdd4,0xfec3,0x00cf,
+	0x00c9,0x0070,0xfeb2,0xfef6,0xffde,0x00a4,0x00b0,0x0018,
+	0x00c9,0x00b2,0x015d,0xffb9,0xfeea,0xfe6b,0xffae,0x00cf,
+	0x0102,0x011f,0x008b,0x016e,0x00e1,0x00b7,0xfee6,0xfe71,
+	0xfe60,0xff29,0xff15,0xfdf4,0xfd75,0xfc9e,0xfd3c,0xfc6f,
+	0xfc12,0xfb74,0xfc13,0xfc8f,0xfcf9,0xfcbf,0xfbb5,0xfbd2,
+	0xfb27,0xfbad,0xfa91,0xfa9b,0xfa6c,0xfaf3,0xfb25,0xfac0,
+	0xfabf,0xfa9a,0xfbb2,0xfb95,0xfc4a,0xfbd7,0xfc87,0xfcc7,
+	0xfd07,0xfcfa,0xfc54,0xfcf6,0xfcc0,0xfda2,0xfd5d,0xfe01,
+	0xfdb1,0xfe29,0xfeaf,0xfe8f,0xfea5,0xfe54,0xff30,0xfef6,
+	0x002b,0x000f,0x00bb,0x008b,0x00c2,0x0075,0xffbd,0xffd5,
+	0xff58,0x0012,0xffc6,0x0086,0xffb2,0x000d,0xffb7,0xff89,
+	0xff8f,0xff5e,0x001e,0xffe6,0x0089,0xff82,0xff93,0xfeb4,
+	0xfe80,0xfe0f,0xfd8f,0xfda2,0xfd37,0xfe0e,0xfdde,0xfe11,
+	0xfd24,0xfd6b,0xfc31,0xfc23,0xfc38,0xfcee,0xfe72,0xfe89,
+	0xfe83,0xfc7d,0xfc25,0xfb97,0xfc43,0xfb20,0xfab2,0xfbae,
+	0xfda1,0xff4e,0xfd90,0xfc19,0xfb0d,0xfd64,0xffa8,0x00da,
+	0xff66,0xfd91,0xfdf4,0xfed5,0xff3d,0xfc0a,0xfac8,0xfb8e,
+	0xff64,0x00f7,0x0019,0xfe6b,0xfea1,0x0026,0xff84,0xfe3c,
+	0xfc21,0xfe37,0x008d,0x02c8,0x013c,0xff6a,0xfef7,0xff14,
+	0xff7a,0xfd8d,0xfcba,0xfd5f,0x0102,0x01fb,0x0056,0xfd8b,
+	0xfcd0,0xfeda,0xffd3,0x0001,0xfe5a,0xff45,0x0050,0x0187,
+	0xff7c,0xfd7f,0xfc6c,0xfcc7,0xfdb4,0xfcae,0xfc90,0xfc96,
+	0xfe78,0xfed4,0xfe3a,0xfc75,0xfbf4,0xfd36,0xfe50,0xff70,
+	0xfe4a,0xfe26,0xfdc0,0xfe6c,0xfe1d,0xfe0a,0xfdda,0xfe8d,
+	0xff79,0xfe89,0xfd07,0xfa9d,0xfb07,0xfbb3,0xfd03,0xfd53,
+	0xfd9d,0xfecb,0x0093,0x021d,0x00e0,0xff02,0xfc46,0xfd0b,
+	0xfe33,0xff29,0xfe84,0xfdcf,0xfe75,0xfeec,0xff5d,0xfd36,
+	0xfbf4,0xfb88,0xff14,0x023f,0x036a,0x018d,0xfeac,0xfe31,
+	0xfe95,0xff70,0xfd83,0xfce4,0xfd41,0xff95,0x006d,0xfe17,
+	0xfbb6,0xfb7b,0xfe79,0xffc9,0xfffe,0xfe1d,0xfe88,0xff4b,
+	0x0036,0xfe58,0xfb80,0xfac7,0xfb5f,0xfd3f,0xfc7d,0xfbe5,
+	0xfaf8,0xfcad,0xfdcd,0xfe3c,0xfdad,0xfd80,0xff8f,0x011a,
+	0x0230,0x00be,0x0079,0x003a,0x00f6,0x007d,0xff7a,0xfee3,
+	0xff0c,0x00b0,0x00b1,0x00a1,0xff66,0xfffe,0x006e,0x0118,
+	0x0095,0xfff4,0x006f,0x00b1,0x0156,0xffea,0xff1a,0xfdcd,0xfe0a,0xfda0,0xfd45,0xfcdd,0xfc77,0xfd38,0xfd1c,0xfd91,
+	0xfc31,0xfc54,0xfbd6,0xfc4c,0xfc23,0xfbd3,0xfb9f,0xfb90,
+	0xfbe3,0xfb11,0xfb45,0xfa5a,0xfaaf,0xfa8f,0xfb2c,0xfb62,
+	0xfb2e,0xfb80,0xfb61,0xfc32,0xfbd8,0xfc8f,0xfc3f,0xfcdb,
+	0xfce7,0xfd2a,0xfd7d,0xfd1c,0xfd6e,0xfd28,0xfdcf,0xfd68,
+	0xfe3b,0xfe5e,0xff1e,0xff36,0xff58,0xffaf,0xff54,0xffec,
+	0xff55,0xffc5,0xff41,0xfff2,0xffee,0x0023,0x0000,0xffcb,
+	0xffea,0xff33,0xff94,0xff23,0xffb4,0xff76,0xfffd,0xffb7,
+	0xff8f,0xff72,0xfee5,0xff30,0xfe8b,0xff29,0xfeb1,0xfef9,
+	0xfe3d,0xfe49,0xfdc1,0xfd5f,0xfd71,0xfd46,0xfde7,0xfd8f,
+	0xfe2d,0xfd18,0xfd52,0xfce5,0xfcce,0xfd43,0xfda9,0xfe5a,
+	0xfe1e,0xfe2b,0xfc56,0xfb87,0xfaf3,0xfc01,0xfc36,0xfcf9,
+	0xfda3,0xfdd4,0xfe63,0xfdef,0xfe8c,0xfd83,0xfd8c,0xfca6,
+	0xfe16,0xff50,0xff8e,0xff0f,0xfd8d,0xfd79,0xfd4f,0xfdb8,
+	0xfcf7,0xfe18,0xff58,0x0096,0x001a,0xff18,0xffaa,0x0005,
+	0x0033,0xfe33,0xfe0d,0xfe72,0x0131,0x0209,0x0060,0xfed6,
+	0xfe3d,0xffd9,0xff9c,0xfebf,0xfd5a,0xfe22,0xffc3,0x00de,
+	0xfffb,0xfed3,0xfef6,0xfea6,0xfe72,0xfcb0,0xfd37,0xfe33,
+	0x0005,0x0001,0xff66,0xfed7,0xfea9,0xfef0,0xfd9c,0xfcd3,
+	0xfbf2,0xfdf6,0xff55,0xff4b,0xfd0a,0xfb6b,0xfb4e,0xfc07,
+	0xfd9d,0xfd9d,0xfe5d,0xfe2b,0xff19,0xfea2,0xfd9f,0xfc4c,
+	0xfb95,0xfcba,0xfdaa,0xfef5,0xfeb5,0xff6b,0xff7f,0x0003,
+	0xfefa,0xfdaf,0xfcaa,0xfc47,0xfd23,0xfd1b,0xfe3e,0xfe1e,
+	0xfe59,0xfdad,0xfe72,0xff9c,0x0155,0x01cd,0x002e,0xfed0,
+	0xfde3,0xff95,0xff9e,0xff2f,0xfd71,0xfcdf,0xfd49,0xfd77,
+	0xfd20,0xfcc6,0xfe3c,0xff1e,0x00e9,0x003b,0x0004,0xffb8,
+	0x003d,0xfff4,0xfdec,0xfcea,0xfc17,0xfce4,0xfca4,0xfcd0,
+	0xfbe8,0xfc57,0xfcbd,0xfce9,0xfcce,0xfc21,0xfd06,0xfd79,
+	0xfeb2,0xfe53,0xfec7,0xfe8c,0xff66,0xffaf,0xff49,0xfef6,
+	0xfe6e,0xff99,0xffa0,0x005b,0xffbf,0x0033,0x0064,0x00b9,
+	0x00bd,0x003b,0x00b8,0x006d,0x015c,0x00ef,0x00f9,0x003e,
+	0x0041,0xffe2,0xff49,0xfef0,0xfe76,0xff05,0xfed7,0xff7d,
+	0xfe4b,0xfe2d,0xfd66,0xfd9f,0xfd43,0xfc7c,0xfc84,0xfc21,
+	0xfce5,0xfc1c,0xfc18,0xfb0f,0xfb0c,0xfad3,0xfb18,0xfb11,
+	0xfaaf,0xfb6a,0xfb45,0xfc04,0xfb21,0xfb4f,0xfadf,0xfb56,
+	0xfb91,0xfb6d,0xfbd1,0xfba3,0xfc7e,0xfc52,0xfcd9,0xfc35,
+	0xfcda,0xfcfb,0xfd90,0xfde7,0xfde8,0xfe60,0xfe40,0xff30,
+	0xfec0,0xff18,0xfe7a,0xff1b,0xff2a,0xff2c,0xff52,0xff30,
+	0xffab,0xff50,0x002c,0xffb2,0x0056,0x0011,0x006b,0x006b,
+	0x005a,0x0050,0xff93,0xffe8,0xff0c,0xffa3,0xff43,0xff60,
+	0xfefd,0xff20,0xfee4,0xfe7e,0xfec7,0xfe3d,0xfebf,0xfe4b,
+	0xfef0,0xfe69,0xfe99,0xfe39,0xfe39,0xfdd1,0xfd5f,0xfd4d,
+	0xfc24,0xfca0,0xfc5a,0xfcfa,0xfc87,0xfd15,0xfdb5,0xfdfb,
+	0xfdf7,0xfce9,0xfcfc,0xfcff,0xfe39,0xfd64,0xfcb5,0xfadd,
+	0xfa43,0xfb14,0xfc8a,0xfecc,0xff95,0x004e,0xff13,0xfeda,
+	0xfd51,0xfcda,0xfb9c,0xfbf8,0xfe17,0x0016,0x01cb,0x003d,
+	0xff5f,0xfe6f,0xfe2c,0xfd44,0xfd5c,0xfe46,0x0010,0x01fa,
+	0x01b8,0x009a,0xfd9e,0xfd3a,0xfdbe,0xff9c,0xffe3,0xff8f,
+	0x000c,0x0123,0x01d3,0xffa4,0xfe31,0xfd63,0xff0e,0xff44,
+	0xff1c,0xfd52,0xfd4b,0xfe60,0xff43,0xffd8,0xfe2f,0xfe54,
+	0xfe44,0xff36,0xff15,0xfe3f,0xfd8e,0xfde8,0xfeca,0xfdd8,
+	0xfcbf,0xfa76,0xfa92,0xfb74,0xfdc2,0xfe83,0xff1b,0xffac,
+	0x009f,0x0117,0xfe80,0xfbdd,0xf9aa,0xfbcc,0xfde4,0xff3a,
+	0xfda1,0xfbfb,0xfcff,0xfe57,0xfedb,0xfca7,0xfc4e,0xfd26,
+	0xff98,0x000c,0xfffa,0x0051,0x00c9,0x0159,0xffd8,0xfe65,
+	0xfbcf,0xfc50,0xfd2c,0xff7e,0x0059,0xffe8,0xffb2,0xfea3,
+	0xfea9,0xfdbb,0xfdfd,0xfe2a,0x0049,0x00ea,0x0216,0x01a3,
+	0x0061,0xfeaf,0xfc63,0xfca6,0xfca3,0xfd74,0xfd7f,0xfe7c,
+	0xfe6b,0xfe60,0xfdc8,0xfce3,0xfcd3,0xfce4,0xfebf,0xfeee,
+	0xff6b,0xfe96,0xfe51,0xfd21,0xfc0d,0xfb1a,0xfa81,0xfb83,
+	0xfc1f,0xfe10,0xfe63,0xff8c,0xff6f,0xfff3,0xfff4,0xffca,
+	0x0060,0x00aa,0x01c9,0x0170,0x01f3,0x009c,0x000c,0xff36,
+	0xfece,0xfebd,0xfeb7,0xff91,0xffe7,0x0110,0x0080,0x00c5,
+	0xffe0,0xffee
+};
+
+static const UINT16 CH[] = {
+	0x0082,0xff89,0xff52,0x0152,0xffa5,0xfc77,0xf881,0xf839,
+	0xfb3d,0xff9b,0x03cd,0x0553,0x05da,0x020e,0xfc50,0xf360,
+	0xf007,0xf57a,0xfe72,0x03e1,0x02d4,0x0000,0xfe61,0xfd54,
+	0xf971,0xf85b,0xf8f2,0xfd40,0x0000,0x0129,0x0185,0x027e,
+	0x02a7,0xfeba,0xfaee,0xf913,0xfc3f,0xfda0,0xfd69,0xfc44,
+	0xffbb,0x052c,0x06a2,0x0076,0xf6f1,0xf3e2,0xf7bd,0x0025,
+	0x0315,0x033c,0x0142,0x00f6,0xffc2,0xfbae,0xf93b,0xf90c,
+	0xfde4,0x0264,0x045f,0x0006,0xfbb6,0xfaf4,0xfe9a,0x02d7,
+	0x02ef,0x0110,0xfd6e,0xfbfe,0xfa5c,0xfae5,0xfce0,0x00d7,
+	0x03c5,0x0466,0x01c4,0xfc63,0xf9de,0xf906,0xfb5e,0xfcef,
+	0xff43,0x0074,0x019f,0x0198,0xff5e,0xfc71,0xf985,0xfbf6,
+	0xff77,0x020c,0xffaf,0xfc58,0xfb77,0xfe11,0xfff5,0xfe27,
+	0xfbc5,0xfb18,0xfec1,0x00a3,0x0051,0xfc9d,0xfbe1,0xfe14,
+	0x00ad,0x013b,0xff41,0xfd40,0xfab9,0xfb0a,0xfb57,0xfd38,
+	0xfea3,0x013d,0x027d,0x0195,0xfe40,0xf9de,0xf96c,0xfcb5,
+	0x0309,0x0427,0x018e,0xfbbb,0xf817,0xf92d,0xfd91,0x01d1,
+	0x02a0,0x01d5,0xfecd,0xfc9f,0xf8f8,0xf93c,0xfd2d,0x0283,
+	0x04c2,0x025e,0xfe85,0xfc0d,0xfc6c,0xfb6e,0xfbcf,0xfc22,
+	0xff49,0x016d,0x0125,0xfe0a,0xfa9e,0xfd24,0x0152,0x045a,
+	0x01ca,0xfdb2,0xf8e8,0xf6cd,0xf74c,0xfb09,0x02d6,0x0aa7,
+	0x0cff,0x04bf,0xf7c2,0xeccc,0xede1,0xf72e,0x032b,0x0ab4,
+	0x0ce8,0x0a7a,0x00b0,0xf48d,0xebab,0xee02,0xf8c3,0x0737,
+	0x0ea7,0x0c4b,0x0209,0xf6f5,0xf24b,0xf54b,0xff14,0x056d,
+	0x06aa,0x0162,0xfa74,0xf52f,0xf663,0xfcb6,0x03f5,0x09be,
+	0x09cf,0x03b8,0xf72e,0xeee0,0xeef2,0xf82d,0x0461,0x0c71,
+	0x0cdd,0x061e,0xfe7d,0xf721,0xf2af,0xf1ab,0xf8ee,0x0298,
+	0x0a04,0x08e8,0x00d2,0xfa67,0xf895,0xfb4b,0xfcd2,0xff24,
+	0x0112,0x02ee,0xff48,0xf887,0xf536,0xf9a2,0x031d,0x0870,
+	0x07a7,0x0146,0xfc3d,0xf69e,0xf408,0xf4e7,0xfbf9,0x04c6,
+	0x0a45,0x08d4,0x00b3,0xfa14,0xf592,0xf714,0xfbac,0x01c7,
+	0x0458,0x0201,0xfce5,0xf9f1,0xfc02,0x0031,0x045a,0x030e,
+	0xfff9,0xfbc9,0xfa24,0xf969,0xfb30,0xfecd,0x0213,0x054c,
+	0x030d,0xfea1,0xf94c,0xf88c,0xfa94,0xff3d,0x02ab,0x04b3,
+	0x048d,0x0053,0xfac2,0xf428,0xf391,0xf8fc,0x03d6,0x0c6b,
+	0x0cbe,0x03a5,0xf75b,0xf1d4,0xf37e,0xfa87,0xfebb,0x016b,
+	0x03ad,0x0669,0x048e,0xfd3c,0xf654,0xf66d,0xfd27,0x0167,
+	0x01cd,0xfe36,0xfd84,0xfd4f,0xfe11,0xfd50,0xfcad,0xfdcc,
+	0x0074,0x032a,0x001d,0xf9f6,0xf4bd,0xf81d,0xfee5,0x04f6,
+	0x0495,0x00ea,0xfddf,0xfb27,0xfaea,0xfa2c,0xfc9b,0x0005,
+	0x03cd,0x0404,0xfff5,0xfba5,0xf9ef,0xfbad,0xfe36,0x0163,
+	0x0216,0x029c,0x006c,0xfe89,0xfa9f,0xf836,0xf97d,0xfe95,
+	0x0514,0x06c5,0x042c,0xfdcf,0xfa20,0xf931,0xfb38,0xfc70,
+	0xfd81,0xff24,0x0034,0x007e,0xff59,0x00e2,0x015c,0x00c6,
+	0xfbf5,0xf772,0xf55b,0xf87c,0xfe1e,0x02ae,0x06ea,0x07aa,
+	0x054f,0xfcd8,0xf412,0xefca,0xf440,0xfe61,0x0771,0x0a1a,
+	0x055a,0xfe92,0xf824,0xf5e8,0xf519,0xf9d9,0x0252,0x0abf,
+	0x0b4f,0x013a,0xf460,0xee68,0xf53d,0x0138,0x0b93,0x0b4b,
+	0x046f,0xfa58,0xf2ba,0xeef8,0xf279,0xfe63,0x0b85,0x13f8,
+	0x0def,0xfde6,0xedce,0xe99a,0xf0df,0xfc78,0x06ce,0x0cb5,
+	0x0e4a,0x07bc,0xfb7f,0xedc3,0xeac6,0xf4af,0x060b,0x10f8,
+	0x0dd1,0x00bb,0xf41b,0xf1b5,0xf4c5,0xfa58,0xff7d,0x07e2,
+	0x0d50,0x09dd,0xfac5,0xec0d,0xeb0c,0xf831,0x0897,0x0ce3,
+	0x0836,0x00bd,0xfcc7,0xf9a6,0xf49c,0xf2ef,0xf8a4,0x050f,
+	0x0d47,0x0a4e,0xfc34,0xf2b4,0xf455,0xfeb1,0x0476,0x02f1,
+	0xfebf,0xfd12,0xfe51,0xfd17,0xfb33,0xfacd,0x011d,0x06b2,
+	0x070c,0xfde8,0xf413,0xf16b,0xf768,0x010b,0x057b,0x0612,
+	0x041c,0x03f6,0xfff2,0xf7f6,0xf06f,0xf0b5,0xfb68,0x05dd,
+	0x0a18,0x063a,0x0266,0xffdb,0xfebd,0xfa39,0xf633,0xf65d,
+	0xfa62,0xffa1,0x0122,0x0242,0x0271,0x045c,0x02a8,0xfdea,
+	0xf840,0xf759,0xfab3,0xfe24,0xfff4,0xfe71,0xff7f,0x01c0,
+	0x03e0,0x014b,0xfe0c,0xfbc6,0xfb67,0xfa76,0xf795,0xf6e4,
+	0xfba0,0x06db,0x0dbb,0x0b72,0xff35,0xf2f3,0xee55,0xf297,
+	0xfccc,0x04ef,0x09d2,0x08e0,0x04bb,0xfb55,0xf238,0xeef4,
+	0xf5c5,0x02e0,0x0c84,0x0c3f,0x0173,0xf641,0xf1ad,0xf66e,
+	0xfbd0,0x011c,0x050b,0x0921,0x086e,0xfe8f,0xf16d,0xeaee,
+	0xf3b0,0x0428,0x1180,0x0f93,0x02d1,0xf4b5,0xef9e,0xf2de,
+	0xf9aa,0x026c,0x081b,0x0b16,0x060f,0xfbe8,0xf1f3,0xf153,
+	0xf978,0x02f7,0x0824,0x058e,0x0145,0xfc31,0xf96e,0xf701,
+	0xf9ef,0x00f0,0x079c,0x06eb,0xfeb1,0xf60d,0xf413,0xfb25,
+	0x0151,0x0333,0xffc3,0xfe96,0xfefd,0xff41,0xfd51,0xfb2c,
+	0xfb79,0xfc7a,0xff30,0x0001,0x00f8,0xffb2,0xfe28,0xfcac,
+	0xfc71,0xfdfa,0xffe3,0x0115,0xff30,0xfc50,0xf8f3,0xfa70,
+	0xfe03,0x036d,0x045e,0x02a8,0xffb1,0xfb2d,0xf737,0xf529,
+	0xf964,0x0138,0x09e2,0x0ac0,0x03c9,0xf783,0xefc5,0xf1bb,
+	0xfa81,0x058a,0x0acf,0x0b2f,0x04dd,0xfb70,0xf248,0xef65,
+	0xf42f,0xfe2a,0x0835,0x0c44,0x0923,0xff53,0xf7c1,0xf41f,
+	0xf715,0xfb9a,0x009c,0x028f,0x01c4,0x0080,0xff25,0x0075,
+	0xffbf,0xfe01,0xfa8e,0xfad1,0xfbfb,0xfd07,0xfe05,0x001d,
+	0x0348,0x034d,0x003b,0xf9d2,0xf8c5,0xfb9e,0xffd8,0x01a9,
+	0xfff2,0xfedc,0xfee0,0xfec4,0xfce8,0xfcd1,0xfd5b,0x0100,
+	0x0219,0xffdc,0xfa33,0xf6b3,0xfa75,0x01cb,0x0740,0x050e,
+	0x0074,0xfc1d,0xfb8c,0xfb52,0xfa68,0xf960,0xfc13,0x02f3,
+	0x082e,0x06d7,0xfd98,0xf6e4,0xf58e,0xfa9f,0xffdd,0x0360,
+	0x0371,0x0113,0xfd62,0xf847,0xf701,0xfb70,0x0451,0x07d8,
+	0x0509,0xfc34,0xf599,0xf4c6,0xf991,0x004f,0x03df,0x057a,
+	0x0317,0xfebd,0xf6fd,0xf3d1,0xf661,0x0006,0x08c0,0x093b,
+	0x031d,0xfb12,0xf8ce,0xf885,0xf8dd,0xf86a,0xfcfd,0x05bf,
+	0x0c70,0x0894,0xfaf3,0xf172,0xf221,0xfce6,0x05f0,0x087c,
+	0x046c,0xfe74,0xf9c2,0xf64e,0xf674,0xfb61,0x04a4,0x0a05,
+	0x08bd,0xfecc,0xf5e6,0xf2d7,0xf6e9,0xfd85,0x0185,0x0483,
+	0x055e,0x049f,0xfee0,0xf916,0xf618,0xfb07,0x010f,0x0273,
+	0xfefc,0xfa94,0xfbf8,0x000c,0x0341,0x0004,0xfb38,0xf8ce,
+	0xfc2c,0x0141,0x02e4,0x0099,0xfc3d,0xfa07,0xfa4d,0xfec8,
+	0x014a,0x01f0,0xff2b,0xfd6f,0xfcba,0xfbec,0xfb96,0xfc8b,
+	0x0005,0x01be,0x02a7,0xff3d,0xfb57,0xf910,0xfa73,0xfe4d,
+	0x01c7,0x02d7,0xff87,0xfd41,0xfc0d,0xfd20,0xfcfb,0xfe27,
+	0xff4f,0x0031,0x0057,0xfe5a,0xfc66,0xface,0xfcd1,0x0053,
+	0x0480,0x02e2,0xfed1,0xf99b,0xf78c,0xfa14,0xfe95,0x028c,
+	0x0368,0x038b,0x0000,0xfc25,0xf8cb,0xfa13,0xfd44,0xffc8,
+	0xffe0,0xfef8,0x007f,0x022a,0x037e,0xff2b,0xfa6e,0xf804,
+	0xfa32,0xfcda,0xfeed,0x0085,0x01b7,0x041d,0x0165,0xfc4a,
+	0xf75b,0xf80b,0xfbea,0xff3b,0xff59,0xff72,0x025f,0x03a7,
+	0x02ea,0xfda3,0xf9a5,0xf807,0xfb34,0xff48,0x0123,0x0030,
+	0xff2a,0x0106,0x00df,0xfec8,0xfa91,0xf9f0,0xfc9b,0x01ef,
+	0x029f,0xff6e,0xfcf9,0xfd6c,0xffb9,0xfd61,0xfb0b,0xface,
+	0x001b,0x0438,0x02ca
+};
+
+static const UINT16 SH[] = {
+	0x011d,0x0021,0xff4e,0x0036,0xffb4,0xfd88,0xf94b,0xf920,
+	0xfaff,0xfead,0x00b9,0x0235,0x02ba,0x0138,0xfe3b,0xf934,
+	0xf754,0xf91f,0xff69,0x03e3,0x049f,0x01a8,0xfdbd,0xfba8,
+	0xfa29,0xf9ea,0xfb91,0x00f8,0x04af,0x04c8,0xfdf7,0xf73b,
+	0xf53b,0xfb19,0x0413,0x0862,0x06fb,0x0082,0xfabb,0xf586,
+	0xf4fa,0xf822,0xfed3,0x05dc,0x0970,0x0671,0xfc82,0xf49d,
+	0xf373,0xfa75,0x0186,0x052f,0x02df,0xff95,0xfc7a,0xfa90,
+	0xf90a,0xf93b,0xfeb6,0x05f3,0x0af2,0x0552,0xf8d2,0xee35,
+	0xf009,0xfbac,0x06f7,0x0a8b,0x05ff,0x00f1,0xfbc6,0xf790,
+	0xf329,0xf5f4,0xffb9,0x09ae,0x0c3d,0x03c8,0xf8d2,0xf249,
+	0xf57e,0xfc21,0x0276,0x03ef,0x0362,0x0036,0xfbb2,0xf6d7,
+	0xf543,0xfc63,0x06f8,0x0d39,0x07d2,0xfcee,0xf37c,0xf2cc,
+	0xf7d7,0xff3c,0x054e,0x07d9,0x0624,0xffae,0xf7bd,0xf1dc,
+	0xf57a,0xfe96,0x07e2,0x0b13,0x06b3,0xfe23,0xf522,0xf140,
+	0xf23f,0xfa8d,0x0552,0x0e9c,0x0e40,0x0469,0xf519,0xeb7e,
+	0xee11,0xfaae,0x0892,0x0da8,0x0b10,0x01ac,0xf879,0xf103,
+	0xeedb,0xf4a0,0x0288,0x10ad,0x12c2,0x066e,0xf2e4,0xe986,
+	0xed9e,0xfa1f,0x0471,0x0a2b,0x0d39,0x0ae4,0x0196,0xf0f5,
+	0xe6d4,0xeb10,0xfe37,0x1079,0x1551,0x0a0e,0xf9da,0xf140,
+	0xf144,0xf6d1,0xfc8d,0x033c,0x078f,0x0931,0x0250,0xf715,
+	0xefd8,0xf48e,0x01ca,0x0d9c,0x0e24,0x02d4,0xf69c,0xeeb5,
+	0xf02e,0xf7aa,0x03f9,0x0e35,0x1055,0x098b,0xfabd,0xee74,
+	0xeab5,0xf35f,0x0029,0x0a00,0x0bdc,0x0871,0x0282,0xfc92,
+	0xf802,0xf425,0xf4be,0xfa84,0x040a,0x07b9,0x04ef,0xfe57,
+	0xfbfa,0xfea7,0xff55,0xfd1c,0xf980,0xfad1,0xfd66,0xff22,
+	0xfdfb,0xfe56,0x01cd,0x0542,0x03f6,0xfdd6,0xf8ec,0xf657,
+	0xf837,0xfa55,0xfd98,0x0163,0x06dc,0x0986,0x0451,0xf95c,
+	0xf094,0xf268,0xfa88,0x0461,0x0774,0x056f,0x009a,0xfbc2,
+	0xf7a6,0xf59a,0xf9e4,0x0160,0x0819,0x0644,0xfee9,0xf6af,
+	0xf577,0xf988,0xff6b,0x020e,0x01fe,0x029e,0x0217,0x0106,
+	0xfcbb,0xf90a,0xf67d,0xf96c,0xfe47,0x02f4,0x053f,0x04e2,
+	0x0336,0xfe9f,0xf891,0xf30f,0xf575,0xfd75,0x0683,0x07f9,
+	0x03d3,0xfe6e,0xfbcc,0xfca1,0xfc0f,0xfb5e,0xfa21,0xfc9b,
+	0x0094,0x0394,0x0150,0xfd5f,0xfda7,0x0135,0x0311,0xfd66,
+	0xf6a8,0xf49b,0xfb7d,0x043d,0x0803,0x039c,0xfc35,0xf85d,
+	0xf97e,0xfd00,0xfe7b,0xffb1,0x0068,0x01e2,0xff51,0xfb4f,
+	0xf89b,0xfa2f,0xfe87,0x012c,0x02dc,0x00af,0xff05,0xfc70,
+	0xfb3c,0xfa7a,0xfc3d,0x0053,0x0363,0x03b7,0xff3f,0xfb7c,
+	0xf9b7,0xfb45,0xfb6f,0xfc43,0xff5f,0x03ae,0x055f,0x013a,
+	0xfccd,0xfa27,0xfb5c,0xfbbb,0xfb7b,0xfac2,0xfd3d,0x00e8,
+	0x044c,0x0458,0x01a8,0xfef8,0xfb38,0xf9b7,0xf906,0xfac0,
+	0xfc18,0xff20,0x023b,0x0418,0x0323,0xff66,0xfb12,0xf79c,
+	0xf8b5,0xfbc2,0x00a0,0x02f1,0x0398,0x00c0,0xfca9,0xf8fb,
+	0xf6eb,0xfaa1,0x00e9,0x06e8,0x0621,0x001c,0xf789,0xf518,
+	0xf9e9,0x0099,0x056f,0x043b,0x00c5,0xfcae,0xfba7,0xfb86,
+	0xfdbc,0xff28,0x00d5,0x0186,0xff13,0xfac7,0xf635,0xf93d,
+	0x0170,0x09c3,0x08d7,0xffca,0xf608,0xf355,0xf7bd,0xfb7f,
+	0xfe74,0x0063,0x05f6,0x0998,0x04d9,0xf684,0xeb6a,0xeb6c,
+	0xf867,0x067a,0x09c3,0x05ff,0x003a,0xff6e,0xfd9d,0xf8b2,
+	0xf3f4,0xf738,0xffd8,0x06ee,0x05bc,0xfd90,0xf96c,0xfb87,
+	0x0268,0x0445,0x004e,0xfa98,0xf830,0xf998,0xfb07,0xfc47,
+	0xff72,0x06c2,0x0a2e,0x065c,0xfb4c,0xf423,0xf463,0xf9d2,
+	0xfd8d,0xfe21,0x00b6,0x05ba,0x0a38,0x066f,0xfe23,0xf647,
+	0xf498,0xf765,0xfb5f,0xff38,0x01b0,0x049a,0x05bf,0x040a,
+	0xfd88,0xf92e,0xf876,0xfbc0,0xfe07,0xfd38,0xfbcc,0xfc3e,
+	0x0208,0x0690,0x0794,0x01ba,0xfae2,0xf608,0xf698,0xf8f9,
+	0xfb61,0xfff4,0x05a5,0x09c2,0x063e,0xfcf6,0xf328,0xf29b,
+	0xf900,0x0101,0x04e8,0x040a,0x0382,0x0141,0xfc71,0xf57e,
+	0xf496,0xf9a6,0x0309,0x0824,0x0527,0xfca4,0xf5e1,0xf6b6,
+	0xfcfa,0x04d7,0x06fc,0x03e6,0xfbe6,0xf612,0xf51d,0xf900,
+	0xff30,0x04c4,0x0994,0x0913,0x0286,0xf5de,0xee66,0xf00a,
+	0xfa5f,0x05d2,0x0c46,0x0ad3,0x0346,0xfb84,0xf447,0xf324,
+	0xf7c1,0x0101,0x0674,0x0638,0x0074,0xf9e8,0xf8ae,0xfb98,
+	0x005d,0x02ab,0x03cf,0x00af,0xfbe7,0xf6a7,0xf6d4,0xfbca,
+	0x02dd,0x0775,0x0566,0x0067,0xfb11,0xfa08,0xf946,0xfa41,
+	0xfcc3,0x00fd,0x03f0,0x0356,0x010c,0xfc65,0xf97b,0xf859,
+	0xfba7,0x0049,0x050c,0x0553,0xffef,0xf8a2,0xf580,0xf9d6,
+	0xff7b,0x0501,0x057d,0x0379,0xff12,0xf9b8,0xf610,0xf6ab,
+	0xfcb7,0x0221,0x05c0,0x0420,0x0137,0xfd51,0xfae1,0xf96d,
+	0xfb8a,0xfee1,0x010b,0x00db,0xfe61,0xfd74,0xfdd1,0x00f0,
+	0x0116,0xfe80,0xfa48,0xf919,0xfc72,0x0069,0x0397,0x02b5,
+	0x001e,0xfc60,0xfbda,0xfb75,0xfbb0,0xfb7e,0xfc2e,0xff5c,
+	0x0242,0x03c4,0x01d6,0xffb6,0xfbec,0xf972,0xf6ae,0xf79e,
+	0xfd3c,0x0416,0x083e,0x0623,0x0047,0xf800,0xf3a4,0xf382,
+	0xf998,0x01a1,0x0971,0x0ab8,0x0455,0xf91b,0xf0c2,0xf1be,
+	0xf947,0x039f,0x0a14,0x0c31,0x06c6,0xfbde,0xf17b,0xee45,
+	0xf560,0x006b,0x0a38,0x0c70,0x08e2,0xff05,0xf5fa,0xf1a0,
+	0xf65d,0x00b3,0x071d,0x06de,0xffeb,0xf97d,0xf6a5,0xfaf8,
+	0x0027,0x037b,0x02ef,0x01a2,0xff3e,0xfabd,0xf790,0xf629,
+	0xfb06,0x021c,0x076f,0x05f2,0x007f,0xfbeb,0xf97c,0xf988,
+	0xf926,0xfbbd,0xff16,0x0344,0x030a,0x0167,0xfee0,0xfd6c,
+	0xfc0f,0xfae5,0xfc11,0xfec7,0x00d3,0xfe67,0xfc0d,0xfba4,
+	0x0014,0x0409,0x04b4,0x01bf,0xfd41,0xf89c,0xf475,0xf571,
+	0xfb97,0x0540,0x0a35,0x0903,0x011b,0xf9fa,0xf6c9,0xf68e,
+	0xf893,0xfb7c,0x003f,0x03d9,0x0646,0x03b6,0xfffe,0xfba6,
+	0xfabd,0xfb45,0xfafe,0xfb1b,0xfbd5,0x0084,0x0478,0x05b3,
+	0x0109,0xfb41,0xf71a,0xf79b,0xfc2b,0x0122,0x0511,0x04f0,
+	0x029c,0xfd58,0xf9f8,0xf7ca,0xf896,0xfa1f,0xfe3d,0x03f5,
+	0x06aa,0x04c2,0xfd62,0xf8b3,0xf87b,0xfc4b,0xfe04,0xfddb,
+	0xfd7a,0xfdcd,0x0034,0x0154,0x00de,0xfd36,0xfc79,0xfdb5,
+	0xff6b,0xfc50,0xf793,0xf7cb,0xfe3e,0x05db,0x0617,0x00b1,
+	0xf94c,0xf739,0xf942,0xfe34,0x00be,0x0244,0x01e6,0x0089,
+	0xfd27,0xf86a,0xf74e,0xfa27,0x01cd,0x069d,0x0539,0xfedf,
+	0xf823,0xf6b3,0xf9af,0xff3d,0x023b,0x04d8,0x0440,0x01f4,
+	0xfbb3,0xf5eb,0xf471,0xf965,0x0271,0x08a0,0x0846,0xffa4,
+	0xf74b,0xf364,0xf80c,0x00c2,0x07b3,0x07e3,0x019d,0xf94d,
+	0xf2e8,0xf2d8,0xf7d5,0x0127,0x085b,0x0c47,0x087e,0xfe3c,
+	0xf365,0xee66,0xf20a,0xfaee,0x058c,0x0a75,0x09c1,0x0265,
+	0xf9c9,0xf3a1,0xf3a9,0xf8e8,0xff99,0x064d,0x082f,0x04b8,
+	0xfc3f,0xf699,0xf4a7,0xf8eb,0x0035,0x060f,0x0684,0x00f3,
+	0xf9f8,0xf52b,0xf687,0xfb71,0x038a,0x084c,0x0841,0x0327,
+	0xfb1f,0xf3e1,0xf22d,0xf828,0x0099,0x084c,0x0943,0x04c6,
+	0xfccb,0xf5bf,0xf221,0xf4f7,0xfcd9,0x057f,0x0a71,0x0557,
+	0xfb3a,0xf19e,0xefd7,0xf474,0xfccf,0x0567,0x0a6d,0x087c,
+	0xfecf,0xf41f,0xecc2,0xf224,0xfeec,0x0a8d,0x0ca2,0x07dd,
+	0xff60,0xf6f3,0xf26f,0xf306,0xf999,0x00ca,0x0784,0x0802,
+	0x0240,0xf8fc,0xf336,0xf702,0x0013,0x086c,0x07d3,0x0126,
+	0xf8dc,0xf63f,0xf70e,0xfb39,0xffa9,0x044e,0x088b,0x0869,
+	0x0137,0xf569,0xf02d,0xf352,0xfe24,0x0769,0x0b6b,0x0983,
+	0x02be,0xf9ff,0xf1d9,0xf06f,0xf73e,0x0455,0x0c19,0x0b46,
+	0x0115,0xf65b,0xf25c,0xf6fa,0x000b,0x05bc,0x05d9,0xffa3,
+	0xfa9a,0xf8d1,0xfb2d,0xfde1,0xfff1,0x017b,0x0254,0x0256,
+	0xfef8,0xfbdc,0xf7fd,0xf811,0xfb25,0x004e,0x02bc,0x02cb,
+	0x00f3,0xfec9,0xfe8e,0xfc13,0xfa12,0xf97e,0xfd51,0x008c,
+	0x00bc,0xfeae,0xfd52,0xfe80,0x011a,0x02ac,0xff16,0xfaff,
+	0xf89d,0xfb85,0xff13,0x00b7,0xffb3,0xffad,0x026e,0x023c,
+	0xfe0e,0xf7b1,0xf84b,0xfe91,0x04d5,0x03b6,0xff24,0xfc93,
+	0xfd27,0xfd94,0xf9e3,0xf988,0xfddb,0x05d6,0x082f,0x029a,
+	0xf95d,0xf58f,0xf81d,0xfb9d,0xff7f,0x01d6,0x056f,0x05fc,
+	0x0260,0xf948,0xf2dc,0xf3cb,0xfc14,0x0504,0x0838,0x065e,
+	0x01f6,0xfe10,0xf8b7,0xf538,0xf40f,0xf9b6,0x02e0,0x0abf,
+	0x0a40,0x018e,0xf839,0xf43e,0xf90e,0xfe80,0x0158,0x0022,
+	0xfe81,0xfdc2,0xfde2,0xff49,0x0100,0x044b,0x03b5,0xfe5a,
+	0xf5be,0xf316,0xf780,0xff1c,0x059f,0x0780,0x06f5,0x017f,
+	0xfb34,0xf519,0xf50c,0xf8db,0xfedf,0x03a2,0x04bd,0x03a3,
+	0x0004,0xfd10,0xf9cf,0xf949,0xfa81,0xff9e,0x0294,0x0106,
+	0xfc32,0xfa70,0xfe10,0x01cf,0x0229,0xfe30,0xfd04,0xfdc3,
+	0x000c,0xfe26,0xfb31,0xfbc5,0xfebd,0x0227,0x0017,0xfd3d,0xfaae,0xfd2e,0x002a,0x010e
+};
+
+static const UINT16 Z0[] = {
+	0xffd1,0xff65,0xff75,0xfef0,0xfed1,0xfed9,0xfeb0,0xfec9,
+	0xfdba,0xfdf0,0xfd95,0xfdeb,0xfe43,0xfe93,0xfbca,0xfbed,
+	0xfbf8,0xfc81,0xff56,0xfd3e,0xfa47,0xf9e1,0xfe55,0x00ff,
+	0xfd98,0xfb32,0xfb01,0xfd76,0xfd02,0xfd97,0xfd97,0xfd7b,
+	0xfb6f,0xfb6b,0xff29,0x000d,0xfc5e,0xfa2f,0xff1c,0x025a,
+	0x006f,0xf9d5,0xf89c,0xff5c,0x06a1,0x0286,0xf84e,0xf6d5,
+	0x012a,0x0953,0x026c,0xf954,0xf858,0x00fc,0x07c5,0x0257,
+	0xfa55,0xfae9,0x00f1,0x05fd,0x0282,0xfb85,0xfa84,0xfef8,
+	0x048f,0x019e,0xfde1,0xfc53,0xfec4,0x01f2,0x00e1,0xfcc7,
+	0xfb5f,0x0081,0x02a2,0x0046,0xfb93,0xfb04,0xfea6,0x0128,
+	0xffe0,0xfbaf,0xf9aa,0xfb83,0x00fc,0x01c2,0xfefd,0xfc9b,
+	0xfbcf,0xfbfa,0xfcff,0xff04,0xfe54,0xfd6c,0xfc08,0xfd00,
+	0xfe39,0xfee4,0xfeb7,0xfb1d,0xfab0,0xfd68,0x0269,0x0094,
+	0xfc29,0xfa13,0xfbc4,0x0013,0x013d,0xfeb0,0xfb67,0xfcae,
+	0xff96,0x02b1,0x0086,0xfafc,0xf7fe,0xfe49,0x05e0,0x0403,
+	0xfbd7,0xf755,0xfb92,0x023d,0x050d,0xff7d,0xfa67,0xfb57,
+	0x01dd,0x0567,0xff52,0xfab6,0xfa18,0x0115,0x038e,0xfeed,
+	0xf9e0,0xfc4b,0x024c,0x0228,0xfd98,0xfaa8,0xfd76,0x0117,
+	0x018e,0xfca4,0xfa1c,0xfb91,0x000b,0x00b9,0xfd3f,0xfa1c,
+	0xfa5e,0xfdeb,0xfecd,0xfd99,0xfaeb,0xfc47,0xfea3,0x001f,
+	0xfe82,0xfbdf,0xfc7f,0xff06,0x017a,0x0039,0xfecd,0xfdfe,
+	0xfffd,0x0179,0x0114,0xffa1,0xfef3,0x00e7,0x01db,0x0210,
+	0x0013,0xffb5,0x001f,0x01a7,0x0193,0x0065,0xffe9,0xffdc,
+	0x0102,0x001e,0xff28,0xfd9f,0xfe4e,0xfedb,0xff27,0xfe03,
+	0xfcc6,0xfd14,0xfd38,0xfdcc,0xfc6e,0xfc0b,0xfba8,0xfc94,
+	0xfc7d,0xfbea,0xfb75,0xfafe,0xfb87,0xfb50,0xfb67,0xfa60,
+	0xfaba,0xfade,0xfb97,0xfb6f,0xfafa,0xfb20,0xfb3c,0xfc0e,
+	0xfbc7,0xfc3b,0xfb75,0xfc56,0xfc9e,0xfced,0xfcc9,0xfcab,
+	0xfd58,0xfd47,0xfe28,0xfda2,0xfe30,0xfe0f,0xfebe,0xfeae,
+	0xfeeb,0xff05,0xff40,0x0014,0xff97,0x0032,0xffbe,0x0021,
+	0xffd4,0x003d,0xfffd,0xfff2,0x0031,0x000b,0x0075,0xffcf,
+	0x002d,0xffc1,0x0017,0xffdc,0x001f,0xffd3,0xffaf,0xffa1,
+	0xfef6,0xff2a,0xfe56,0xfecd,0xfe48,0xfe9f,0xfe3e,0xfe4a,
+	0xfe39,0xfdf3,0xfe06,0xfdcc,0xff8c,0xff0a,0xfc17,0xfa1a,
+	0xfdea,0x0013,0xfd8f,0xf826,0xf845,0xfe40,0x01ab,0x00f1,
+	0xfb7b,0xf8ae,0xfae1,0xff69,0xff79,0xfb1c,0xfb1b,0xfd97,
+	0xfe7e,0xfc48,0xfd47,0xfd87,0xfd08,0xfd1f,0xff15,0x00b9,
+	0xfd7b,0xfafd,0xfc46,0x00c5,0x02a5,0x011d,0xfa94,0xf9ba,
+	0xff73,0x02e2,0x0284,0xfd1f,0xf93e,0xfc5d,0x04fe,0x06ab,
+	0xfea1,0xf65d,0xfaa0,0x0521,0x0949,0x0028,0xf821,0xfb28,
+	0x033c,0x065d,0xfe27,0xf7ee,0xfb35,0x028e,0x0626,0xff04,
+	0xf9a2,0xf965,0xffb4,0x0517,0x032c,0xfab0,0xf6f0,0xfa8a,
+	0x027e,0x046f,0xff99,0xf993,0xf88d,0xfe6d,0x0210,0x0003,
+	0xfa58,0xf899,0xfbf6,0x0201,0x0043,0xfa9d,0xfaeb,0xfd67,
+	0x001b,0x005c,0xfe0f,0xf9be,0xfb4d,0xff80,0x0177,0xff00,
+	0xfb5e,0xfd98,0x0060,0x0098,0xfb85,0xf9e5,0xfec2,0x025f,
+	0x0008,0xfd3a,0xfcd3,0xfca7,0xfea0,0xff7e,0x0016,0xfebb,
+	0xff88,0x00b0,0xfe73,0xfdcb,0x0010,0x0187,0xfdc3,0xfd04,
+	0xff37,0x0084,0xff26,0xfead,0xfccd,0xfde5,0x0074,0x012b,
+	0x0186,0xfec3,0xfb9c,0xfab7,0xff01,0x018d,0x0015,0xfc14,
+	0xfadd,0xfdb9,0x0019,0xffc1,0xfbff,0xfafb,0xfc6c,0xff4c,
+	0xfec5,0xfc23,0xfaa3,0xfbea,0xfed6,0xfee1,0xfdca,0xfbfd,
+	0xfd8e,0xffb7,0x00ca,0xff61,0xfdfe,0xfed6,0x0066,0x01d8,
+	0x0086,0xffb7,0xff25,0x00fb,0x0186,0x00cb,0xff75,0xff50,
+	0x00a6,0x0122,0x010a,0xff6a,0xff67,0xff8a,0x00a2,0x0006,
+	0xff14,0xfebd,0xff13,0xffc6,0xfec3,0xfe30,0xfcc6,0xfd6e,
+	0xfd89,0xfdbd,0xfd10,0xfc22,0xfc42,0xfc58,0xfc94,0xfb7b,
+	0xfb88,0xfb0f,0xfc00,0xfbe3,0xfbcc,0xfb3d,0xfacd,0xfb21,
+	0xfaed,0xfb50,0xfb22,0xfbb3,0xfb89,0xfc0b,0xfbaf,0xfb78,
+	0xfb4b,0xfb8e,0xfc98,0xfccb,0xfd96,0xfd19,0xfd90,0xfd27,
+	0xfd9c,0xfd60,0xfd70,0xfde1,0xfe2e,0xff37,0xfea8,0xfebe,
+	0xfe3a,0xff15,0xff3c,0xffbe,0xffb5,0xffb8,0x0040,0x0018,
+	0x008b,0xff97,0xffba,0xff60,0x003a,0x0011,0x0006,0xff9c,
+	0xff32,0xff7a,0xff46,0xffb9,0xff31,0xffa5,0xff7a,0xffe5
+};
+
+static const UINT16 NG0[] = {
+	0x0023,0xff51,0x002f,0x0154,0x04ed,0x08cd,0x0d68,0x1057,
+	0x11e1,0x1207,0x1158,0x11f0,0x1270,0x14bb,0x164a,0x1893,
+	0x18d6,0x18b3,0x1715,0x14c1,0x12ff,0x1177,0x116a,0x106e,
+	0x1017,0x0de7,0x0bae,0x07f6,0x0495,0x0119,0xfe7b,0xfd0f,
+	0xfaf9,0xf9b7,0xf684,0xf430,0xf096,0xed91,0xea82,0xe872,
+	0xe776,0xe643,0xe5c0,0xe3d0,0xe2db,0xe080,0xdfa9,0xde8a,
+	0xdea0,0xdf53,0xe039,0xe193,0xe171,0xe231,0xe1bb,0xe2e8,
+	0xe3cd,0xe622,0xe832,0xea9a,0xed35,0xeefc,0xf146,0xf220,
+	0xf431,0xf5f4,0xf932,0xfb5a,0xfe2e,0x008d,0x0300,0x050b,
+	0x0631,0x07f4,0x0894,0x0aad,0x0c44,0x0ed8,0x103c,0x112e,
+	0x114b,0x1125,0x11b0,0x118c,0x1292,0x1213,0x12ab,0x122c,
+	0x1233,0x111e,0x0f56,0x0deb,0x0ca2,0x0c49,0x0b0c,0x0aaa,
+	0x089f,0x077f,0x055c,0x03b9,0x01a5,0xffb9,0xfe9e,0xfd0c,
+	0xfc49,0xfa61,0xf938,0xf6b3,0xf583,0xf43f,0xf375,0xf2bf,
+	0xf1aa,0xf182,0xf048,0xf00a,0xeeb1,0xeea9,0xee18,0xeed6,
+	0xef09,0xef28,0xefa3,0xefa5,0xf0b5,0xf0a1,0xf17e,0xf1c3,
+	0xf366,0xf435,0xf573,0xf680,0xf75c,0xf8e4,0xf9f5,0xfbb5,
+	0xfc3d,0xfdef,0xfeda,0x00a2,0x01a8,0x02a6,0x0387,0x042b,
+	0x05c2,0x0662,0x07bb,0x07ad,0x08c4,0x08ee,0x09ab,0x099b,
+	0x0965,0x09b0,0x097e,0x0a5e,0x09b1,0x09e7,0x08c5,0x08c4,
+	0x0832,0x0797,0x06b4,0x059c,0x057f,0x045a,0x0400,0x027a,
+	0x0204,0x00b8,0x0074,0xff7d,0xfe80,0xfd94,0xfc34,0xfbbe,
+	0xfa78,0xfa70,0xf90a,0xf8fb,0xf7ee,0xf789,0xf727,0xf676,
+	0xf659,0xf5af,0xf637,0xf575,0xf5e1,0xf588,0xf60e,0xf5f8,
+	0xf66b,0xf6b1,0xf682,0xf790,0xf78a,0xf899,0xf887,0xf98a,
+	0xf9dc,0xfae7,0xfbb2,0xfc52,0xfd13,0xfd5c,0xfe8c,0xfe95,
+	0xffec,0x0028,0x0121,0x017e,0x0279,0x02cf,0x02e6,0x0379,
+	0x0351,0x044c,0x0435,0x0505,0x046b,0x04d2,0x04b3,0x04d0,
+	0x04f2,0x0498,0x04d5,0x043c,0x04ce,0x03ed,0x03ee,0x02f6,
+	0x02dc,0x02ab,0x0212,0x01db,0x00ce,0x00ae,0xffa0,0xffe7,
+	0xfec2,0xfe86,0xfd38,0xfc11,0xf9e9,0xf66a,0xf2fd,0xef6e,
+	0xef0f,0xefdd,0xf3a7,0xf747,0xfb5b,0xfe20,0xff94,0x0013,
+	0xff6b,0x0067,0x0205,0x0654,0x09ae,0x0ddd,0x1032,0x11cb,
+	0x1214,0x11a0,0x1231,0x1299,0x14d5,0x169d,0x18ed,0x18bf,
+	0x1807,0x1601,0x1424,0x12c8,0x1192,0x1152,0x1066,0x1015,
+	0x0dcd,0x0b4e,0x0732,0x042f,0x011f,0xff08,0xfd57,0xfb19,
+	0xf96e,0xf621,0xf3ef,0xf00c,0xed1b,0xea1a,0xe8aa,0xe7cd,
+	0xe6b3,0xe5ed,0xe3ef,0xe2d9,0xe090,0xdfe9,0xdee2,0xdf13,
+	0xdf4f,0xe024,0xe11d,0xe14d,0xe254,0xe235,0xe38e,0xe424,
+	0xe634,0xe805,0xeaa6,0xece3,0xeece,0xf13e,0xf2bb,0xf4fa,
+	0xf66b,0xf969,0xfb6c,0xfe54,0x0090,0x02ca,0x04cd,0x0641,
+	0x086d,0x094d,0x0b67,0x0c68,0x0e83,0x0f9b,0x1110,0x11bd,
+	0x1210,0x1290,0x124d,0x12c1,0x1234,0x12c6,0x120d,0x1203,
+	0x10eb,0x103a,0x0eb9,0x0d29,0x0c59,0x0af3,0x0a78,0x0860,
+	0x074e,0x0502,0x039a,0x0188,0xffcf,0xfe7a,0xfce0,0xfbf8,
+	0xf9ee,0xf8d5,0xf662,0xf55a,0xf382,0xf2bc,0xf1d1,0xf15b,
+	0xf15c,0xf042,0xefff,0xeeb6,0xeeee,0xee6f,0xeeae,0xeecd,
+	0xef52,0xeff6,0xf06e,0xf16e,0xf116,0xf1f3,0xf209,0xf3b0,
+	0xf491,0xf61e,0xf748,0xf86e,0xf9fb,0xfb2a,0xfc98,0xfd08,
+	0xfe90,0xff4f,0x010b,0x01d8,0x033c,0x0464,0x0541,0x0635,
+	0x063c,0x0751,0x0796,0x0907,0x097f,0x0a65,0x0a01,0x09ec,
+	0x0a13,0x09b2,0x09c6,0x0936,0x09d0,0x092c,0x099e,0x08be,
+	0x07f9,0x0699,0x059a,0x053a,0x0442,0x043c,0x02df,0x02bf,
+	0x012b,0x0094,0xfeed,0xfd99,0xfcb5,0xfc37,0xfc1b,0xfad5,
+	0xfa9d,0xf917,0xf8bd,0xf73f,0xf6da,0xf65d,0xf663,0xf6ac,
+	0xf657,0xf64b,0xf54c,0xf592,0xf4e3,0xf533,0xf536,0xf62b,
+	0xf6e4,0xf71f,0xf796,0xf754,0xf829,0xf80c,0xf93b,0xf978,
+	0xfaca,0xfb63,0xfc4e,0xfce5,0xfd3f,0xfe39,0xfe3e,0xffaa,
+	0xffd2,0x0126,0x016a,0x0270,0x0292,0x02eb,0x039e,0x03b2,
+	0x04a4,0x0469,0x0560,0x04e9,0x0571,0x0539,0x0544,0x0522,
+	0x049e,0x04ea,0x0467,0x04c7,0x03f8,0x0437,0x0343,0x0345,
+	0x029f,0x01d5,0x0190,0x00f9,0x0129,0x0024,0x0004,0xfe98,
+	0xfe60,0xfced,0xfbd3,0xf974,0xf620,0xf2db,0xeff6,0xefce,
+	0xf076,0xf3a0,0xf6ff,0xfb5f,0xfdff,0xff80,0xff8f
+};
+
+static const UINT16 OO0[] = {
+	0xffb4,0xfc39,0xf863,0xf23c,0xeb05,0xe1a6,0xd913,0xd1f6,
+	0xce89,0xd00c,0xd6bb,0xe24f,0xf19e,0x03c4,0x15f9,0x2905,
+	0x3aab,0x4b7c,0x59e8,0x63fd,0x6631,0x65a7,0x6661,0x6155,
+	0x50dc,0x3e2b,0x29a8,0x141e,0x001a,0xede8,0xde61,0xd1d6,
+	0xc790,0xc0ab,0xbc08,0xbb19,0xbc50,0xbfcf,0xc42e,0xc8c2,
+	0xcc47,0xce17,0xcec0,0xcd63,0xcbc9,0xc9b3,0xc973,0xca23,
+	0xcd00,0xd192,0xd83e,0xe135,0xec0d,0xf8e8,0x06e4,0x16c2,
+	0x2664,0x3590,0x4199,0x4ab1,0x4ff7,0x5183,0x4f4a,0x48cc,
+	0x4004,0x343a,0x2797,0x1900,0x0abc,0xfbee,0xee5c,0xe33c,
+	0xda3d,0xd45e,0xd0b0,0xd000,0xd08c,0xd30b,0xd573,0xd856,
+	0xda99,0xdcb4,0xde95,0xdfa0,0xe0e4,0xe127,0xe206,0xe278,
+	0xe466,0xe687,0xea72,0xefde,0xf6c0,0xff96,0x0904,0x139e,
+	0x1d3c,0x26c2,0x2e3c,0x3474,0x3840,0x397e,0x385e,0x34d1,
+	0x2f64,0x2745,0x1e3e,0x135a,0x08b3,0xfdce,0xf42a,0xebae,
+	0xe4f9,0xe056,0xdcfc,0xdbff,0xdbb0,0xdd01,0xde4b,0xe0c2,
+	0xe2fe,0xe5a7,0xe81f,0xe9ea,0xeb8a,0xec37,0xed6f,0xee06,
+	0xef98,0xf134,0xf421,0xf7d8,0xfca3,0x0230,0x07de,0x0e5d,
+	0x1436,0x1aa5,0x1f93,0x23f9,0x2696,0x2809,0x27b0,0x252e,
+	0x215e,0x1b9c,0x1554,0x0dc2,0x06a4,0xfeec,0xf81f,0xf1b4,
+	0xec5a,0xe865,0xe576,0xe43a,0xe375,0xe483,0xe57d,0xe7d8,
+	0xe9d1,0xec2f,0xee55,0xeffa,0xf1b6,0xf2ae,0xf45f,0xf56b,
+	0xf71c,0xf863,0xfaaa,0xfcb6,0xff66,0x028e,0x05f4,0x0a28,
+	0x0df1,0x127a,0x15b1,0x18a5,0x1a49,0x1b4f,0x1adf,0x1943,
+	0x16c4,0x1328,0x0f5b,0x0a3b,0x0545,0xffa2,0xfa91,0xf572,
+	0xf14a,0xee0a,0xec06,0xeae0,0xea3b,0xeac8,0xeb31,0xecae,
+	0xedde,0xeff6,0xf1b8,0xf3d7,0xf5df,0xf74a,0xf8de,0xf9e4,
+	0xfb4f,0xfbee,0xfd5b,0xfe98,0x0098,0x02dd,0x0553,0x07e7,
+	0x09e6,0x0c61,0x0de2,0x0fb2,0x1092,0x117f,0x1179,0x1103,
+	0x0f9d,0x0d56,0x0ab0,0x06c6,0x035c,0xfef2,0xfb6e,0xf7ec,
+	0xf54b,0xf2f7,0xf100,0xf001,0xef4c,0xef79,0xefae,0xf137,
+	0xf23b,0xf41f,0xf598,0xf789,0xf8fc,0xfa16,0xfb83,0xfc41,
+	0xfd87,0xfe19,0xff87,0x009b,0x01fd,0x02fc,0x045a,0x05b5,
+	0x06e6,0x088e,0x098d,0x0b12,0x0b9d,0x0c6f,0x0c14,0x0b58,
+	0x09d2,0x0810,0x0600,0x036f,0x011e
+};
+
+static const UINT16 L0[] = {
+	0x0187,0x0061,0xffa9,0xff4f,0xfde6,0xfd01,0xfb0c,0xfaf0,
+	0xf93e,0xf803,0xf3f0,0xef74,0xe9da,0xe460,0xe046,0xdd7b,
+	0xde61,0xe0c5,0xe766,0xee81,0xf89e,0x034d,0x109c,0x1e22,
+	0x2bcf,0x3820,0x4114,0x4827,0x4ad7,0x4bb1,0x47ad,0x42be,
+	0x3a5e,0x30eb,0x25aa,0x1986,0x0e1f,0x029d,0xf9fe,0xf1f3,
+	0xed4d,0xe8bd,0xe646,0xe3d2,0xe252,0xe0de,0xdf51,0xde74,
+	0xdb61,0xd84e,0xd33d,0xcf00,0xc96e,0xc543,0xc14d,0xbf53,
+	0xbf12,0xc063,0xc455,0xc992,0xd21e,0xdb21,0xe71f,0xf26b,
+	0xff17,0x0ad0,0x15d4,0x1f10,0x260c,0x2b44,0x2d90,0x2f73,
+	0x2e47,0x2cc1,0x28b0,0x24d8,0x1fe3,0x1b47,0x174f,0x137d,
+	0x1151,0x0e62,0x0d9f,0x0b95,0x0a5c,0x07ad,0x0585,0x0283,
+	0xfee3,0xfa86,0xf40f,0xedb6,0xe5fc,0xe002,0xd99f,0xd552,
+	0xd0b6,0xcea6,0xcd90,0xce0e,0xd0c7,0xd475,0xdaca,0xe0f6,
+	0xe959,0xf06c,0xf831,0xfe3f,0x0470,0x09d0,0x0e3e,0x119c,
+	0x1174,0x12c8,0x1264,0x1322,0x124e,0x12dc,0x1290,0x1311,
+	0x13a2,0x13c7,0x1452,0x13f3,0x14c2,0x13fd,0x1486,0x1405,
+	0x125c,0x0e66,0x0a2f,0x04c5,0xfeba,0xf90a,0xf2fc,0xee5c,
+	0xe88f,0xe477,0xe025,0xde35,0xdd11,0xde0c,0xe018,0xe21f,
+	0xe566,0xe7ed,0xea90,0xece6,0xf183,0xf46b,0xf7f2,0xf9fb,
+	0xfc28,0xff64,0x002c,0x0214,0x0325,0x0576,0x064c,0x08cd,
+	0x0a3d,0x0ce1,0x0f14,0x11a3,0x1402,0x1586,0x1740,0x16dc,
+	0x16da,0x1497,0x131e,0x0f93,0x0c63,0x0894,0x0446,0xffe1,
+	0xfb19,0xf7e2,0xf39d,0xf1b2,0xef19,0xee46,0xecdd,0xed21,
+	0xed43,0xedad,0xeec7,0xef5c,0xf19b,0xf1f8,0xf320,0xf2ec,
+	0xf416,0xf485,0xf5b7,0xf699,0xf774,0xf8dd,0xfa25,0xfcb1,
+	0xfe40,0x0152,0x033d,0x0698,0x08b1,0x0b55,0x0d7e,0x0f13,
+	0x107a,0x1070,0x10e7,0x0f7a,0x0f0f,0x0cb3,0x0afe,0x0806,
+	0x0586,0x0327,0x00c7,0xff0d,0xfc98,0xfba0,0xf93d,0xf903,
+	0xf800,0xf7d5,0xf6ee,0xf6c9,0xf69d,0xf5bb,0xf570,0xf3d6,
+	0xf435,0xf342,0xf41f,0xf38d,0xf3c8,0xf366,0xf438,0xf586,
+	0xf709,0xf964,0xfaaa,0xfd4d,0xfeb3,0x0179,0x02f8,0x054b,
+	0x06c6,0x0868,0x09a1,0x09b8,0x0a53,0x095d,0x0970,0x07d9,
+	0x07e3,0x06b1,0x0606,0x04df,0x0395,0x02b2,0x0116
+};
+
+static const UINT16 K[] = {
+	0xff7a,0x023f,0x0423,0x067c,0x070c,0x07fd,0x075e,0x07ef,
+	0x0635,0x0589,0x06f7,0x0a52,0x0e05,0x0faf,0x0f79,0x0cb7,
+	0x0b96,0x0874,0x0685,0x050e,0x05bd,0x07fc,0x0ae9,0x0d15,
+	0x0ce3,0x0df4,0x0e02,0x1016,0x0fe9,0x0e4e,0x0c13,0x0d19,
+	0x105a,0x1363,0x15bc,0x1525,0x155b,0x1385,0x1180,0x0d6e,
+	0x0bf8,0x0c9b,0x0ea4,0x1085,0x108a,0x10a6,0x0f1b,0x0e63,
+	0x0ab2,0x0874,0x06ce,0x0920,0x0bdb,0x0d3d,0x0d8e,0x0c85,
+	0x0c4f,0x09ee,0x0765,0x0399,0x0397,0x05a5,0x09fd,0x0bdb,
+	0x0b51,0x09b3,0x0858,0x0808,0x0531,0x030a,0x0113,0x0366,
+	0x06c8,0x0a6c,0x0afb,0x0918,0x0763,0x0469,0x027a,0xff47,
+	0xffd9,0x0188,0x05d6,0x08a8,0x0a2a,0x08bb,0x0649,0x0357,
+	0xffc3,0xfdec,0xfcb0,0x0041,0x0434,0x0890,0x098a,0x092c,
+	0x0695,0x0398,0x004a,0xfc7e,0xfbda,0xfd57,0x0293,0x05f8,
+	0x087a,0x077f,0x058f,0x035f,0x00de,0xfeb6,0xfcaa,0xfdc4,
+	0xffc3,0x03e8,0x04d1,0x056c,0x0451,0x0375,0x0231,0x00db,
+	0x001b,0xff2b,0x0069,0x00fd,0x029b,0x0244,0x0301,0x0310,
+	0x0313,0x0266,0x0108,0x008a,0xffa8,0x0043,0xfff8,0x0165,
+	0x0173,0x0283,0x027f,0x02a4,0x0239,0x0047,0xff4f,0xfdf4,
+	0xff35,0xffa1,0x014b,0x019a,0x0293,0x0282,0x0266,0x0184,
+	0xff96,0xff23,0xfe4c,0xfef0,0xfe99,0xffd3,0x005f,0x0268,
+	0x0371,0x033a,0x01b3,0xff1c,0xfe23,0xfcf3,0xfe46,0xff01,
+	0x0127,0x0234,0x0351,0x02e3,0x0161,0x000a,0xfe18,0xfe14,
+	0xfd79,0xfef2,0xffd3,0x01b5,0x0266,0x0344,0x0295,0x00b1,
+	0xff83,0xfe5c,0xff38,0xff04,0x003a,0xffd6,0x0104,0x013a,
+	0x01dd,0x0155,0x004e,0xff89,0xfeb2,0xff7b,0xff29,0xfff1,
+	0xff43,0x0009,0xff74,0xffc9,0xfff3,0xff79,0x003d,0xff8c,
+	0x0004,0xfec4,0xff1f,0xfe49,0xfe6f,0xfe8d,0xff74,0x00cb,
+	0x017c,0x0247,0x0074,0xffbb,0xfdc1,0xfdfe,0xfd78,0xfe4f,
+	0xfec0,0xfffc,0x01cd,0x029a,0x02b9,0x00a3,0xff72,0xfcbf,
+	0xfc95,0xfc27,0xfd9b,0xff70,0x016d,0x0312,0x028b,0x0233,
+	0x0030,0xff39,0xfc9a,0xfc80,0xfbc5,0xfdbb,0x0019,0x01bd,
+	0x02c1,0x0277,0x018c,0xff2d,0xfd66,0xfa64,0xfa06,0xfa2e,
+	0xfd0a,0xff8f,0x017d,0x01fe,0x0129,0x00eb,0xff17,0xfe22,
+	0xfbd0,0xfbfc,0xfc0b,0xfdf6,0xff92,0x00bb,0x0174,0x0199,
+	0x0200,0x002b,0xff2e,0xfc6c,0xfbec,0xfbdf,0xfd8c,0xff0e,
+	0x0070,0x01b4,0x01b0,0x01c4,0xffc0,0xfec5,0xfc9f,0xfc6e,
+	0xfbff,0xfcc7,0xfe84,0xffe9,0x0174,0x01d8,0x01cd,0xff6e,
+	0xfe6f,0xfc59,0xfbd0,0xfb73,0xfc7d,0xfe1e,0x0018,0x01d0,
+	0x01d8,0x01ea,0xffa6,0xfeca,0xfcca,0xfbfe,0xfb77,0xfc39,
+	0xfe59,0xffef,0x01a1,0x01bc,0x01df,0xff9d,0xfe85,0xfc8b,
+	0xfbb9,0xfaff,0xfc34,0xfe44,0xffc4,0x01ae,0x01b9,0x0230,
+	0x0013,0xfeb7,0xfc64,0xfb16,0xfadb,0xfc2a,0xfe93,0xffbb,
+	0x01d2,0x01e0,0x0203,0xffa8,0xfdf7,0xfb30,0xfadc,0xfaf1,
+	0xfc97,0xfe83,0xffa6,0x0167,0x0109,0x0111,0xff06,0xfdda,
+	0xfbfa,0xfb2c,0xfbc3,0xfd41,0xff6b,0x009b,0x01af,0x00cb,
+	0x0006,0xfdd7,0xfd22,0xfb91,0xfbef,0xfc91,0xfe05,0xffab,
+	0x0042,0x0143,0x0002,0xff64,0xfcf9,0xfc5b,0xfbc0,0xfcdc,
+	0xfdf9,0xfea9,0xff84,0xff1a,0xffb1,0xfe3e,0xfde0,0xfcd7,
+	0xfdd1,0xfdc0,0xfe72,0xfe4e,0xfd95,0xfdb7,0xfcfe
+};
+
+static const UINT16 J0[] = {
+	0xffff,0x0002,0xfec1,0xff55,0xfeca,0xff79,0xffb7,0x0076,
+	0x0020,0xffb2,0xff86,0xffab,0xfeee,0xfbda,0xfabc,0xfadc,
+	0xfee9,0x022d,0x0370,0x0119,0xfcae,0xf9bb,0xf96a,0xfd17,
+	0x008f,0x02cf,0x002e,0xfcdf,0xf938,0xf835,0xf9f7,0xfd49,
+	0x027c,0x051a,0x0416,0xfc75,0xf50b,0xf1a1,0xf6b5,0xfe2e,
+	0x02b2,0x03db,0x0125,0xfd30,0xf8ba,0xf6ef,0xf56b,0xf6e7,
+	0xf8fd,0xfd04,0xffb0,0xff58,0xfc3e,0xfa35,0xfcaa,0x0004,
+	0x00fc,0xfdfb,0xfcd6,0xfc8f,0xfc2a,0xfb61,0xfb86,0xff16,
+	0x0258,0x05d6,0x04f4,0x0210,0xfd09,0xf984,0xf7f9,0xf9e7,
+	0xfeef,0x02de,0x04e9,0x0318,0x00a5,0xfdb4,0xfdfd,0xfe29,
+	0xff49,0xff27,0xfdf8,0xfd99,0xfd59,0xffaa,0x011c,0x02c4,
+	0x01c5,0xffd7,0xfcea,0xfb8f,0xfd2a,0xff03,0x0049,0xff55,
+	0xff4e,0xff3e,0x016f,0x00d1,0xfea6,0xfaee,0xf938,0xfb91,
+	0xff6f,0x0381,0x03ff,0x0229,0xfc1c,0xf82b,0xf7f1,0xfbce,
+	0xffbc,0x0122,0x008a,0xff6a,0xff01,0xfc8b,0xfb96,0xfb1e,
+	0xfdff,0xff22,0xff2f,0xfd5e,0xfc16,0xfd56,0xfdea,0xffb7,
+	0xff73,0xff45,0xfd49,0xfc08,0xfaa9,0xfad3,0xfc7f,0xfe9e,
+	0x0103,0x003b,0xfee3,0xfb95,0xfa2d,0xf9a2,0xfbc8,0xfe47,
+	0x0076,0x0206,0x0159,0x001c,0xfd9c,0xfd11,0xfcd8,0xfe9a,
+	0xffd1,0x00d2,0x00c4,0xffbd,0xff8c,0xfef3,0x0057,0x00a6,
+	0x01f7,0x0168,0x00a8,0xfee3,0xfe07,0xfea8,0xff83,0x01d4,
+	0x0262,0x0306,0x010f,0xffe4,0xfdde,0xfd4c,0xfda3,0xfece,
+	0x0095,0x00c5,0x012e,0xff24,0xfe1d,0xfcaf,0xfd47,0xfda3,
+	0xfe8a,0xfecd,0xfe45,0xfdc1,0xfc04,0xfc26,0xfbbd,0xfd2e,
+	0xfd7d,0xfe17,0xfd0c,0xfbae,0xfb1a,0xfa3a,0xfb3c,0xfb68,
+	0xfce0,0xfcbc,0xfcd6,0xfb94,0xfaf2,0xfa75,0xfa71,0xfb81,
+	0xfbee,0xfd0c,0xfc6d,0xfc7a,0xfb67,0xfba0,0xfb9f,0xfc78,
+	0xfd21,0xfd22,0xfd98,0xfcdc,0xfd2e,0xfc51,0xfd2a,0xfd5a,
+	0xfe4c,0xfe75,0xfe6f,0xfe4c,0xfdc0,0xfe64,0xfdee,0xfed9,
+	0xfe94,0xff9d,0xff84,0xffaf,0xff47,0xfefd,0xff74,0xff25,
+	0x001c,0xff9e,0x0035,0xffa4,0x0035,0x0007,0xfff9,0xffbb,
+	0xff96,0xffe7,0xff80,0x0090,0xfff9,0x0090,0x0015,0x0065,
+	0xffba,0xfe8e,0xfd83,0xfdf8,0x0114,0x0236,0x0277,0xff05,
+	0xfc06,0xfa9c,0xfca6,0xff36,0xff5d,0xfed7,0xff0f,0x0218,
+	0x01f1,0xff33,0xfa05,0xf877,0xfa66,0xfec3,0x0199,0x00d9,
+	0xff0c,0xfc9b,0xfd1e,0xfbf8,0xfadc,0xfa03,0xfbf4,0xff88,
+	0x015a,0xff36,0xfb07,0xfb3c,0xfd80,0x0033,0xfd43,0xf9b8,
+	0xf951,0xfd30,0x00e1,0x001b,0xfcad,0xfa58,0xfd6b,0x002a,
+	0x0109,0xfe3c,0xfc77,0xfb25,0xfbb2,0xfbfa,0xfce2,0xffba,
+	0x01f5,0x03df,0x017e,0xfee0,0xfc46,0xfc3e,0xfbcf,0xfb49,
+	0xfb32,0xfd15,0x0218,0x0525,0x05f9,0x02a5,0xffa9,0xfcfc,
+	0xfcad,0xfc13,0xfadf,0xfa7e,0xfbf7,0x0184,0x05d3,0x0735,
+	0x02c3,0xfe20,0xfbfd,0xfd32,0xfec2,0xfda9,0xfc3b,0xfae5,
+	0xfd81,0x00d7,0x0405,0x02b4,0x00ee,0x001e,0x0036,0xfdf4,
+	0xf89f,0xf6cc,0xf8a8,0xff0a,0x0390,0x05a7,0x0333,0xffa6,
+	0xfc3a,0xfb0f,0xfb4a,0xfbe3,0xfda5,0xfe22,0xff7d,0xfe2d,
+	0xfd0f,0xfcfe,0xfebf,0x0094,0x0082,0x000a,0xfcbe,0xfa27,
+	0xf807,0xf99c,0xfc59,0x0120,0x04c8,0x05f5,0x03cb,0xfd5f,
+	0xf6e2,0xf233,0xf453,0xf9af,0x0127,0x054f,0x05ac,0x0240,
+	0xfce2,0xf8f5,0xf6db,0xf916,0xfc8d,0x0138,0x0276,0x01c3,
+	0xfec4,0xfcd6,0xfd26,0xfee5,0x01ab,0x0222,0x01d4,0xff16,
+	0xfd28,0xfb78,0xfc51,0xff50,0x0366,0x0656,0x0575,0x02d1,
+	0xfde7,0xfb94,0xfaae,0xfd57,0x007f,0x039c,0x04cb,0x0353,
+	0x00c2,0xfd23,0xfc68,0xfc75,0xfef0,0x0024,0x00f7,0xffa0,
+	0xfe17,0xfd1d,0xfc52,0xfd49,0xfddd,0xffa3,0xff40,0xfe69,
+	0xfbd4,0xfa49,0xf9c6,0xfb3e,0xfdc4,0xfeca,0xff58,0xfd62,
+	0xfc48,0xfa03,0xf995,0xf9b5,0xfb6a,0xfd2e,0xfdcb,0xfda8,
+	0xfbba,0xfb0b,0xf9dc,0xfb02,0xfb63,0xfcab,0xfce6,0xfd09,
+	0xfcbf,0xfbe1,0xfbf2,0xfba5,0xfd30,0xfd69,0xfe4a,0xfd4e,
+	0xfcbe,0xfc19,0xfc20,0xfcf9,0xfd37,0xfea6,0xfe95,0xff57,
+	0xfe66,0xfe40,0xfd6f,0xfdc9,0xfe9f,0xff64,0x0068,0xffd7,
+	0xffe2,0xfe67,0xfe8f,0xfe18,0xff1a,0xffa5,0xffde,0x001c,
+	0xff85,0xffa4,0xfecf,0xff81,0xff12,0xfff3,0xff93,0x002d,
+	0xffd8,0xff67,0xff4a,0xfe4d,0xfe2a,0xfe86,0x0180,0x0244,
+	0x01d2,0xfe7b,0xfc3c,0xfc53,0xfc88,0xfd3d,0xfd15,0x0061,
+	0x0367,0x04be,0x010c,0xfbfa,0xf80e,0xf762,0xf99c,0xfc9b,
+	0x0156,0x03f5,0x059a,0x0270,0xfd2a,0xf72c,0xf588,0xf73a,
+	0xfacc,0xff09,0x0253,0x0577,0x0359,0xfe39,0xf793,0xf667,
+	0xf90a,0xfdbf,0xff20,0xfdfa,0xfdaf,0xff63,0x0260,0x00cf,
+	0xfded,0xfaf5,0xfadd,0xfb7a,0xfbb9,0xfb6f,0xfd4e,0x0279,
+	0x05c4,0x0429,0xfcba,0xf868,0xf879,0xfc23,0xfe48,0xfee8,
+	0x012f,0x037d,0x0442,0xff1b,0xfa47,0xf8dc,0xfd38,0x0190,
+	0x0257,0xfea6,0xfa8f,0xfc07,0xff9d,0x0361,0x02dd,0x016f,
+	0xfe68,0xfd4f,0xfc95,0xfcbb,0xfcce,0xfd88,0x0073,0x0328,
+	0x052a,0x022e,0xfe38,0xf9a4,0xf8ff,0xfad4,0xfee4,0x01f2,
+	0x0284,0x0180,0xfe47,0xfc97,0xfac7,0xfc55,0xfe92,0x005f,
+	0xffa4,0xfd7f,0xfcc5,0xfd53,0x006e,0x004e,0xfe83,0xfb07,
+	0xfb2c,0xfd81,0xffce,0x0080,0xfecc,0xff50,0xfee4,0xfe4e,
+	0xfb57,0xfa0b,0xfad1,0xfd98,0x0028,0x00d7,0x0138,0x0034,
+	0xffd0,0xfce4,0xfa59,0xf80b,0xfa12,0xfd7c,0x0139,0x0243,
+	0x00ae,0xff03,0xfcb6,0xfba1,0xf9c2,0xfa37,0xfb29,0xfe30,
+	0x0031,0x00ac,0xffee,0xfebe,0xff70,0xff2e,0xffb0,0xfe6a,
+	0xfe30,0xfdc3,0xfe19,0xfe74,0xff31,0x00f4,0x0217,0x0373,
+	0x0221,0x00e2,0xfe15,0xfd62,0xfd4f,0xfec2,0x0083,0x0165,
+	0x0265,0x0200,0x019a,0xff5c,0xfecb,0xfdf5,0xfede,0xff70,
+	0xffd7,0xfff0,0xff03,0xfef8,0xfe29,0xfeb2,0xfe0a,0xfe7c,
+	0xfdf6,0xfdc6,0xfcca,0xfbef,0xfc2b,0xfc4f,0xfdc5,0xfdc3,
+	0xfe41,0xfc89,0xfbe2,0xfaca,0xfa94,0xfaa0,0xfaea,0xfc2b,
+	0xfc80,0xfd4f,0xfc07,0xfba5,0xfaa2,0xfae3,0xfb22,0xfbac,
+	0xfc36,0xfbcf,0xfc2e,0xfb85,0xfc18,0xfba7,0xfc8b,0xfcb1,
+	0xfd21,0xfd1b,0xfc9c,0xfc65,0xfbec,0xfcd7,0xfca3,0xfddf,
+	0xfde6,0xfe52,0xfe10,0xfdec,0xfdd4,0xfd9e,0xfe78,0xfe9d,
+	0xff81,0xfeac,0xfedb,0xfe4b,0xfe9e,0xfee4,0xff77,0x0028,
+	0xfff9,0x0067,0xff6d,0xff7f,0xfe7a,0xff01,0xff40,0x003a,
+	0x0094,0x0068,0x0074,0xff61,0xff85,0xfefa,0x0037,0xffb9,
+	0xff5d,0xfe3c,0xff5a,0x014e,0x01c4,0x0138,0xfde9,0xfbcf,
+	0xfa83,0xfd8d,0x0118,0x030c,0x01a6,0xff31,0xfe07,0xfc3f,
+	0xfb33,0xf9a7,0xfbbd,0xff0d,0x0361,0x0414,0x00fe,0xfc64,
+	0xf91d,0xf86c,0xf878,0xfbb0,0xff05,0x0361,0x03d2,0x0093,
+	0xfa08,0xf69f,0xf8f0,0xfddf,0x00f2,0xfe9a,0xfbd7,0xfb14,
+	0xfe67,0xff75,0xfecc,0xfc53,0xfbbc,0xfe0c,0xff0a,0xfee3,
+	0xfd24,0xfd11,0xfc1b,0xfcd3,0xfca2,0xfe2b,0x00b9,0x020d,
+	0x0066,0xfc52,0xfab1,0xfbb8,0x0034,0x0186,0x004e,0xfc10,
+	0xfabe,0xfca3,0xff17,0x0161,0x0195,0x036c,0x032d,0x00cf,
+	0xfaca,0xf67b,0xf731,0xfbb7,0x0201,0x0650,0x07ae,0x03d6,
+	0xffa1,0xfb5f,0xfb7c,0xfc6c,0xfe20,0xfdab,0xfc9d,0xfdcb,
+	0x00b0,0x04fa,0x0495,0x0193,0xfc85,0xfb52,0xfbd6,0xfcb2,
+	0xfcd4,0xfc27,0xfdf1,0x00b8,0x0341,0x0132,0xfef0,0xfd13,
+	0xfd0e,0xfcf7,0xfb88,0xfb58,0xfb99,0xfe99,0x0009,0x0160,
+	0x00b8,0xfff4,0xfd94,0xfc0d,0xfae2,0xf9e7,0xfbb9,0xfdce,
+	0x008c,0x0042,0x0028,0xfe52,0xfe46,0xfe45,0xfe0f,0xfc59,
+	0xf9d8,0xf991,0xfaaf,0xfe40,0x0080,0x0273,0x019e,0xffda,
+	0xfca7,0xf94d,0xf7d4,0xf87e,0xfcbd,0x0028,0x030e,0x0273,
+	0x014a,0xfeea,0xfd67,0xfcda,0xfd0f,0xfea0,0xffa6,0x0126,
+	0x0048,0x006e,0xff86,0x0099,0x0138,0x01cc,0x0171,0xffce,
+	0xff07,0xfd96,0xfe6c,0xfecf,0x0129,0x0279,0x038f,0x0288,
+	0x003d,0xfe3a,0xfc84,0xfd46,0xfdde,0xfff0,0x0018,0x00a0,
+	0xffbb,0xfed0,0xfda0,0xfc8d,0xfd59,0xfd57,0xfe54,0xfdca,
+	0xfda8,0xfc1f,0xfc2e,0xfc34,0xfce4,0xfd96,0xfd71,0xfd43,
+	0xfb71,0xfab5,0xf98b,0xfa56,0xfadf,0xfc99,0xfd57,0xfd63,
+	0xfced,0xfb42,0xfac2,0xf989,0xfa67,0xfae2,0xfc53,0xfc80,
+	0xfca6,0xfc4f,0xfba3,0xfbd4,0xfbbb,0xfd19,0xfcf6,0xfdb4,
+	0xfcfb,0xfc8e,0xfbef,0xfc3f,0xfd26,0xfddc,0xff6e,0xff68,
+	0xffb5,0xfe2f,0xfde5,0xfd15,0xfd71,0xfdcf,0xfeb2,0xffda,
+	0x0053,0x0124,0xfffe,0xffc9,0xfe70,0xfed9,0xff15,0xfff6,
+	0x0066,0x0032,0x0028,0xff23,0xff7b,0xfec4,0xffbe,0xffca,
+	0x00d1,0x00c5,0x0023,0xff53,0xfe5e,0xfe71,0xfe3e,0x009f,
+	0x0187,0x019e,0xfed9,0xfd2a,0xfd61,0xfedb,0x00ea,0x0031,0xfef1,0xfcf4,0xfd48,0xfc6c,0xfbc5,0xfb96,0xfe70,0x039e,
+	0x0557,0x024d,0xfb70,0xf777,0xf628,0xf8ef,0xfa95,0xfd8f,
+	0x018a,0x067a,0x0797,0x00a3,0xf769,0xf199,0xf489,0xf9e8,
+	0xff09,0x0129,0x03c8,0x0533,0x0291,0xfafd,0xf2dc,0xf3b6,
+	0xfa8c,0x02ea,0x045c,0x0102,0xfc87,0xfc18,0xfd8f,0xfd7a,
+	0xfce5,0xfc61,0xfef8,0x006c,0x0011,0xfb5b,0xf911,0xfc5a,
+	0x0252,0x0587,0x02b0,0xff31,0xfc3c,0xfc39,0xfabc,0xfaa6,
+	0xfcb4,0x0241,0x061b,0x055b,0x00dd,0xfbb3,0xfa91,0xfade,
+	0xfdd6,0x0051,0x02b8,0x0228,0xffc0,0xfd9e,0xfd20,0xfe93,
+	0xfea1,0xffd4,0x0077,0x01c2,0xff76,0xfd1a,0xfb59,0xfdb0,
+	0x00cb,0x0250,0x014d,0xfdf2,0xfcd4,0xfbe5,0xfd9e,0xfdc6,
+	0xfeee,0x0001,0x0054,0x006f,0xfedb,0xfdd9,0xfb6a,0xfa8d,
+	0xfab3,0xfe75,0x0218,0x0438,0x0301,0xff35,0xfb62,0xf86f,
+	0xf913,0xfad7,0xff26,0x018f,0x02bd,0x011a,0xfd41,0xfa49,
+	0xf989,0xfcc4,0xff10,0x00e9,0xff3d,0xfd95,0xfb6e,0xfb57,
+	0xfbc6,0xfcd1,0xfeef,0xff7c,0xff69,0xfc87,0xfab7,0xf940,
+	0xfb46,0xfe49,0x0123,0x0258,0x0134,0xffd3,0xfd11,0xfc6f,
+	0xfbf4,0xfe5b,0x0044,0x024b,0x0244,0x00b5,0xff25,0xfe05,
+	0xff4d,0x0030,0x020b,0x01d5,0x0205,0x007a,0xff66,0xfea2,
+	0xfed9,0x0073,0x015c,0x02a0,0x016e,0x0061,0xfe2e,0xfdb0,
+	0xfdaa,0xfeb9,0xffe5,0x0025,0x0095,0xff13,0xfe48,0xfcec,
+	0xfd45,0xfd46,0xfe70,0xfe98,0xfe2e,0xfd96,0xfc28,0xfbc0,
+	0xfb18,0xfc2e,0xfc6d,0xfd89,0xfd1c,0xfce6,0xfba9,0xfacc,
+	0xfada,0xfab2,0xfbbe,0xfb99,0xfcbb,0xfc16,0xfc07,0xfb05,
+	0xfada,0xfb34,0xfb53,0xfc39,0xfc0c,0xfcab,0xfb9f,0xfbfe,
+	0xfb92,0xfbf9,0xfc6e,0xfcf3,0xfd87,0xfd03,0xfd4f,0xfc86,
+	0xfd0b,0xfcad,0xfdab,0xfdf9,0xfeaf,0xfe8d,0xfdf2,0xfe21,
+	0xfdb3,0xfed4,0xfeaa,0xff91,0xff37,0xffc4,0xff62,0xff3b,
+	0xfef7,0xfeb8,0xffa2,0xff89,0x009c,0x0008,0x0028,0xff2a,
+	0xff6b,0xff58,0xff3b,0xffd3,0xff98,0x005a,0xffb0,0x004c,
+	0xffb8,0x001b,0xff82,0xff0c,0xfeee,0xfee0,0xffa3,0xff74,
+	0x009b,0x001b,0xff78,0xfced,0xfc83,0xfd2c,0xfdec,0xfe0d,
+	0xfd5f,0xfff7,0x0203,0x024e,0xfd7c,0xfa32,0xf9ec,0xfd0a,
+	0xfe32,0xfc2d,0xfba7,0xfd55,0x01ad,0x0184,0xfe70,0xfa4d,
+	0xf9fe,0xfb21,0xfbf9,0xfc07,0xfd93,0x0009,0x00ae,0xff36,
+	0xfb7c,0xfaaa,0xfb19,0xfda8,0xfe72,0xfe9c,0xfe63,0xff52,
+	0xff74,0xfcdc,0xfaf3,0xf9f9,0xfd4c,0x0036,0x0204,0x00d1,
+	0xff40,0xfe9c,0xfe3e,0xfe73,0xfc45,0xfb7e,0xfad6,0xfc7c,
+	0xfe5d,0x016e,0x042e,0x04e3,0x03ad,0xffa3,0xfc67,0xf8df,
+	0xf836,0xf883,0xfbe4,0x0120,0x06f1,0x0992,0x0546,0xfedb,
+	0xf954,0xf937,0xfa55,0xfce4,0xfd6d,0xfeab,0x0156,0x0422,
+	0x0466,0x0038,0xfc39,0xfac3,0xfe8b,0x0054,0xfe5b,0xf953,
+	0xf92e,0xfe5d,0x03a2,0x044e,0xff19,0xfbc3,0xfc06,0x003a,
+	0x00d3,0xfd28,0xf969,0xf9da,0xfea4,0x00eb,0x0044,0xfcfa,
+	0xfde0,0x001d,0x0183,0xfd93,0xf858,0xf73e,0xfb7b,0x01d1,
+	0x036a,0x017c,0xfdc8,0xfe21,0xfe62,0xfdbc,0xfb1b,0xfb43,
+	0xfe1c,0x007e,0xff48,0xfa9c,0xf8e4,0xfabe,0x00a4,0x02cc,
+	0x0151,0xfd80,0xfaf7,0xfa72,0xfa11,0xfaab,0xfbb7,0x0065,
+	0x03fd,0x0581,0x016a,0xfca9,0xfa13,0xfb2e,0xfdfb,0xff96,
+	0x0103,0x011d,0x0268,0x0141,0xffe9,0xfdf0,0xfe48,0x008d,
+	0x0241,0x025a,0xff91,0xfe42,0xfd79,0xff47,0x0054,0x0199,
+	0x01a3,0x01a3,0x00ff,0xfed7,0xfd43,0xfba7,0xfd71,0xff16,
+	0x0148,0x00c7,0xfff1,0xfe53,0xfd65,0xfd04,0xfc01,0xfc90,
+	0xfc59,0xfdef,0xfd8c,0xfd53,0xfbf6,0xfbdc,0xfc7a,0xfcd4,
+	0xfd37,0xfbe6,0xfb96,0xfa88,0xfb0b,0xfac1,0xfb80,0xfc08,
+	0xfce8,0xfd43,0xfc5c,0xfba7,0xfa01,0xfa86,0xfa90,0xfc31,
+	0xfcbb,0xfd13,0xfce5,0xfc9f,0xfc44,0xfb79,0xfc35,0xfc3c,
+	0xfd8d,0xfd5c,0xfde7,0xfd11,0xfca9,0xfcc5,0xfd31,0xfe34,
+	0xfe04,0xfedf,0xfe06,0xfe50,0xfd79,0xfdfa,0xfe30,0xfece,
+	0xffad,0xff52,0xff56,0xfe86,0xff27,0xfea4,0xff33,0xfee3,
+	0xff6f,0xffb4,0xff9b,0x0012,0xff2f,0xff54
+};
+
+static const UINT16 H[] = {
+	0xfee9,0xfe63,0xfe4f,0xfd64,0xfd99,0xfc9b,0xfc9c,0xfc33,
+	0xfcc4,0xfd54,0xfe25,0xfebf,0xfdde,0xfdfb,0xfd4e,0xfdb8,
+	0xfc4d,0xfc67,0xfc0e,0xfccf,0xfdde,0xfead,0xff6e,0xfed8,
+	0xfed7,0xfd1e,0xfc4a,0xfa95,0xfb46,0xfbc7,0xfd41,0xfddc,
+	0xfdfa,0xfe02,0xfd51,0xfdbf,0xfd01,0xfdee,0xfd58,0xfe87,
+	0xfe91,0xfeed,0xfe61,0xfd50,0xfcd1,0xfc46,0xfd69,0xfd74,
+	0xfe65,0xfe19,0xfede,0xfea9,0xfe6b,0xfd97,0xfc50,0xfc16,
+	0xfb88,0xfd2e,0xfde0,0xff1e,0xfed9,0xff00,0xfd76,0xfc73,
+	0xfb9f,0xfaeb,0xfbd0,0xfc72,0xfe70,0xfeb1,0xff46,0xfeaf,
+	0xfe67,0xfd22,0xfc4c,0xfbe6,0xfc11,0xfd8a,0xfe55,0xffe0,
+	0xff71,0xffa4,0xfe7c,0xfe12,0xfd0b,0xfc79,0xfcd7,0xfd1b,
+	0xfe39,0xfdcf,0xfe3a,0xfdba,0xfe34,0xfe1b,0xfe8d,0xfe50,
+	0xfde3,0xfe50,0xfdf4,0xfe09,0xfc31,0xfbdc,0xfb51,0xfc58,
+	0xfd67,0xfec5,0xff6d,0xff2e,0xff73,0xfdfd,0xfcb8,0xfad3,
+	0xfafd,0xfad2,0xfcc8,0xfe28,0xff39,0xfff9,0xffec,0xffb8,
+	0xfdd7,0xfd4b,0xfb81,0xfc00,0xfbdd,0xfd13,0xfda5,0xfe64,
+	0xff18,0xff88,0xffeb,0xfe9b,0xfe3a,0xfcaf,0xfcb6,0xfc46,
+	0xfcdb,0xfd3f,0xfe0b,0xfebf,0xfea1,0xff16,0xfe37,0xfe56,
+	0xfd92,0xfdc5,0xfc72,0xfcad,0xfc9b,0xfcb0,0xfd67,0xfd8b,
+	0xfe9c,0xfead,0xff60,0xfe62,0xfde2,0xfcca,0xfc81,0xfbe5,
+	0xfbe9,0xfd04,0xfd99,0xff37,0xff9d,0x005f,0xfeeb,0xfe50,
+	0xfc69,0xfbd8,0xfbe9,0xfc86,0xfdfd,0xfe74,0xff99,0xff16,
+	0xff75,0xfebe,0xfe9c,0xfd98,0xfceb,0xfd2f,0xfdaa,0xfe58,
+	0xfdb7,0xfde4,0xfd6c,0xfe53,0xfe34,0xfec8,0xfe3e,0xfe03,
+	0xfdc3,0xfd25,0xfd21,0xfc8b,0xfda3,0xfd9d,0xfe15,0xfde0,
+	0xfea3,0xff19,0xff5c,0xfeb6,0xfd26,0xfca1,0xfbe4,0xfd44,
+	0xfd06,0xfe21,0xfde8,0xfe86,0xfeaf,0xfea7,0xfe58,0xfd3e,
+	0xfd88,0xfcbf,0xfd54,0xfd09,0xfe01,0xfe2b,0xfed3,0xfec4,
+	0xfea4,0xfe97,0xfdff,0xfe4a,0xfd38,0xfda1,0xfcf8,0xfdb8,
+	0xfdf6,0xfdae,0xfda2,0xfdc4,0xfe83,0xfe6e,0xfedc,0xfd9a,
+	0xfd95,0xfc9c,0xfd22,0xfc34,0xfc6a,0xfcb8,0xfd64,0xfed0,
+	0xff03,0xffcf,0xfebb,0xfe8e,0xfcd5,0xfc4b,0xfb62,0xfbac,
+	0xfd06,0xfe77,0x0004,0xffb3,0xffe5,0xfe38,0xfd89,0xfc64,
+	0xfce0,0xfd0e,0xfdc4,0xfec7,0xfe82,0xfe66,0xfd94,0xfde2,
+	0xfce7,0xfd96,0xfd86,0xfe88,0xfe83,0xfe9d,0xfea1,0xfda6,
+	0xfdc1,0xfca9,0xfd02,0xfcf7,0xfe4f,0xfe20,0xfed9,0xfe1c,
+	0xfda8,0xfd66,0xfc20,0xfbcd,0xfb10,0xfc45,0xfd1e,0xff7b,
+	0xffd6,0x004f,0xffa3,0xfea9,0xfe75,0xfced,0xfc44,0xfb96,
+	0xfd2c,0xfdca,0xff93,0xff44,0xff53,0xfebd,0xfe48,0xfe50,
+	0xfcfe,0xfd0d,0xfc89,0xfdc9,0xfd7d,0xfe14,0xfd8e,0xfdfb,
+	0xfe71,0xfe65,0xfef2,0xfe1b,0xfe5f,0xfd5e,0xfd43,0xfc67,
+	0xfc79,0xfcb7,0xfda7,0xfe6c,0xfe9b,0xff46,0xfe81,0xfeb0,
+	0xfd83,0xfd52,0xfc4c,0xfc48,0xfcad,0xfdbf,0xfedf,0xff01,
+	0xff8e,0xfeb8,0xff07,0xfe4e,0xfe4d,0xfdca,0xfdd7,0xfdc8,
+	0xfd7a,0xfd55,0xfcd8,0xfda9,0xfdc6,0xff6e,0xff1d,0xffb3,
+	0xfea1,0xfe48,0xfd82,0xfccf,0xfc79,0xfc20,0xfd2a,0xfd9a,
+	0xffaf,0xffb4,0x0019,0xfef0,0xfe77,0xfd88,0xfbfc,0xfb41,
+	0xface,0xfc7f,0xfdaa,0x0010,0x0011,0xfff6,0xfedf,0xfe14,
+	0xfd47,0xfbdb,0xfb4b,0xfb2b,0xfd1e,0xfe1e,0x007b,0xfff4,
+	0x002e,0xff7a,0xfeb7,0xfde2,0xfc4c,0xfc41,0xfc79,0xfe23,
+	0xfe46,0xfea1,0xfd98,0xfde1,0xfdf5,0xfea0,0xff38,0xfed1,
+	0xff65,0xfe91,0xfe67,0xfc69,0xfbb2,0xfab4,0xfbc0,0xfd96,
+	0xff05,0x0017,0xffea,0xffd6,0xfe03,0xfd1e,0xfb3e,0xfb26,
+	0xfb5e,0xfcf3,0xfdf3,0xfe45,0xfe85,0xfe3e,0xff1c,0xfec6,
+	0xff02,0xfdb3,0xfd57,0xfcda,0xfcc6,0xfcc3,0xfc93,0xfd69,
+	0xfdbe,0xff2e,0xff33,0x000a,0xff05,0xfedf,0xfe2e,0xfd57,
+	0xfc4b,0xfbed,0xfcbc,0xfd71,0xff2f,0xfee6,0xff7a,0xff2d,
+	0xffb5,0xfebc,0xfdbb,0xfc49,0xfb1c,0xfbd9,0xfcc1,0xfe43,
+	0xfe03,0xff4b,0xff22,0xff8f,0xfec5,0xfd43,0xfc4a,0xfb6f,
+	0xfbc6,0xfbf8,0xfd1b,0xfd3d,0xff41,0xffb0,0xffd9,0xff4e,
+	0xfe3f,0xfda6,0xfc78,0xfc8e,0xfbf4,0xfd13,0xfd64,0xfee4,
+	0xff3c,0xff29,0xfece,0xfe78,0xfe5b,0xfd93,0xfd9f,0xfcbd,
+	0xfd5f,0xfd2f,0xfe98,0xfe82,0xfeb1,0xfe8e,0xfeb3,0xff05,
+	0xfe46,0xfe97,0xfd52,0xfd2c,0xfc1f,0xfc72,0xfc77,0xfdb6,
+	0xfec0,0xff76,0x0024,0xff6d,0xff33,0xfd4a,0xfcb9,0xfb29,
+	0xfbd9,0xfc6a,0xfdcc,0xff22,0xff5d,0x001b,0xff7b,0xff98,
+	0xfe4d,0xfdf9,0xfc97,0xfd14,0xfd33,0xfdb5,0xfe3b,0xfe7e,
+	0xff6a,0xff01
+};
+
+static const UINT16 G[] = {
+	0xff57,0x0008,0xff1c,0xffeb,0xff4d,0xffe3,0xff66,0xff9d,
+	0xffc0,0xff5b,0xffa6,0xff3d,0x0015,0xff27,0xffea,0xff51,
+	0xffdf,0xff72,0xff7d,0xffbc,0xff43,0xffcd,0xff04,0xfff8,
+	0xff17,0xffcc,0xff37,0xffa3,0xff58,0xff61,0xffcb,0xff34,
+	0xffca,0xff01,0xfff4,0xff19,0xffb5,0xff50,0xffb2,0xff8f,
+	0xff4d,0xffbb,0xff2e,0xffcc,0xff2d,0xffe6,0xff42,0xffb6,
+	0xff6c,0xff84,0xff9e,0xff56,0xffd9,0xff3c,0xffea,0xff27,
+	0xffe9,0xff5a,0xffbf,0xff7a,0xff7f,0xff8f,0xfee9,0x004a,
+	0x01e7,0x04cc,0x05f0,0x0717,0x05b7,0x065c,0x0697,0x0672,
+	0x07a5,0x09ba,0x0c15,0x0c97,0x0d63,0x0aa6,0x0901,0x06cf,
+	0x05d7,0x05df,0x0713,0x08ef,0x090a,0x0999,0x0900,0x0a8a,
+	0x0abb,0x0c62,0x0e3a,0x10e3,0x1222,0x11ec,0x11c6,0x10cf,
+	0x114f,0x1110,0x11f5,0x11ce,0x1242,0x11d0,0x100e,0x0f13,
+	0x0dab,0x0d54,0x0c24,0x0c36,0x0bb7,0x0d1b,0x0c51,0x0c38,
+	0x0c1d,0x0c22,0x0c4f,0x0b64,0x0b4c,0x0a36,0x0a48,0x0921,
+	0x0900,0x0819,0x0830,0x086f,0x08de,0x0972,0x08f7,0x0915,
+	0x07c5,0x0775,0x05d2,0x05b5,0x0505,0x055b,0x0646,0x0700,
+	0x07cd,0x070d,0x0746,0x0591,0x0537,0x037e,0x035e,0x0304,
+	0x0397,0x042e,0x0085,0xfc2b,0xf77b,0xf579,0xf29f,0xf1fe,
+	0xf0c8,0xf0c1,0xf071,0xf05a,0xf0d8,0xf0aa,0xf19c,0xf123,
+	0xf252,0xf1fc,0xf2e8,0xf2fe,0xf3a6,0xf423,0xf42f,0xf4e4,
+	0xf4c5,0xf59b,0xf53d,0xf642,0xf5e8,0xf69d,0xf691,0xf720,
+	0xf773,0xf772,0xf829,0xf79f,0xf8a3,0xf7e5,0xf896,0xf885,
+	0xf8ab,0xf90b,0xf926,0xf989,0xf94a,0xf9e8,0xf992,0xf9f4,
+	0xf99f,0xfa51,0xfa30,0xfa4a,0xfa7f,0xfa6c,0xfb0d,0xfabf,
+	0xfb37,0xfae4,0xfb3a,0xfb07,0xfb30,0xfb76,0xfb74,0xfba8,
+	0xfb80,0xfc14,0xfbb9,0xfc2d,0xfbe8,0xfc2d,0xfc1e,0xfc2c,
+	0xfc68,0xfc37,0xfc98,0xfc60,0xfcc4,0xfc82,0xfcd7,0xfc9f,
+	0xfcd7,0xfcbf,0xfcce,0xfce0,0xfccc,0xfd16,0xfccf,0xfd37,
+	0xfccd,0xfd37,0xfd21,0xfd33,0xfcd2,0xfd06,0xfd0c,0xfcc9,
+	0xfd4c,0xfcc8,0xfd3d,0xfccb,0xfd6d,0xfcdf,0xfd1c,0xfcef,
+	0xfd08,0xfd27,0xfce6,0xfd6a,0xfcde,0xfd56,0xfcd9,0xfd8c,
+	0xfce5,0xfd35,0xfd23,0xfd25,0xfd55,0xfce7,0xfd68,0xfcdd,
+	0xfd7f,0xfcf1,0xfd86,0xfd14,0xfd32,0xfd6d,0xfd41,0xfd87,
+	0xfd20,0xfdad,0xfd72,0xfdd6,0xfd70,0xfdb4,0xfd74,0xfd89,
+	0xfd90,0xfd6d,0xfdc1,0xfd68,0xfdc1,0xfd62,0xfe05,0xfd90,
+	0xfde4,0xfdb1,0xfdaf,0xfda5,0xfd7e,0xfdc4,0xfd62,0xfdcf,
+	0xfd79,0xfda0,0xfd7e,0xfdaf,0xfdac,0xfd8a,0xfdbe,0xfd60,
+	0xfde8,0xfd9f,0xfdda,0xfd6b,0xfdbf,0xfd89,0xfdb9,0xfda4,
+	0xfd8a,0xfdc4,0xfd73,0xfdf0,0xfd7d,0xfde8,0xfd5c,0xfdba,
+	0xfd8e,0xfd9b,0xfdac,0xfdac,0xfe14,0xfd9d,0xfe04,0xfd92,
+	0xfe0c,0xfdaa,0xfddc,0xfdd4,0xfdf5,0xfdfb,0xfdce,0xfe3f,
+	0xfdbb,0xfe26,0xfdb1,0xfe32,0xfe07,0xfe14,0xfe13,0xfdf7,
+	0xfe3a,0xfdde,0xfe52,0xfdcd,0xfe13,0xfdc1,0xfdf9,0xfdb2,
+	0xfdec,0xfdef,0xfdc0,0xfe16,0xfdb9,0xfe18,0xfdab,0xfe0e,
+	0xfde2,0xfe07,0xfdce,0xfde6,0xfdf3,0xfdd9,0xfe0a,0xfdbd,
+	0xfe45,0xfdbe,0xfe11,0xfddf,0xfe00,0xfdd3,0xfdee,0xfe27,
+	0xfdff,0xfe34,0xfde8,0xfe43,0xfdf1,0xfe24,0xfe17,0xfe29,
+	0xfe34,0xfe16,0xfe2d,0xfe03,0xfe6b,0xfdf9,0xfe2a,0xfdf2,
+	0xfe62,0xfdfd,0xfe0c,0xfe16,0xfdfc,0xfe54,0xfdd9,0xfe5b,
+	0xfdfb,0xfe51,0xfded,0xfe42,0xfe50,0xfe01,0xfe30,0xfdf9,
+	0xfe4f,0xfddd,0xfe7f,0xfe34,0xfe69,0xfe53,0xfe63,0xfe48,
+	0xfe2f,0xfe57,0xfe11,0xfe7e,0xfdfb,0xfe6a,0xfe14,0xfe75,
+	0xfe5d,0xfe84,0xfe90,0xfe4b,0xfe9a,0xfe14,0xfe8c,0xfe51,
+	0xfe98,0xfe6c,0xfebc,0xfea2,0xfeae,0xfead,0xfe56,0xfe78,
+	0xfdea,0xfe53,0xfdeb,0xfe73,0xfe40,0xfe59,0xfe70,0xfe7c,
+	0xfe48,0xfded,0xfe35,0xfd8c,0xfe21,0xfdae,0xfe39,0xfdc9,
+	0xfe2a,0xfdeb,0xfdd8,0xfe08,0xfd97,0xfdf9,0xfd5a,0xfdf7,
+	0xfd85,0xfe2e,0xfde3,0xfe0a,0xfe09,0xfdf6,0xfe28,0xfd99,
+	0xfe37,0xfdb8,0xfe65,0xfde6,0xfe4a,0xfe2d,0xfe50,0xfe67,
+	0xfe16,0xfebe,0xfe46,0xfebf,0xfe4b,0xfec9,0xfe75,0xfec4,
+	0xfead,0xfe98,0xfece,0xfe9d,0xff1e,0xfe58,0xff01,0xfe74,
+	0xfef9,0xfea8,0xff17,0xfef6,0xfecc,0xff1b,0xfed0,0xff26,
+	0xfe9c,0xff0f,0xfeab,0xfeee,0xfede,0xfeeb,0xfedd,0xfebd,
+	0xff06,0xfe8f,0xfefe,0xfe84,0xfef5,0xfec2,0xfedf,0xfec4,
+	0xfed2,0xfef5,0xfebf,0xff12,0xfe8b,0xfefa,0xfe7b,0xff00,
+	0xfe87,0xfeca,0xfeb0,0xfea9,0xfefd,0xfe86,0xff29,0xfea3,
+	0xff02,0xfe9f,0xfeed,0xfec1,0xfecd,0xfee0,0xfedb,0xfefd,
+	0xfed9,0xff59,0xfec9,0xff3a,0xfed7,0xff26,0xff00,0xff1b,
+	0xff7c,0xff2d,0xff68,0xfef9,0xff67,0xfeef,0xff56,0xfefc,
+	0xff4e,0xff25,0xff14,0xff46,0xff14,0xff5e,0xfee8,0xff5e,
+	0xfed8,0xff3b,0xfee5,0xff3f,0xff2e,0xff0b,0xff4c,0xfef0,
+	0xff62,0xfef6,0xff66,0xff06,0xff4f,0xfefc,0xff25,0xff1c,
+	0xfefc,0xff3f,0xfefc,0xff8b,0xff36,0xff8e,0xff47,0xff5f,
+	0xff61,0xff5e,0xff7d,0xff50,0xffab,0xff40,0xffc5,0xff5d,
+	0xffd3,0xff6f,0xff94,0xff84,0xffd2,0xffcd,0xff94,0x0008,
+	0xff98,0x001b,0xff98,0x0004,0xff9c,0xffdb,0xffaa,0xff90,
+	0xffcd,0xff7c,0x0000,0xff7a,0xfffa,0xff7b,0xffef,0xffcf,
+	0xffdb,0xffef,0xffc5,0x0000,0xffb0,0x0009,0xffbb,0xfff9,
+	0xffc6,0xffe3,0xffc1,0xffd5,0xffed,0xffbc,0x0001,0xffa1,
+	0x000b,0xff97,0xfff9,0xffc1,0xfffc,0xffe2,0xffd0,0x0005,
+	0xffd5,0x0018,0xffb0,0x0026,0xffcd,0xfff8,0xffef,0x002b,
+	0xffe7,0xffcf,0x0031,0xffef,0x0045,0xffcd,0x0031,0xffe9,
+	0x002d,0xfff1,0xfffc,0x0022,0xffea,0x0052,0x001a,0x0078,
+	0xffe6,0x0055,0xffda,0x0005,0xffd4,0xffd1,0xfff6,0xfff6,
+	0x008b,0x0046,0x009b,0x001b,0x008d,0x0035,0x0057,0x0048,
+	0x002b,0x0074,0x0041,0x009e,0x0047,0x00cf,0x0078,0x007e,
+	0xfff7,0x001e,0xfffc,0xfff9,0x0045,0x0024,0x0088,0xfff8,
+	0x005c,0xffc3,0xffd7,0xff72,0xffa1,0xff8e,0xffae,0x000b,
+	0xff95,0x0015,0xffa4,0xffdb,0xff63,0xff8e,0xff4c,0xff32,
+	0xff59,0xff3a,0xffba,0xff66,0xffe7,0xff6f,0xffdb,0xff6b,
+	0xff74,0xff81,0xff7f,0xffc0,0xff9f,0x0017,0xffc9,0x0043,
+	0xffd8,0x0019,0xffd1,0xffdc,0xffdf,0xffc5,0x0015,0xffd2,
+	0x0051,0xfff9,0x0073,0x000a,0x0036,0xfff1,0xfff6,0xfffd,
+	0xffb0,0x0012,0xffde,0x0049,0xffdb,0x0058,0xfff4,0x0013,
+	0xffe3,0xffd1,0xffe3,0xffa4,0x0014,0xffb3,0x0017,0xff90,
+	0xfff4,0xffc5,0xffde,0xffca,0xffa5,0xffca,0xff82,0x0006,
+	0xff81,0xffe0,0xff86,0xfffb,0xffcc,0xffce,0xffc8,0xff89,
+	0xffca,0xff6e,0x000d,0xff78,0xfffa,0xffb1,0xffe8,0xffe2,
+	0xffd5,0xffcc,0xff6a,0xffb9,0xff75,0xffee,0xff5f,0xffdc,
+	0xffd8,0xfff9,0xffd5,0xffce,0xfff3,0xff8c,0xffdd,0xff85,
+	0xffed,0xff9b,0x000c,0xffd3,0xfffe,0xffe6,0xffb5,0xffef,
+	0xffcb,0x0039,0xffbc,0x0021,0xffaa,0x000f,0xffcd,0xffc8,
+	0xffd3,0xffbc,0xffce,0xff7a,0xfffa,0xff8b,0xffcd,0xff6f,
+	0xffc5,0xffa9,0xff8a,0xffdb,0xffab,0xffd2,0xff79,0xffd7,
+	0xff65,0xffd4,0xffac,0xffd5,0xffb5,0xffac,0xffe4,0xff95,
+	0xffe1,0xff7c,0xffc6,0xff63,0xffcf,0xffa2,0xffcc,0xffca,
+	0xffb1,0xfff9,0xffb0,0x0000,0xffda,0x0004,0xffad,0xffe8,
+	0xffd2,0xffed,0xfffd,0xffd6,0x0006,0xffa4,0x001a,0xffde,
+	0x0007,0xffc2,0xfffd,0xffbb,0xffe4,0xfff4,0xffa7,0xffdc,
+	0xff70,0xffe4,0xff87,0xffaa,0xff4e,0xff91,0xffa1,0xff9b,
+	0xffb7,0xff6a,0xff9e,0xff46,0xffa2,0xff40,0xff93,0xff4c,
+	0xff86,0xff87,0xff7c,0xff9f,0xff34,0xffae,0xff59,0xffa0,
+	0xff53,0xffa0,0xffb6,0xff97,0xffa7,0xff87,0xffcd,0xff7e,
+	0xffd4,0xff90,0xffbb,0xff7b,0xffc4,0xffb9,0xff87,0xffcc,
+	0xff99,0xffcb,0xff81,0x001d,0xffcb,0xffc8,0xffc3,0xffcd,
+	0xffd2,0xff83,0xffad,0xff60,0xffa0,0xff41,0xff9a,0xff5a,
+	0xff99,0xff9f,0xffac,0xffcf,0xff73,0xffe6,0xff87,0xffa7,
+	0xff34,0xffbc,0xff99,0xffc3,0xffef,0xffe1,0xffdb,0xff9a,
+	0xffb3,0xff52,0xffa8,0xff52,0xffa6,0xff5c,0xffa1,0xffca,
+	0xffc3,0xffc3,0xff50,0xff9e,0xff08,0xff3a,0xff13,0xff6a,
+	0xff3e,0xff59,0xff69,0xff1d,0xff2e,0xfebc,0xfee7,0xfe7a,
+	0xfef2,0xfee8,0xff10,0xff08,0xff1a,0xff36,0xff08,0xff30,
+	0xfeb6,0xff04,0xfe95,0xfef9,0xfeda,0xff22,0xff22,0xff11,
+	0xff51,0xff13,0xff46,0xfec7,0xff38,0xfed8,0xff1f,0xff0b,
+	0xff38,0xff4a,0xff4a,0xff75,0xff15,0xff6c,0xfef7,0xff51,
+	0xff1e,0xff3e,0xff51,0xff3e,0xff9b,0xff5f,0xffa5,0xff45,
+	0xff7e,0xff0a,0xff7a,0xff0e,0xff57,0xff3a,0xff1f,0xff4c,0xff14,0xff76,0xff04,0xff5c,0xff10,0xff6b,0xfee7,0xff3f,
+	0xff32,0xff1d,0xff31,0xff11,0xff86,0xfef9,0xff55,0xff07,
+	0xff4a,0xfee1,0xfef1,0xff15,0xff26,0xff35,0xfed1,0xff52,
+	0xff18,0xff3b,0xff0a,0xff16,0xfef2,0xff15,0xff21,0xfee7,
+	0xff2b,0xfeff,0xff62,0xff20,0xff55,0xfefe,0xff11,0xff10,
+	0xfee0,0xff1a,0xff3d,0xfe92,0xfb0a,0xfe7a,0xff51,0xff72,
+	0xff90,0xffa7,0xffe3,0xffc8,0x003e,0xffe2,0x0052,0x0002,
+	0x007e,0x0020,0x0046,0x004a,0x002e,0x003f,0x0013,0x007c,
+	0xfffd,0x0056,0x0004,0x0059,0x000f,0x001c,0x001f,0xffff,
+	0x002f,0xffe1,0x0054,0xfff3,0x0049,0x000f,0x0045,0x0008,
+	0x0025,0x0029,0xffde,0x0023,0xffe7,0x0061,0xffe6,0x0041,
+	0xffeb,0x001d,0xfff8,0xffef,0x0035,0xffe5,0x002e,0xffd5,
+	0x0038,0xffd6,0x003f,0x0015,0x001f,0x001a,0x001c,0x004b,
+	0x0006,0x0072,0xfff0,0x006a,0x0001,0x0031,0x001c,0x0039,
+	0x005a,0xffef,0x002f,0xffd4,0x001a,0xffc0,0x0012,0xffe4,
+	0xfffa,0xffed,0xffe4,0xfff5,0xffe1,0x000c,0xffb7,0x0007,
+	0xffab,0x000b,0xffb8,0xffe3,0xffe6,0xffbf,0x0000,0xffb9,
+	0xfff4,0xffaf,0x0001,0xffb6,0xffcf,0xffd6,0xffcc,0xffd3,
+	0xffae,0xffea,0xffaf,0x001b,0xff93,0xffd8,0xffa6,0xffd1,
+	0xffae,0xffdb,0x0017,0xffc5,0x0028,0xffc0,0x000f,0xffa9,
+	0xffc9,0xff9b,0xffac,0xff8c,0xff87,0xffc3,0xff95,0x0005,
+	0xffbb,0x000b,0xffaf,0xfff1,0xffb0,0xffd7,0xffbc,0xffb3,
+	0x000d,0xffc2,0x003b,0x0001,0x002a,0xffce,0xffe5,0xffb6,
+	0xffa1,0xffaf,0xff9d,0xffe7,0xffbe,0x003d,0xffe1,0x0018,
+	0xff99,0xffc0,0xff96,0xff7a,0xff8e,0xff79,0xffd6,0xff90,
+	0xfff4,0xff89,0xffd5,0xff62,0xff75,0xff5f,0xff16,0xff4e,
+	0xff48,0xff97,0xff3b,0xffbd,0xff69,0xff92,0xff2f,0xff3d,
+	0xff41,0xff01,0xff3c,0xff14,0xff89,0xff29,0xff8d,0xff2e,
+	0xff74,0xff22,0xff32,0xff4d,0xff27,0xff91,0xff4f,0xffc0,
+	0xff5c,0xffae,0xff8e,0xff97,0xff7b,0xff86,0xffab,0xff72,
+	0xffba,0xff6f,0xffec,0xff7f,0xffe9,0xff9f,0xffc0,0xffbd,
+	0xff81,0xffc6,0xff74,0xffd9,0xff8f,0x0110,0x0300,0x051c,
+	0x05e6,0x05d6,0x052e,0x0455,0x0495,0x04cf,0x078c,0x0ac7,
+	0x0e3a,0x0fd1,0x0f44,0x0ac7,0x051c,0xffc4,0xfb50,0xfa8f,
+	0xfb9b,0xfe9a,0x019b,0x0484,0x055e,0x0521,0x020a,0xfe10,
+	0xfaff,0xf922,0xf8ae,0xf9e9,0xfda5,0x019d,0x0661,0x0917,
+	0x0a24,0x080c,0x042b,0xffbe,0xfbb3,0xfa57,0xfaf5,0xfef0,
+	0x0373,0x08f7,0x0c73,0x0e43,0x0d36,0x0a3e,0x06c0,0x03f2,
+	0x03c9,0x0564,0x0a0d,0x0ed3,0x1419,0x1787,0x18f3,0x179b,
+	0x1469,0x1159,0x0ed3,0x0eb1,0x0fbd,0x1307,0x1661,0x1a39,
+	0x1c0e,0x1bcd,0x197a,0x15c8,0x12c5,0x0f9e,0x0e7f,0x0df9,
+	0x0fab,0x1166,0x1346,0x1360,0x125e,0x0ffe,0x0c6a,0x0941,
+	0x057e,0x037d,0x0221,0x030f,0x0411,0x0594,0x0600,0x04eb,
+	0x02ae,0xff5f,0xfc2d,0xf876,0xf6fa,0xf61d,0xf7c9,0xf963,
+	0xfbf7,0xfceb,0xfcf0,0xfbda,0xf8ed,0xf664,0xf39d,0xf358,
+	0xf38e,0xf650,0xf921,0xfcae,0xfed6,0xff86,0xff15,0xfcd0,
+	0xfb39,0xf929,0xf989,0xfa59,0xfd86,0x00cc,0x04ae,0x0728,
+	0x07ce,0x078e,0x0581,0x0428,0x0243,0x0276,0x030f,0x05b2,
+	0x08ac,0x0b73,0x0d80,0x0d89,0x0cdd,0x0a68,0x087a,0x05d1,
+	0x052a,0x052d,0x0706,0x08e8,0x0aaf,0x0bd9,0x0b29,0x09e8,
+	0x06be,0x047e,0x0177,0x00cd,0x0093,0x018b,0x02da,0x03c4,
+	0x0411,0x02ce,0x0118,0xfda1,0xfafa,0xf6f7,0xf42f,0xf16a,
+	0xf008,0xf09d,0xf326,0xf884,0xfe3e,0x0448,0x0702,0x0794,
+	0x04ad,0x002f,0xfb1a,0xf7e9,0xf88c,0xfd44,0x0601,0x0eeb,
+	0x16d8,0x19e1,0x18da,0x12d4,0x0a86,0x02bc,0xfe0d,0xff5f,
+	0x0514,0x0eb7,0x173f,0x1d7f,0x1d98,0x18ad,0x0ed5,0x0396,
+	0xfa98,0xf5c2,0xf787,0xfd8f,0x06c7,0x0df3,0x11b9,0x0f2f,
+	0x078e,0xfc2f,0xf0b0,0xe86c,0xe536,0xe897,0xef80,0xf8bf,
+	0xff61,0x0231,0xff11,0xf7b0,0xed77,0xe3ca,0xde04,0xdd1b,
+	0xe273,0xea61,0xf407,0xfab1,0xfdd7,0xfb95,0xf586,0xed9a,
+	0xe6b1,0xe3c9,0xe500,0xeb75,0xf3d6,0xfcdb,0x0304,0x0659,
+	0x049f,0x002f,0xfa4f,0xf55a,0xf3d2,0xf596,0xfb9f,0x0279,
+	0x0a1f,0x0eb0,0x1121,0x0f7c,0x0bbf,0x06c8,0x0228,0x0082,
+	0x00ee,0x052e,0x09c5,0x0f25,0x125f,0x1421,0x122d,0x0e39,
+	0x0911,0x03e8,0x0139,0xffee,0x0259,0x04e7,0x08f7,0x0b99,
+	0x0ca9,0x0ab7,0x066b,0x0146,0xfbb6,0xf87b,0xf619,0xf73e,
+	0xf9c6,0xfe36,0x00f2,0x024c,0x00a3,0xfca1,0xf7fa,0xf28a,
+	0xef55,0xed3b,0xef5a,0xf2dc,0xf7f6,0xfba4,0xfdbc,0xfcc9,
+	0xf945,0xf52c,0xf055,0xede9,0xed26,0xf0a9,0xf527,0xfb07,
+	0xff59,0x01b3,0x0181,0xfe41,0xfa90,0xf5f5,0xf467,0xf484,
+	0xf89f,0xfda5,0x0381,0x077c,0x0928,0x0884,0x050d,0x0150,
+	0xfcd9,0xfba1,0xfc17,0x0007,0x044e,0x08d7,0x0bd7,0x0c89,
+	0x0b39,0x0706,0x033b,0xfedb,0xfdf7,0xfe60,0x0154,0x0466,
+	0x07ab,0x098e,0x0952,0x076d,0x02e9,0xff6b,0xfbc1,0xfaa6,
+	0xfa6f,0xfc89,0xfebd,0x0146,0x02f2,0x0280,0x010c,0xfd64,
+	0xfa97,0xf727,0xf609,0xf52a,0xf68e,0xf8b7,0xfb6c,0xfdd6,
+	0xfe02,0xfd8f,0xfaaf,0xf88a,0xf545,0xf41e,0xf3ac,0xf544,
+	0xf7f3,0xfb36,0xfe46,0xff0c,0xff4a,0xfcd9,0xfad7,0xf784,
+	0xf660,0xf68c,0xf875,0xfbeb,0xff4b,0x028e,0x038e,0x03d1,
+	0x0187,0xff05,0xfc48,0xfadb,0xfaf3,0xfccf,0xffff,0x02e9,
+	0x0613,0x06cc,0x06aa,0x0422,0x01b1,0xfebc,0xfce0,0xfcd2,
+	0xfe32,0x0145,0x03f0,0x0698,0x0654,0x0573,0x028b,0xffdc,
+	0xfce5,0xfb17,0xfb25,0xfc59,0xff5e,0x015d,0x02d1,0x01bd,
+	0x0074,0xfd4d,0xfabf,0xf79f,0xf592,0xf4f8,0xf55c,0xf773,
+	0xf965,0xfcb5,0xfe7e,0x0058,0x003e,0xff7f,0xfd7f,0xfb7a,
+	0xfa18,0xf94f,0xfaca,0xfcc7,0x00e5,0x041f,0x076a,0x0843,
+	0x072a,0x0435,0x0091,0xfe0d,0xfc3f,0xfd73,0xff9c,0x0443,
+	0x0806,0x0aec,0x0a91,0x07db,0x0335,0xfe24,0xfaa3,0xf866,
+	0xf9db,0xfc94,0x017d,0x0485,0x060f,0x0453,0x0026,0xfb0c,
+	0xf5f0,0xf336,0xf1ea,0xf3fd,0xf704,0xfbbf,0xfe8b,0xff5c,
+	0xfcff,0xf93f,0xf52b,0xf14b,0xef75,0xeece,0xf1dc,0xf56a,
+	0xfa10,0xfc49,0xfcdf,0xfb44,0xf7fb,0xf513,0xf230,0xf1c9,
+	0xf24a,0xf613,0xf9c4,0xfdb5,0xffb3,0x0027,0xff1e,0xfc8e,
+	0xfa88,0xf850,0xf885,0xf95d,0xfcca,0xffbd,0x02bf,0x045f,
+	0x04ae,0x03d1,0x0197,0xffdd,0xfddc,0xfe06,0xfe67,0x00a7,
+	0x027f,0x048c,0x059d,0x059d,0x04dc,0x029f,0x0140,0xff31,
+	0xfeb1,0xfe16,0xff94,0x0098,0x01f6,0x02a3,0x0251,0x01ea,
+	0xffa7,0xfe33,0xfbcb,0xfb09,0xf9ef,0xfacc,0xfba9,0xfd10,
+	0xfe15,0xfe33,0xfdff,0xfbe9,0xfab0,0xf837,0xf74f,0xf66d,
+	0xf739,0xf8ab,0xfa8e,0xfc5d,0xfcdf,0xfd04,0xfaaf,0xf925,
+	0xf6cc,0xf655,0xf612,0xf79e,0xfa06,0xfc3d,0xfea5,0xff27,
+	0xfedc,0xfcbc,0xfb33,0xf946,0xf8ed,0xf957,0xfb3c,0xfe0e,
+	0x0040,0x0221,0x01e8,0x014c,0xff04,0xfdbf,0xfc24,0xfc00,
+	0xfd0f,0xfedb,0x013f,0x0277,0x037e,0x029c,0x01e0,0xffec,
+	0xff00,0xfdfc,0xfdfb,0xfea9,0xff8c,0x00f7,0x0110,0x0126,
+	0x0010,0xffc8,0xfe69,0xfe25,0xfd4b,0xfd55,0xfd64,0xfd65,
+	0xfdf0,0xfdb2,0xfe0d,0xfd2e,0xfd1e,0xfc22,0xfbe4,0xfb48,
+	0xfb5f,0xfb6d,0xfb39,0xfb82,0xfaea,0xfbc4,0xfad2,0xfa19,
+	0xf980,0xf9ad,0xf985,0xf96c,0xf93d,0xf9a4,0xfae5,0xfa8a,
+	0xfbb0,0xfbdf,0xfc68,0xfc5b,0xfca7,0xfc4c,0xfbb3,0xfba3,
+	0xfb52,0xfc28,0xfc6f,0xfde6,0xfdd2,0xfe6f,0xfdf7,0xfdd5,
+	0xfd92,0xfcf3,0xfd46,0xfd66,0xfe7e,0xfe78,0xff78,0xff0f,
+	0xff46,0xfeb5,0xfe65,0xfe14,0xfdc1,0xfe84,0xfea0,0xff99,
+	0xff4d,0xffaa,0xfeea,0xfedc,0xfe7f,0xfe1a,0xfdc5,0xfd3b,
+	0xfe1d,0xfe0e,0xfed0,0xfe47,0xfe79,0xfd9c,0xfd68,0xfc58,
+	0xfb51,0xfb4a,0xfac2,0xfb38,0xfadc,0xfb95,0xfb55,0xfc9e,
+	0xfcfe,0xfdb7,0xfe01,0xfddd,0xfddb,0xfcea,0xfcaa,0xfb86,
+	0xfc13,0xfc51,0xfdf9,0xfee1,0x0016,0x00c2,0x0024,0xffd6,
+	0xfe48,0xfd98,0xfc7e,0xfd05,0xfd8c,0xff63,0x0091,0x0141,
+	0x0145,0x0004,0xfeff,0xfcca,0xfbee,0xfab5,0xfbb7,0xfc97,
+	0xfe71,0xff78,0xffab,0xff23,0xfd71,0xfc5a,0xfa59,0xf9fa,
+	0xf939,0xfa9a,0xfb9c,0xfce9,0xfd80,0xfd15,0xfc94,0xfb2b,
+	0xfa6e,0xf90c,0xf973,0xf957,0xfa5f,0xfb06,0xfb8e,0xfbdb,
+	0xfb9f,0xfbd6,0xfaf8,0xfb17,0xfaa6,0xfb53,0xfb3a,0xfbc0,
+	0xfb83,0xfb76,0xfbcc,0xfbdc,0xfcec,0xfd0e,0xfe2c,0xfdd6,
+	0xfe21,0xfd64,0xfcfd,0xfc57,0xfc29,0xfcd8,0xfd97,0xff64,
+	0xffda,0x00f7,0x0075,0xffe4,0xfe1b,0xfcce,0xfc37,0xfc2f,
+	0xfd92,0xfe84,0x0062,0x00ab,0x018c,0x0084,0xff65,0xfd32,0xfbfd,0xfb8e,0xfb88,0xfce2,0xfdef,0xffe3,0x0016,0x009c,
+	0xfede,0xfd66,0xfb46,0xfa4f,0xfa30,0xfa6f,0xfbf3,0xfcbf,
+	0xfeac,0xfeb3,0xfeaf,0xfcec,0xfb99,0xfa66,0xf9dc,0xfa24,
+	0xfa2e,0xfb9f,0xfc46
+};
+
+static const UINT16 F[] = {
+	0xfdc8,0x0007,0xfff3,0x0052,0x00e0,0x006d,0xfdb5,0xfcc7,
+	0xfc6f,0xfd36,0xfd3b,0xfd2e,0xfe76,0xff6f,0x0094,0xfff3,
+	0xff27,0xfd86,0xfce0,0xfcde,0xfda9,0xfe65,0xfe56,0xfeed,
+	0xff2e,0x000f,0xff14,0xfec8,0xfdae,0xfe4a,0xff12,0xff7b,
+	0xff2f,0xfe4c,0xfde3,0xfd06,0xfdae,0xfd59,0xfdfb,0xfe74,
+	0xff6e,0xfff6,0xff57,0xfec0,0xfd5c,0xfd15,0xfcd5,0xfe0a,
+	0xff6b,0x00c2,0x0115,0x0033,0xfe6f,0xfcc9,0xfca8,0xfcb5,
+	0xfe16,0xfe50,0xfeeb,0xfeb5,0xfed4,0xfe45,0xfdc9,0xfd27,
+	0xfcb1,0xfd61,0xfe21,0x0004,0x00a6,0x00f6,0xff15,0xfd91,
+	0xfcf2,0xfd0d,0xfd22,0xfcca,0xfd18,0xfdc0,0x000d,0x0054,
+	0x0053,0xfeb3,0xfe51,0xfe15,0xfd71,0xfd0a,0xfc90,0xfe21,
+	0xff55,0x00e9,0x002c,0xfe86,0xfce1,0xfc58,0xfc4b,0xfc80,
+	0xfda9,0xff55,0x0184,0x00f9,0xffad,0xfd3d,0xfccf,0xfd41,
+	0xfe03,0xfec5,0xfec6,0xff7b,0xff93,0xffeb,0xfefb,0xfee4,
+	0xfd5f,0xfd0d,0xfd33,0xfe0c,0xff6a,0xff35,0xff08,0xfdc2,
+	0xfd96,0xfd7f,0xfe41,0xfdb5,0xfe17,0xfe70,0xfed8,0xff18,
+	0xfdc9,0xfd63,0xfd31,0xfe57,0xfecc,0xffba,0xff62,0xff6d,
+	0xfee8,0xfe14,0xfd4f,0xfd01,0xfe6d,0xfee9,0xff84,0xfef2,
+	0xffd9,0x0040,0xffec,0xfe0a,0xfc01,0xfbb8,0xfcf7,0xffbb,
+	0x0067,0x00b0,0x0006,0xff7f,0xfe51,0xfced,0xfc80,0xfcd1,
+	0xfe37,0xff24,0x008b,0x0014,0xffd7,0xff01,0xfde4,0xfcb2,
+	0xfbde,0xfd5c,0xff4f,0x0128,0x00d8,0x002a,0xfe9a,0xfdf4,
+	0xfca7,0xfc6a,0xfd0c,0xfdc1,0xff3c,0xffe9,0x006a,0xff73,
+	0xff05,0xfd52,0xfc57,0xfc0b,0xfd10,0xff28,0x006a,0x0158,
+	0x00ce,0xffd7,0xfdf7,0xfd4a,0xfbf5,0xfc3f,0xfcbe,0xfeb5,
+	0x006d,0x00e8,0x00b5,0xfef4,0xfe2d,0xfcb5,0xfc6c,0xfc13,
+	0xfd01,0xfe9d,0x0076,0x015e,0x0070,0xffe5,0xfe7a,0xfd7a,
+	0xfbc1,0xfbbb,0xfd14,0x0000,0x0177,0x0123,0xff81,0xfd61,
+	0xfd1d,0xfc89,0xfc8b,0xfd28,0xfef7,0x00c0,0x019b,0x00ae,
+	0xfebf,0xfd57,0xfbfd,0xfca4,0xfd15,0xfe84,0xfe8e,0xff40,
+	0xff43,0xffda,0xff9c,0xfe2b,0xfd30,0xfcbc,0xfe34,0xff25,
+	0x0007,0xff52,0xfec6,0xfe4d,0xfe5e,0xfdff,0xfcce,0xfcd1,
+	0xfd49,0xfef4,0xfeae,0xff09,0xffa9,0x0021,0xff7f,0xfe04,
+	0xfc5a,0xfc1b,0xfe4c,0xffa0,0x0082,0xff7c,0xfedf,0xff0a,
+	0xfefb,0xfe13,0xfc5f,0xfc6c,0xfdd8,0x0028,0x003e,0xff3a,
+	0xfd4c,0xfd5f,0xfd81,0xfdb1,0xfda8,0xfe28,0x0068,0x0121,
+	0x00cf,0xfe65,0xfd1f,0xfcba,0xfe01,0xfeca,0xfe3e,0xfdb5,
+	0xfd67,0xff09,0xffab,0xffa5,0xfd7f,0xfc73,0xfc06,0xfdc3,
+	0xff7d,0xffaa,0xff8e,0xfeb3,0xfef6,0xfe61,0xfe21,0xfd32,
+	0xfe0c,0xfee9,0xffc8,0x004b,0xff67,0xfea6,0xfd96,0xfdd8,
+	0xfe01,0xff14,0xff43,0xff5b,0xfe8d,0xfe98,0xfed5,0xfed5,
+	0xff4e,0xfea3,0xff09,0xff25,0xff8d,0xfeae,0xfdbd,0xfd47,
+	0xfe05,0xff47,0xff0b,0xfe7e,0xfdad,0xfe72,0xfe87,0xfe52,
+	0xfc63,0xfc2f,0xfd12,0xfe13,0xfed4,0xfe59,0xfe9a,0xfe39,
+	0xfe0f,0xfcb0,0xfc2d,0xfc83,0xfe3b,0xfffd,0x005f,0xffc3,
+	0xfe74,0xfe81,0xfdee,0xfe51,0xfdc1,0xfe9a,0xffd3,0x003d,
+	0xffbb,0xfe39,0xfdf0,0xfdf3,0xfedd,0xfe7e,0xfe5a,0xfe1b,
+	0xff33,0x0050,0xfffd,0xfef4,0xfd53,0xfd74,0xfe3b,0xff99,
+	0xfeb6,0xfe9c,0xfe0b,0xfdff,0xfdbf,0xfd52,0xfdf0,0xfec2,
+	0xffef,0xff10,0xfebe,0xfdf7,0xfebd,0xfdef,0xfd29,0xfbf7,
+	0xfcb6,0xff07,0x002d,0x0038,0xfed5,0xfe77,0xfd35,0xfd7c,
+	0xfcc2,0xfd4d,0xfe28,0xff6f,0x0105,0x0089,0x0012,0xfe77,
+	0xfd89,0xfbf0,0xfc3e,0xfd9d,0xfffa,0x0151,0x009a,0xff81,
+	0xfe03,0xfe00,0xfd44,0xfd3d,0xfd42,0xfe87,0x0048,0x0160,
+	0x007b,0xfeb6,0xfd77,0xfc17,0xfc5e,0xfc2b,0xfd3c,0xfe9b,
+	0x0039,0x006d,0xff6d,0xfe17,0xfca0,0xfc7a,0xfbbd,0xfcbc,
+	0xfdc3,0x0064,0x0167,0x00f3,0xfef8,0xfd05,0xfc99,0xfccc,
+	0xfda8,0xfd56,0xfe24,0xfe87,0xff81,0xfe9d,0xfd5d,0xfca2,
+	0xfc9a,0xfd5f,0xfdf8,0xff94,0x004e,0x0126,0xffd3,0xfe66,
+	0xfd4f,0xfd5e,0xfdfd,0xfded,0xfe30,0xfdc2,0xfea9,0xff64,
+	0xffc8,0xfed1,0xfe47,0xfe20,0xfe9f,0xff0d,0xfdfd,0xfdb6,
+	0xfe6c,0x0077,0xfff1,0xfee7,0xfcad,0xfc46,0xfce9,0xfdbf,
+	0xfe1d,0xfde6,0xfef8,0x000b,0x0161,0xff72,0xfda1,0xfbf8,
+	0xfc74,0xfda4,0xfe6b,0xfe57,0xfd54,0xfd86,0xfde7,0xff04,
+	0xfeb7,0xfe32,0xfdd5,0xfdf8,0xfe0c,0xfdaa,0xfdcc,0xfdfd,
+	0xffbc,0x003c,0x0065,0xfe95,0xfd63,0xfd2a,0xfd3d,0xfda6,
+	0xfd67,0xfea5,0xff34,0xffaa,0xfea6,0xfe89,0xfdd3,0xfe1c,
+	0xfde7,0xfdb3,0xfe21,0xfe6f,0xff8b,0xff23,0xff2d,0xfe3c,
+	0xfe2a,0xfe44,0xfe1a,0xfd31,0xfcdc,0xfe71,0xffd1,0x0057,
+	0xfde8,0xfcb0,0xfc59,0xfe01,0xff1e,0xfe78,0xfdff,0xfe3f,
+	0xffe5,0xff88,0xfe2a,0xfbf3,0xfc2c,0xfd58,0xff00,0xfe9b,
+	0xfdc1,0xfde6,0xfea8,0xff32,0xfdcc,0xfd4d,0xfd42,0xff3b,
+	0xfffc,0xffda,0xff15,0xfebf,0xff6f,0xff0d,0xfee9,0xfd8e,
+	0xfd70,0xfdf8,0xff45,0xff30,0xfe57,0xfd4c,0xfd89,0xff08,
+	0xff38,0xff26,0xfe17,0xfea4,0xfe6e,0xfe9a,0xfd7a,0xfd33,
+	0xfe4f,0xff7a,0x000d,0xfe81,0xfe0a,0xfd84,0xfe19,0xfd96,
+	0xfcf6,0xfc96,0xfd02,0xfe4f,0xfe27,0xfdd2,0xfcdf,0xfd64,
+	0xfddf,0xff20,0xff67,0xffb8,0xff14,0xfe27,0xfdb5,0xfd4a,
+	0xfe9d,0xfef9,0xffd0,0xff0d,0xfe3d,0xfd28,0xfc86,0xfd63,
+	0xfe61,0xff54,0xff90,0x0013,0xff38,0xfed1,0xfd80,0xfcad,
+	0xfc4f,0xfd1e,0xfe5a,0xfeb5,0xfeed,0xfe67,0xfe9e,0xfd97,
+	0xfd43,0xfc8f,0xfd43,0xfec0,0xffc8,0xffab,0xfeca,0xfe84,
+	0xfde4,0xfe3f,0xfd74,0xfd36,0xfc67,0xfd7a,0xfee5,0xffd3,
+	0xff8b,0xfde5,0xfd69,0xfd2b,0xfd74
+};
+
+static const UINT16 D[] = {
+	0xfeb4,0xfe3e,0xfeb7,0xfe2f,0xfeba,0xfe94,0xfe6d,0xfeab,
+	0xfe4c,0xfec4,0xfe2f,0xfecf,0xfe3f,0xfea9,0xfe78,0xfeac,
+	0xfecf,0xfe9a,0xfeee,0xfe85,0xff0b,0xfe96,0xff08,0xfec2,
+	0xfef6,0xfef3,0xfee6,0xff10,0xfeb2,0xff40,0xfec2,0xff18,
+	0xfec8,0xff24,0xfef4,0xfeee,0xff13,0xfecf,0xff2f,0xfea6,
+	0xff0e,0xfe91,0xfec8,0xfe8d,0xfe92,0xfe9c,0xfe69,0xfeac,
+	0xfe47,0xfec7,0xfe47,0xfea2,0xfe63,0xfe5d,0xfe39,0xfe3a,
+	0xfe66,0xfdee,0xfe73,0xfe0d,0xfe75,0xfde9,0xfe4c,0xfe13,
+	0xfe1c,0xfe2b,0xfe07,0xfe57,0xfe0a,0xfec7,0xfdf8,0xfe8b,
+	0xfe1b,0xfe7e,0xfe55,0xfe1f,0xfe89,0xfe18,0xfea2,0xfe02,
+	0xfeb4,0xfe2e,0xfe99,0xfe60,0xfe94,0xfe95,0xfe33,0xfee0,
+	0xfe68,0xfecb,0xfe50,0xfed4,0xfe8e,0xfe91,0xfeb1,0xfe5e,
+	0xfedc,0xfe51,0xfed1,0xfe5b,0xfee5,0xfe65,0xfeb0,0xfeab,
+	0xfe8e,0xfedd,0xfe84,0xff05,0xfe79,0xff03,0xfeab,0xfee4,
+	0xfea2,0xfe9f,0xfec3,0xfe7a,0xfee8,0xfe7b,0xfee9,0xfe6c,
+	0xfebf,0xfe71,0xfe8b,0xfeaa,0xfe88,0xfee3,0xfe80,0xfed9,
+	0xfe72,0xfed7,0xfe73,0xfe90,0xfe96,0xfe5d,0xfe9b,0xfe30,
+	0xfec1,0xfe26,0xfe75,0xfe4a,0xfe84,0xfe55,0xfe6c,0xfe8e,
+	0xfe41,0xfeb2,0xfe31,0xfec3,0xfe5d,0xfe95,0xfe6d,0xfe8b,
+	0xfe9a,0xfe6e,0xfec4,0xfe42,0xfec5,0xfe4f,0xfebd,0xfe9b,
+	0xfea3,0xfe85,0xfe6b,0xfeae,0xfe66,0xfecb,0xfe5c,0xfea8,
+	0xfe3d,0xfe95,0xfe6f,0xfe5f,0xfe94,0xfe4c,0xfebe,0xfe3f,
+	0xfebe,0xfe35,0xfe6b,0xfe08,0xfe15,0xfe4f,0xfdda,0xfe4a,
+	0xfdd7,0xfe5e,0xfdd5,0xfe4d,0xfe16,0xfe2a,0xfe16,0xfdec,
+	0xfe6e,0xfdeb,0xfea1,0xfe27,0xfe93,0xfdfe,0xfe82,0xfe40,
+	0xfe3d,0xfe73,0xfe43,0xfebf,0xfe0e,0xfec4,0xfe34,0xfea9,
+	0xfe33,0xfe95,0xfe9c,0xfe4e,0xfeb2,0xfe20,0xfed0,0xfe14,
+	0xfeb8,0xfe49,0xfe8d,0xfe53,0xfe5d,0xfe8c,0xfdf7,0xfe89,
+	0xfde6,0xfe89,0xfdeb,0xfe52,0xfe15,0xfe09,0xfe62,0xfe01,
+	0xfe83,0xfde8,0xfe65,0xfdf9,0xfe61,0xfe1b,0xfe3a,0xfe55,
+	0xfe12,0xfe5e,0xfdec,0xfe82,0xfdcb,0xfe52,0xfdea,0xfe49,
+	0xfe32,0xfdff,0xfe5c,0xfde8,0xfe4c,0xfde3,0xfe77,0xfdda,
+	0xfe44,0xfe38,0xfe12,0xfe44,0xfdfd,0xfe8b,0xfdf0,0xfe96,
+	0xfe09,0xfe6e,0xfe3f,0xfe57,0xfe4b,0xfe1b,0xfe8a,0xfdff,
+	0xfea5,0xfe1e,0xfe8b,0xfdf9,0xfe42,0xfe17,0xfe03,0xfe60,
+	0xfe03,0xfe70,0xfe1f,0xff05,0xfe4b,0xfed1,0xfe8d,0xfea8,
+	0xfe96,0xfe61,0xfed6,0xfe55,0xfef6,0xfe77,0xfef4,0xfead,
+	0xfee5,0xfebc,0xfe9a,0xfed0,0xfe47,0xff1c,0xfe8a,0xfecb,
+	0xfe5f,0xfec9,0xfe8f,0xfe7b,0xfe8f,0xfe2c,0xfe7a,0xfde9,
+	0xfe62,0xfdc5,0xfe1c,0xfde9,0xfdff,0xfe27,0xfde2,0xfe51,
+	0xfdb6,0xfe2b,0xfdac,0xfe21,0xfdbe,0xfde8,0xfdda,0xfdcc,
+	0xfe10,0xfdaf,0xfe24,0xfdad,0xfe43,0xfd97,0xfdff,0xfdec,
+	0xfdc8,0xfe25,0xfde4,0xfe46,0xfdd8,0xfe60,0xfe02,0xfe58,
+	0xfe11,0xfe33,0xfe5a,0xfe0f,0xfe6f,0xfdfe,0xfe86,0xfdf8,
+	0xfe88,0xfe41,0xfe7f,0xfe68,0xfe2e,0xfe87,0xfe1a,0xfea8,
+	0xfe25,0xfe8f,0xfe36,0xfe89,0xfe76,0xfe66,0xfe7d,0xfe3d,
+	0xfeb4,0xfe26,0xfeaa,0xfe38,0xfea2,0xfec0,0xfea3,0xfedb,
+	0xfe98,0xfedd,0xfe70,0xfedd,0xfe71,0xfec7,0xfe86,0xfe90,
+	0xfea2,0xfe71,0xfeb0,0xfe58,0xfec9,0xfe83,0xfede,0xfe89,
+	0xfe9d,0xfe7b,0xfe80,0xfe97,0xfe23,0xfe91,0xfe07,0xfe7d,
+	0xfe12,0xfe5d,0xfe37,0xfe08,0xfe4e,0xfe0e,0xfe54,0xfdf3,
+	0xfe7d,0xfe2a,0xfe63,0xfe0d,0xfe5b,0xfe38,0xfe1e,0xfe6c,
+	0xfe0a,0xfe8a,0xfdfd,0xfe85,0xfe12,0xfe61,0xfe54,0xfe50,
+	0xfe7e,0xfe2b,0xfe94,0xfe0a,0xfe9a,0xfe14,0xfe8b,0xfe6e,
+	0xfe77,0xfe83,0xfe49,0xfe9d,0xfe5f,0xfe56,0xfc0c,0xfeaa,
+	0xff0c,0xff82,0xffa9,0xffa4,0x0001,0xff9e,0x002d,0xffdd,
+	0x0036,0xffda,0x003f,0x0006,0xfff2,0x003b,0xffe6,0x0052,
+	0xffde,0x0058,0xffc7,0x004b,0x0002,0x001e,0x003f,0xfffe,
+	0x006d,0xffff,0x0085,0x000d,0x0086,0x0008,0x0041,0x0052,
+	0x001d,0x007b,0x0004,0x0096,0x0013,0x0080,0x0024,0x0081,
+	0x0020,0x002f,0x0076,0x0010,0x0088,0xfff5,0x0055,0xffd6,
+	0x001c,0xfff1,0x0005,0x0013,0xffd2,0x0045,0xffd8,0x0059,
+	0xffcc,0x0044,0xffdd,0x0017,0x001c,0xffe8,0x0036,0xffdf,
+	0x0062,0xffe1,0x0065,0x0009,0x0012,0xffe5,0xffec,0xfff3,
+	0xffaa,0x000e,0xff96,0x0014,0xff90,0xffee,0xffbd,0xffe5,
+	0xffea,0xff73,0x000b,0xff93,0xfff4,0xff61,0xfff6,0xffb2,
+	0xffbc,0xffc2,0xffaa,0xffda,0xff7b,0xffd7,0xff56,0xffd0,
+	0xff73,0xffc5,0xffa8,0xffb2,0xffd6,0xff93,0xfff5,0xff68,
+	0xffc8,0xff6c,0xffc9,0xff95,0xffe3,0xfffe,0xffd9,0x0020,
+	0xffbf,0x0049,0xffc1,0x001c,0xffce,0xffff,0xfff8,0xffd0,
+	0x001a,0xffbf,0x0024,0xffb5,0x0025,0xffa6,0xffe0,0xffc7,
+	0xffc1,0xffc9,0xff73,0xffd7,0xff62,0xffe6,0xff8d,0xffc1,
+	0xff57,0xff56,0xff5c,0xff31,0xff76,0xfef8,0xff75,0xfef9,
+	0xff68,0xff1d,0xff5a,0xff3a,0xff1c,0xff66,0xff04,0xff67,
+	0xfee7,0xff7c,0xff06,0xff39,0xff29,0xff29,0xff5b,0xff1a,
+	0xff86,0xff05,0xff84,0xff28,0xff7d,0xff37,0xff6b,0xff90,
+	0xff4d,0xffb1,0xff41,0xffc4,0xff36,0xffa2,0xff5b,0xff75,
+	0xff66,0xff58,0xff97,0xff58,0xffc1,0xff46,0xffee,0xff4c,
+	0xff95,0xff67,0xff6f,0xff87,0xff39,0xff9c,0xff39,0xff8e,
+	0xff31,0xffa7,0xff65,0xff55,0xff47,0xff46,0xff8e,0xff31,
+	0xffc1,0xff36,0xffbc,0xff58,0xffa3,0xff9e,0xff6b,0xffaa,
+	0xff81,0x00e4,0x02c6,0x057b,0x068c,0x0793,0x078a,0x07ca,
+	0x07e7,0x0752,0x0874,0x09b6,0x0b30,0x0b97,0x0bec,0x094c,
+	0x0774,0x05f8,0x051c,0x061a,0x0726,0x0874,0x0838,0x0887,
+	0x0829,0x0949,0x0a4d,0x0c27,0x0f43,0x1293,0x158d,0x16d5,
+	0x18a6,0x18c1,0x198a,0x1952,0x19df,0x1a0c,0x19ef,0x1ad0,
+	0x1b75,0x1d0e,0x1d02,0x1d89,0x1c57,0x1b72,0x1a30,0x18f3,
+	0x186a,0x1777,0x17bc,0x1710,0x1777,0x1682,0x1608,0x149f,
+	0x131d,0x11b0,0x0fc9,0x0e8a,0x0c5c,0x0b9b,0x0a21,0x09c1,
+	0x089f,0x080a,0x073a,0x05d5,0x049d,0x0223,0x00a3,0xfe56,
+	0xfdef,0xfd3c,0xfd78,0xfd01,0xfc75,0xfc33,0xfb12,0xfa86,
+	0xf927,0xf945,0xf872,0xf8d8,0xf892,0xf8c4,0xf925,0xf98c,
+	0xfac5,0xfab5,0xfb85,0xfb09,0xfb88,0xfb11,0xfb99,0xfbb4,
+	0xfc3e,0xfdb7,0xfeb8,0x00aa,0x00cf,0x01a3,0x017f,0x021f,
+	0x0249,0x02a4,0x031d,0x0331,0x0430,0x0462,0x0598,0x058f,
+	0x067b,0x0698,0x0705,0x070e,0x064b,0x061f,0x0547,0x05db,
+	0x0594,0x06b2,0x05fb,0x0610,0x05aa,0x0560,0x04ef,0x0348,
+	0x0307,0x019b,0x01f3,0x011c,0x016a,0x00a4,0x005a,0x0025,
+	0xff4f,0xfe72,0xfc16,0xfacb,0xf770,0xf506,0xf1c6,0xf0a5,
+	0xf147,0xf3f9,0xf907,0xfd48,0x018c,0x028c,0x02bc,0x0048,
+	0xfe5b,0xfc8f,0xfc8a,0xff44,0x02fe,0x080d,0x0b01,0x0dcc,
+	0x0e77,0x0f1a,0x0dfc,0x0c3b,0x0a71,0x08c6,0x08fe,0x08f1,
+	0x0a5b,0x0b28,0x0d45,0x0e89,0x0f6a,0x0dff,0x0a65,0x0693,
+	0x0270,0x001e,0xfda3,0xfd63,0xfd7f,0xff13,0xfffa,0xffa4,
+	0xfdd9,0xfa0d,0xf6e6,0xf2f8,0xf0d1,0xee3d,0xed8e,0xedce,
+	0xef27,0xf064,0xf089,0xf096,0xef03,0xedf7,0xeb80,0xea1c,
+	0xe7ed,0xe7e8,0xe8f1,0xeadb,0xedfd,0xf02e,0xf2e6,0xf33f,
+	0xf3ab,0xf21d,0xf189,0xf09e,0xf14e,0xf38f,0xf5ef,0xf9aa,
+	0xfc14,0xff23,0xffdc,0x00c3,0x006c,0x009d,0x00c0,0x009f,
+	0x0203,0x02ce,0x0544,0x06ad,0x0926,0x0a39,0x0b8f,0x0bf3,
+	0x0b67,0x0a3c,0x07e5,0x06fa,0x05ca,0x0710,0x0813,0x0a44,
+	0x0b3f,0x0b31,0x0a5c,0x07ea,0x05be,0x0267,0x0142,0x002b,
+	0x00bf,0x0104,0x016f,0x0110,0xffc4,0xff43,0xfda0,0xfcbe,
+	0xfa7e,0xf958,0xf799,0xf709,0xf6c1,0xf683,0xf6ef,0xf6f0,
+	0xf812,0xf775,0xf754,0xf54f,0xf3f8,0xf2b2,0xf23b,0xf2f6,
+	0xf39d,0xf595,0xf666,0xf83d,0xf808,0xf820,0xf74f,0xf715,
+	0xf72c,0xf75f,0xf89a,0xf8fd,0xfab3,0xfb43,0xfd00,0xfe00,
+	0xff42,0xffda,0xfffd,0x0041,0xff84,0xffdd,0xff6a,0x00ad,
+	0x0186,0x03a0,0x04e5,0x05bf,0x0618,0x055c,0x04e3,0x033b,
+	0x032d,0x025a,0x034c,0x0393,0x0471,0x04d7,0x04b6,0x04f9,
+	0x03cd,0x039b,0x01b8,0x0134,0xff9d,0xff37,0xfec6,0xfef5,
+	0xff9b,0xff3f,0xffbe,0xfeb3,0xfe89,0xfc6c,0xfbab,0xfa3a,
+	0xf987,0xf94a,0xf8dc,0xf99d,0xf938,0xfa3a,0xfa2c,0xfa87,
+	0xf9b3,0xf8c5,0xf841,0xf749,0xf70c,0xf664,0xf751,0xf7ed,
+	0xf9fc,0xfab7,0xfb70,0xfb2b,0xfa4a,0xf9fb,0xf94a,0xf985,
+	0xf949,0xfb12,0xfbef,0xfda4,0xfe22,0xfe4a,0xfe98,0xfe78,
+	0xff1c,0xfe85,0xfee7,0xfe46,0xfeff,0xff49,0x0021,0x011b,
+	0x01a2,0x02b4,0x02ae,0x02fa,0x0186,0x00d1,0xff85,0xff91,0xffdd,0x00a7,0x01f2,0x0236,0x02e9,0x01f6,0x01c6,0x0019,
+	0xffc6,0xff00,0xfebe,0xfee5,0xfe6a,0xfefe,0xfe7c,0xfef3,
+	0xfe0b,0xfe1a,0xfd26,0xfc4a,0xfadb,0xf8d8,0xf7b2,0xf668,
+	0xf748,0xf80f,0xfad5,0xfc91,0xfe79,0xff12,0xfe9f,0xfd81,
+	0xfb8a,0xfb29,0xfab5,0xfcac,0xfe06,0x007d,0x01a6,0x02af,
+	0x0314,0x02a5,0x02bd,0x01d0,0x020f,0x00f3,0x015c,0x00c1,
+	0x0126,0x01ad,0x029a,0x041f,0x0408,0x046e,0x02c0,0x01b2,
+	0xff20,0xfdb0,0xfc80,0xfca1,0xfda9,0xfe4f,0xff92,0xfeba,
+	0xfe7e,0xfc92,0xfb62,0xf94d,0xf82d,0xf77f,0xf73b,0xf7d4,
+	0xf77e,0xf878,0xf810,0xf8d8,0xf880,0xf875,0xf793,0xf641,
+	0xf550,0xf3f7,0xf487,0xf47a,0xf67d,0xf791,0xf955,0xf9db,
+	0xf9f0,0xf964,0xf843,0xf7ed,0xf6f8,0xf7cc,0xf82c,0xfa0c,
+	0xfb45,0xfce4,0xfe05,0xfe49,0xfeb6,0xfdf8,0xfe3d,0xfd43,
+	0xfdc8,0xfd72,0xfea6,0xff80,0x006d,0x01b5,0x020a,0x02c5,
+	0x01e7,0x0256,0xffbb,0xfeaf,0xfe15,0xfe18,0xfeee,0xff85,
+	0x00ea,0x0229,0x0302,0x01a4,0x0167,0xffdc,0xff15,0xfe89,
+	0xfe28,0xfe77,0xfe25,0xff12,0xfebb,0xff6f,0xfedc,0xfe94,
+	0xfd72,0xfc15,0xfb19,0xfa0f,0xfa75,0xfa03,0xfb62,0xfb5a,
+	0xfc1f,0xfb77,0xfad4,0xfa49,0xf982,0xf9d5,0xf8fa,0xf9a0,
+	0xf8f9,0xf9e9,0xf9ef,0xfab3,0xfacf,0xfb31,0xfbbf,0xfb28,
+	0xfbaa,0xfa9f,0xfb26,0xfab1,0xfb8f,0xfc48,0xfd49,0xfe2c,
+	0xfe28,0xfec3,0xfdba,0xfe15,0xfd51,0xfe06,0xfdfe,0xfe9e,
+	0xff4e,0xff76,0x0058,0xffe8,0x0085,0xff87,0x001f,0xffba,
+	0xffef,0xffc9,0xff82,0x0012,0xff9c,0x005c,0x0010,0x00e2,
+	0x003a,0x0040,0xff4d,0xfea8,0xfe66,0xfddf,0xfea8,0xfe7e,
+	0xff58,0xfed4,0xfefb,0xfdfe,0xfd51,0xfcfd,0xfc89,0xfd16,
+	0xfcb9,0xfd0e,0xfc46,0xfc97,0xfc44,0xfc55,0xfc49,0xfbe7,
+	0xfc57,0xfbe1,0xfc3f,0xfb47,0xfb40,0xfa77,0xfb00,0xfb7d,
+	0xfc03,0xfc7c,0xfc47,0xfcef,0xfc2c,0xfc4a,0xfb87,0xfbf8,
+	0xfc01,0xfc80,0xfce8,0xfcb4,0xfd46,0xfcec,0xfde2,0xfdc1,
+	0xfe9b,0xfe64,0xfebe,0xfe90,0xfdf7,0xfdb7,0xfd4f,0xfe59,
+	0xfe5b,0xffea,0x0015,0x00a7,0xfff0,0xff19,0xfe6f,0xfdbe,
+	0xfe59,0xfe08,0xff5d,0xff20,0xffba,0xff05,0xfee0,0xfeac,
+	0xfe91,0xff63,0xfe74,0xfeda,0xfd7f,0xfdd5,0xfd00,0xfd40,
+	0xfd29,0xfd87,0xfe6a,0xfdf5,0xfe08,0xfc3f,0xfba2,0xfa26,
+	0xfa31,0xfa4e,0xfba1,0xfd75,0xfe7b,0xff92,0xfe7d,0xfe3e,
+	0xfc98,0xfc87,0xfc21,0xfc77,0xfcdd,0xfd5a,0xfeab,0xfed5,
+	0xfffc,0xff9f,0x0089,0xfff8,0xffe7,0xfed2,0xfda8,0xfd10,
+	0xfc76,0xfe22,0xfe81,0x0074,0x00dd,0x018d,0x0091,0xff3b,
+	0xfdcd,0xfc14,0xfc0b,0xfbd2,0xfd3b,0xfd79,0xfee2,0xfef5,
+	0xff46,0xfe91,0xfd57,0xfc94,0xfae9,0xfafa,0xfa65,0xfb4e,
+	0xfb2e,0xfc22,0xfc9b,0xfd2b,0xfd62,0xfca9,0xfc98,0xfae1,
+	0xfa94,0xf963,0xf9fb,0xfa30,0xfb3f,0xfc3d,0xfc8b,0xfd6e,
+	0xfd0d,0xfdad,0xfc4e,0xfc2e,0xfb50,0xfb64,0xfb7e,0xfbc2,
+	0xfcc9,0xfd1e,0xfe89,0xfe6d,0xff68,0xfe7d,0xfe43,0xfd56,
+	0xfcf1,0xfcea,0xfcb8,0xfe11,0xfe7a,0x0044,0x0034,0x00d0,
+	0xffa4,0xff12,0xfe71,0xfda1,0xfddc,0xfd88,0xfee7,0xfead,
+	0xffd2,0xff92,0xffea,0xff66,0xfea7,0xfe6f,0xfd71,0xfdca,
+	0xfcb4
+};
+
+static const UINT16 S[] = {
+	0xfed3,0xfecc,0xffeb,0x0161,0xfd7b,0xf9b3,0xfc51,0x020c,
+	0x0270,0xfaeb,0xf887,0xfe28,0x0537,0x00a1,0xf8e7,0xf894,
+	0xff46,0x055a,0x0365,0xfd15,0xf613,0xf80c,0x01d3,0x082c,
+	0x0106,0xf490,0xf5b3,0x03dc,0x0c42,0xffa7,0xf0e6,0xf394,
+	0x03c9,0x0d22,0x0505,0xf3ed,0xf33b,0xffb7,0x0a89,0x0487,
+	0xf64a,0xf40e,0xfda7,0x08d4,0x03f7,0xf9eb,0xf3d7,0xfae9,
+	0x0695,0x08d8,0xff8f,0xf4d0,0xf7e9,0x0292,0x07ab,0x0097,
+	0xf6d0,0xf7a4,0x002f,0x05ef,0x00fb,0xf99f,0xf6e5,0xfd3a,
+	0x05fb,0x05ca,0xf9e3,0xf34b,0xfa83,0x04a4,0x05ad,0xfc12,
+	0xf5e3,0xfa26,0x0413,0x05d8,0xfe8c,0xf8dc,0xfca3,0x017d,
+	0x0295,0xfedf,0xf707,0xf751,0xff85,0x061b,0x029a,0xfacc,
+	0xf8ac,0xfe0f,0x041d,0x01c1,0xfc2a,0xfb4c,0x011b,0x02d9,
+	0xfe19,0xf7a9,0xfae3,0xfff3,0x0169,0xff4f,0xfba4,0xfcae,
+	0xff05,0x0057,0xfddf,0xfb6a,0xfce2,0x013c,0xffd5,0xfbc9,
+	0xfda7,0x0051,0xffe7,0xf9ff,0xf71e,0xfc4a,0x03b6,0x0447,
+	0xfd83,0xf940,0xfb5e,0x01c2,0x0466,0x00bc,0xf7c0,0xf76c,
+	0x0033,0x042a,0x00e9,0xfc42,0xf9ab,0xfc1e,0x0223,0x02ac,
+	0xfe53,0xfa34,0xfbf9,0x0179,0x047a,0xfe46,0xfa9b,0xfd69,
+	0x00cb,0xff5f,0xfbd5,0xfd3e,0xfd50,0xfc95,0xfd96,0x003a,
+	0x0178,0xffd4,0xfe57,0xff2f,0x00c0,0xfddc,0xfa07,0xf898,
+	0xff70,0x0691,0x02af,0xf7b5,0xf691,0xfdd7,0x02bb,0x0205,
+	0xfbbd,0xf9e0,0xfed1,0x03f9,0xfef8,0xf8cf,0xfbc5,0xff97,
+	0x037d,0xff89,0xfb7f,0xfcde,0x0045,0xff7b,0xf9ef,0xf9be,
+	0xfeb4,0x03e6,0x0437,0xff1b,0xf78e,0xf9d5,0x02b9,0x057a,
+	0xfe89,0xf727,0xf8ea,0xfe9b,0x032d,0x02c6,0xfc58,0xf6f9,
+	0xfc0f,0x04e3,0x0689,0xfc9c,0xf7c1,0xfb67,0xff5c,0x00aa,
+	0xfd99,0xfc0c,0xfec2,0x01e6,0xff6c,0xfe32,0xfc1b,0xfa7b,
+	0xfd9b,0x02f9,0x0327,0xfc20,0xf664,0xf979,0x02ba,0x0272,
+	0xfcd1,0xf9ca,0xff82,0x0486,0x00ea,0xf889,0xf7bc,0xff28,
+	0x0383,0x01d1,0xf8c8,0xf880,0x0219,0x0706,0x00b7,0xf529,
+	0xf571,0x0283,0x0a2f,0x001d,0xf637,0xf92e,0x02ad,0x0612,
+	0xfe7d,0xf73e,0xf71a,0x01ed,0x076a,0x004a,0xf8a0,0xfa06,
+	0xff9b,0x051b,0x0142,0xf763,0xf916,0xfff9,0x040d,0x00ac,
+	0xfb36,0xfb86,0x021e,0x03b3,0xfd88,0xf6b3,0xfae5,0x0480,
+	0x04ab,0xfbb3,0xf5cf,0xfd79,0x05b4,0x0356,0xf817,0xf4f2,
+	0xfe33,0x08a2,0x047b,0xf664,0xf587,0x0070,0x06ee,0xff33,
+	0xf6f6,0xfad1,0x0249,0x01f5,0xfac7,0xfa27,0xfcef,0xffd7,
+	0x013d,0x010c,0xfc8f,0xf8f0,0xfe27,0x00c5,0x01b3,0xfc22,
+	0xfa6a,0xfc6f,0x0040,0x017b,0xfd45,0xfce3,0xfde8,0xfe5b,
+	0x0034,0xff70,0xfe88,0x001c,0xfec1,0xfd9b,0xfcaf,0xfde5,
+	0xff9c,0xfff2,0xff27,0xfd92,0xfe1a,0xfc69,0xfe39,0x00f0,
+	0x0008,0xfc7b,0xf9e6,0xfa35,0xfe5e,0x0258,0x00b9,0xfda0,
+	0xfc3f,0xff86,0x01cc,0x00a7,0xfd8d,0xfd74,0xfd0a,0xfa71,
+	0xfa80,0xfc6e,0x022c,0xff92,0xf880,0xf728,0xfd0e,0x01cb,
+	0xfedd,0xf8ba,0xf6e1,0xfc0a,0x024d,0xff98,0xf795,0xf6f4,
+	0xfb90,0x037b,0x064f,0xfed2,0xf555,0xf6a8,0x0199,0x0695,
+	0x0058,0xf6c2,0xf7bc,0x0236,0x0a1d,0x0382,0xf6fc,0xf4cf,
+	0xfbc1,0x0682,0x03a4,0xfa37,0xf600,0xfaaa,0x03e4,0x05b3,
+	0xfec7,0xf803,0xfb1a,0x03c8,0x0492,0xfb40,0xf73a,0xfd85,
+	0x075d,0x04f6,0xfa7f,0xf4e2,0xfa99,0x020e,0x027b,0xfe2e,
+	0xfa3a,0xfd39,0x02d2,0x04f7,0xfd48,0xf497,0xf85f,0x04c6,
+	0x06a6,0xfc19,0xf585,0xf999,0x0585,0x074f,0xfb20,0xf34f,
+	0xf975,0x063e,0x0a0b,0xfd80,0xf309,0xf702,0x028d,0x0a13,
+	0xffd8,0xf29f,0xf572,0x042f,0x0dca,0x034d,0xf115,0xef01,
+	0x00a2,0x0eec,0x09cd,0xf5f3,0xee7c,0xfb73,0x09f5,0x06af,
+	0xf90a,0xf291,0xf9be,0x08c4,0x08f5,0xfb25,0xf255,0xf6a1,
+	0x0471,0x0a7a,0xff43,0xf1b3,0xf595,0x03a0,0x0ba6,0x0340,
+	0xf4c3,0xf1a3,0xfc80,0x0a84,0x07a8,0xf94c,0xf153,0xf89f,
+	0x0601,0x0a62,0xfcde,0xefde,0xf4d9,0x0635,0x0e2a,0xff6f,
+	0xf091,0xf5c8,0x07e2,0x0a75,0xfb9e,0xf091,0xf89f,0x0999,
+	0x0adb,0xf964,0xef92,0xf7a0,0x055f,0x0bb0,0x0191,0xf38b,
+	0xf374,0x021d,0x0900,0x025d,0xf44c,0xf222,0x01d3,0x0aed,
+	0x0496,0xf88a,0xf584,0xfd72,0x044e,0x0488,0xfa87,0xf831,
+	0xfe06,0x048a,0x027b,0xfbd8,0xf763,0xfbef,0x05e4,0x05f5,
+	0xfc95,0xf371,0xf8bb,0x06c6,0x0b54,0xfef3,0xf362,0xf4b8,
+	0x0090,0x08bd,0x0342,0xf9b0,0xf949,0x0115,0x01ec,0xfc8f,
+	0xf9d8,0xfce0,0x002f,0x0272,0xfd01,0xfa02,0xfdb2,0x03cb,
+	0x01ef,0xf923,0xf795,0xfec5,0x0527,0x0029,0xf9a0,0xf6f9,
+	0xff34,0x0634,0x025c,0xfa35,0xf564,0xfb85,0x0597,0x0766,
+	0xfbd9,0xf0ed,0xf743,0x07ad,0x0c6b,0xfeec,0xf273,0xf5fb,
+	0x02eb,0x06c6,0xff74,0xf781,0xfa4b,0x0092,0x045b,0xfeb3,
+	0xf93f,0xfa8f,0x0060,0x04da,0xfe6f,0xf9b4,0xfb4b,0x01fb,
+	0x05f4,0xfd92,0xf645,0xfa99,0x04d6,0x058f,0xfdc1,0xf6f5,
+	0xface,0x031e,0x046e,0xfd2b,0xf391,0xf6ca,0x0194,0x0920,
+	0x03c5,0xf742,0xf487,0x0100,0x088e,0x0382,0xf956,0xf655,
+	0xfebd,0x04e8,0x024b,0xfaf1,0xf91f,0xfbac,0x021b,0x0582,
+	0xfe77,0xfa3a,0xfc15,0x011a,0xff62,0xfa55,0xf96d,0xfe38,
+	0x0249,0x008f,0xfc96,0xfd01,0x0095,0xfe9a,0xfe0b,0xfef6,
+	0xff51
+};
+
+static const UINT16 A0[] = {
+	0x022b,0x056a,0x08f9,0x0a67,0x0a83,0x08e9,0x06ee,0x0595,
+	0x04b3,0x0569,0x06a4,0x091e,0x0aa8,0x0b86,0x0a07,0x0763,
+	0x03f2,0x006c,0xfe1b,0xfc52,0xfc73,0xfcbf,0xfe1c,0xfe51,
+	0xfdd7,0xfa93,0xf4e6,0xec64,0xe10c,0xd5a0,0xcd2c,0xcdcc,
+	0xd8d0,0xee80,0x0827,0x1f61,0x2bfb,0x2ab7,0x1def,0x0b6d,
+	0xfd24,0xfb4d,0x0982,0x2358,0x41f6,0x594b,0x61d1,0x5757,
+	0x3e3a,0x209f,0x07d2,0xfcec,0x0158,0x1286,0x25ae,0x329d,
+	0x311e,0x2036,0x03dc,0xe4a6,0xcc3a,0xbed5,0xbf43,0xc905,
+	0xd71c,0xe15e,0xe3d4,0xdcbc,0xce97,0xbee6,0xb1fa,0xacfa,
+	0xafc8,0xbadb,0xca18,0xdaff,0xe8e0,0xf1bb,0xf548,0xf3f0,
+	0xf0e4,0xedb7,0xeee2,0xf478,0x0089,0x1064,0x2183,0x2f4a,
+	0x36c5,0x36eb,0x2fb1,0x2500,0x1946,0x12d6,0x12bc,0x1a3e,
+	0x24df,0x2e87,0x324b,0x2d24,0x2021,0x0ceb,0xf9a5,0xea5b,
+	0xe469,0xe64c,0xee5b,0xf6e5,0xfba0,0xf98f,0xef9c,0xe149,
+	0xd1b3,0xc6ef,0xc331,0xc843,0xd310,0xe067,0xebcd,0xf210,
+	0xf2b4,0xee01,0xe804,0xe2e4,0xe31b,0xe867,0xf390,0x010e,
+	0x0e71,0x18ab,0x1daf,0x1de2,0x1971,0x1428,0x0f38,0x0e38,
+	0x10cf,0x1767,0x1ef7,0x2565,0x2898,0x268a,0x2027,0x1527,
+	0x0a27,0x0061,0xfb7b,0xfaff,0xfe68,0x02ec,0x05a0,0x04cb,
+	0xfea7,0xf516,0xe92d,0xdfc3,0xda1f,0xda69,0xdf02,0xe6cc,
+	0xee65,0xf2a1,0xf304,0xeed7,0xe982,0xe3db,0xe24e,0xe486,
+	0xebc1,0xf5a2,0x001c,0x08a1,0x0cb9,0x0d97,0x0a84,0x06d9,
+	0x0367,0x035c,0x06b0,0x0d20,0x14c1,0x1af9,0x1eaa,0x1d98,
+	0x19f8,0x133d,0x0c69,0x0689,0x03f8,0x045e,0x06c8,0x09fb,
+	0x0b7c,0x0ad4,0x0633,0xffd0,0xf787,0xf06e,0xeb30,0xe9be,
+	0xeba1,0xef67,0xf372,0xf57c,0xf5d5,0xf2d1,0xeecb,0xe9c8,
+	0xe6df,0xe6b0,0xea5a,0xf0c4,0xf7b1,0xfdf7,0x0171,0x02e0,
+	0x0105,0xfecd,0xfc70,0xfc6a,0xff21,0x0404,0x0a44,0x0f60,
+	0x133a,0x13ac,0x1271,0x0e4e,0x0a6d,0x0706,0x05a9,0x06a2,
+	0x08a2,0x0b97,0x0cdf,0x0d0d,0x09e8,0x059a,0xff85,0xfa66,
+	0xf6ba,0xf567,0xf663,0xf81f,0xfa8e,0xfaea,0xfa53,0xf74b,
+	0xf3fa,0xf01f,0xedcc,0xed7e,0xeef2,0xf286,0xf634,0xfa28,
+	0xfc03,0xfcb8,0xfb8e,0xfa35,0xf92b,0xf95a,0xfb5a,0xfe8c,
+	0x0303
+};
+
+static const UINT16 AY0[] = {
+	0x02ae,0x04d3,0x0499,0x03e7,0x0278,0x01a2,0x015c,0xfff9,
+	0xfe2b,0xf92b,0xf35b,0xed33,0xeca1,0xf39c,0x01e2,0x120b,
+	0x1c98,0x1d85,0x13d0,0x073a,0xfdb0,0xff53,0x0c0b,0x20e7,
+	0x3455,0x3dd7,0x3a21,0x2a27,0x1773,0x0ae0,0x0c18,0x1882,
+	0x2ace,0x3848,0x3b50,0x3141,0x1df7,0x0a3d,0xfc9a,0xfaf8,
+	0x0249,0x0dca,0x1466,0x1326,0x07a3,0xf6c8,0xe621,0xda8c,
+	0xd773,0xda32,0xe0a6,0xe4f9,0xe576,0xdfac,0xd6f2,0xcd74,
+	0xc62b,0xc2f7,0xc396,0xc891,0xce5b,0xd543,0xd95e,0xda7b,
+	0xd79a,0xd36a,0xcff8,0xcfbc,0xd4d4,0xddc3,0xea1f,0xf489,
+	0xfbde,0xfcc3,0xf97e,0xf45f,0xf210,0xf5e6,0xff9a,0x0d4d,
+	0x1914,0x2095,0x2047,0x1b43,0x1398,0x0ed9,0x0f72,0x15d3,
+	0x1fdb,0x2881,0x2d5a,0x2ab1,0x2364,0x191a,0x1168,0x0ded,
+	0x0fe3,0x1561,0x19f0,0x1b4e,0x1774,0x102a,0x05dd,0xfda4,
+	0xf7a0,0xf606,0xf742,0xf9f9,0xfbde,0xfa81,0xf6a7,0xef51,
+	0xe857,0xe1a5,0xdebe,0xdebc,0xe222,0xe706,0xead4,0xec40,
+	0xe90b,0xe48c,0xdec5,0xdc42,0xdcf2,0xe26f,0xea5b,0xf1f4,
+	0xf73d,0xf7c7,0xf53a,0xf03f,0xee15,0xef0e,0xf525,0xfdf2,
+	0x0706,0x0d2f,0x0ec5,0x0ce2,0x082e,0x0497,0x0300,0x072a,
+	0x0de4,0x161f,0x1b9b,0x1cda,0x19eb,0x1408,0x0ea8,0x0a90,
+	0x0ae4,0x0da2,0x1341,0x1757,0x1898,0x153c,0x0de8,0x05fe,
+	0xff72,0xfdb9,0xfea8,0x02a7,0x059d,0x06f8,0x0485,0xfe91,
+	0xf752,0xf05d,0xecdf,0xece5,0xf0e8,0xf4b3,0xf7d8,0xf71e,
+	0xf3dc,0xeea5,0xe982,0xe6af,0xe69c,0xea72,0xef41,0xf4df,
+	0xf757,0xf735,0xf3e2,0xf04e,0xede7,0xede5,0xf19a,0xf6dd,
+	0xfdb0,0x01e0,0x0439,0x029f,0xff7c,0xfc43,0xfb89,0xfe2c,
+	0x02b9,0x08e8,0x0d1f,0x0fbf,0x0ec9,0x0be2,0x07a4,0x0504,
+	0x04e7,0x07af,0x0c24,0x0f7d,0x1177,0x0fa2,0x0c8c,0x076c,
+	0x03c6,0x01d6,0x029b,0x04df,0x0708,0x086a,0x0707,0x0487,
+	0xff95,0xfbe0,0xf861,0xf7ce,0xf903,0xfb3e,0xfd19,0xfcb7,
+	0xfb41,0xf76b,0xf47a,0xf149,0xf0fe,0xf1f1,0xf4b3,0xf7d0,
+	0xf8fd,0xf8a6,0xf611,0xf409,0xf214,0xf2e3,0xf453,0xf72c,
+	0xf9db,0xfc34,0xfd79,0xfc97,0xfb71,0xf9f5,0xfacb,0xfbcb,
+	0xfed5,0x0112
+};
+
+static const UINT16 AH0[] = {
+	0xf969,0xef06,0xe3fe,0xdb55,0xd73c,0xda30,0xe386,0xf465,
+	0x0908,0x1fe3,0x3558,0x481a,0x56a2,0x5fc1,0x639c,0x60d2,
+	0x574e,0x4654,0x2f98,0x130b,0xf49c,0xd71e,0xbe2b,0xac46,
+	0xa207,0x9fdb,0xa3cd,0xada6,0xba68,0xca13,0xda58,0xeb16,
+	0xfa82,0x07a7,0x118f,0x16bd,0x17f0,0x14f9,0x10a4,0x0b96,
+	0x084b,0x0711,0x08da,0x0d11,0x1244,0x17ef,0x1bfa,0x1f15,
+	0x1f40,0x1d8d,0x1867,0x104c,0x04d4,0xf6c1,0xe728,0xd723,
+	0xc90b,0xbdae,0xb7cf,0xb72e,0xbc7e,0xc66b,0xd464,0xe511,
+	0xf6c3,0x086e,0x181a,0x2605,0x2ffe,0x3670,0x3778,0x3442,
+	0x2cc5,0x2277,0x16e9,0x0af2,0x00ed,0xf861,0xf2c5,0xef00,
+	0xeda9,0xed36,0xee1c,0xef87,0xf100,0xf245,0xf23f,0xf1b6,
+	0xef4e,0xeca8,0xe8ef,0xe5fe,0xe439,0xe4f7,0xe834,0xeddd,
+	0xf5f8,0xff1b,0x09d5,0x13b5,0x1d4d,0x249e,0x29e6,0x2c31,
+	0x2b36,0x2710,0x1f00,0x14df,0x087f,0xfc56,0xf047,0xe6ae,
+	0xdeb7,0xda1f,0xd862,0xd93b,0xdcc6,0xe1c0,0xe8de,0xf001,
+	0xf7aa,0xfe11,0x0399,0x0744,0x0964,0x0a1a,0x0921,0x0857,
+	0x06d9,0x06d8,0x071f,0x0838,0x0970,0x0b41,0x0d32,0x0eb4,
+	0x0fbc,0x0f58,0x0e58,0x0b58,0x0776,0x0144,0xfa95,0xf30d,
+	0xebd9,0xe5f9,0xe15c,0xdf4d,0xdeef,0xe1de,0xe608,0xec74,
+	0xf35a,0xfb64,0x0387,0x0acc,0x112f,0x157a,0x186b,0x1897,
+	0x1793,0x141a,0x0ffd,0x0b20,0x065f,0x0216,0xfe14,0xfb3b,
+	0xf8f1,0xf806,0xf71a,0xf72c,0xf73b,0xf7ee,0xf800,0xf7d3,
+	0xf737,0xf60a,0xf555,0xf401,0xf347,0xf2a7,0xf3af,0xf55f,
+	0xf85d,0xfbe3,0xffeb,0x0499,0x0908,0x0d95,0x1076,0x12f4,
+	0x13b8,0x1392,0x1123,0x0d4e,0x08a2,0x032e,0xfe24,0xf8b7,
+	0xf494,0xf0f6,0xeeba,0xed9b,0xede2,0xef2a,0xf178,0xf4b2,
+	0xf7b9,0xfb42,0xfda6,0x0048,0x01e7,0x0319,0x034c,0x0361,
+	0x0347,0x036e,0x03e9,0x03ba,0x0479,0x04ae,0x0594,0x060c,
+	0x06c1,0x0701,0x06d8,0x0625,0x0462,0x0254,0xff03,0xfbfa,
+	0xf879,0xf5d5,0xf30c,0xf16d,0xf0d0,0xf0cd,0xf1eb,0xf34f,
+	0xf65e,0xf944,0xfd5b,0x00cc,0x0456,0x06f4,0x08d8,0x0a09,
+	0x09ec,0x097e,0x07e8,0x06c6,0x04b1,0x02db,0x00b5,0xff1b,
+	0xfdd6,0xfc8e,0xfbe6,0xfb34,0xfb68,0xfb3e,0xfbac,0xfb4b,
+	0xfb35,0xfaa2,0xfa13,0xf988,0xf8cf,0xf8e6,0xf8b3,0xf9c9,
+	0xfaac,0xfc25,0xfd80,0xff84,0x0186,0x0382,0x0572,0x064f,
+	0x074d,0x06a4,0x04ef,0xffdc
+};
+
+static const UINT16 P[] = {
+	0xff4f,0xff66,0xffda,0xff1c,0x0002,0xff0b,0xffb4,0xff0e,
+	0x006e,0x024b,0x0503,0x065e,0x0679,0x0702,0x0718,0x08c9,
+	0x0869,0x0993,0x0ae8,0x0dd3,0x0ffa,0x1118,0x0ee7,0x0b32,
+	0x08c9,0x067b,0x079f,0x0816,0x092f,0x099a,0x0bce,0x0d77,
+	0x0dd1,0x0c34,0x099e,0x0ad8,0x0c9e,0x0efb,0x0f08,0x1048,
+	0x10fd,0x123a,0x12b4,0x12c3,0x12eb,0x11df,0x10f9,0x0e6e,
+	0x0e2a,0x0d50,0x0df9,0x0e38,0x0ea7,0x0e06,0x0d3f,0x0d10,
+	0x0b4e,0x0ac5,0x08b9,0x08c1,0x08d0,0x0a2d,0x0a16,0x0960,
+	0x0907,0x095f,0x0abe,0x0961,0x08f3,0x07aa,0x0887,0x0802,
+	0x07e6,0x0761,0x070a,0x06ee,0x0670,0x06b2,0x05a8,0x0613,
+	0x051a,0x0580,0x0465,0x04e9,0x0548,0x0566,0x0622,0x05c5,
+	0x0642,0x047e,0x045f,0x0337,0x0389,0x02ac,0x02a6,0x037d,
+	0x0425,0x04f0,0x03e4,0x034d,0x01e1,0x0295,0x0244,0x02f9,
+	0x0254,0x02a1,0x031c,0x02f6,0x0346,0x0255,0x02cc,0x0135,
+	0x00f2,0x0096,0x01e8,0x0291,0x0322,0x02d8,0x01fe,0x0229,
+	0x01b6,0x022e,0x0150,0x01f8,0x01be,0x0291,0x01b3,0x0165,
+	0x0152,0x00b0,0x007a,0xfec4,0xff95,0x0045,0x02c6,0x0332,
+	0x033c,0x024d,0x0120,0x00a4,0xff3d,0xff60,0xff04,0x013e,
+	0x0245,0x03a0,0x020a,0x0066,0xff36,0xfe55,0xff6f,0xfee8,
+	0xffe4,0xffc5,0x01d9,0x0277,0x0346,0x023c,0x00c7,0x002b,
+	0xff8b,0x00b3,0xffc3,0x0080,0x005f,0x0245,0x02c2,0x0298,
+	0x00ec,0xfe98,0xfda7,0xfdad,0x0005,0x0055,0x013c,0x0060,
+	0x0116,0x0114,0x015c,0x00af,0xff59,0xff93,0xfeff,0x00f3,
+	0x0081,0x0088,0xff55,0xffe6,0xffea,0x001e,0xff8b,0xfe49,
+	0xff21,0xff5a,0x00cc,0xffc8,0xfffa,0xff1f,0xffc8,0x0022,
+	0x0039,0xffce,0xff0f,0x001c,0x005e,0x016b,0xffb7,0xff4b,
+	0xfeb7,0xff8e,0xff3e,0xfefd,0xff2b,0xff0c,0x0034,0xff34,
+	0xffa0,0xfee4,0xfff6,0xff90,0xff4a,0xfe4f,0xfe0b,0xff6f,
+	0xff78,0x001b,0xfeee,0xff5a,0xfec2,0xff68,0xfe88,0xfe69,
+	0xfea3,0xfeb9,0xffe0,0xff4c,0xff5e,0xfe41,0xff26,0xfe94,
+	0xff43,0xfed5,0xfeb9,0xff54,0xffb7,0x00c1,0xff02,0xfe92,
+	0xfd9e,0xfedb,0xff03,0xff4a,0xff0f,0xfeae,0xff9d,0xffdc,
+	0xffc1,0xfdbf,0xfe40,0xfe12,0xff7f,0xff4c,0xff56,0xff1d,
+	0xff37,0xffef,0xff02,0xfee3,0xfdb8,0xfed5,0xfe5c,0xfe7c,
+	0xfd6b,0xfd58,0xfe30,0xfe62,0xfefa,0xfe57,0xfebd,0xfe1c,
+	0xff4e,0xfe99,0xfef1,0xfe3c,0xfec4,0xff56,0xfeb5,0xff1f,
+	0xfe20,0xfefb,0xfeba,0xffb4,0xfebf,0xfe85,0xfe62,0xfee4,
+	0xff5b,0xfe50,0xfe83,0xfdeb,0xfeed,0xfe76,0xfeb3,0xfd89,
+	0xfe39,0xfe6f,0xfea5,0xfe8a,0xfd74,0xfddd,0xfd60,0xfe6c,
+	0xfdff,0xfec2,0xfe23,0xfe43,0xfe64,0xfdfb,0xfe32,0xfd1b,
+	0xfdbe,0xfd3c,0xfeae,0xfeb3,0xffbb,0xff84,0xff61,0xff6b,
+	0xfe5a,0xfe30,0xfcd0,0xfe0d,0xfda2,0xfe67,0xfe0e,0xfe77,
+	0xfe94,0xfe86,0xff2e,0xfe8e,0xfefa,0xfdff,0xff3e,0xfeaa,
+	0xff59,0xff2b,0xff65,0xff99,0xfee5,0xfe92,0xfcfd,0xfd54,
+	0xfc72,0xfdf9,0xfdec,0xfe9d,0xfe4d,0xfe38,0xfe04,0xfd5f,
+	0xfda7,0xfcb8,0xfdc9,0xfd88,0xff11,0xfea0,0xfe89,0xfdbd,
+	0xfd7f,0xfdb6,0xfd40,0xfd73,0xfcb5,0xfdf3,0xfd91,0xfebb,
+	0xfdd3,0xfdca,0xfdad,0xfdea,0xfe75,0xfd9f,0xfdd2,0xfd0a,
+	0xfe5c,0xfe37,0xfef9,0xfe3d,0xfe0f,0xfdc1,0xfdb2,0xfd93,
+	0xfcad,0xfd8d,0xfd7d,0xfe7f,0xfdcb,0xfe3b,0xfd63,0xfd66,
+	0xfddd,0xfd9b,0xfdb7,0xfd05,0xfe46,0xfe06,0xfefa,0xfdb3,
+	0xfd9f,0xfcfa,0xfd3d,0xfd57,0xfca0,0xfccd,0xfc5f,0xfde0,
+	0xfd5c,0xfdb6,0xfcba,0xfd3e,0xfda6,0xfe3a,0xfe36,0xfd47,
+	0xfd8e,0xfd44,0xfea0,0xfd5b,0xfd1c,0xfccc,0xfd5b,0xfde0,
+	0xfdcf,0xfd5f,0xfcd0,0xfdb2,0xfdad,0xfe95,0xfd32,0xfdcd,
+	0xfde1,0xfedc,0xfece,0xfe0c,0xfdfa,0xfd79,0xfdf1,0xfd29,
+	0xfdb3,0xfcd3,0xfdd7,0xfdfe,0xfdfc,0xfda8,0xfd0f,0xfe05,
+	0xfdd1,0xfe65,0xfd2f,0xfd94,0xfd3d,0xfe2f,0xfe07,0xfd6e,
+	0xfcdf,0xfbf3,0xfc9e,0xfc0e,0xfcb0,0xfc15,0xfd08,0xfcd8,
+	0xfda1,0xfda0,0xfcf0,0xfcd9,0xfc80,0xfd8e,0xfcb2,0xfdba,
+	0xfd57,0xfdf1,0xfd68,0xfd8b,0xfd39,0xfcf3,0xfd2a,0xfca4,
+	0xfd95,0xfd17,0xfdea,0xfd44,0xfddb,0xfd51,0xfd81,0xfde7,
+	0xfde2,0xfe23,0xfd4a,0xfe18,0xfd96,0xfe78,0xfdc5,0xfd95,
+	0xfcde,0xfca3,0xfd35,0xfc73,0xfcfe,0xfc4a,0xfd88,0xfd5a,
+	0xfe3b,0xfd88,0xfd7d,0xfd41,0xfcdb,0xfd34,0xfc8f,0xfda7,
+	0xfd70,0xfe99,0xfd8b,0xfe02,0xfd2e,0xfd4d,0xfd2f,0xfcdd,
+	0xfd1e,0xfca4,0xfd84,0xfd08,0xfdb2,0xfc8c,0xfcfe,0xfd3a,
+	0xfd30,0xfd29,0xfcae,0xfd30,0xfd01,0xfe81,0xfdd9,0xfe37,
+	0xfd58,0xfd99,0xfd96,0xfd31,0xfd23,0xfcc4,0xfd96,0xfd6d,
+	0xfe24,0xfcc1,0xfcb8,0xfbc5,0xfcb9,0xfd4c,0xfd7b,0xfd81,
+	0xfcf6,0xfd6e,0xfcc6,0xfd5a,0xfc20,0xfc92,0xfc8c,0xfd8f,
+	0xfdf6,0xfd71,0xfd58,0xfc2b,0xfcc9,0xfbed,0xfc5f,0xf800,
+	0xf281,0xed2e,0xe9e8,0xe7ba,0xe5b0,0xe551,0xe476,0xe532,
+	0xe495,0xe5a9,0xe50d,0xe61b,0xe695,0xe728,0xe7c1,0xe818,
+	0xe92d,0xe90b,0xea5e,0xea1d,0xeb64,0xeb70,0xec53,0xecd3,
+	0xed5f,0xedfb,0xedec,0xef09,0xeec3,0xefee,0xefa5,0xf083,
+	0xf098,0xf123,0xf15b,0xf187,0xf23c,0xf1d0,0xf2cf,0xf265,
+	0xf366,0xf2f8,0xf3f0,0xf3a6,0xf40f,0xf468,0xf42f,0xf4e6,
+	0xf455,0xf558,0xf4a7,0xf59f,0xf52f,0xf5e0,0xf5c2,0xf5e7,
+	0xf64c,0xf606,0xf6b9,0xf634,0xf70f,0xf666,0xf749,0xf6e2,
+	0xf762,0xf771,0xf747,0xf7a4,0xf760,0xf7e9,0xf74d,0xf84b,
+	0xf78d,0xf858,0xf811,0xf86d,0xf843,0xf844,0xf89f,0xf833,
+	0xf8b4,0xf872,0xf926,0xf876,0xf928,0xf8b1,0xf921,0xf8f9,
+	0xf917,0xf949,0xf91f,0xf982,0xf901,0xf9af,0xf946,0xf9c2,
+	0xf960,0xf9b2,0xf979,0xf99f,0xfa3d,0xf9dd,0xfa0d,0xf9a6,
+	0xfa3d,0xf9c3,0xfa19,0xf9e9,0xfa28,0xfa31,0xfa28,0xfa95,
+	0xfa39,0xfac6,0xfa38,0xfabf,0xfa41,0xfabf,0xfaa5,0xfab5,
+	0xfac1,0xfaa4,0xfb05,0xfa99,0xfb10,0xfaae,0xfb39,0xfab9,
+	0xfb1c,0xfae6,0xfaf1,0xfb1b,0xfae4,0xfb65,0xfac7,0xfb81,
+	0xfb12,0xfb65,0xfabc,0xfb28,0xfb03,0xfaf0,0xfb24,0xfaf2,
+	0xfb77,0xfb04,0xfb89,0xfaf9,0xfb7f,0xfb07,0xfb3e,0xfb67,
+	0xfb31,0xfb6f,0xfb2d,0xfba9,0xfaf6,0xfb9c,0xfb39,0xfb94,
+	0xfb43,0xfb65,0xfb7a,0xfb4c,0xfba7,0xfb6a,0xfbbe,0xfb78,
+	0xfbf1,0xfb75,0xfbdd,0xfbe6,0xfbbf,0xfbdf,0xfb90,0xfc13,
+	0xfb8d,0xfc0b,0xfb98,0xfbfb,0xfbb1,0xfc0d,0xfbe8,0xfbd9,
+	0xfc12,0xfbd3,0xfc48,0xfbdc,0xfc52,0xfb89,0xfc0b,0xfbd7,
+	0xfbf8,0xfc01,0xfbc6,0xfc2c,0xfbbf,0xfc6d,0xfba6,0xfc59,
+	0xfbe0,0xfc5a,0xfc14,0xfc3a,0xfc83,0xfc09,0xfcb1,0xfc05,
+	0xfca4,0xfc0f,0xfcbe,0xfc24,0xfca4,0xfc99,0xfc94,0xfcb8,
+	0xfc40,0xfcc1,0xfc0a,0xfcc8,0xfc45,0xfccf,0xfc3b,0xfcac,
+	0xfc98,0xfc45,0xfc92,0xfc37,0xfcbf,0xfc0c,0xfcc7,0xfc08,
+	0xfc84,0xfc3c,0xfcb2,0xfcb5,0xfc49,0xfccb,0xfc3b,0xfce2,
+	0xfc33,0xfced,0xfc6e,0xfcc4,0xfc85,0xfcb7,0xfd08,0xfc88,
+	0xfd19,0xfc9a,0xfd11,0xfc4f,0xfd0b,0xfcbd,0xfd02,0xfce6,
+	0xfcde,0xfd22,0xfc80,0xfd0f,0xfc9a,0xfd6a,0xfcbd,0xfd56,
+	0xfcf4,0xfd0a,0xfcef,0xfcc8,0xfd45,0xfcc2,0xfd5f,0xfcc2,
+	0xfd6c,0xfcd6,0xfd67,0xfd0f,0xfd1e,0xfd76,0xfd1d,0xfd82,
+	0xfcda,0xfd84,0xfce1,0xfd7d,0xfced,0xfd65,0xfd43,0xfd40,
+	0xfd6d,0xfd11,0xfda0,0xfd18,0xfde8,0xfd49,0xfdea,0xfd7b,
+	0xfdd3,0xfda2,0xfd84,0xfdd3,0xfd6c
+};
+
+static const UINT16 O0[] = {
+	0xfdf5,0xffb6,0x01e5,0x037c,0x056e,0x0659,0x064f,0x0565,
+	0x02d0,0xfee6,0xf91b,0xf356,0xedb9,0xeae3,0xe9ea,0xec26,
+	0xf08a,0xf781,0x00ab,0x0b83,0x1849,0x258d,0x3462,0x4294,
+	0x509c,0x5bb9,0x6381,0x65ed,0x6627,0x6377,0x596d,0x4d42,
+	0x3d46,0x2b5c,0x16ca,0x015d,0xea9f,0xd4b8,0xc092,0xaf70,
+	0xa1d2,0x9a3e,0x99e3,0x99b1,0x99db,0x999d,0x9cb5,0xa702,
+	0xb2f2,0xc060,0xce57,0xdc0e,0xe87f,0xf41a,0xfd22,0x054c,
+	0x0ae6,0x0f90,0x12a4,0x1504,0x16bf,0x17ad,0x18af,0x18e6,
+	0x1a4e,0x1ba4,0x1e94,0x213c,0x24c9,0x27f4,0x2b11,0x2d53,
+	0x2dfc,0x2d81,0x2afd,0x27d0,0x2247,0x1b7a,0x1243,0x07a2,
+	0xfbb1,0xef53,0xe310,0xd69e,0xcbd9,0xc22b,0xbb53,0xb62f,
+	0xb3ce,0xb33b,0xb5ba,0xba84,0xc23b,0xcb92,0xd627,0xe24a,
+	0xee6a,0xfaf2,0x063a,0x111d,0x1a07,0x21da,0x27dd,0x2bea,
+	0x2e2b,0x2e4e,0x2dae,0x2b02,0x27c9,0x2314,0x1ee3,0x1a4d,
+	0x15ef,0x11ba,0x0deb,0x0add,0x07bb,0x05bb,0x033c,0x0187,
+	0xff36,0xfd6b,0xfaf5,0xf841,0xf4e0,0xf113,0xed2c,0xe872,
+	0xe4a5,0xe034,0xdd01,0xd9e2,0xd7f7,0xd67a,0xd692,0xd824,
+	0xdabc,0xdf2e,0xe42f,0xeb25,0xf239,0xfa7b,0x026e,0x0a93,
+	0x11dc,0x18c1,0x1f0f,0x23be,0x274b,0x28c2,0x2984,0x27fc,
+	0x25c9,0x21d2,0x1d88,0x182c,0x1257,0x0c97,0x0651,0x00cf,
+	0xfb38,0xf71b,0xf2d9,0xeffb,0xed6d,0xec23,0xeb77,0xeb20,
+	0xeb3a,0xeb08,0xebc9,0xec1d,0xed53,0xed99,0xee68,0xeecf,
+	0xef8a,0xf017,0xf0a4,0xf1ba,0xf299,0xf4d4,0xf6a1,0xf98f,
+	0xfc25,0xff8c,0x02e2,0x06aa,0x0a7e,0x0e29,0x11dd,0x14a9,
+	0x179a,0x1939,0x1a84,0x1a28,0x195a,0x1776,0x153b,0x11fd,
+	0x0da9,0x0835,0x0354,0xfec2,0xf99b,0xf594,0xf12f,0xede5,
+	0xeb1e,0xe910,0xe7be,0xe6ed,0xe79c,0xe846,0xe9d9,0xeb90,
+	0xef3e,0xf1c7,0xf475,0xf718,0xf94b,0xfb98,0xfd9b,0xffcf,
+	0x00da,0x0262,0x0332,0x0493,0x0555,0x0624,0x0692,0x0723,
+	0x070c,0x071e,0x0856,0x088f,0x099e,0x0a0d,0x0abd,0x0b7f,
+	0x0b33,0x0a80,0x0954,0x0824,0x060a,0x0430,0x0170,0xff43,
+	0xfc44,0xf978,0xf66b,0xf3ec,0xf23b,0xf08e,0xef47,0xee2c,
+	0xee1e,0xedf7,0xef32,0xf04c,0xf23f,0xf450,0xf6e5,0xf9c2,
+	0xfc39,0xfee1
+};
+
+static const UINT16 I0[] = {
+	0x010c,0x0125,0x01a1,0x01c5,0x02bb,0x034b,0x0554,0x052d,
+	0x0359,0xfc24,0xf16f,0xe54b,0xdc77,0xdcd5,0xe839,0xfe72,
+	0x17b1,0x2e7c,0x393e,0x3715,0x28e6,0x1755,0x0a1a,0x07e9,
+	0x1343,0x27e3,0x3f6d,0x4fc9,0x5593,0x4d37,0x3c1f,0x2759,
+	0x158a,0x0b62,0x094b,0x0d80,0x12c6,0x1729,0x159c,0x0f80,
+	0x03c5,0xf5e5,0xe691,0xd808,0xcbae,0xc28f,0xbed6,0xbf53,
+	0xc516,0xcb22,0xd0a8,0xd114,0xccac,0xc32c,0xb86c,0xb081,
+	0xae80,0xb5ae,0xc3e6,0xd787,0xe90d,0xf5db,0xfa44,0xf882,
+	0xf2c7,0xed7f,0xedae,0xf3c8,0x0127,0x1135,0x21c1,0x2cdb,
+	0x32db,0x3210,0x2d7b,0x26a8,0x2007,0x1c58,0x1b6c,0x1e8f,
+	0x2278,0x2775,0x29a3,0x2989,0x2469,0x1b43,0x0f05,0x0180,
+	0xf68b,0xeeae,0xec94,0xed88,0xf1c8,0xf483,0xf4f0,0xf001,
+	0xe6b6,0xdb5b,0xd0be,0xcae1,0xc95f,0xce66,0xd5e5,0xdf88,
+	0xe6d1,0xead2,0xea7a,0xe78f,0xe40e,0xe1f9,0xe401,0xe8b6,
+	0xf1b1,0xfb49,0x05e8,0x0d84,0x1307,0x1523,0x14bd,0x12f9,
+	0x106c,0x1038,0x113e,0x15ca,0x1aaf,0x20ac,0x2475,0x2619,
+	0x241d,0x1e4b,0x169a,0x0e10,0x0888,0x04b7,0x0516,0x0651,
+	0x08ca,0x0940,0x0725,0x0173,0xf8f8,0xf075,0xe879,0xe454,
+	0xe24e,0xe469,0xe762,0xeb33,0xeccd,0xec8e,0xea7f,0xe70d,
+	0xe470,0xe262,0xe30f,0xe4eb,0xe9fc,0xefa1,0xf62c,0xfb92,
+	0xff7f,0x01c2,0x0194,0x00dc,0xff53,0x0033,0x0252,0x07bc,
+	0x0d46,0x1327,0x173b,0x193c,0x18fe,0x1578,0x117c,0x0d38,
+	0x0b9d,0x0ace,0x0cd1,0x0e93,0x1065,0x10b6,0x0ec5,0x0ad9,
+	0x048c,0xff03,0xf99e,0xf701,0xf563,0xf616,0xf699,0xf783,
+	0xf78f,0xf5da,0xf32a,0xeef0,0xec1c,0xe977,0xe95f,0xe9c3,
+	0xec66,0xef6b,0xf2d2,0xf5bf,0xf769,0xf81f,0xf674,0xf61c,
+	0xf589,0xf6e2,0xf95c,0xfda9,0x0244,0x06d6,0x0a48,0x0bad,
+	0x0b6e,0x08f6,0x07c3,0x066e,0x0782,0x08c7,0x0b8b,0x0dac,
+	0x0f20,0x0f6c,0x0d8a,0x0b03,0x0713,0x04f6,0x02a2,0x01f2,
+	0x00e4,0x00e0,0x009e,0x001e,0xff50,0xfd09,0xfb02,0xf7f5,
+	0xf61a,0xf379,0xf2a5,0xf1fd,0xf299,0xf38b,0xf492,0xf5dd,
+	0xf5c3,0xf5c5,0xf48c,0xf490,0xf3f7,0xf4dc,0xf5ec,0xf825,
+	0xfa92,0xfd25,0x0019
+};
+
+static const UINT16 U0[] = {
+	0xff77,0xfbb6,0xf8bc,0xf5de,0xf4d3,0xf530,0xf6bb,0xf99b,
+	0xfd69,0x02bf,0x0831,0x0f34,0x1680,0x1f87,0x2821,0x3092,
+	0x37aa,0x3d19,0x40d2,0x4217,0x4229,0x3f9a,0x3c36,0x36cf,
+	0x30a7,0x28ef,0x20bb,0x177c,0x0dba,0x04b6,0xfbf6,0xf4f1,
+	0xee85,0xea18,0xe621,0xe354,0xe0ca,0xdeb6,0xdd61,0xdc41,
+	0xdbf0,0xdab5,0xd9d5,0xd7e3,0xd629,0xd358,0xd076,0xccfa,
+	0xc985,0xc703,0xc4c2,0xc359,0xc1ec,0xc265,0xc33c,0xc5db,
+	0xc91e,0xcdca,0xd38b,0xda7b,0xe27f,0xea85,0xf326,0xfadd,
+	0x0321,0x09be,0x102c,0x1587,0x1a5c,0x1e0d,0x20be,0x2281,
+	0x22c9,0x22e8,0x21b5,0x20f5,0x1f6a,0x1e80,0x1d66,0x1cd9,
+	0x1c2b,0x1b71,0x1b2e,0x1a68,0x1a95,0x1a0b,0x1a13,0x18fb,
+	0x186c,0x16b0,0x142e,0x10b6,0x0c9a,0x0837,0x02ce,0xfded,
+	0xf804,0xf2e2,0xed66,0xe8d6,0xe426,0xe012,0xdcdb,0xda0f,
+	0xd93e,0xd874,0xd909,0xd94e,0xdaef,0xdc9d,0xdf0c,0xe1f4,
+	0xe48d,0xe749,0xe9bb,0xec98,0xeeb0,0xf155,0xf2ca,0xf4bb,
+	0xf614,0xf7c5,0xf974,0xfaec,0xfcee,0xfec4,0x0149,0x0327,
+	0x061f,0x08a5,0x0bc6,0x0e6d,0x1140,0x13e4,0x1641,0x18c8,
+	0x1a2d,0x1b9c,0x1bf1,0x1c24,0x1b34,0x1a38,0x186e,0x1696,
+	0x146a,0x1171,0x0ee8,0x0b86,0x08a6,0x0576,0x02ca,0xffbb,
+	0xfd73,0xfb4d,0xf9be,0xf87a,0xf6f4,0xf624,0xf50a,0xf483,
+	0xf339,0xf27d,0xf172,0xf0e7,0xf039,0xef50,0xee84,0xed23,
+	0xec4e,0xeb3b,0xeb13,0xea6e,0xeace,0xeb1e,0xec45,0xed81,
+	0xeecf,0xf0af,0xf235,0xf4e3,0xf70e,0xfa39,0xfcca,0xff50,
+	0x018a,0x03c6,0x05b6,0x0777,0x0900,0x09db,0x0b47,0x0bdd,
+	0x0cf3,0x0cb6,0x0cd5,0x0c71,0x0c35,0x0c0f,0x0be2,0x0bef,
+	0x0b60,0x0b9a,0x0ae0,0x0a66,0x0983,0x0942,0x08b0,0x07f6,
+	0x073d,0x0618,0x0596,0x03fd,0x02ae,0x0040,0xfe6a,0xfc73,
+	0xfb46,0xfa0b,0xf820,0xf674,0xf4b4,0xf3c6,0xf255,0xf1e1,
+	0xf0d6,0xf102,0xf11d,0xf1d7,0xf230,0xf271,0xf342,0xf3a8,
+	0xf4f0,0xf580,0xf6f7,0xf7a4,0xf8ef,0xf9b5,0xfa6d,0xfb02,
+	0xfb86,0xfc68,0xfd01,0xfe0b,0xfe83,0xffda,0x0069,0x0179,
+	0x022d,0x02f7,0x038b,0x03f7,0x0500,0x04db,0x0498,0x02d5,
+	0x009d
+};
+
+static const UINT16 Y0[] = {
+	0x0030,0xfef4,0xfbfb,0xf83e,0xf2d8,0xede2,0xea5b,0xeb95,
+	0xf1d1,0xfb18,0x0400,0x0904,0x087a,0x01c1,0xf978,0xf2f3,
+	0xf338,0xfad6,0x084a,0x1633,0x1e6d,0x1e2d,0x158f,0x09e1,
+	0x0047,0xfeb8,0x0520,0x11f9,0x1f76,0x27b7,0x26f8,0x1d06,
+	0x0f5f,0x02fd,0xfdae,0x00e4,0x0ad4,0x15fd,0x1c9c,0x1b6d,
+	0x1209,0x04a4,0xf769,0xf02e,0xf012,0xf5ff,0xfe7f,0x0459,
+	0x04c0,0xfe12,0xf39c,0xe81d,0xe097,0xde2c,0xe146,0xe793,
+	0xedad,0xf12a,0xef76,0xe9e5,0xe1e3,0xdb19,0xd7c0,0xd91b,
+	0xde65,0xe524,0xeb39,0xee15,0xedb2,0xe982,0xe4b7,0xe117,
+	0xe12c,0xe504,0xeba7,0xf37d,0xf966,0xfca3,0xfbba,0xf8a2,
+	0xf4e7,0xf335,0xf520,0xfa38,0x01e1,0x0903,0x0e28,0x0f0c,
+	0x0cdb,0x0831,0x0449,0x0332,0x05e2,0x0bf1,0x1273,0x17b0,
+	0x18ee,0x16ed,0x11d6,0x0c5f,0x0870,0x07b1,0x0aaf,0x0f95,
+	0x14a4,0x162c,0x1464,0x0efa,0x08bd,0x0363,0x0049,0x006c,
+	0x029a,0x0682,0x08d8,0x08ca,0x0530,0xff1a,0xf8d3,0xf448,
+	0xf2ff,0xf42e,0xf79a,0xfa6b,0xfc66,0xfb52,0xf74d,0xf169,
+	0xebdc,0xe952,0xea25,0xee35,0xf2d8,0xf6c8,0xf75b,0xf563,
+	0xf152,0xecd9,0xea69,0xeaa3,0xee5d,0xf398,0xf8b8,0xfb39,
+	0xfb25,0xf8b6,0xf578,0xf35c,0xf316,0xf5ee,0xfa2d,0xff91,
+	0x0386,0x04fb,0x03f5,0x0127,0xfed3,0xfdc6,0xff2b,0x01ec,
+	0x0617,0x099b,0x0c02,0x0c1a,0x0a2a,0x0792,0x04ef,0x0485,
+	0x0531,0x07c6,0x0a75,0x0c92,0x0ce8,0x0b7c,0x0900,0x0594,
+	0x0372,0x0251,0x034e,0x04d1,0x06ae,0x0751,0x067f,0x0476,
+	0x0110,0xfdcf,0xfb50,0xfb28,0xfc8a,0xfe87,0xffeb,0xffd1,
+	0xfe2b,0xfb1f,0xf858,0xf5ac,0xf4e3,0xf565,0xf766,0xf983,
+	0xfa59,0xfa14,0xf827,0xf62d,0xf3e6,0xf2e7,0xf31a,0xf505,
+	0xf7bb,0xf9ed,0xfb12,0xfa24,0xf8e6,0xf715,0xf673,0xf648,
+	0xf793,0xfa0a,0xfca8,0xff09,0xffa9,0xff72,0xfdad,0xfcbe,
+	0xfc26,0xfcb5,0xfe49,0x0097,0x035c,0x04da,0x058d,0x042a,
+	0x0298,0x00bf,0x0046,0x0100,0x02e9,0x0578,0x072f,0x0812,
+	0x06fa,0x052e,0x02aa,0x0103,0x009f,0x018c,0x0397,0x0568,
+	0x065c,0x055c,0x037c,0x004f,0xfdf0,0xfce7,0xfd9b,0xff8a,
+	0x0153,0x02aa,0x01e4,0xffbe
+};
+
+static const UINT16 T[] = {
+	0xfed5,0xff04,0xfe74,0xfedb,0xfe7d,0xff1c,0xfe5f,0xfee9,
+	0xfe74,0xfec0,0xfeb8,0xfeb2,0xfe9c,0xfe35,0xfed0,0xfe7d,
+	0xff23,0xfe75,0xfee9,0xfe97,0xff18,0xfee6,0xfef9,0xff42,
+	0xfe93,0xff27,0xfead,0xff54,0xfe76,0xff92,0x0231,0x04c5,
+	0x057f,0x0464,0x0469,0x06b3,0x09f9,0x08fb,0x079b,0x08cf,
+	0x0f22,0x14d0,0x15a0,0x1094,0x0c79,0x0ee7,0x1039,0x1149,
+	0x0e9c,0x0c21,0x0d87,0x1426,0x1679,0x116f,0x0a7a,0x08e9,
+	0x0f16,0x13ec,0x1265,0x0c66,0x0d22,0x120e,0x1451,0x0f9d,
+	0x09c6,0x0d46,0x10f1,0x1274,0x0df0,0x0a69,0x09e3,0x0c9d,
+	0x0db7,0x0b90,0x094b,0x099b,0x0d8d,0x0bf1,0x08b1,0x07d2,
+	0x0a44,0x09ce,0x062b,0x02b8,0x04d1,0x09ff,0x0a27,0x06b4,
+	0x023a,0x03b7,0x075e,0x0a7a,0x0828,0x01ce,0xff64,0x0455,
+	0x081e,0x055b,0x02b0,0xff36,0x00fd,0x0527,0x0718,0x043b,
+	0x009e,0x00df,0x03a7,0x0704,0x0261,0xff80,0xffcc,0x032d,
+	0x02f7,0x00a9,0x00a9,0x00ee,0x00cb,0x00a2,0x024b,0x0247,
+	0x024a,0x005d,0x00e5,0x01bc,0x011f,0xff20,0xfd6f,0x012e,
+	0x05df,0x0659,0xfe3a,0xfb26,0xfe36,0x0289,0x032e,0xff99,
+	0xfd94,0xff26,0x0434,0x02eb,0xfecc,0xfd43,0x00b2,0x02d8,
+	0x02cd,0xfee4,0xfdf9,0x0006,0x0094,0xff4d,0xfcaf,0xfeb9,
+	0x014d,0x03ac,0x020d,0xfe08,0xfc0c,0xffa8,0x040a,0x0174,
+	0xfd22,0xfa4e,0xfd70,0x00d6,0x0303,0x011b,0xfc79,0xfca6,
+	0x0010,0x0455,0x0032,0xfbaf,0xfb37,0xfea0,0x00c7,0x0063,
+	0xff2a,0xfe48,0x0106,0x0085,0x0046,0xfe6c,0xfd8e,0xfda6,
+	0x002f,0x0281,0x0044,0xfd3d,0xfb0d,0xff7d,0x01a4,0x0102,
+	0xfdb5,0xfe3f,0x011c,0x0178,0xfed7,0xfa93,0xfd23,0xff74,
+	0x01d4,0xfef6,0xfc5c,0xfe02,0x0263,0x0263,0xfd44,0xf9a7,
+	0xfb72,0x026b,0x0211,0xfd6a,0xfa07,0xfd86,0x01e2,0x0241,
+	0xfe48,0xfb19,0xfc36,0xfff7,0x013b,0xfc72,0xfabf,0xfbd0,
+	0xff51,0x010c,0xfe91,0xfb4d,0xfc82,0x004f,0x014b,0x0077,
+	0xfd8f,0xfe94,0x004c,0x0031,0xfd9f,0xfb42,0xfea8,0x0178,
+	0x0212,0xfdaa,0xfd27,0x000a,0x023b,0x000d,0xfb94,0xfb9c,
+	0xfed8,0x02c3,0xff4c,0xfba3,0xfba1,0x007d,0x01f7,0xff3b,
+	0xfc81,0xfd37,0xffc2,0xfe6f,0xfc64,0xfb03,0xfcce,0xfd9d,
+	0xff52,0xff0a,0xfd84,0xfcda,0xfe72,0x0008,0xffa5,0xfe00,
+	0xfc08,0xfd2f,0xfdbf,0xfe38,0xfcde,0xfcbc,0xfe5a,0xfe56,
+	0xffef,0xff6c,0xffe0,0xff52,0xff04,0xfda3,0xfd05,0xfd3f,
+	0xfd9c,0xfe64,0xfda3,0xfe1e,0xfda3,0xfe9f,0xfeb9,0x0014,
+	0xffac,0xfe1b,0xfcc0,0xfbc5,0xfd62,0xfdad,0xfde7,0xfc40,
+	0xfca7,0xfda1,0xff4d,0xff8a,0xfe83,0xfe7c,0xfda0,0xfd1d,
+	0xfbf8,0xfd8e,0xfe28,0xfdc2,0xfaf2,0xfa96,0xfd17,0xff2e,
+	0xfff6,0xfdca,0xfdda,0xfe42,0x003d,0xfe9a,0xfb7f,0xfa3e,
+	0xfb64,0xfec7,0xffea,0xff29,0xfbf5,0xfc7f,0xfed1,0x011b,
+	0xff2c,0xfc31,0xfb79,0xfd9e,0x00c8,0xff08,0xfbef,0xf9d0,
+	0xfc64,0xff6d,0x011b,0xfe39,0xfc43,0xfc9c,0xfe3e,0xff72,
+	0xfce1,0xfb5c,0xfade,0xfe0b,0xff32,0xfdb9,0xfc1e,0xfcdd,
+	0xffda,0xffff,0xfe11,0xfaa4,0xfb8c,0xfcf9,0xfe56,0xfd0b,
+	0xfb8c,0xfc00,0xfd50,0xff00,0xfd97,0xfbe5,0xfb03,0xfe5c,
+	0x000a,0xfe50,0xfb19,0xfac5,0xfd71,0xfef5,0xfde6,0xfa16,
+	0xfaf4,0xfdb3,0x0089,0xff30,0xfb3f,0xfb37,0xfd7a,0x00cf,
+	0xff03,0xfba4,0xf968,0xfd13,0x007d,0x007e,0xfcb1,0xf9ca,
+	0xfcaf,0x00b4,0x026b,0xfd8a,0xfa1d,0xfa2b,0xfeac,0x0084,
+	0xfdda,0xfb9b,0xfbac,0xff41,0x00cb,0xff7c,0xfb8b,0xfb9c,
+	0xfd7a,0x002c,0xff43,0xfb49,0xfa63,0xfc5b,0xffeb,0xffc2,
+	0xfdce,0xfaec,0xfc5f,0xfed9,0x00b1,0xfe9a,0xfaca,0xfac3,
+	0xfc7f,0xff58,0xfe33,0xfbcb,0xf9d5,0xfcb7,0xffe0,0xffd9,
+	0xfc7d,0xfa27,0xfce6,0xff1d,0xfeb5,0xfaa9,0xfa54,0xfcc8,
+	0x0043,0xff9c,0xfbcd,0xfafc,0xfccd,0x005f,0xffa1,0xfd7e,
+	0xfa7a,0xfbbd,0xff07,0xffaf,0xfdce,0xfae0,0xfb9a,0xfdf7,
+	0x002c,0xfdd6,0xfc3a,0xfb66,0xfdd5,0xfec6,0xfe38,0xfc84,
+	0xfb66,0xfd31,0xfdcd,0xfddc,0xfbac,0xfbb5,0xfc44,0xfe3a,
+	0xfdec,0xfbce,0xfb53,0xfc0a,0xfee1,0xfe4b,0xfc3e,0xf979,
+	0xfa72,0xfc8f,0xfe34,0xfe3e,0xfcf3,0xfe25,0xfe8d,0xff15,
+	0xfd21,0xfcc2,0xfd0e,0xfde7,0xfe12,0xfce5,0xfcdc,0xfcd0,
+	0xfe9c,0xfd9a,0xfd02,0xfc59,0xfe01,0xff21,0xfe52,0xfd1f,
+	0xfbe5,0xfd33,0xfdcb,0xfe2e,0xfc3d,0xfc2a,0xfcf5,0xff0a,
+	0xff44,0xfd3d,0xfba4,0xfba0,0xfe5f,0xfe92,0xfd8b,0xfb03,
+	0xfb57,0xfd0e,0xfe39,0xfdf5,0xfc6c,0xfd57,0xfd96,0xfecf,
+	0xfd2b,0xfc4e,0xfb75,0xfc34,0xfd17,0xfca0,0xfc5e,0xfc55,
+	0xfe62,0xfe9c,0xfe88,0xfc7f,0xfd04,0xfde2,0xfe8c,0xfd6f,
+	0xfbc0,0xfbf6,0xfcb2,0xfe21,0xfcf3,0xfc7a,0xfbfe,0xfe52,
+	0xffd1,0xff68,0xfdaa,0xfb61,0xfcbf,0xfd55,0xfdce,0xfbb4,
+	0xfb48,0xfc1a,0xfdd3,0xfebc,0xfd41,0xfd15,0xfce9,0xfec1,
+	0xfea5,0xfe6e,0xfc5f,0xfc19,0xfc71,0xfcc4,0xfcbe,0xfbf1,
+	0xfd15,0xfda9,0xff38,0xfe59,0xfe24,0xfd32,0xfd60,0xfd8a,
+	0xfd42,0xfd48,0xfc11,0xfcdc,0xfcd2,0xfe0a,0xfde8,0xfdc2,
+	0xfd3a,0xfddf,0xfe89,0xfda9,0xfd67,0xfc12,0xfce2,0xfcfb,
+	0xfdb0,0xfcf5,0xfcee,0xfd72,0xfd8f,0xfd83,0xfc40,0xfc48,
+	0xfbe0,0xfd90,0xfd7a,0xfd90,0xfc93,0xfc1d,0xfc9c,0xfc6d,
+	0xfd5b,0xfcfb,0xfdc1,0xfd11,0xfd5d,0xfcb2,0xfc69,0xfc68,
+	0xfc54,0xfd38,0xfceb,0xfda0,0xfd24,0xfdb0,0xfd36,0xfe00,
+	0xfd42,0xfcdd,0xfc7b,0xfc4d,0xfd3e,0xfd27,0xfd68,0xfc0d,
+	0xfcb6,0xfcdf,0xfe43,0xfdec,0xfd1d,0xfc24,0xfc12,0xfd3e,
+	0xfcdb,0xfd4f,0xfc1a,0xfcb7,0xfc78,0xfcff,0xfcd7,0xfc2b,
+	0xfcb6,0xfcb5,0xfd91,0xfce1,0xfd81,0xfd59,0xfdb6,0xfd42,
+	0xfd2e,0xfd76,0xfd71,0xfdf5,0xfcc6,0xfd20,0xfcee,0xfe2c,
+	0xfe60,0xfe4a,0xfd71,0xfcee,0xfd91,0xfd97,0xfe3e,0xfd30,
+	0xfd6d,0xfca1,0xfd53,0xfd14,0xfd39,0xfd57,0xfd14,0xfd7d,
+	0xfcbd,0xfd3d,0xfcf9,0xfe29,0xfd6f,0xfd71,0xfcc7,0xfc9e,
+	0xfd49,0xfcd2,0xfce3,0xfc16,0xfd25,0xfd7c,0xfe66,0xfd0d,
+	0xfcc5,0xfccb,0xfd4e,0xfe0b,0xfd2a,0xfcd5,0xfba9,0xfcac,
+	0xfd06,0xfe1a,0xfdc6,0xfd94,0xfd37,0xfd15,0xfdfb,0xfd2c,
+	0xfd22,0xfb88,0xfcc4,0xfcf4,0xfd69,0xfcc6,0xfbf9,0xfc61,
+	0xfcb4,0xfd90,0xfc90,0xfcb5,0xfba3,0xfc16,0xfbd4,0xfbe7,
+	0xfc4f,0xfc4b,0xfcf1,0xfcc1,0xfdf6,0xfdd2,0xfe8c,0xfe0c,
+	0xfe68,0xfda7,0xfd2e,0xfd37,0xfcb3,0xfd59,0xfc8d,0xfd0e,
+	0xfc9b,0xfd83,0xfd0c,0xfd1c,0xfd79,0xfd87,0xfe6e,0xfd93,
+	0xfd4e,0xfc7e,0xfd5c,0xfd00,0xfd80,0xfd69,0xfd80,0xfd92,
+	0xfd4d,0xfe06,0xfddf,0xfead,0xfddd,0xfe54,0xfd58,0xfd66,
+	0xfd12,0xfc8b,0xfcb2,0xfc8e,0xfda1,0xfd14,0xfdd1,0xfd79,
+	0xfe31,0xfded,0xfd2d,0xfd63,0xfd75,0xfdfe,0xfd16,0xfcf7,
+	0xfc1e,0xfd79,0xfd54,0xfe38,0xfddb
+};
+
+static const UINT16 R0[] = {
+	0x0025,0xfbcd,0xf833,0xf488,0xf128,0xee64,0xea5d,0xe64e,
+	0xdfcf,0xda46,0xd422,0xd0bb,0xd01d,0xd501,0xe03e,0xf15e,
+	0x0820,0x20cf,0x3a93,0x4fbb,0x6003,0x66e4,0x6586,0x5a73,
+	0x498f,0x34e6,0x1fd3,0x0ede,0x032a,0x007b,0x0477,0x0fb7,
+	0x1cd0,0x2a47,0x32a9,0x34e9,0x2e3a,0x1e26,0x0748,0xeac5,
+	0xce65,0xb33d,0x9f79,0x928a,0x8f93,0x9486,0xa0b6,0xb0eb,
+	0xc23a,0xd2be,0xdea4,0xe67e,0xe782,0xe559,0xdf19,0xd919,
+	0xd35d,0xd14c,0xd35e,0xda4f,0xe667,0xf4f3,0x06c6,0x17d9,
+	0x28f8,0x34a6,0x3e9d,0x43bd,0x452f,0x4246,0x3ba5,0x33f2,
+	0x2ad6,0x217d,0x17a2,0x10d8,0x0ac3,0x082f,0x06b8,0x0746,
+	0x0864,0x0912,0x0903,0x05fc,0x0161,0xf912,0xeff8,0xe3af,
+	0xd7fb,0xcc57,0xc325,0xbd0e,0xbaa7,0xbd15,0xc268,0xcc1c,
+	0xd6e7,0xe3b7,0xee34,0xf7c3,0xfdcb,0x014d,0x01b5,0xffd8,
+	0xfdeb,0xfb0a,0xfaaa,0xfb6d,0x003e,0x0658,0x1010,0x19f1,
+	0x2418,0x2c84,0x326d,0x3603,0x34be,0x3130,0x2987,0x20b5,
+	0x15cd,0x0c81,0x03b3,0xfd38,0xf8ed,0xf6da,0xf715,0xf773,
+	0xf99d,0xf9d4,0xfa4d,0xf829,0xf547,0xeffd,0xe9d7,0xe34a,
+	0xdd05,0xd87f,0xd4a9,0xd469,0xd52a,0xd9af,0xdf1a,0xe6ec,
+	0xeeac,0xf6a9,0xfdfa,0x03b5,0x084c,0x09e9,0x0b3f,0x0a3d,
+	0x09c6,0x0829,0x0831,0x081f,0x09fd,0x0d13,0x10b6,0x1562,
+	0x18f8,0x1d2f,0x1eb2,0x1fe0,0x1d80,0x1a54,0x14ac,0x0e42,
+	0x0728,0xffdc,0xf996,0xf3f8,0xf10d,0xee90,0xeef6,0xef34,
+	0xf122,0xf244,0xf3a4,0xf449,0xf375,0xf206,0xeebd,0xec6e,
+	0xe8cd,0xe71e,0xe59c,0xe614,0xe775,0xeb3d,0xf040,0xf5a7,
+	0xfbbe,0x0100,0x070f,0x0a96,0x0e04,0x0ea3,0x0f4b,0x0e0a,
+	0x0ced,0x0b5b,0x099f,0x08d5,0x07fa,0x0968,0x09f3,0x0c3a,
+	0x0d4e,0x0f6e,0x1020,0x103c,0x0eaa,0x0b55,0x07d4,0x02b3,
+	0xfe62,0xf886,0xf48b,0xf071,0xeee1,0xeddb,0xee20,0xef33,
+	0xf0ea,0xf374,0xf4c2,0xf699,0xf649,0xf6f3,0xf5b1,0xf51c,
+	0xf3d4,0xf339,0xf32c,0xf37a,0xf583,0xf75b,0xfb09,0xfdf5,
+	0x0288,0x058e,0x0925,0x0b17,0x0c9f,0x0d4e,0x0cab,0x0bde,
+	0x09e1,0x08c6,0x0659,0x05dc,0x0498,0x04a9,0x043a,0x04ef,
+	0x0535,0x04a4,0x04e0,0x03b5,0x02fa,0x007c,0xfe9d
+};
+
+static const UINT16 E0[] = {
+	0x009f,0x0229,0x0312,0x0295,0x0029,0xfdc3,0xf971,0xf53b,
+	0xefca,0xeae2,0xe712,0xe791,0xed61,0xf78f,0x02e0,0x08ba,
+	0x0840,0x003b,0xf6b0,0xefe3,0xf237,0xfd7a,0x0eb5,0x1eff,
+	0x26ea,0x2464,0x1801,0x0a85,0x01cf,0x0468,0x1073,0x21b0,
+	0x2fae,0x33fd,0x2d67,0x1e4d,0x0efd,0x0503,0x060b,0x0e8d,
+	0x1ae4,0x2377,0x23b9,0x1b8c,0x0d28,0xff3e,0xf54e,0xf325,
+	0xf64e,0xfd92,0x020a,0x01e8,0xfbe0,0xf215,0xe7f8,0xdf67,
+	0xdba4,0xdb51,0xdf34,0xe2a8,0xe5b4,0xe4f5,0xe12f,0xdb49,
+	0xd4c4,0xd057,0xce36,0xd0f7,0xd645,0xdde0,0xe336,0xe58c,
+	0xe34b,0xde39,0xd965,0xd6a0,0xd9c8,0xe0e2,0xebc3,0xf521,
+	0xfb27,0xfb00,0xf6b9,0xf134,0xee03,0xf07b,0xf7bf,0x02ed,
+	0x0ca2,0x1373,0x1408,0x102c,0x0a24,0x05ca,0x05eb,0x0ad9,
+	0x1357,0x1ae8,0x20a9,0x20e6,0x1d94,0x16ec,0x112f,0x0e2e,
+	0x0f0a,0x13b3,0x1893,0x1c79,0x1c22,0x1917,0x1246,0x0bd6,
+	0x06b1,0x0471,0x0536,0x07c5,0x0b05,0x0b54,0x0991,0x03e8,
+	0xfd54,0xf684,0xf2bc,0xf1da,0xf3af,0xf6fb,0xf8fb,0xf93c,
+	0xf58c,0xf083,0xea78,0xe6b2,0xe51c,0xe714,0xeb0e,0xeef8,
+	0xf200,0xf154,0xee84,0xe97a,0xe642,0xe51e,0xe7dd,0xec82,
+	0xf211,0xf641,0xf794,0xf723,0xf424,0xf1f8,0xf0b1,0xf340,
+	0xf7b9,0xfd4d,0x01d3,0x0423,0x04a3,0x02cb,0x016d,0xffea,
+	0x0134,0x037b,0x07e5,0x0bc3,0x0eb8,0x0f3d,0x0dc4,0x0c0f,
+	0x09b7,0x0942,0x097f,0x0c07,0x0e43,0x1038,0x1088,0x0f2f,
+	0x0d02,0x09ec,0x0833,0x069b,0x074b,0x07aa,0x089f,0x08d4,
+	0x07ee,0x05fe,0x02f7,0x003e,0xfd5a,0xfc9b,0xfc19,0xfd5d,
+	0xfdb6,0xfde8,0xfc65,0xf9b5,0xf6d1,0xf3d8,0xf312,0xf307,
+	0xf4fe,0xf64e,0xf784,0xf67f,0xf4bb,0xf251,0xf073,0xf08c,
+	0xf12c,0xf3ae,0xf57c,0xf759,0xf771,0xf73f,0xf610,0xf533,
+	0xf542,0xf5fd,0xf875,0xfa48,0xfc98,0xfd9e,0xfe83,0xfdf4,
+	0xfdc4,0xfd78,0xfdfe,0xff94,0x0134,0x03c1,0x04a3,0x05c4,
+	0x0574,0x0536,0x0412,0x03a1,0x0420,0x0519,0x06e3,0x0802,
+	0x0929,0x0818,0x0732,0x0582,0x048f,0x03f7,0x0414,0x0536,
+	0x05e0,0x068e,0x0595,0x04cb,0x0220,0x00a1,0xff87,0xff75,
+	0xfff9
+};
+
+static const UINT16 W0[] = {
+	0x0168,0x0305,0x0419,0x057a,0x0644,0x077e,0x0755,0x07d0,
+	0x0766,0x079a,0x0721,0x0616,0x0489,0x0217,0x0008,0xfcd0,
+	0xfa58,0xf75c,0xf6b9,0xf60c,0xf6ec,0xf867,0xfa31,0xfd76,
+	0x0127,0x06e1,0x0c69,0x1399,0x1a76,0x2297,0x2a09,0x3115,
+	0x3796,0x3c7b,0x4115,0x43a9,0x45e0,0x45af,0x446b,0x4143,
+	0x3ccc,0x367b,0x2e23,0x24d1,0x19e5,0x0f3e,0x0373,0xf811,
+	0xec00,0xe0ef,0xd5ef,0xcbb7,0xc259,0xba04,0xb3f3,0xaecd,
+	0xac48,0xaa61,0xaac6,0xaba3,0xae31,0xb1cb,0xb633,0xbbd4,
+	0xc1d9,0xc90b,0xcfae,0xd73d,0xdd6e,0xe423,0xe9b5,0xef32,
+	0xf46b,0xf864,0xfc54,0xff67,0x02c7,0x04a1,0x06d5,0x07fa,
+	0x09bf,0x0b02,0x0c8d,0x0e56,0x0fab,0x11ce,0x1398,0x1697,
+	0x18c2,0x1bb3,0x1dfb,0x20bc,0x2318,0x2537,0x275b,0x287c,
+	0x29e9,0x2a02,0x2a3e,0x28a6,0x26c8,0x23f6,0x208a,0x1c42,
+	0x16e1,0x11e3,0x0bbf,0x0634,0xff6c,0xf932,0xf237,0xec11,
+	0xe614,0xe041,0xdb7e,0xd6fc,0xd475,0xd1c9,0xd06e,0xcee1,
+	0xcef9,0xcf9f,0xd173,0xd3e6,0xd6b4,0xda72,0xdde9,0xe2c4,
+	0xe67f,0xeae0,0xee95,0xf2d7,0xf746,0xfb03,0xfebd,0x0187,
+	0x04a0,0x06ab,0x0918,0x0a2d,0x0b92,0x0c73,0x0da2,0x0ed4,
+	0x0f27,0x0fab,0x0fc6,0x108f,0x1084,0x1162,0x1146,0x1218,
+	0x12b8,0x1370,0x1403,0x13f1,0x147a,0x1431,0x1492,0x13cb,
+	0x139a,0x127a,0x114d,0x0fc4,0x0d67,0x0b46,0x0820,0x05ae,
+	0x022f,0xff2f,0xfb7b,0xf847,0xf4bb,0xf144,0xee27,0xeac9,
+	0xe847,0xe5b8,0xe4b4,0xe357,0xe2d9,0xe21a,0xe250,0xe32a,
+	0xe411,0xe5ba,0xe76c,0xea07,0xec41,0xef9a,0xf1e6,0xf4f8,
+	0xf78c,0xfa7e,0xfd3f,0xff90,0x022e,0x0411,0x06a4,0x07f4,
+	0x09a0,0x09fb,0x0aa6,0x0af0,0x0b2c,0x0bae,0x0b91,0x0c04,
+	0x0b9a,0x0bce,0x0b28,0x0b45,0x0a67,0x09e1,0x09c0,0x09ba,
+	0x0a07,0x09a3,0x09bd,0x0907,0x08fe,0x07da,0x0738,0x0614,
+	0x051d,0x0492,0x0394,0x02cf,0x011d,0x001a,0xfe19,0xfcf2,
+	0xfa56,0xf867,0xf64f,0xf46f,0xf36b,0xf196,0xf0ca,0xef4f,
+	0xef1c,0xee24,0xedf2,0xedca,0xede4,0xeeac,0xef36,0xf0ca,
+	0xf1d7,0xf3cb,0xf4de,0xf68f,0xf828,0xf9fd,0xfbbe,0xfd66,
+	0xff9b,0x00d7,0x02f1,0x03e5,0x0583,0x05cb,0x069c,0x06ac,
+	0x06f7,0x0734,0x072e,0x077e,0x0618,0x0555,0x02ee,0x0096
+};
+
+static const UINT16 AE0[] = {
+	0x006b,0x02fd,0x04bd,0x0578,0x04c4,0x047e,0x031f,0x02f6,
+	0x02bc,0x03a9,0x04eb,0x05b0,0x06b7,0x062d,0x05cf,0x0370,
+	0x011e,0xfd36,0xf7ab,0xef8c,0xe387,0xd606,0xc8d1,0xc351,
+	0xc943,0xdd49,0xfd9a,0x22a7,0x44c2,0x59e6,0x5ef2,0x523d,
+	0x3a85,0x2010,0x0cad,0x07cc,0x10de,0x2540,0x3ad4,0x49ea,
+	0x4af4,0x3c3d,0x20aa,0xfd8b,0xdc55,0xc208,0xb412,0xb112,
+	0xb6d5,0xc1cb,0xccf5,0xd690,0xdb57,0xdd2f,0xdb2a,0xd7bb,
+	0xd3c0,0xd03b,0xd0dc,0xd5e0,0xe25d,0xf43f,0x0b69,0x2363,
+	0x3798,0x445a,0x4576,0x3caf,0x2acf,0x1733,0x068a,0xfdc5,
+	0xff04,0x077b,0x1406,0x1cd4,0x1f13,0x16a7,0x04f4,0xed8a,
+	0xd577,0xc351,0xb8fe,0xb945,0xc128,0xcf1a,0xde7a,0xeb77,
+	0xf4b9,0xf7fb,0xf815,0xf503,0xf289,0xf181,0xf3a4,0xf9f8,
+	0x037d,0x1186,0x1f86,0x2cc2,0x3547,0x37f2,0x33ec,0x2911,
+	0x1ac3,0x0a3e,0xfcad,0xf3dd,0xf239,0xf638,0xfc77,0x0250,
+	0x033d,0xff6d,0xf4e6,0xe727,0xd8b2,0xcd45,0xc871,0xca66,
+	0xd47c,0xe22e,0xf186,0xfea3,0x07e2,0x0c88,0x0c00,0x0957,
+	0x0521,0x0359,0x03b1,0x07a7,0x0ead,0x16d6,0x1f40,0x24e1,
+	0x27b7,0x2504,0x1df1,0x12ef,0x062a,0xfa4a,0xf023,0xeb04,
+	0xe95c,0xec0e,0xf040,0xf4cb,0xf77c,0xf607,0xf1df,0xea44,
+	0xe386,0xde27,0xdcf0,0xe0bd,0xe8bc,0xf4bd,0x00a1,0x0be6,
+	0x12cf,0x15f7,0x153d,0x11c5,0x0db9,0x093c,0x07ad,0x080a,
+	0x0bc5,0x1043,0x143f,0x169d,0x15a0,0x1250,0x0b07,0x0236,
+	0xf7c2,0xeea2,0xe857,0xe572,0xe6e6,0xea27,0xef90,0xf3d4,
+	0xf72e,0xf806,0xf5f4,0xf2bd,0xeec0,0xed64,0xee27,0xf2d2,
+	0xf9a9,0x0218,0x0aff,0x11c4,0x1687,0x16fd,0x1537,0x10ae,
+	0x0be3,0x0784,0x0439,0x03c7,0x0407,0x0645,0x07f4,0x08fd,
+	0x07c5,0x0432,0xff54,0xf845,0xf203,0xebd9,0xe8bc,0xe7d5,
+	0xe99c,0xee5f,0xf370,0xf937,0xfc62,0xfe81,0xfe54,0xfcfe,
+	0xfb37,0xf948,0xfa24,0xfc6c,0x01f6,0x07d3,0x0dda,0x1244,
+	0x1404,0x13aa,0x0fe5,0x0b5d,0x0539,0x009f,0xfd9a,0xfc95,
+	0xfd53,0xfe06,0xffec,0x0003,0xff6e,0xfceb,0xf90e,0xf4e7,
+	0xf0a7,0xee87,0xed4e,0xeebf,0xf17e,0xf5f2,0xfaf3,0xff33,
+	0x02db,0x03e7,0x0469,0x0320,0x021f,0x016b,0x0167,0x0328,
+	0x0551,0x0931,0x0bc0,0x0e00,0x0e5b,0x0ca7,0x0938,0x0465,
+	0x007a,0xfc46,0xfa42,0xf8fb,0xf973,0xfacc,0xfbcf,0xfd1e,
+	0xfc79,0xfbc7,0xf97c,0xf76d,0xf590,0xf497,0xf53e,0xf679,
+	0xf9cf,0xfcd1,0x00e4
+};
+
+static const UINT16 UH0[] = {
+	0x0139,0xfc6a,0xf4ef,0xe986,0xde57,0xd5f0,0xd464,0xdaea,
+	0xe9f0,0x0078,0x1a4d,0x3558,0x4df3,0x61d4,0x660a,0x65f4,
+	0x665d,0x65a8,0x65f6,0x5fe0,0x432d,0x2218,0x0005,0xde9b,
+	0xc2f2,0xae07,0xa130,0x9b6a,0x9c16,0xa152,0xa93a,0xb34d,
+	0xbdf2,0xcab8,0xd545,0xde31,0xe3ea,0xe703,0xe6ec,0xe5c5,
+	0xe4f6,0xe6a7,0xecc0,0xf670,0x04d7,0x147b,0x257d,0x3498,
+	0x4234,0x4be5,0x517f,0x5230,0x4d69,0x4385,0x3364,0x1f62,
+	0x071f,0xeee0,0xd77d,0xc47e,0xb666,0xae0c,0xab5c,0xadac,
+	0xb4fe,0xbe90,0xcaf2,0xd785,0xe503,0xf0df,0xfb6f,0x02c6,
+	0x0778,0x0991,0x09f8,0x0a39,0x0a2e,0x0c43,0x0f52,0x14ce,
+	0x1acd,0x2202,0x2859,0x2d87,0x30e1,0x3184,0x2f85,0x295b,
+	0x207d,0x138a,0x051e,0xf492,0xe48c,0xd550,0xc8fd,0xc0de,
+	0xbcd0,0xbd65,0xc146,0xc939,0xd318,0xdfa2,0xec15,0xf8a2,
+	0x038d,0x0ce7,0x1434,0x189f,0x1ab8,0x1a10,0x1907,0x16c2,
+	0x15c0,0x143c,0x140a,0x1496,0x15ec,0x1756,0x17b1,0x178f,
+	0x1570,0x12f3,0x0dc8,0x07a6,0xff01,0xf5c4,0xebdc,0xe281,
+	0xda12,0xd30a,0xcf52,0xce20,0xd10e,0xd5f7,0xdddb,0xe6c7,
+	0xf17a,0xfc17,0x063f,0x0efb,0x1596,0x1b04,0x1dc9,0x1f12,
+	0x1d41,0x1acc,0x1701,0x13c2,0x0fc1,0x0c7a,0x09e2,0x07c3,
+	0x06cc,0x0570,0x04bf,0x0282,0x00c1,0xfd9f,0xfa19,0xf557,
+	0xf041,0xeb36,0xe623,0xe2b5,0xdfdd,0xdf56,0xdff8,0xe347,
+	0xe7fd,0xee86,0xf5bc,0xfdc5,0x0624,0x0d42,0x13ed,0x1827,
+	0x1b77,0x1c14,0x1b8f,0x1886,0x14f1,0x108b,0x0c1d,0x07d0,
+	0x0367,0x0061,0xfd45,0xfbec,0xfa15,0xf97c,0xf85b,0xf7c2,
+	0xf6b8,0xf579,0xf3d1,0xf185,0xefc7,0xed78,0xec88,0xeb88,
+	0xec87,0xee56,0xf18b,0xf552,0xfa21,0xff8c,0x04d5,0x0acf,
+	0x0f30,0x136b,0x1591,0x172f,0x167d,0x14bc,0x116d,0x0d47,
+	0x08f4,0x043a,0x009d,0xfc71,0xf9d1,0xf71b,0xf5fc,0xf4ba,
+	0xf484,0xf485,0xf4d6,0xf587,0xf5a1,0xf632,0xf5b3,0xf5c7,
+	0xf4f6,0xf544,0xf586,0xf6c0,0xf89e,0xfadf,0xfdbd,0x00d2,
+	0x04d6,0x07ee,0x0b8c,0x0daa,0x1009,0x10d7,0x10fe,0x0fb4,
+	0x0d30,0x0a20,0x05db,0x022d,0xfddd,0xfb17,0xf7c0,0xf5d5,
+	0xf3f2,0xf338,0xf336,0xf3d8,0xf50e,0xf61c,0xf809,0xf8ea,
+	0xfa7b,0xfaa7,0xfb51,0xfb5f,0xfbd7,0xfc86,0xfd5a,0xfe96,
+	0xff83
+};
+
+static const UINT16 IU0[] = {
+	0x00fd,0xfc28,0xf4ff,0xec1d,0xe4d4,0xdfe2,0xe09e,0xe668,
+	0xf389,0x049a,0x18b2,0x2bad,0x3af9,0x4567,0x48e6,0x4850,
+	0x42d6,0x3c07,0x3340,0x2c36,0x25ce,0x20d8,0x1d27,0x1a50,
+	0x196d,0x18af,0x1a38,0x1acd,0x1c11,0x1abf,0x17df,0x1067,
+	0x04df,0xf651,0xe50f,0xd49f,0xc522,0xba80,0xb33a,0xb150,
+	0xb29d,0xb6f5,0xbcdb,0xc240,0xc805,0xcbc2,0xcf23,0xd04e,
+	0xd1f4,0xd25a,0xd2ea,0xd30c,0xd3d0,0xd61b,0xd97b,0xe05a,
+	0xe8ca,0xf48d,0x00fb,0x0f08,0x1b61,0x261f,0x2d6f,0x30f6,
+	0x31ae,0x2f0b,0x2c01,0x2712,0x2375,0x1fb1,0x1e07,0x1ce7,
+	0x1c6f,0x1c96,0x1cb5,0x1d4d,0x1bf2,0x1acc,0x1734,0x130a,
+	0x0c2a,0x03ec,0xfa23,0xef97,0xe644,0xdd78,0xd773,0xd2f8,
+	0xd219,0xd2c4,0xd5bd,0xd908,0xdca4,0xdf9f,0xe13b,0xe2da,
+	0xe2a5,0xe2e7,0xe1d5,0xe22c,0xe275,0xe3fd,0xe67e,0xea72,
+	0xf030,0xf6a1,0xfef5,0x0663,0x0ea9,0x1525,0x1b22,0x1ea8,
+	0x205f,0x2046,0x1e49,0x1c6d,0x1935,0x1762,0x1503,0x14cc,
+	0x1492,0x1556,0x15fe,0x1637,0x15e8,0x1456,0x12b0,0x0ec8,
+	0x0ac6,0x04df,0xff3d,0xf895,0xf2a5,0xecfb,0xe7e6,0xe4ec,
+	0xe333,0xe3ac,0xe3cf,0xe5f1,0xe79a,0xe9e6,0xeb47,0xebdd,
+	0xebe3,0xeb2d,0xeb27,0xea5d,0xeafd,0xeb14,0xed30,0xefa0,
+	0xf38f,0xf7ae,0xfc28,0x019e,0x0669,0x0bbf,0x0f12,0x1240,
+	0x1344,0x1446,0x13f3,0x132c,0x11dc,0x0ff2,0x0f33,0x0e2d,
+	0x0ed0,0x0e3d,0x0ecd,0x0ea3,0x0efa,0x0e80,0x0ce1,0x0b1a,
+	0x07ef,0x0553,0x0159,0xfdb9,0xf8ef,0xf58d,0xf1fd,0xef95,
+	0xedff,0xecf0,0xed4e,0xed69,0xef30,0xef9d,0xf10e,0xf143,
+	0xf164,0xf12f,0xf0db,0xf107,0xf099,0xf155,0xf1fa,0xf431,
+	0xf593,0xf85d,0xfaff,0xfe5c,0x01a1,0x0454,0x076c,0x0901,
+	0x0b5b,0x0c1d,0x0d1a,0x0c17,0x0b95,0x0aa4,0x0a0e,0x09b9,
+	0x0901,0x0966,0x0926,0x0a4b,0x09d8,0x0a0f,0x08d5,0x077d,
+	0x060d,0x03d1,0x0201,0xff05,0xfd14,0xfa41,0xf8c5,0xf654,
+	0xf50d,0xf3b7,0xf36e,0xf3d0,0xf3f4,0xf4cd,0xf4ca,0xf616,
+	0xf594,0xf5d0,0xf519,0xf4fe,0xf49f,0xf4d2,0xf5b2,0xf607,
+	0xf787,0xf8c4,0xfbde,0xfd82,0xffd7,0x014c,0x033b,0x0514,
+	0x05fe,0x06a0,0x05ea,0x05ff,0x04ab,0x03be,0xfffd
+};
+
+static const UINT16 THV0[] = {
+	0x019c,0x02bf,0x01c9,0x014c,0x0064,0x00bf,0x0023,0xfff3,
+	0xff7b,0xffe9,0x013f,0x01cd,0x02cc,0x0268,0x030d,0x0280,
+	0x025e,0x010c,0xff91,0xfe8f,0xfdf1,0xfe20,0xfdc6,0xfd7a,
+	0xfc8a,0xfd77,0xfd50,0xfd28,0xfc20,0xfaee,0xfa01,0xf908,
+	0xf8b6,0xf7e3,0xf85d,0xf7fe,0xf8f5,0xf915,0xfa61,0xfb45,
+	0xfb5a,0xfbab,0xfb1e,0xfab8,0xf955,0xf97c,0xf91d,0xfa03,
+	0xfa39,0xfb6e,0xfc58,0xfd16,0xfe6e,0xfe3c,0xfe6b,0xfd9e,
+	0xfde8,0xfd5b,0xfd98,0xfd6a,0xfdd0,0xff1a,0xff94,0x00b4,
+	0x0096,0x0161,0x00e2,0x015b,0x00c1,0x006b,0x0003,0xffb9,
+	0x000f,0xffc8,0x0085,0x002c,0x00d0,0x0084,0x0102,0x00a2,
+	0x0031,0xff8b,0xfedd,0xfeb0,0xfdc0,0xfdf0,0xfd41,0xfde5,
+	0xfe02,0xfe84,0xfe6b,0xfe08,0xfdc7,0xfcfa,0xfcdf,0xfbea,
+	0xfc54,0xfbb8,0xfc30,0xfbf8,0xfc1b,0xfc06,0xfbc8,0xfc81,
+	0xfcaa,0xfd9c,0xfd28,0xfdb6,0xfd2c,0xfcf6,0xfc6b,0xfc18,
+	0xfc9c,0xfd1a,0xfe32,0xfe25,0xfe97,0xfecc,0xff6f,0xfefc,
+	0xfefb,0xfe7f,0xfecb,0xffd9,0xffd1,0xff9c,0xff07,0xffa3,
+	0xff5e,0x0061,0x005e,0x00bf,0x00cd,0x0019,0xffb3,0xfedc,
+	0xff64,0xff1e,0xffff,0xff45,0xffe3,0xffb1,0xff38,0xfe99,
+	0xfe29,0xfe58,0xfda9,0xfe81,0xfe2a,0xfefc,0xfeac,0xfe31,
+	0xfd33,0xfc59,0xfc77,0xfce8,0xfdaf,0xfcef,0xfd84,0xfd59,
+	0xfe02,0xfd83,0xfc9b,0xfbe3,0xfc33,0xfd85,0xfdf4,0xfe76,
+	0xfd17,0xfd32,0xfd2a,0xfde2,0xfdd5,0xfdda,0xfe08,0xfe11,
+	0xfee1,0xfe94,0xff47,0xfe73,0xff16,0xfe8a,0xff4d,0xff70,
+	0xffa4,0x000f,0xff8a,0x003f,0xff6c,0xff43,0xfeae,0xff6c,
+	0xff9f,0xff94,0xff53,0xff2c,0xfffd,0xff92,0xff7e,0xfeb7,
+	0xff93,0xffae,0xffd9,0xfe79,0xfd79,0xfdef,0xfe68,0xff02,
+	0xfdf5,0xfde2,0xfd32,0xfe5f,0xfe80,0xfe4b,0xfdc4,0xfd16,
+	0xfdc0,0xfdbc,0xfe02,0xfcfa,0xfd02,0xfcdd,0xfd65,0xfddf,
+	0xfe0e,0xfe17,0xfdb7,0xfe48,0xfde4,0xfe27,0xfdc6,0xfe41,
+	0xfddf,0xfdf7,0xfdbf,0xfdc8,0xfeac,0xfe81,0xff10,0xfe0b,
+	0xfe79,0xfe47,0xfeee,0xfe5a,0xfdf8,0xfdaa,0xfdea,0xfe6f,
+	0xfd8d,0xfd7a,0xfc7e,0xfcc2,0xfc8a,0xfd7a,0xfe0e,0xfeec,
+	0x000f,0x00c6,0x0167,0x00a8,0x004c,0xff3d,0xffd3,0xffb0,
+	0x002d,0x0073,0x00bd,0x017c,0x01f0,0x0295,0x01cd,0x0205,
+	0x012c,0x0144,0x007f,0xfff0,0xff3b,0xfe9b,0xff03,0xfe9a,
+	0xff5a,0xfee8,0xff9d,0xff3a,0xfee7,0xfda9,0xfc6d,0xfbe4,
+	0xfb24,0xfb0d,0xfa6b,0xfad7,0xfa5a,0xfb3f,0xfb01,0xfb1f,
+	0xfaee,0xfadb,0xfb30,0xfa82,0xfab1,0xf9c3,0xf9ce,0xf99e,
+	0xfab9,0xfb5a,0xfc1d,0xfcbf,0xfd20,0xfdcb,0xfd47,0xfd6e,
+	0xfc87,0xfcde,0xfcb9,0xfdb2,0xfdfa,0xfea5,0xff88,0xffb9,
+	0x00a8,0x003a,0x00c5,0x004c,0x00aa,0x003e,0x0018,0xffec,
+	0xffc6,0x0020,0xfff3,0x00d0,0x008c,0x012c,0x008d,0x006b,
+	0xffbd,0xff36,0xfedd,0xfe5f,0xfe73,0xfde7,0xfe52,0xfdf0,
+	0xfe7f,0xfdda,0xfdb5,0xfd86,0xfd8b,0xfd7d,0xfc75,0xfc77,
+	0xfbca,0xfc2a,0xfb7d,0xfbee,0xfbcf,0xfc67,0xfcdc,0xfd1f,
+	0xfdc9,0xfd01,0xfce3,0xfbc2,0xfc00,0xfb96,0xfc6b,0xfd11,
+	0xfd8b,0xfe4c,0xfe95,0xff7c,0xff75,0xff9b,0xfe65,0xfe20,
+	0xfd8a,0xfdd8,0xfe2d,0xfe26,0xfe5d,0xfe79,0xffef,0xfffd,
+	0x00af,0xfff8,0x0012,0xff96,0xff56,0xff02,0xfe79,0xff02,
+	0xff4e,0xffec,0xff3d,0xffd6,0xff71,0xffb6,0xff47,0xfe66,
+	0xfd93,0xfced,0xfd7c,0xfd16,0xfd62,0xfcd4,0xfde3,0xfe91,
+	0xfe99,0xfdf3,0xfd2f,0xfd3d,0xfd0a,0xfd7d,0xfc17,0xfc33,
+	0xfbe5,0xfcd6,0xfccc,0xfccc,0xfce7,0xfcf4,0xfde2,0xfd7f,
+	0xfdd1,0xfd01,0xfd89,0xfd35,0xfd29,0xfd1f,0xfd15,0xfdd9,
+	0xfdf8,0xfec9,0xfea3,0xff5c,0xff19,0xff55,0xfeb6,0xfeec,
+	0xfea9,0xfe82,0xff49,0xff37,0xffaa,0xfeac,0xff7d,0xff6c,
+	0x00c5,0x00a3,0x0020,0xffca,0xff3c,0xff6f,0xfea7,0xfea1,
+	0xfe25,0xff52,0xffae,0x0058,0xff70,0xff14,0xff5e,0xfec5,
+	0xfeb0,0xfd81,0xfdcc,0xfe13,0xff2e,0xfec7,0xfd84,0xfc45,
+	0xfc2e,0xfdb4,0xfe9b,0xff4d,0xfe25,0xfe1e,0xfd5a,0xfdda,
+	0xfce7,0xfc29,0xfc1d,0xfca9,0xfe3d,0xfe62,0xfeca,0xfdbf,
+	0xfe60,0xfdfd,0xfdf9,0xfdbf,0xfd7f,0xfe30,0xfe2a,0xfef4,
+	0xfe41,0xfe75,0xfdc6,0xfe2e,0xfe3a,0xfea4,0xfebb,0xfe59,
+	0xfe78,0xfd9e,0xfd3e,0xfbfb,0xfc05,0xfc12,0xfd4a,0xfe63
+};
+
+static const UINT16 TH[] = {
+	0xfd64,0xff29,0xffc6,0xfcc3,0xfc94,0xfe64,0x01b9,0x00ed,
+	0xfd9f,0xfbe5,0xfca7,0xffbb,0xff7b,0xfcec,0xfa9b,0xfca5,
+	0xfe32,0xff4b,0xfd0e,0xfc86,0xfd7f,0xff8b,0x0067,0xfe34,
+	0xfd8e,0xfdf1,0xffb5,0xfe5c,0xfcc4,0xfbd6,0xfec7,0x01b3,
+	0x00df,0xfed5,0xfd1b,0xfed0,0xff79,0xfefb,0xfbbd,0xfb12,
+	0xfd33,0x009f,0x00bc,0xfdeb,0xfd8e,0xfe79,0xffc6,0xfdfd,
+	0xfcb9,0xfc0c,0xfdad,0xfe56,0xfdbd,0xfcab,0xfcbf,0xfe91,
+	0xff3e,0x0018,0xfe28,0xfdca,0xfe6b,0xfe6c,0xfdce,0xfbd6,
+	0xfbb5,0xfcfb,0xff9b,0xff91,0xff59,0xfe93,0xffd8,0xff91,
+	0xfe8c,0xfcae,0xfcb2,0xfe3f,0xfe5a,0xfe63,0xfd1e,0xfdf7,
+	0xfecc,0x0034,0xff81,0xfea4,0xfe0b,0xfe30,0xfe3f,0xfd19,
+	0xfd7e,0xfd3d,0xfdd8,0xfd4f,0xfec0,0xffca,0x002e,0xff92,
+	0xfd58,0xfc9d,0xfcfd,0xfeaf,0xfe23,0xfdc6,0xfcde,0xfe3b,
+	0x0061,0x00b5,0xff92,0xfced,0xfcb0,0xfd88,0xff5f,0xfde6,
+	0xfc7e,0xfbd6,0xff1b,0x01a1,0x0178,0xfe46,0xfc87,0xfe91,
+	0xfff3,0xffa3,0xfc63,0xfb63,0xfc7c,0xff91,0x002b,0xfd90,
+	0xfc3d,0xfd42,0x00e9,0x01f3,0x0040,0xfc00,0xfb6c,0xfca3,
+	0xff12,0xff14,0xfd27,0xfd5a,0xfe72,0x00fd,0x008c,0xfea9,
+	0xfbcb,0xfc66,0xfd80,0xfef6,0xfdd6,0xfce0,0xfe46,0xff35,
+	0xffd3,0xfe67,0xfe5e,0xfde4,0xfe2a,0xfd5c,0xfce5,0xfdbc,
+	0xff2d,0x0035,0xfe60,0xfd16,0xfc42,0xfea9,0x0040,0xff86,
+	0xfcdc,0xfcd5,0xfef7,0xff8c,0xfe19,0xfc4a,0xfd0c,0xfe1a,
+	0x0040,0xff4d,0xfdbb,0xfcfc,0xfe97,0xff57,0xfd7c,0xfcd1,
+	0xfcfa,0xff9b,0x004c,0xff7e,0xfd1f,0xfddb,0xfec0,0xfeb6,
+	0xfe21,0xfd52,0xfd79,0xfe9d,0x0031,0xff4b,0xff13,0xfdb4,
+	0xfddc,0xfe10,0xfddf,0xfe8c,0xfe9c,0xfea6,0xfe25,0xff37,
+	0xfe1e,0xfdf2,0xfdb4,0xfe62,0xfdfb,0xfd97,0xfd29,0xfda4,
+	0xff60,0xff84,0xff05,0xfca3,0xfd38,0xfec5,0x000b,0xfe8e,
+	0xfd8f,0xfe06,0xfe29,0xfec5,0xfe06,0xfe42,0xfd66,0xfd8e,
+	0xfda1,0xff00,0xfec4,0xfe59,0xfe85,0xfdfb,0xfed2,0xfeb6,
+	0xfe1a,0xfc6d,0xfd43,0xfda4,0xff0a,0xff3d,0xfe6e,0xfd9f,
+	0xfe48,0x0010,0xfeec,0xfd3c,0xfb87,0xfd89,0xfe6a,0xfe3c,
+	0xfda7,0xfd76,0xfef7,0xfee7,0xff3e,0xfdf0,0xfde8,0xfd7a,
+	0xfdf7,0xfd3e,0xfde7,0xff12,0xff04,0xfdee,0xfd1f,0xfe7c,
+	0xfe70,0xfe47,0xfd90,0xfec8,0xfe4b,0xfd75,0xfcd6,0xfc74,
+	0xfe86,0xfead,0xff52,0xfed2,0xffb5,0x0000,0xfff2,0xfe18,
+	0xfdbd,0xfd6f,0xfdb3,0xfd96,0xfcc9,0xfe28,0xff6c,0x00c6,
+	0xfed5,0xfd85,0xfd37,0xfe4c,0xfeab,0xfd4b,0xfd5d,0xfd96,
+	0xff22,0xfe6f,0xfe1e,0xfd18,0xfda0,0xfec9,0xff70,0xfe08,
+	0xfc40,0xfcec,0xfe4a,0xffe3,0xfe86,0xfd96,0xfc3d,0xfd61,
+	0xfed9,0xffe2,0xff18,0xfe3e,0xfe45,0xfe8b,0xffcf,0xfddd,
+	0xfc72,0xfc45,0xff3d,0x00b3,0x0046,0xfe31,0xfd51,0xfe9e,
+	0xfed7,0xff28,0xfd97,0xfde1,0xfdb2,0xfe74,0xfe46,0xfe51,
+	0xfdf8,0xfd5f,0xfe2f,0xfe76,0xff31,0xfdaf,0xfd52,0xfd0c,
+	0xfdec,0xfe4c,0xfe31,0xfda8,0xfd02,0xff35,0xffe2,0xff91,
+	0xfc9c,0xfc38,0xfd92,0xffa7,0xfe84,0xfcb8,0xfd82,0xffbc,
+	0x015b,0xff1f,0xfd80,0xfc29,0xfdd7,0xff37,0xfefb,0xfde5,
+	0xfe2b,0xfff1,0x005c,0x0010,0xfd4c,0xfcc3,0xfe01,0x009a,
+	0xffa5,0xfdad,0xfcfa,0xff24,0x0192,0xffd0,0xfcb2,0xfb02,
+	0xfe51,0x001d,0xffa9,0xfca8,0xfcd4,0xfef8,0x00a4,0xff92,
+	0xfc3a,0xfcc9,0xfe30,0xff3b,0xfcfd,0xfc34,0xfcf3,0xfe2c,
+	0xfe54,0xfda1,0xfefd,0xff75,0x0039,0xfe54,0xfd50,0xfc8d,
+	0xfd4f,0xfe47,0xfd89,0xfdbd,0xfdb9,0xfff4,0x0016,0x0017,
+	0xfe6f,0xfdfe,0xfdd1,0xfdad,0xfd45,0xfd9a,0xfe95,0xffa9,
+	0x0054,0xfed9,0xfed4,0xfe74,0xff7b,0xff12,0xfe5d,0xfd6a,
+	0xfd88,0xfe58,0xfdf4,0xfd52,0xfc6a,0xfe3d,0xff4d,0xffa7,
+	0xfd8e,0xfd15,0xfe37,0xff5f,0xfef5,0xfc6f,0xfbd1,0xfc36,
+	0xfef6,0xff3c,0xfebe,0xfda3,0xfde5,0xff44,0x0018,0xff02,
+	0xfc3b,0xfc2c,0xfd7f,0x0016,0xfebf,0xfcf3,0xfc5c,0xfe79,
+	0x00ad,0x0041,0xff0d,0xfd56,0xfd88,0xfe26,0xff45,0xfd7d,
+	0xfd15,0xfcb1,0xfe4a,0x0006,0xff5a,0xfe41,0xfccc,0xfdf6,
+	0xfe7f,0xff5c,0xfe0e,0xfd46,0xfdf6,0xff4f,0xff80,0xfda6,
+	0xfd08,0xfc95,0xfe48,0xfead,0xfef1,0xfd24,0xfcff,0xfdb2,
+	0xfee4,0xff38,0xfda6,0xfd12,0xfcad,0xfe89,0xff54,0xff54,
+	0xfd4f,0xfd1a,0xfcf6,0xfde5,0xfeb6,0xfe3e,0xfe8f,0xfe27,
+	0xff6f,0xfeee,0xfe32,0xfd2a,0xfe29,0xfe3c,0xfe42,0xfecb,
+	0xff3b,0xffc5,0xfdfc,0xfd65,0xfd04,0xfe57,0xfdc7,0xfde4,
+	0xfd5d,0xfd7a,0xfdf2,0xfe83,0xff43,0xfe15,0xfe74,0xff0a,
+	0x007b,0xff04,0xfdbb,0xfc53,0xfce4,0xfebd,0xfee2,0xff3b,
+	0xfe00,0xff0a,0xfff8,0xffd1,0xfd83,0xfcec,0xfcea,0xfe61,
+	0xff5e,0xfe32,0xfdf7,0xfd9b,0xff5c,0xff8e,0xff57,0xfd8c,
+	0xfc47,0xfcbe,0xfdb1,0xffc8,0xff9c,0xfeda,0xfd0b,0xfd87,
+	0xfdc6,0xfedb,0xfe6d,0xfe2d,0xfd8b,0xfd8c,0xff09,0xfe4e,
+	0xfd71,0xfc9c,0xfe69,0xfe7e,0xfe59,0xfe8c,0xff50,0x0022,
+	0xfe79,0xfd19,0xfcbd,0xfe70,0xfe2c,0xfe91,0xfe55,0xff02,
+	0xfecf,0xff6d,0xfe9f,0xfd9f,0xfd6c,0xfd00,0xfe97,0xfea0,
+	0xfe4e,0xfcbb,0xfe13,0xff3e,0x000a,0xff06,0xfcdc,0xfdda,
+	0xff12,0xfff8,0xfda4,0xfc56,0xfc0c,0xfe0f,0xfff4,0xff74,
+	0xfee4,0xfe8b,0xff95,0xff2c,0xfe92,0xfcc9,0xfd97,0xfda9,
+	0xfdba,0xfdca,0xfeb0,0x0018,0x0050,0xfffb,0xfdc9,0xfd91,
+	0xfd71,0xfeb7,0xfee6,0xff68,0xff46,0xfe79,0xfd9b,0xfd96,
+	0xfeba,0xfe40,0xfec0,0xfe46,0xfee7,0xfdb5,0xfdc7,0xfe38,
+	0xfe7c,0xfe26,0xfcf8,0xfe94,0xff28,0xffb2,0xfe88,0xfd80,
+	0xfc56,0xfcd9,0xfe5c,0xff2e,0xfed4,0xfd04,0xfdbc,0xfefe,
+	0x005b,0xfddb,0xfbea,0xfc48,0xfeaa,0xff84,0xfd9a,0xfcbb,
+	0xfdc9,0x0020,0xff5b,0xfe05,0xfc11,0xfd93,0xfea9,0xff7a,
+	0xfde6,0xfcb2,0xfd7d,0xfde3,0xfeb4,0xfe23,0xfec4,0xfe2e,
+	0xfef6,0xfeae,0xfe08,0xfd7a,0xfd4d,0xfe99,0xfe9e,0xfebb,
+	0xfd77,0xfdb7,0xfda2,0xff43,0xfee9,0xfe96,0xfe2a,0xfddc,
+	0xfe36,0xfe01,0xfeea,0xfe25,0xfe29,0xfd68,0xfded,0xfe4c,
+	0xfea6,0xff1c,0xfe4f,0xfe46,0xfd94,0xfdfe,0xfda2,0xfeb2,
+	0xfe29,0xfd3f,0xfd08,0xfdc0,0xff20,0xfec0,0xfe2b,0xfd13,
+	0xfe70,0xfe92,0xfe62,0xfd5d,0xfdec,0xfee6,0xfe83,0xfdde,
+	0xfcf3,0xfd68,0xfdf4,0xffab
+};
+
+static const UINT16 ER0[] = {
+	0x01e4,0x0595,0x08d5,0x0b9c,0x0ccd,0x0d7d,0x0c87,0x0bd7,
+	0x09fe,0x088c,0x06df,0x05ec,0x0582,0x0583,0x0628,0x065f,
+	0x0766,0x075a,0x0785,0x05fa,0x045e,0x01de,0xff09,0xfbf8,
+	0xf8cd,0xf62a,0xf32e,0xf118,0xede4,0xea56,0xe44a,0xddcb,
+	0xd71c,0xd225,0xd059,0xd2ed,0xdc1e,0xeb69,0x0143,0x19f6,
+	0x342a,0x4b33,0x5d85,0x64d7,0x65ad,0x609b,0x4f49,0x3b19,
+	0x2513,0x12b7,0x054c,0xfffa,0x0204,0x0b87,0x18a5,0x266a,
+	0x30fc,0x34f7,0x3128,0x237a,0x0ee4,0xf3b2,0xd717,0xbbbe,
+	0xa565,0x9ae9,0x9aa2,0x99f6,0x9d17,0xacfc,0xbdc8,0xce66,
+	0xdb08,0xe39d,0xe684,0xe54e,0xe095,0xda98,0xd572,0xd29e,
+	0xd437,0xd9bb,0xe499,0xf237,0x02c0,0x1351,0x23a8,0x3176,
+	0x3bde,0x4296,0x44bd,0x43bb,0x3ecc,0x3834,0x2f0c,0x2608,
+	0x1cbe,0x14cb,0x0e7e,0x09d3,0x0766,0x064f,0x071d,0x0751,
+	0x07dc,0x0635,0x0305,0xfcf5,0xf49c,0xe9cd,0xddbd,0xd238,
+	0xc785,0xc004,0xbb28,0xbb7b,0xbf98,0xc810,0xd2a9,0xdebb,
+	0xeaa9,0xf513,0xfd1d,0x0148,0x02ca,0x010d,0xfee8,0xfba8,
+	0xfa02,0xf9fd,0xfd0a,0x0365,0x0c1d,0x1664,0x2066,0x2a41,
+	0x315b,0x3631,0x365a,0x3314,0x2c7a,0x23d0,0x1a0a,0x0fb1,
+	0x06b6,0xfef0,0xfa74,0xf811,0xf822,0xf85c,0xfa03,0xfb24,
+	0xfb86,0xfa4f,0xf6fa,0xf261,0xec2d,0xe628,0xdf7d,0xda4b,
+	0xd623,0xd4aa,0xd56b,0xd88f,0xddb7,0xe3d5,0xebd7,0xf37d,
+	0xfb53,0x016d,0x0656,0x0900,0x0ae1,0x0b6e,0x0adf,0x09fe,
+	0x08b9,0x08f2,0x09bb,0x0c48,0x0ef3,0x12e6,0x16db,0x1b1f,
+	0x1e06,0x1f2f,0x1eb2,0x1c1d,0x1862,0x123f,0x0ba9,0x03bf,
+	0xfd41,0xf745,0xf325,0xf03a,0xeef1,0xef43,0xf078,0xf296,
+	0xf37e,0xf494,0xf415,0xf32e,0xf0c4,0xedf3,0xeabe,0xe7cc,
+	0xe64c,0xe5e9,0xe789,0xe9e3,0xeea6,0xf3c8,0xfa35,0xffdd,
+	0x0545,0x0958,0x0c02,0x0e25,0x0e3f,0x0dd1,0x0c05,0x0b3a,
+	0x0a22,0x0a05,0x09ea,0x0aa3,0x0c08,0x0da5,0x0f67,0x0feb,
+	0x1058,0x0f41,0x0e09,0x0b30,0x0813,0x03f6,0xffa7,0xfba7,
+	0xf7c8,0xf4c9,0xf214,0xf0e5,0xefe4,0xf074,0xf0e4,0xf22b,
+	0xf37b,0xf4b6,0xf567,0xf590,0xf56f,0xf4b0,0xf43e,0xf311,
+	0xf320,0xf328,0xf471,0xf65b,0xf979,0xfd20,0x00a0
+};
+
+static const UINT16 EH0[] = {
+	0xfdcc,0xfa33,0xf784,0xf43e,0xf315,0xf24c,0xf2be,0xf47a,
+	0xf6a2,0xf94e,0xfa89,0xfb96,0xfb05,0xfad5,0xf8ea,0xf5bb,
+	0xeed3,0xe49a,0xd8e7,0xcfbb,0xcf29,0xda2d,0xf34c,0x1508,
+	0x3945,0x5569,0x6339,0x62a8,0x533d,0x3da9,0x2a2c,0x204c,
+	0x21d8,0x2eec,0x3f46,0x4da5,0x52b4,0x4d62,0x3caf,0x24ff,
+	0x0a68,0xf0a7,0xdb90,0xcb2c,0xc182,0xbbd4,0xbb86,0xbe25,
+	0xc3cf,0xc8f3,0xcbd8,0xca4d,0xc33e,0xb91a,0xadfd,0xa8de,
+	0xab7d,0xb949,0xcfb7,0xec25,0x07c3,0x1d98,0x2a1b,0x2c4a,
+	0x2763,0x1e84,0x188b,0x16a5,0x1bf0,0x255a,0x3195,0x3bf2,
+	0x4223,0x4251,0x3bb5,0x3029,0x1ffb,0x0f00,0xfd15,0xee34,
+	0xe240,0xdbc5,0xd9dd,0xdc47,0xe0d5,0xe422,0xe4b3,0xdff8,
+	0xd83b,0xcce9,0xc3a9,0xbe20,0xbfeb,0xc922,0xd8cc,0xebdd,
+	0xfdac,0x0c56,0x14bd,0x186b,0x16cd,0x145f,0x11af,0x125f,
+	0x15d7,0x1c71,0x24cc,0x2ca4,0x3319,0x3546,0x3462,0x2e02,
+	0x247e,0x1794,0x0a88,0xfdf2,0xf44f,0xeed9,0xeca9,0xee63,
+	0xf07a,0xf2b8,0xf106,0xecd6,0xe4bf,0xdbdf,0xd400,0xcf1b,
+	0xcf81,0xd4b8,0xdeb2,0xea0e,0xf687,0x002a,0x0778,0x0a84,
+	0x0b93,0x0aee,0x0a7c,0x0b2e,0x0d38,0x1235,0x17d6,0x1f41,
+	0x2508,0x299c,0x2a23,0x27a4,0x218c,0x18bf,0x0f08,0x0566,
+	0xfecc,0xfa32,0xf994,0xfa09,0xfc0b,0xfbe6,0xfa2c,0xf598,
+	0xeef6,0xe80b,0xe10a,0xdd2e,0xdbe6,0xdf16,0xe427,0xec1a,
+	0xf3ca,0xfb22,0x0062,0x0338,0x0448,0x03dc,0x0406,0x03db,
+	0x0622,0x0961,0x0f51,0x1513,0x1b02,0x1f44,0x211a,0x2054,
+	0x1c1f,0x168a,0x0f0b,0x0925,0x03ea,0x01a0,0x005b,0x00f6,
+	0x0198,0x0143,0xffb8,0xfbad,0xf723,0xf0ee,0xec16,0xe7ee,
+	0xe698,0xe6c4,0xe9ba,0xee46,0xf373,0xf88b,0xfc1e,0xfef2,
+	0xff51,0xffe2,0xff62,0x0038,0x0112,0x0454,0x0861,0x0d4c,
+	0x126c,0x15f5,0x189f,0x1836,0x170a,0x131a,0x0efa,0x09d4,
+	0x066c,0x049f,0x03ed,0x046b,0x0455,0x049c,0x02aa,0x0097,
+	0xfc32,0xf7f2,0xf385,0xf0a2,0xeef2,0xeea6,0xeff6,0xf1a3,
+	0xf4cb,0xf768,0xfa8f,0xfbf3,0xfd86,0xfdc9,0xfe75,0xfeb4,
+	0xff49,0x0139,0x039c,0x079f,0x0b0a,0x0f0c,0x10c2,0x11f9,
+	0x10fb,0x0f65,0x0cc1,0x09e6,0x082a,0x0680,0x0649,0x05bf,
+	0x05d0,0x04a9,0x041a,0x0255,0xfff6
+};
+
+static const UINT16 AW0[] = {
+	0xff0f,0xfd65,0xfa33,0xf440,0xecb7,0xe2fc,0xda84,0xd308,
+	0xd0f5,0xd405,0xddf9,0xed52,0x00ba,0x16ba,0x2c9e,0x4260,
+	0x5571,0x640e,0x6619,0x661a,0x65e9,0x65d4,0x629b,0x4c54,
+	0x2f56,0x0e63,0xed44,0xcd06,0xb0c1,0x9d11,0x9a28,0x99f9,
+	0x999b,0x99dc,0x9a47,0x9b59,0xada9,0xc783,0xe05a,0xf9ce,
+	0x1000,0x2233,0x2f47,0x3725,0x3ad8,0x3a2b,0x373f,0x3112,
+	0x2a8f,0x226a,0x1ae0,0x134e,0x0cf8,0x0851,0x0519,0x041b,
+	0x0383,0x0408,0x0298,0x0092,0xfbda,0xf5ba,0xed9a,0xe3f0,
+	0xda53,0xd074,0xc8dd,0xc216,0xbea4,0xbd27,0xbfcf,0xc5f5,
+	0xd049,0xde3e,0xeea8,0x01ba,0x1453,0x26f0,0x361a,0x4310,
+	0x4ab4,0x4eae,0x4d89,0x47df,0x3e6d,0x3144,0x2238,0x1083,
+	0xfef4,0xed25,0xde13,0xd11f,0xc862,0xc32c,0xc17a,0xc3cb,
+	0xc881,0xd09d,0xd90d,0xe2fa,0xec3b,0xf5f0,0xfe51,0x057d,
+	0x0b02,0x0e86,0x112d,0x11b7,0x1234,0x112b,0x110c,0x10bd,
+	0x1190,0x128f,0x13a4,0x156c,0x162f,0x1740,0x166e,0x1534,
+	0x11a4,0x0d9f,0x07b7,0x00bc,0xf8a2,0xef87,0xe734,0xde8d,
+	0xd817,0xd275,0xd02d,0xcf9a,0xd296,0xd7e3,0xdf32,0xe894,
+	0xf2eb,0xfeda,0x09ae,0x14d4,0x1d8c,0x254a,0x29df,0x2c4a,
+	0x2bee,0x28b7,0x23dc,0x1c81,0x14f7,0x0b8b,0x032b,0xfa8c,
+	0xf3b9,0xeda8,0xe940,0xe6a0,0xe509,0xe59e,0xe64f,0xe8eb,
+	0xeafe,0xee38,0xf0c2,0xf3b5,0xf609,0xf7fd,0xfa09,0xfb21,
+	0xfd1e,0xfe3c,0x0043,0x0204,0x04e1,0x079d,0x0acc,0x0e1a,
+	0x10db,0x13bb,0x1533,0x1697,0x15f4,0x14d9,0x11cc,0x0e25,
+	0x091b,0x0397,0xfd3f,0xf651,0xf074,0xea7f,0xe662,0xe2bd,
+	0xe19a,0xe15b,0xe341,0xe69d,0xeb04,0xf090,0xf634,0xfd13,
+	0x027d,0x08aa,0x0d4e,0x11a9,0x1442,0x1535,0x154c,0x13f8,
+	0x1239,0x0eda,0x0bc6,0x077d,0x0484,0x011d,0xfe86,0xfbe3,
+	0xf97b,0xf842,0xf6da,0xf696,0xf584,0xf5aa,0xf520,0xf590,
+	0xf54b,0xf513,0xf4cf,0xf499,0xf56f,0xf59a,0xf6cc,0xf79e,
+	0xfa16,0xfc39,0xff47,0x0204,0x04ef,0x0813,0x0ac4,0x0db2,
+	0x0eec,0x1018,0x0fba,0x0f6b,0x0d3d,0x0a96,0x0721,0x0323,
+	0xff7f,0xfb1e,0xf7b5,0xf382,0xf12b,0xeeea,0xee3d,0xedc1,
+	0xee6a,0xf04a,0xf27e,0xf5b7,0xf855,0xfc17,0xfebe,0x0209,
+	0x0437,0x0666,0x07ac,0x0861,0x08ef,0x084e,0x082f,0x06ad,
+	0x0622,0x04df,0x044d,0x033d,0x0245,0x00fb,0xffae
+};
+
+static const UINT16 STOP[] = {
+	0x0000
+};
+
+static const UINT16 ZH1[] = {
+	0xfede,0x0030,0xfe52,0xfa8e,0xf8c8,0xfa22,0xfdfe,0xffb8,
+	0x00a9,0xff25,0xff1d,0xfe07,0xfc2e,0xf7eb,0xf572,0xf932,
+	0x00fa,0x07bb,0x05c3,0xfec4,0xf769,0xf806,0xfcde,0x019b,
+	0x0118,0xfe8a,0xfcbe,0xfca2,0xfdfd,0xfdb8,0x0037,0x0282,
+	0x05dd,0x044f,0xfdb7,0xf6d6,0xf58c,0xfaf3,0x0176,0x071c,
+	0x07cb,0x0623,0x001d,0xfa2f,0xf65e,0xf865,0xff3f,0x0578,
+	0x0892,0x04bd,0xfe17,0xf765,0xf72e,0xfa2d,0x007b,0x052b,
+	0x0777,0x04db,0xfd2b,0xf69a,0xf3bb,0xf8a8,0xff3e,0x04e9,
+	0x04ad,0x0174,0xfe3e,0xfbf6,0xfa46,0xf8ec,0xfb48,0xfe7e,
+	0x0272,0x007f,0xfc1d,0xf98f,0xfc63,0x00b6,0x01df,0xff21,
+	0xfaaf,0xfaf5,0xfc7e,0xfefb,0xff4b,0x0007,0x0060,0x006f,
+	0xfec0,0xfc04,0xfb52,0xfb42,0xfe65,0x0017,0x0105,0xfe61,
+	0xfcb6,0xfd92,0x011a,0x03fd,0x014b,0xfd83,0xfa8c,0xfc02,
+	0xfc89,0xfbe3,0xfaf9,0xfe98,0x0659,0x0ad2,0x06f4,0xfb32,
+	0xf3d8,0xf362,0xf951,0xfdc7,0x02a1,0x063d,0x08c0,0x0740,
+	0xfdf9,0xf447,0xeff4,0xf73b,0x00a1,0x0692,0x0465,0x001c,
+	0xfd05,0xfbf5,0xfb29,0xf927,0xfa55,0xfd33,0x016d,0x0051,
+	0xfc92,0xf91a,0xfb1d,0x0041,0x039e,0x0392,0xffb1,0xfd9e,
+	0xfbc9,0xfbfc,0xfbaf,0xfdef,0x01f4,0x0651,0x0797,0x0333,
+	0xfdbb,0xf983,0xfb0d,0xfdb7,0x01b8,0x031e,0x03e3,0x03a8,
+	0x01e3,0xff1d,0xfbd6,0xfc40,0xfdd8,0x011f,0x0140,0x005b,
+	0xfe09,0xfd29,0xfd7e,0xfdb5,0xfe60,0xfdb6,0xfe5e,0xfcf3,
+	0xfc00,0xf9dc,0xf9e8,0xfb6f,0xfdce,0xff28,0xfdee,0xfc36,
+	0xf977,0xf91d,0xf87c,0xf9d3,0xfadc,0xfcef,0xfdf5,0xfd87,
+	0xfc66,0xfa0b,0xf9f5,0xf9ec,0xfc13,0xfc7a,0xfd31,0xfcde,
+	0xfd2c,0xfd3c,0xfcf4,0xfda6,0xfd74,0xfe77,0xfdbd,0xfdfc,
+	0xfd00,0xfd67,0xfe3a,0xffa6,0x00d5,0x009c,0x00f5,0xff93,
+	0xff4a,0xfe17,0xfeb8,0xff3c,0x00e2,0x01f0,0x021b,0x019f,
+	0xfff6,0xff9e,0xfe9c,0xff7e,0xff54,0x0069,0x0070,0x00b1,
+	0x0048,0xff2e,0xfeca,0xfe47,0xff9c,0xff42,0xffb2,0xfe80,
+	0xfe19,0xfd3d,0xfd0d,0xfdd8,0xfde5,0xff16,0xfee7,0xff0f,
+	0xfd3a,0xfc8a,0xfb4f,0xfacf,0xfbc0,0xfe37,0x00ff,0xffe2,
+	0xfd49,0xf9d2,0xf9c4,0xfae3,0xfe81,0xff50,0xfe7f,0xfcdc,
+	0xfc85,0xfdea,0xfcdd,0xfae6,0xf8f4,0xfd6e,0x0251,0x0392,
+	0xfec9,0xfa06,0xfaef,0xfed9,0x0133,0xfe40,0xfd16,0xfd96,
+	0x0040,0xff98,0xfce6,0xfc5c,0xfeee,0x03b0,0x03ec,0x00b9,
+	0xfbef,0xfb61,0xfbab,0xfd94,0xff55,0x0245,0x0575,0x053e,
+	0x00fb,0xf9d7,0xf7cc,0xfa5a,0x0107,0x046e,0x049d,0x011d,
+	0xff21,0xfd8d,0xfb5a,0xfa5b,0xfa56,0xff02,0x0330,0x05a8,
+	0x031b,0xfefd,0xfa6d,0xf7cc,0xf818,0xfa0a,0xff18,0x02b0,
+	0x0505,0x02b6,0xff49,0xfbef,0xfbfc,0xfc91,0xfbc3,0xf9c8,
+	0xf82a,0xfbb1,0x0085,0x052a,0x0417,0x00c5,0xfccd,0xf9ce,
+	0xf8b7,0xf8d2,0xfbfc,0xfe69,0x0186,0x0239,0x0240,0xfea4,
+	0xfb7d,0xfb16,0xfdc0,0x009f,0xffba,0xfd35,0xf9c1,0xfa8a,
+	0xfd92,0x03a2,0x06e4,0x05fd,0x0006,0xfa2d,0xf755,0xf786,
+	0xfb37,0xfe71,0x040d,0x0746,0x0748,0x011e,0xf87f,0xf545,
+	0xf7e5,0xff95,0x04a3,0x0651,0x02c0,0xff77,0xfb02,0xf8ea,
+	0xf9a0,0xfec0,0x052f,0x06e9,0x029a,0xf919,0xf397,0xf3c7,
+	0xfb2e,0x023d,0x0642,0x056c,0x0101,0xfb5e,0xf51b,0xf373,
+	0xf656,0xff09,0x0691,0x09f5,0x05aa,0xfe4e,0xf89c,0xf6cd,
+	0xfa2e,0xfe38,0x032e,0x0556,0x05e1,0x01c5,0xfd82,0xfaa1,
+	0xfbf2,0x00a9,0x0447,0x0607,0x029d,0xff3f,0xfbc3,0xfbd4,
+	0xfd28,0x008d,0x03bb,0x04bd,0x0350,0xfe51,0xfa47,0xf7b8,
+	0xfa8e,0xfe42,0x024c,0x02e3,0x00cd,0xfd59,0xf9be,0xf869,
+	0xf84c,0xfb85,0xfe1d,0x00c5,0xff63,0xfc99,0xf8fb,0xf767,
+	0xf8a2,0xfac9,0xfdd9,0xfe47,0xfe5c,0xfb6b,0xf972,0xf7ac,
+	0xf883,0xfb23,0xfe41,0x0058,0xfeb3,0xfc99,0xf97b,0xf967,
+	0xf9fe,0xfcf7,0xfef6,0x009e,0x0048,0xfe24,0xfc71,0xfaba,
+	0xfc2d,0xfe19,0x0175,0x01e9,0x01ab,0xff9e,0xfd9e,0xfce5,
+	0xfce1,0xff07,0x0039,0x0252,0x01bd,0x0141,0xff02,0xfe29,
+	0xfddf,0xfef4,0x0092,0x00f7,0x0168,0xff9f,0xff3b,0xfde3,
+	0xfe47,0xfe7b,0xff79,0x0063,0xffd0,0xff1e,0xfd29,0xfd0e,
+	0xfc7b,0xfe1a,0xfee3,0xff90,0xfeda,0xfddd,0xfcc7,0xfb77,
+	0xfbef,0xfc27,0xfe01,0xfdec,0xfe9f,0xfd94,0xfc9d,0xfb0c,
+	0xfa40,0xfcea,0xff89,0x0149,0xfe83,0xfc0e,0xfa0d,0xfabd,
+	0xfaaa,0xfbd9,0xfe41,0x0101,0x021e,0xfeb9,0xfae7,0xf7e8,
+	0xfacd,0xfe8c,0x0254,0x0363,0x02d7,0xfffe,0xfa5b,0xf768,
+	0xf7ca,0xfe0f,0x0405,0x07e4,0x055d,0xffe3,0xf974,0xf67f,
+	0xf910,0xff94,0x0765,0x093d,0x0628,0xfd7b,0xf72d,0xf466,
+	0xf77e,0xfe3f,0x067b,0x0c92,0x0a4b,0x00e8,0xf3b9,0xef35,
+	0xf3f8,0xfed5,0x0732,0x0a50,0x08a8,0x0307,0xfc4f,0xf4e7,
+	0xf362,0xf673,0xfe40,0x043f,0x0681,0x02ed,0xfcdb,0xfa62,
+	0xfafa,0xfe58,0xff74,0xffde,0xfd34,0xfb02,0xf888,0xf80a,
+	0xfb22,0x01d0,0x0802,0x08c4,0x04a9,0xfb77,0xf48e,0xf09f,
+	0xf39b,0xfaee,0x04e1,0x0c96,0x0c61,0x04e9,0xf7a0,0xef2f,
+	0xeee7,0xf8f1,0x0557,0x0cf5,0x0a84,0x013b,0xf8ed,0xf4e8,
+	0xf7b7,0xfb89,0x0093,0x0403,0x0645,0x033e,0xfc21,0xf611,
+	0xf6ef,0xfe74,0x04c2,0x0764,0x040f,0x002b,0xfb1a,0xf6ea,
+	0xf50f,0xf8ab,0x0116,0x0988,0x0d7a,0x06a0,0xfa6b,0xeff9,
+	0xf0e6,0xf8fe,0x025e,0x0604,0x04cd,0x01b4,0xfd2b,0xf970,
+	0xf590,0xf6ba,0xfb96,0x02d5,0x048f,0x009a,0xfa6e,0xf77d,
+	0xfa50,0xfeb6,0x0319,0x030d,0x0278,0xff74,0xfcc8,0xf98b,
+	0xf8e7,0xfcca,0x0321,0x08c5,0x0796,0x0300,0xfc49,0xf9f8,
+	0xfa4a,0xfda3,0x0105,0x03af,0x05a7,0x0476,0x0179,0xfc1b,
+	0xfa92,0xfb7a,0xffc2,0x0249,0x0252,0xffc8,0xfd4c,0xfc86,
+	0xfc02,0xfd67,0xfdb3,0xff96,0xff58,0xfe6c,0xfb14,0xf874,
+	0xf857,0xfa54,0xfe47,0xff7d,0xff5b,0xfc13,0xfa60,0xf829,
+	0xf819,0xf8e1,0xfb4e,0xfe4d,0xfefb,0xfe51,0xfaad,0xf8db,
+	0xf7e1,0xfa2c,0xfc1b,0xfde0,0xfe79,0xfdea,0xfd48,0xfb35,
+	0xfb15,0xfb19,0xfd9c,0xfec6,0x0017,0xfed3,0xfd5b,0xfc9a,
+	0xfcb0,0xfe5a,0xff4b,0x0116,0x009e,0x00a0,0xfee0,0xfe02,
+	0xfd73,0xfe75,0x0089,0x0199,0x028d,0x00e1,0x0059,0xfe6c,
+	0xfe5f,0xfe69,0xffbe,0x0105,0x0167,0x018a,0xff92,0xfe9e,
+	0xfd13,0xfe37,0xfec0,0x000c,0x0013,0xffa0,0xfedb,0xfd41,
+	0xfce4,0xfc37,0xfd6b,0xfdab,0xfedd,0xfe1b,0xfdb9,0xfc9a,
+	0xfbd3,0xfc0c,0xfc4c,0xfdd9,0xfd35
+};
+
+static const UINT16 M1[] = {
+	0x0028,0x0048,0x00b9,0x00f6,0x01d0,0x01ae,0x01d2,0x0162,
+	0x01dc,0x01f0,0x024a,0x0235,0x024b,0x02ba,0x0281,0x02ae,
+	0x021e,0x0219,0x019c,0x0215,0x01e6,0x01eb,0x01c0,0x0183,
+	0x01a1,0x0144,0x014c,0x006f,0x0063,0xffbc,0xffdb,0xff44,
+	0xfee1,0xfe1e,0xfd2b,0xfc7b,0xfba8,0xfb83,0xfb33,0xfbad,
+	0xfbad,0xfcb9,0xfcdb,0xfd29,0xfd51,0xfd60,0xfddd,0xfea0,
+	0x0016,0x00da,0x0224,0x0297,0x038b,0x0402,0x046b,0x04bc,
+	0x0504,0x05e1,0x0624,0x0723,0x072f,0x07a8,0x0761,0x0774,
+	0x071e,0x06ee,0x06ac,0x0672,0x0698,0x061f,0x05f4,0x04dd,
+	0x047c,0x0360,0x02da,0x01ce,0x0101,0x0067,0xffa4,0xff32,
+	0xfe1d,0xfd74,0xfbf8,0xfb69,0xfa34,0xf990,0xf8c2,0xf837,
+	0xf7ce,0xf6ea,0xf677,0xf55d,0xf4d2,0xf3c4,0xf398,0xf327,
+	0xf30e,0xf2da,0xf2b8,0xf2b6,0xf23f,0xf247,0xf1cf,0xf23b,
+	0xf1ea,0xf28c,0xf2b5,0xf33f,0xf376,0xf3a6,0xf43c,0xf45b,
+	0xf528,0xf569,0xf660,0xf69a,0xf7ce,0xf858,0xf91c,0xf986,
+	0xf9eb,0xfabf,0xfb5c,0xfc60,0xfce3,0xfe35,0xfea4,0xffa7,
+	0xfff3,0x0062,0x00bf,0x012a,0x01f8,0x0262,0x0360,0x037e,
+	0x0439,0x0446,0x04ee,0x050b,0x053a,0x054c,0x0559,0x05c5,
+	0x05d5,0x0658,0x0603,0x065c,0x05cc,0x05c8,0x054a,0x0500,
+	0x049c,0x0456,0x046f,0x03db,0x03df,0x034a,0x0348,0x026a,
+	0x0211,0x014d,0x00d4,0x0083,0x0024,0x0016,0xff37,0xfefd,
+	0xfe22,0xfdfa,0xfd04,0xfca5,0xfc07,0xfbc5,0xfbbb,0xfb71,
+	0xfb3d,0xfa5b,0xfa5b,0xf9b6,0xf999,0xf912,0xf934,0xf921,
+	0xf92b,0xf953,0xf919,0xf923,0xf8c2,0xf900,0xf89f,0xf902,
+	0xf8d6,0xf92f,0xf96f,0xf9e6,0xfa27,0xfa22,0xfa86,0xfa0e,
+	0xfaef,0xfb01,0xfb4b,0xfb61,0xfc12,0xfc59,0xfcaa,0xfd28,
+	0xfd7f,0xfe0b,0xfe27,0xfefe,0xfedd,0xff56,0xff52,0xffa6,
+	0x0009,0x0025,0x0084,0x007e,0x0108,0x010e,0x01b8,0x0143,
+	0x0186,0x0164,0x01b8,0x01f7,0x01f2,0x0219,0x01f1,0x0239,
+	0x01e8,0x0255,0x019f,0x01c2,0x01bd,0x01c8,0x01a2,0x0162,
+	0x0156,0x00bb,0x00b9,0x0000,0x0023,0xff8b,0xffc3,0xff45,
+	0xfef1,0xfe0e,0xfd0d,0xfc6a,0xfb67,0xfb61,0xfaf7,0xfb9b,
+	0xfb9a,0xfc38,0xfc71,0xfcd7,0xfd38,0xfd96,0xfe49,0xfea5,
+	0x0003,0x00c5,0x0200,0x0275,0x0359,0x03db,0x047b,0x04f9,
+	0x055b,0x0605,0x0634,0x071e,0x0739,0x07b0,0x0747,0x0767,
+	0x0730,0x0734,0x0720,0x06ad,0x06c0,0x05f3,0x05e7,0x04fa,
+	0x04ae,0x0394,0x0309,0x022b,0x015f,0x00b4,0xfff1,0xff69,
+	0xfe29,0xfd77,0xfc38,0xfb87,0xfa4d,0xf9ac,0xf8d5,0xf809,
+	0xf7a5,0xf6e2,0xf660,0xf54a,0xf4ec,0xf40d,0xf3ed,0xf343,
+	0xf318,0xf2a4,0xf283,0xf297,0xf22f,0xf258,0xf1d6,0xf24a,
+	0xf201,0xf290,0xf29c,0xf329,0xf35d,0xf3ab,0xf43b,0xf44f,
+	0xf4ff,0xf50d,0xf60c,0xf672,0xf7a7,0xf82f,0xf907,0xf9ad,
+	0xfa40,0xfb01,0xfb3b,0xfc20,0xfc9b,0xfdf9,0xfeb6,0xff8d,
+	0xffe4,0x007f,0x0114,0x016c,0x01fc,0x0230,0x0310,0x035c,
+	0x046b,0x0475,0x04ff,0x04fb,0x0556,0x0562,0x0581,0x05ec,
+	0x05b1,0x064f,0x0604,0x064d,0x0599,0x059d,0x056a,0x0579,
+	0x0544,0x04da,0x04dc,0x0454,0x0428,0x0336,0x030e,0x0273,
+	0x024d,0x01d9,0x0171,0x00eb,0x0055,0x0040,0xff4b,0xfeff,
+	0xfe09,0xfdf0,0xfd69,0xfd5c,0xfcca,0xfc6d,0xfc0d,0xfb49,
+	0xfb39,0xfa5c,0xfa66,0xf9dc,0xfa08,0xf980,0xf975,0xf934,
+	0xf90f,0xf943,0xf8f1,0xf923,0xf8ac,0xf921,0xf905,0xf978,
+	0xf95c,0xf9af,0xf9ad,0xf9a6,0xf9f4,0xfa08,0xfaa5,0xfa72,
+	0xfb20,0xfb06,0xfbaa,0xfbd4,0xfc5b,0xfcae,0xfcc6,0xfd51,
+	0xfd6c,0xfdfc,0xfdda,0xfe99,0xfe9c,0xff47,0xff67,0xffb7,
+	0xfff9,0x001c
+};
+
+static const UINT16 N1[] = {
+	0x0183,0x0251,0x02c7,0x0389,0x03dd,0x04ba,0x04d3,0x0586,
+	0x05ac,0x066b,0x06af,0x0733,0x074a,0x0735,0x07c0,0x07a6,
+	0x0802,0x0798,0x07ce,0x0793,0x07bc,0x075a,0x0706,0x0679,
+	0x0614,0x0614,0x0592,0x058f,0x0499,0x0442,0x037f,0x031d,
+	0x0241,0x01f3,0x01a8,0x0116,0x00bd,0xffa1,0xff26,0xfe2c,
+	0xfdfa,0xfd43,0xfce2,0xfc45,0xfc27,0xfbb1,0xfad5,0xfa45,
+	0xf96b,0xf9a9,0xf953,0xf941,0xf8d6,0xf8b8,0xf866,0xf850,
+	0xf82a,0xf7d2,0xf80c,0xf7ef,0xf86d,0xf837,0xf88d,0xf845,
+	0xf876,0xf88d,0xf93b,0xf98f,0xf9b9,0xfa35,0xfa2c,0xfab8,
+	0xfa8b,0xfb67,0xfbaf,0xfc62,0xfcbd,0xfd08,0xfd67,0xfd7a,
+	0xfe25,0xfe40,0xff25,0xff1d,0xffe6,0x004f,0x00af,0x00e2,
+	0x00f6,0x013e,0x0178,0x0237,0x0235,0x02c1,0x0287,0x02f6,
+	0x02be,0x02dc,0x0306,0x031b,0x038a,0x0357,0x0377,0x0311,
+	0x0354,0x02db,0x02e0,0x0293,0x02cb,0x02ef,0x0295,0x025a,
+	0x0195,0x0181,0x0108,0x00ff,0x0075,0x008f,0x003b,0x0003,
+	0xff09,0xfd51,0xfbae,0xfa53,0xfa2b,0xfa09,0xfad2,0xfb2a,
+	0xfc4b,0xfcb5,0xfd21,0xfd5e,0xfda6,0xfed6,0xfff9,0x019b,
+	0x0245,0x033c,0x0391,0x0441,0x04cc,0x05b5,0x0693,0x0755,
+	0x0872,0x08a3,0x0944,0x08f6,0x0957,0x092c,0x099b,0x0999,
+	0x098e,0x095e,0x08cd,0x0889,0x078e,0x0729,0x0628,0x05a7,
+	0x04d7,0x042e,0x0339,0x0225,0x011c,0xffdf,0xfef5,0xfdd2,
+	0xfd59,0xfc02,0xfb3c,0xf9c0,0xf8ea,0xf797,0xf6c8,0xf624,
+	0xf534,0xf496,0xf3a5,0xf36e,0xf249,0xf1f2,0xf13a,0xf0db,
+	0xf08b,0xf042,0xf057,0xefff,0xf016,0xef9a,0xefff,0xefef,
+	0xf054,0xf080,0xf10d,0xf18b,0xf1df,0xf254,0xf298,0xf383,
+	0xf415,0xf533,0xf566,0xf67d,0xf708,0xf810,0xf919,0xf9d3,
+	0xfaf4,0xfb94,0xfcb7,0xfd11,0xfe49,0xfed7,0xffcd,0x0076,
+	0x015a,0x0221,0x0294,0x0370,0x03e5,0x04d3,0x052e,0x05d8,
+	0x05a7,0x0634,0x0673,0x06fe,0x0775,0x0793,0x07d1,0x07b0,
+	0x080d,0x07bd,0x07e5,0x076f,0x0785,0x0733,0x0705,0x06f4,
+	0x065f,0x0631,0x056a,0x0568,0x0484,0x0441,0x039a,0x034e,
+	0x027c,0x01d5,0x0149,0x00ae,0x006e,0xff8e,0xff50,0xfe43,
+	0xfdf7,0xfd23,0xfcd1,0xfc34,0xfba8,0xfb74,0xfab8,0xfa99,
+	0xf9de,0xf9eb,0xf934,0xf921,0xf8b9,0xf8a9,0xf880,0xf845,
+	0xf855,0xf80d,0xf845,0xf7d6,0xf817,0xf7fd,0xf882,0xf869,
+	0xf89d,0xf8c1,0xf8ef,0xf96b,0xf991,0xfa4b,0xfa49,0xfb22,
+	0xfaff,0xfba0,0xfbb9,0xfc2f,0xfca9,0xfce6,0xfd92,0xfdb6,
+	0xfe69,0xfe6f,0xff13,0xff20,0xfff2,0x0023,0x008c,0x00e8,
+	0x0152,0x01bd,0x0189,0x0233,0x0227,0x02a0,0x0257,0x02c7,
+	0x02d3,0x0301,0x034e,0x0325,0x039c,0x033e,0x036f,0x02e3,
+	0x031f,0x02af,0x02be,0x02b4,0x02ce,0x02ba,0x021d,0x0225,
+	0x01a5,0x01ae,0x0111,0x0145,0x00c9,0x00ac,0x003e,0xff8b,
+	0xfeac,0xfd3d,0xfc33,0xfa96,0xfa3c,0xf9c7,0xfa81,0xfb12,
+	0xfc0b,0xfca3,0xfcfe,0xfd5f,0xfde3,0xff2d,0x0023,0x01c7,
+	0x025f,0x0362,0x03c1,0x045e,0x04d4,0x0562,0x0651,0x0705,
+	0x0827,0x0861,0x0937,0x0904,0x0968,0x0926,0x0971,0x09cc,
+	0x09b3,0x099d,0x092b,0x08d0,0x0793,0x0739,0x065c,0x05fe,
+	0x0529,0x049c,0x0396,0x0270,0x0174,0x0011,0xff57,0xfe2d,
+	0xfde2,0xfc5b,0xfb68,0xfa08,0xf913,0xf81c,0xf726,0xf6b9,
+	0xf5ac,0xf530,0xf3c1,0xf362,0xf245,0xf1c9,0xf118,0xf0c4,
+	0xf08a,0xf026,0xf065,0xf00d,0xf009,0xef50,0xef92,0xef9d,
+	0xf041,0xf07a,0xf0f8,0xf143,0xf189,0xf265,0xf285,0xf371,
+	0xf3b3,0xf4b8,0xf56f,0xf675,0xf6f7,0xf7b7,0xf8ab,0xf971,
+	0xfa84,0xfb0f,0xfc49,0xfd13,0xfe54,0xfeb4,0xffb3,0x007a,
+	0x0119
+};
+
+static const UINT16 V1[] = {
+	0xfffb,0x000a,0xfeb8,0xfdfb,0xfc9c,0xfd84,0xfd78,0xfc96,
+	0xfc96,0xfbbe,0xfb5a,0xfa66,0xfa3c,0xf9f0,0xfb25,0xfafe,
+	0xfc5a,0xfcba,0xfc85,0xfc0e,0xfb1c,0xfb3f,0xfa69,0xfad3,
+	0xfa10,0xfaf4,0xfb7a,0xfc64,0xfc4f,0xfbae,0xfbfb,0xfb89,
+	0xfbfb,0xfb95,0xfc47,0xfc20,0xfd62,0xfdcb,0xfe2c,0xfdc0,
+	0xfd28,0xfd64,0xfd13,0xfded,0xfdc4,0xfeec,0xff16,0x0002,
+	0x0002,0xffbc,0xff64,0xfed0,0xff74,0xff15,0xffbb,0xff21,
+	0xfff7,0x002c,0x008e,0x0021,0xff94,0xffb0,0xff9c,0x0064,
+	0xffd3,0x0012,0xff8a,0x0017,0xfff2,0xff98,0xff18,0xfe7d,
+	0xfef5,0xfebe,0xff45,0xfe5d,0xfe95,0xfe20,0xfe62,0xfdcf,
+	0xfd1a,0xfcb6,0xfca3,0xfd51,0xfd15,0xfe1d,0xfd76,0xfde9,
+	0xfcb1,0xfc8d,0xfc83,0xfc6a,0xfca9,0xfc8c,0xfdde,0xfede,
+	0x0044,0xfe84,0xfcd3,0xfa0a,0xf97e,0xfa8d,0xfbe6,0xfd88,
+	0xfdb9,0xfedd,0xff47,0x00da,0x0050,0xfef7,0xfc93,0xfbe4,
+	0xfd5b,0xff23,0x0046,0xfeb3,0xfe41,0xfdfc,0xff7e,0xffa3,
+	0xff54,0xff98,0x0045,0x011f,0x009e,0xffe1,0xfd9d,0xfd54,
+	0xfdf2,0x0064,0x0077,0xffb1,0xffca,0x003b,0x0115,0xff68,
+	0xfdc0,0xfc53,0xfdfa,0xff22,0x00d7,0x0056,0xfff8,0x0021,
+	0xff63,0xfe95,0xfbec,0xfb55,0xfc67,0xff9d,0x00f9,0xffb3,
+	0xfcf5,0xfb9a,0xfd51,0xfe97,0xfeb8,0xfccb,0xfd72,0xff12,
+	0x013a,0x0006,0xfda0,0xfc18,0xfc0c,0xfda5,0xfd0a,0xfc20,
+	0xfb01,0xfcfd,0xfe01,0xfdb6,0xfcc8,0xfd02,0xff33,0x0093,
+	0x00b2,0xfe23,0xfcc2,0xfc80,0xfe52,0xff18,0xff70,0xfeb1,
+	0xfefc,0x0035,0xffe3,0xfea6,0xfbb4,0xfc6d,0xfdf0,0x0031,
+	0x0038,0xfeb0,0xfe16,0xff1c,0x00fd,0xff96,0xfe69,0xfdd2,
+	0x0052,0x01b4,0x0119,0xfeb5,0xfd42,0xfebb,0x0048,0x00d8,
+	0xfe11,0xfc37,0xfb70,0xfddb,0xfee6,0xfebd,0xfe42,0xfed5,
+	0x00c4,0x002b,0xfe8d,0xfb6f,0xfb77,0xfc51,0xfdf0,0xfd76,
+	0xfc9f,0xfccf,0xfd43,0xfdf0,0xfc30,0xfb63,0xfb00,0xfd5f,
+	0xff03,0x003c,0x0028,0x0022,0x0100,0x00c7,0x0073,0xfe87,
+	0xfeaf,0xff1a,0x00c5,0x0113,0x00c2,0x0059,0x0030,0x00aa,
+	0xffe9,0xfff2,0xff68,0x00ac,0x015b,0x0201,0x0127,0x001f,
+	0xff7d,0xfec1,0xfead,0xfd94,0xfde8,0xfd79,0xfe68,0xfe1d,
+	0xfdac,0xfca7,0xfbf3,0xfc4c,0xfc07,0xfc82,0xfc11,0xfccf,
+	0xfc6f,0xfcdb,0xfc08,0xfb3e,0xfa8c,0xf9fe,0xfa9a,0xfa73,
+	0xfaf6,0xfab9,0xfb9b,0xfb60,0xfbb7,0xfb69,0xfb4f,0xfbc4,
+	0xfc0a,0xfd1f,0xfcd9,0xfd9b,0xfd0a,0xfda2,0xfd2b,0xfd61,
+	0xfd15,0xfd23,0xfdcc,0xfdd2,0xfea3,0xfe39,0xfefd,0xfed9,
+	0xff83,0xff53,0xff9e,0x0006,0x000c,0x00a9,0x000e,0x008b,
+	0xff88,0xffcc,0xff49,0xff5e,0xff40,0xff4e,0xffa9,0xff99,
+	0x0077,0xfff5,0x0040,0xff27,0xff70,0xff31,0xff2a,0xfef9,
+	0xfeb2,0xfef7,0xfe65,0xfeb6,0xfdac,0xfda9,0xfccb,0xfd3e,
+	0xfd0d,0xfd20,0xfd42,0xfd55,0xfe2d,0xfd70,0xfcca,0xfba0,
+	0xfd3d,0xfe89,0xff9b,0xfe0a,0xfc07,0xfc2d,0xfc73,0xfc54,
+	0xfa12,0xfa12,0xfbff,0xffc3,0x0038,0xfdcb,0xfbdc,0xfc20,
+	0xfe3e,0xfe97,0xfdf5,0xfb99,0xfc54,0xfe74,0x008a,0xff7e,
+	0xfe2f,0xfd81,0xfe0a,0xff3f,0xfe52,0xfe22,0xfd4c,0xff27,
+	0x0026,0x0168,0x00d1,0x0038,0x0004,0xfefd,0xfeb0,0xfdf2,
+	0xff9a,0x0068,0x010d,0x003c,0xffa3,0xff74,0xffbf,0x00db,
+	0x0002,0xff10,0xfd70,0xfe2e,0xff0f,0x00fb,0x0111,0xffbb,
+	0xfdfb,0xfd15,0xfe55,0xfe64,0xfe82,0xfd09,0xfca5,0xfce8,
+	0xfdf1,0xfe64,0xfe15,0xfeb5,0xfe63,0xfe85,0xfd70,0xfd11,
+	0xfc85,0xfcfd,0xfd97,0xfe8e,0xff14,0xfdf8,0xfc65,0xfabb,
+	0xfb7c,0xfc61,0xfefc,0x004a,0x0082,0xff2d,0xfe0f,0xfd9e,
+	0xfce3,0xfd09,0xfcf5,0xff2b,0x006a,0x0082,0xfec0,0xfd54,
+	0xfd0b,0xfc65,0xfc45,0xfbfa,0xfdd4,0x0024,0x035f,0x0210,
+	0xff07,0xfcd3,0xfb43,0xface,0xfa8a,0xfb43,0xfc2f,0xffa0,
+	0x01ae,0x0159,0xfd24,0xf9d7,0xf8df,0xfa92,0xfe2b,0x0057,
+	0x0125,0x006d,0x0059,0xfe78,0xfd34,0xfbdb,0xfc78,0xfdd9,
+	0xfefe,0xffc7,0xff2e,0xff45,0xfdc9,0xfd0c,0xfb60,0xfb20,
+	0xfb04,0xfc3b,0xfdc2,0xfe40,0xfee9,0xfe3a,0xfe86,0xfde5,
+	0xfe4b,0xfe1a,0xff0e,0x0074,0x0182,0x0212,0x016e,0x0111,
+	0xff90,0xffa1,0xfed5,0xff4b,0xff94,0x009d,0x0151,0x0144,
+	0x0154,0x0071,0x008d,0xffa7,0x0033,0xff9e,0x0049,0x0048,
+	0x005d,0xffea,0xfe8e,0xfe13,0xfce8,0xfcd5,0xfc07,0xfcb2,
+	0xfca4,0xfd4e,0xfd42,0xfcb3,0xfc3b,0xfb48,0xfbae,0xfb26,
+	0xfb82,0xfb62,0xfc0c,0xfbb6,0xfbee,0xfba4,0xfaeb,0xfad1,
+	0xfa41,0xfae6,0xfabe,0xfbd0,0xfba7,0xfc32,0xfbf4,0xfc05,
+	0xfc31,0xfbdf,0xfc71,0xfc43,0xfd49,0xfd1c,0xfddd,0xfdca,
+	0xfe0c,0xfe1a,0xfe23,0xfea3,0xfea9,0xff6d,0xff3c,0xffef,
+	0xff45,0xffa6,0xff7f,0xff64,0xff85,0xffb5,0x0095,0x0059,
+	0x00e2,0x0028,0x0073,0xffe4,0x002e,0x0004,0x0014,0x0038,
+	0x0019,0x0093,0xff7f,0xff5a,0xfe90,0xfed0,0xfe6e,0xfeb2,
+	0xfea0,0xfe68,0xfea8,0xfe34,0xfe7c,0xfd61,0xfd89,0xfcde,
+	0xfd65,0xfd45,0xfd4e,0xfd7a,0xfcbb,0xfca5,0xfc06,0xfc1f,
+	0xfba8,0xfd1b,0xfdbe,0xfe0d,0xfd2b,0xfcfe,0xfd29,0xfc94,
+	0xfc1b,0xfa92,0xfb7c,0xfc49,0xfdd4,0xfe0f,0xfe4d,0xff1f,
+	0xffef,0x0016,0xfdef,0xfc2c,0xfb09,0xfd7c,0xff5d,0x00b5,
+	0xfed4,0xfd34,0xfd38,0xfeb2,0x00e1,0x0080,0x003d,0xff02,
+	0xffa6,0xfff6,0xffe3,0xff6e,0xff52,0x0021,0x00ab,0x010d,
+	0xff01,0xfe41,0xfde3,0xfeb0,0xfeaa,0xff4f,0xff82,0xffeb,
+	0x012a,0x014a,0x00de,0xfdd3,0xfcb5,0xfc76,0xfe96,0xffc5,
+	0xff66,0xfeb0,0xfe9c,0xff56,0xfe21,0xfd35,0xfb60,0xfc3e,
+	0xfdb8,0xffee,0xffea,0xfe7c,0xfda4,0xfcca,0xfc99,0xfad5,
+	0xfb08,0xfbc6,0xfe59,0x0002,0x0094,0xff2b,0xfdd8,0xfdaf,
+	0xfcea,0xfce2,0xfb8d,0xfbfd,0xfd6d,0xffe1,0x0051,0xfee7,
+	0xfd0f,0xfc6a,0xfdf8,0xfe40,0xfea6,0xfe80,0x0036,0x00aa,
+	0x00f9,0xff86,0xfe56,0xfe92,0xfe17,0xfe20,0xfcec,0xfe25,
+	0xffdc,0x015a,0x002e,0xfee7,0xfe59,0xfe0a,0xfec4,0xfeeb,
+	0x0016,0xffc7,0xffbb,0xfe38,0xfe2c,0xfe89,0xfed7,0xfe80,
+	0xfc88,0xfcd0,0xfe42,0x0106,0x0074,0xfefc,0xfca4,0xfc85,
+	0xfceb,0xfcc6,0xfc42,0xfba8,0xfd53,0xfe51,0xfec7,0xfc8b,
+	0xfb4f,0xfafd,0xfc17,0xfd3c,0xfd29,0xfdd4,0xfec3,0x00cf,
+	0x00c9,0x0070,0xfeb2,0xfef6,0xffde,0x00a4,0x00b0,0x0018,
+	0x00c9,0x00b2,0x015d,0xffb9,0xfeea,0xfe6b,0xffae,0x00cf,
+	0x0102,0x011f,0x008b,0x016e,0x00e1,0x00b7,0xfee6,0xfe71,
+	0xfe60,0xff29,0xff15,0xfdf4,0xfd75,0xfc9e,0xfd3c,0xfc6f,
+	0xfc12,0xfb74,0xfc13,0xfc8f,0xfcf9,0xfcbf,0xfbb5,0xfbd2,
+	0xfb27,0xfbad,0xfa91,0xfa9b,0xfa6c,0xfaf3,0xfb25,0xfac0,
+	0xfabf,0xfa9a,0xfbb2,0xfb95,0xfc4a,0xfbd7,0xfc87,0xfcc7,
+	0xfd07,0xfcfa,0xfc54,0xfcf6,0xfcc0,0xfda2,0xfd5d,0xfe01,
+	0xfdb1,0xfe29,0xfeaf,0xfe8f,0xfea5,0xfe54,0xff30,0xfef6,
+	0x002b,0x000f,0x00bb,0x008b,0x00c2,0x0075,0xffbd,0xffd5,
+	0xff58,0x0012,0xffc6,0x0086,0xffb2,0x000d,0xffb7,0xff89,
+	0xff8f,0xff5e,0x001e,0xffe6,0x0089,0xff82,0xff93,0xfeb4,
+	0xfe80,0xfe0f,0xfd8f,0xfda2,0xfd37,0xfe0e,0xfdde,0xfe11,
+	0xfd24,0xfd6b,0xfc31,0xfc23,0xfc38,0xfcee,0xfe72,0xfe89,
+	0xfe83,0xfc7d,0xfc25,0xfb97,0xfc43,0xfb20,0xfab2,0xfbae,
+	0xfda1,0xff4e,0xfd90,0xfc19,0xfb0d,0xfd64,0xffa8,0x00da,
+	0xff66,0xfd91,0xfdf4,0xfed5,0xff3d,0xfc0a,0xfac8,0xfb8e,
+	0xff64,0x00f7,0x0019,0xfe6b,0xfea1,0x0026,0xff84,0xfe3c,
+	0xfc21,0xfe37,0x008d,0x02c8,0x013c,0xff6a,0xfef7,0xff14,
+	0xff7a,0xfd8d,0xfcba,0xfd5f,0x0102,0x01fb,0x0056,0xfd8b,
+	0xfcd0,0xfeda,0xffd3,0x0001,0xfe5a,0xff45,0x0050,0x0187,
+	0xff7c,0xfd7f,0xfc6c,0xfcc7,0xfdb4,0xfcae,0xfc90,0xfc96,
+	0xfe78,0xfed4,0xfe3a,0xfc75,0xfbf4,0xfd36,0xfe50,0xff70,
+	0xfe4a,0xfe26,0xfdc0,0xfe6c,0xfe1d,0xfe0a,0xfdda,0xfe8d,
+	0xff79,0xfe89,0xfd07,0xfa9d,0xfb07,0xfbb3,0xfd03,0xfd53,
+	0xfd9d,0xfecb,0x0093,0x021d,0x00e0,0xff02,0xfc46,0xfd0b,
+	0xfe33,0xff29,0xfe84,0xfdcf,0xfe75,0xfeec,0xff5d,0xfd36,
+	0xfbf4,0xfb88,0xff14,0x023f,0x036a,0x018d,0xfeac,0xfe31,
+	0xfe95,0xff70,0xfd83,0xfce4,0xfd41,0xff95,0x006d,0xfe17,
+	0xfbb6,0xfb7b,0xfe79,0xffc9,0xfffe,0xfe1d,0xfe88,0xff4b,
+	0x0036,0xfe58,0xfb80,0xfac7,0xfb5f,0xfd3f,0xfc7d,0xfbe5,
+	0xfaf8,0xfcad,0xfdcd,0xfe3c,0xfdad,0xfd80,0xff8f,0x011a,
+	0x0230,0x00be,0x0079,0x003a,0x00f6,0x007d,0xff7a,0xfee3,
+	0xff0c,0x00b0,0x00b1,0x00a1,0xff66,0xfffe,0x006e,0x0118,
+	0x0095,0xfff4,0x006f,0x00b1,0x0156,0xffea,0xff1a,0xfdcd,0xfe0a,0xfda0,0xfd45,0xfcdd,0xfc77,0xfd38,0xfd1c,0xfd91,
+	0xfc31,0xfc54,0xfbd6,0xfc4c,0xfc23,0xfbd3,0xfb9f,0xfb90,
+	0xfbe3,0xfb11,0xfb45,0xfa5a,0xfaaf,0xfa8f,0xfb2c,0xfb62,
+	0xfb2e,0xfb80,0xfb61,0xfc32,0xfbd8,0xfc8f,0xfc3f,0xfcdb,
+	0xfce7,0xfd2a,0xfd7d,0xfd1c,0xfd6e,0xfd28,0xfdcf,0xfd68,
+	0xfe3b,0xfe5e,0xff1e,0xff36,0xff58,0xffaf,0xff54,0xffec,
+	0xff55,0xffc5,0xff41,0xfff2,0xffee,0x0023,0x0000,0xffcb,
+	0xffea,0xff33,0xff94,0xff23,0xffb4,0xff76,0xfffd,0xffb7,
+	0xff8f,0xff72,0xfee5,0xff30,0xfe8b,0xff29,0xfeb1,0xfef9,
+	0xfe3d,0xfe49,0xfdc1,0xfd5f,0xfd71,0xfd46,0xfde7,0xfd8f,
+	0xfe2d,0xfd18,0xfd52,0xfce5,0xfcce,0xfd43,0xfda9,0xfe5a,
+	0xfe1e,0xfe2b,0xfc56,0xfb87,0xfaf3,0xfc01,0xfc36,0xfcf9,
+	0xfda3,0xfdd4,0xfe63,0xfdef,0xfe8c,0xfd83,0xfd8c,0xfca6,
+	0xfe16,0xff50,0xff8e,0xff0f,0xfd8d,0xfd79,0xfd4f,0xfdb8,
+	0xfcf7,0xfe18,0xff58,0x0096,0x001a,0xff18,0xffaa,0x0005,
+	0x0033,0xfe33,0xfe0d,0xfe72,0x0131,0x0209,0x0060,0xfed6,
+	0xfe3d,0xffd9,0xff9c,0xfebf,0xfd5a,0xfe22,0xffc3,0x00de,
+	0xfffb,0xfed3,0xfef6,0xfea6,0xfe72,0xfcb0,0xfd37,0xfe33,
+	0x0005,0x0001,0xff66,0xfed7,0xfea9,0xfef0,0xfd9c,0xfcd3,
+	0xfbf2,0xfdf6,0xff55,0xff4b,0xfd0a,0xfb6b,0xfb4e,0xfc07,
+	0xfd9d,0xfd9d,0xfe5d,0xfe2b,0xff19,0xfea2,0xfd9f,0xfc4c,
+	0xfb95,0xfcba,0xfdaa,0xfef5,0xfeb5,0xff6b,0xff7f,0x0003,
+	0xfefa,0xfdaf,0xfcaa,0xfc47,0xfd23,0xfd1b,0xfe3e,0xfe1e,
+	0xfe59,0xfdad,0xfe72,0xff9c,0x0155,0x01cd,0x002e,0xfed0,
+	0xfde3,0xff95,0xff9e,0xff2f,0xfd71,0xfcdf,0xfd49,0xfd77,
+	0xfd20,0xfcc6,0xfe3c,0xff1e,0x00e9,0x003b,0x0004,0xffb8,
+	0x003d,0xfff4,0xfdec,0xfcea,0xfc17,0xfce4,0xfca4,0xfcd0,
+	0xfbe8,0xfc57,0xfcbd,0xfce9,0xfcce,0xfc21,0xfd06,0xfd79,
+	0xfeb2,0xfe53,0xfec7,0xfe8c,0xff66,0xffaf,0xff49,0xfef6,
+	0xfe6e,0xff99,0xffa0,0x005b,0xffbf,0x0033,0x0064,0x00b9,
+	0x00bd,0x003b,0x00b8,0x006d,0x015c,0x00ef,0x00f9,0x003e,
+	0x0041,0xffe2,0xff49,0xfef0,0xfe76,0xff05,0xfed7,0xff7d,
+	0xfe4b,0xfe2d,0xfd66,0xfd9f,0xfd43,0xfc7c,0xfc84,0xfc21,
+	0xfce5,0xfc1c,0xfc18,0xfb0f,0xfb0c,0xfad3,0xfb18,0xfb11,
+	0xfaaf,0xfb6a,0xfb45,0xfc04,0xfb21,0xfb4f,0xfadf,0xfb56,
+	0xfb91,0xfb6d,0xfbd1,0xfba3,0xfc7e,0xfc52,0xfcd9,0xfc35,
+	0xfcda,0xfcfb,0xfd90,0xfde7,0xfde8,0xfe60,0xfe40,0xff30,
+	0xfec0,0xff18,0xfe7a,0xff1b,0xff2a,0xff2c,0xff52,0xff30,
+	0xffab,0xff50,0x002c,0xffb2,0x0056,0x0011,0x006b,0x006b,
+	0x005a,0x0050,0xff93,0xffe8,0xff0c,0xffa3,0xff43,0xff60,
+	0xfefd,0xff20,0xfee4,0xfe7e,0xfec7,0xfe3d,0xfebf,0xfe4b,
+	0xfef0,0xfe69,0xfe99,0xfe39,0xfe39,0xfdd1,0xfd5f,0xfd4d,
+	0xfc24,0xfca0,0xfc5a,0xfcfa,0xfc87,0xfd15,0xfdb5,0xfdfb,
+	0xfdf7,0xfce9,0xfcfc,0xfcff,0xfe39,0xfd64,0xfcb5,0xfadd,
+	0xfa43,0xfb14,0xfc8a,0xfecc,0xff95,0x004e,0xff13,0xfeda,
+	0xfd51,0xfcda,0xfb9c,0xfbf8,0xfe17,0x0016,0x01cb,0x003d,
+	0xff5f,0xfe6f,0xfe2c,0xfd44,0xfd5c,0xfe46,0x0010,0x01fa,
+	0x01b8,0x009a,0xfd9e,0xfd3a,0xfdbe,0xff9c,0xffe3,0xff8f,
+	0x000c,0x0123,0x01d3,0xffa4,0xfe31,0xfd63,0xff0e,0xff44,
+	0xff1c,0xfd52,0xfd4b,0xfe60,0xff43,0xffd8,0xfe2f,0xfe54,
+	0xfe44,0xff36,0xff15,0xfe3f,0xfd8e,0xfde8,0xfeca,0xfdd8,
+	0xfcbf,0xfa76,0xfa92,0xfb74,0xfdc2,0xfe83,0xff1b,0xffac,
+	0x009f,0x0117,0xfe80,0xfbdd,0xf9aa,0xfbcc,0xfde4,0xff3a,
+	0xfda1,0xfbfb,0xfcff,0xfe57,0xfedb,0xfca7,0xfc4e,0xfd26,
+	0xff98,0x000c,0xfffa,0x0051,0x00c9,0x0159,0xffd8,0xfe65,
+	0xfbcf,0xfc50,0xfd2c,0xff7e,0x0059,0xffe8,0xffb2,0xfea3,
+	0xfea9,0xfdbb,0xfdfd,0xfe2a,0x0049,0x00ea,0x0216,0x01a3,
+	0x0061,0xfeaf,0xfc63,0xfca6,0xfca3,0xfd74,0xfd7f,0xfe7c,
+	0xfe6b,0xfe60,0xfdc8,0xfce3,0xfcd3,0xfce4,0xfebf,0xfeee,
+	0xff6b,0xfe96,0xfe51,0xfd21,0xfc0d,0xfb1a,0xfa81,0xfb83,
+	0xfc1f,0xfe10,0xfe63,0xff8c,0xff6f,0xfff3,0xfff4,0xffca,
+	0x0060,0x00aa,0x01c9,0x0170,0x01f3,0x009c,0x000c,0xff36,
+	0xfece,0xfebd,0xfeb7,0xff91,0xffe7,0x0110,0x0080,0x00c5,
+	0xffe0,0xffee
+};
+
+static const UINT16 Z1[] = {
+	0xffd1,0xff65,0xff75,0xfef0,0xfed1,0xfed9,0xfeb0,0xfec9,
+	0xfdba,0xfdf0,0xfd95,0xfdeb,0xfe43,0xfe93,0xfbca,0xfbed,
+	0xfbf8,0xfc81,0xff56,0xfd3e,0xfa47,0xf9e1,0xfe55,0x00ff,
+	0xfd98,0xfb32,0xfb01,0xfd76,0xfd02,0xfd97,0xfd97,0xfd7b,
+	0xfb6f,0xfb6b,0xff29,0x000d,0xfc5e,0xfa2f,0xff1c,0x025a,
+	0x006f,0xf9d5,0xf89c,0xff5c,0x06a1,0x0286,0xf84e,0xf6d5,
+	0x012a,0x0953,0x026c,0xf954,0xf858,0x00fc,0x07c5,0x0257,
+	0xfa55,0xfae9,0x00f1,0x05fd,0x0282,0xfb85,0xfa84,0xfef8,
+	0x048f,0x019e,0xfde1,0xfc53,0xfec4,0x01f2,0x00e1,0xfcc7,
+	0xfb5f,0x0081,0x02a2,0x0046,0xfb93,0xfb04,0xfea6,0x0128,
+	0xffe0,0xfbaf,0xf9aa,0xfb83,0x00fc,0x01c2,0xfefd,0xfc9b,
+	0xfbcf,0xfbfa,0xfcff,0xff04,0xfe54,0xfd6c,0xfc08,0xfd00,
+	0xfe39,0xfee4,0xfeb7,0xfb1d,0xfab0,0xfd68,0x0269,0x0094,
+	0xfc29,0xfa13,0xfbc4,0x0013,0x013d,0xfeb0,0xfb67,0xfcae,
+	0xff96,0x02b1,0x0086,0xfafc,0xf7fe,0xfe49,0x05e0,0x0403,
+	0xfbd7,0xf755,0xfb92,0x023d,0x050d,0xff7d,0xfa67,0xfb57,
+	0x01dd,0x0567,0xff52,0xfab6,0xfa18,0x0115,0x038e,0xfeed,
+	0xf9e0,0xfc4b,0x024c,0x0228,0xfd98,0xfaa8,0xfd76,0x0117,
+	0x018e,0xfca4,0xfa1c,0xfb91,0x000b,0x00b9,0xfd3f,0xfa1c,
+	0xfa5e,0xfdeb,0xfecd,0xfd99,0xfaeb,0xfc47,0xfea3,0x001f,
+	0xfe82,0xfbdf,0xfc7f,0xff06,0x017a,0x0039,0xfecd,0xfdfe,
+	0xfffd,0x0179,0x0114,0xffa1,0xfef3,0x00e7,0x01db,0x0210,
+	0x0013,0xffb5,0x001f,0x01a7,0x0193,0x0065,0xffe9,0xffdc,
+	0x0102,0x001e,0xff28,0xfd9f,0xfe4e,0xfedb,0xff27,0xfe03,
+	0xfcc6,0xfd14,0xfd38,0xfdcc,0xfc6e,0xfc0b,0xfba8,0xfc94,
+	0xfc7d,0xfbea,0xfb75,0xfafe,0xfb87,0xfb50,0xfb67,0xfa60,
+	0xfaba,0xfade,0xfb97,0xfb6f,0xfafa,0xfb20,0xfb3c,0xfc0e,
+	0xfbc7,0xfc3b,0xfb75,0xfc56,0xfc9e,0xfced,0xfcc9,0xfcab,
+	0xfd58,0xfd47,0xfe28,0xfda2,0xfe30,0xfe0f,0xfebe,0xfeae,
+	0xfeeb,0xff05,0xff40,0x0014,0xff97,0x0032,0xffbe,0x0021,
+	0xffd4,0x003d,0xfffd,0xfff2,0x0031,0x000b,0x0075,0xffcf,
+	0x002d,0xffc1,0x0017,0xffdc,0x001f,0xffd3,0xffaf,0xffa1,
+	0xfef6,0xff2a,0xfe56,0xfecd,0xfe48,0xfe9f,0xfe3e,0xfe4a,
+	0xfe39,0xfdf3,0xfe06,0xfdcc,0xff8c,0xff0a,0xfc17,0xfa1a,
+	0xfdea,0x0013,0xfd8f,0xf826,0xf845,0xfe40,0x01ab,0x00f1,
+	0xfb7b,0xf8ae,0xfae1,0xff69,0xff79,0xfb1c,0xfb1b,0xfd97,
+	0xfe7e,0xfc48,0xfd47,0xfd87,0xfd08,0xfd1f,0xff15,0x00b9,
+	0xfd7b,0xfafd,0xfc46,0x00c5,0x02a5,0x011d,0xfa94,0xf9ba,
+	0xff73,0x02e2,0x0284,0xfd1f,0xf93e,0xfc5d,0x04fe,0x06ab,
+	0xfea1,0xf65d,0xfaa0,0x0521,0x0949,0x0028,0xf821,0xfb28,
+	0x033c,0x065d,0xfe27,0xf7ee,0xfb35,0x028e,0x0626,0xff04,
+	0xf9a2,0xf965,0xffb4,0x0517,0x032c,0xfab0,0xf6f0,0xfa8a,
+	0x027e,0x046f,0xff99,0xf993,0xf88d,0xfe6d,0x0210,0x0003,
+	0xfa58,0xf899,0xfbf6,0x0201,0x0043,0xfa9d,0xfaeb,0xfd67,
+	0x001b,0x005c,0xfe0f,0xf9be,0xfb4d,0xff80,0x0177,0xff00,
+	0xfb5e,0xfd98,0x0060,0x0098,0xfb85,0xf9e5,0xfec2,0x025f,
+	0x0008,0xfd3a,0xfcd3,0xfca7,0xfea0,0xff7e,0x0016,0xfebb,
+	0xff88,0x00b0,0xfe73,0xfdcb,0x0010,0x0187,0xfdc3,0xfd04,
+	0xff37,0x0084,0xff26,0xfead,0xfccd,0xfde5,0x0074,0x012b,
+	0x0186,0xfec3,0xfb9c,0xfab7,0xff01,0x018d,0x0015,0xfc14,
+	0xfadd,0xfdb9,0x0019,0xffc1,0xfbff,0xfafb,0xfc6c,0xff4c,
+	0xfec5,0xfc23,0xfaa3,0xfbea,0xfed6,0xfee1,0xfdca,0xfbfd,
+	0xfd8e,0xffb7,0x00ca,0xff61,0xfdfe,0xfed6,0x0066,0x01d8,
+	0x0086,0xffb7,0xff25,0x00fb,0x0186,0x00cb,0xff75,0xff50,
+	0x00a6,0x0122,0x010a,0xff6a,0xff67,0xff8a,0x00a2,0x0006,
+	0xff14,0xfebd,0xff13,0xffc6,0xfec3,0xfe30,0xfcc6,0xfd6e,
+	0xfd89,0xfdbd,0xfd10,0xfc22,0xfc42,0xfc58,0xfc94,0xfb7b,
+	0xfb88,0xfb0f,0xfc00,0xfbe3,0xfbcc,0xfb3d,0xfacd,0xfb21,
+	0xfaed,0xfb50,0xfb22,0xfbb3,0xfb89,0xfc0b,0xfbaf,0xfb78,
+	0xfb4b,0xfb8e,0xfc98,0xfccb,0xfd96,0xfd19,0xfd90,0xfd27,
+	0xfd9c,0xfd60,0xfd70,0xfde1,0xfe2e,0xff37,0xfea8,0xfebe,
+	0xfe3a,0xff15,0xff3c,0xffbe,0xffb5,0xffb8,0x0040,0x0018,
+	0x008b,0xff97,0xffba,0xff60,0x003a,0x0011,0x0006,0xff9c,
+	0xff32,0xff7a,0xff46,0xffb9,0xff31,0xffa5,0xff7a,0xffe5
+};
+
+static const UINT16 NG1[] = {
+	0x0335,0x06bf,0x08a0,0x09f3,0x0982,0x098e,0x09f4,0x0b97,
+	0x0e3f,0x1109,0x13a3,0x14a1,0x1566,0x14af,0x13e1,0x1310,
+	0x137a,0x1426,0x1538,0x15ba,0x14eb,0x1394,0x10fb,0x0f1e,
+	0x0d04,0x0bcc,0x0a71,0x09a9,0x0863,0x063b,0x039c,0x000b,
+	0xfd49,0xfaac,0xf936,0xf748,0xf61a,0xf43c,0xf275,0xeffa,
+	0xed8f,0xeb86,0xe9d0,0xe943,0xe864,0xe85f,0xe797,0xe734,
+	0xe634,0xe588,0xe541,0xe55b,0xe63f,0xe72d,0xe88d,0xe953,
+	0xea9b,0xeb0a,0xec0e,0xecf6,0xeee6,0xf102,0xf344,0xf5ac,
+	0xf72c,0xf8ff,0xfa49,0xfc45,0xfd7c,0xffb7,0x01c5,0x0409,
+	0x0615,0x076e,0x08c2,0x097c,0x0ad2,0x0ba6,0x0d1b,0x0df9,
+	0x0fa9,0x1044,0x10b3,0x10ca,0x1005,0x0ff8,0x0fb1,0x102b,
+	0x0ff3,0x0fff,0x0f45,0x0e82,0x0d43,0x0bb1,0x0a40,0x0904,
+	0x085d,0x0765,0x06c1,0x0503,0x03d3,0x01bb,0x0024,0xfe95,
+	0xfd1c,0xfc48,0xfb6d,0xfacb,0xf971,0xf856,0xf696,0xf5a1,
+	0xf463,0xf403,0xf38c,0xf363,0xf374,0xf313,0xf31a,0xf210,
+	0xf1f8,0xf1ac,0xf281,0xf30a,0xf40a,0xf4b6,0xf522,0xf5fe,
+	0xf647,0xf705,0xf716,0xf86d,0xf998,0xfb6c,0xfc7f,0xfd71,
+	0xfe15,0xfee7,0x0038,0x00f9,0x0231,0x02d9,0x046e,0x0561,
+	0x062f,0x0637,0x0686,0x0729,0x07d8,0x08d2,0x08dc,0x096f,
+	0x0925,0x09a9,0x0996,0x0989,0x08ed,0x08a4,0x08a7,0x087e,
+	0x0870,0x0783,0x06e5,0x05f5,0x05a6,0x04b2,0x03fd,0x0305,
+	0x029b,0x0259,0x0180,0x00b4,0xff59,0xfeb9,0xfdd4,0xfd6a,
+	0xfc80,0xfc12,0xfb9d,0xfb3d,0xfabe,0xf9b4,0xf93d,0xf873,
+	0xf8cc,0xf869,0xf8d6,0xf87b,0xf88c,0xf87f,0xf86e,0xf854,
+	0xf844,0xf8f1,0xf916,0xf9fd,0xfa0f,0xfaa2,0xfa89,0xfb3b,
+	0xfbbc,0xfc18,0xfce1,0xfd4d,0xfe42,0xfeb0,0xff81,0xff5e,
+	0xffae,0xff9a,0xffdd,0xff2d,0xfdfd,0xfc7c,0xfae6,0xfb1e,
+	0xfbf4,0xfec2,0x01d3
+};
+
+static const UINT16 OO1[] = {
+	0x1023,0x219f,0x320f,0x415e,0x4ed6,0x59c8,0x61e4,0x655d,
+	0x645c,0x5d1c,0x51b5,0x4212,0x2ff7,0x1c87,0x0962,0xf7b6,
+	0xe83f,0xdb6c,0xd06d,0xc80c,0xc18c,0xbe66,0xbd2c,0xbe8e,
+	0xc110,0xc487,0xc7cd,0xc9fc,0xcb5e,0xcb26,0xcab2,0xc9e7,
+	0xcac5,0xcc66,0xcfee,0xd4e9,0xdbc5,0xe480,0xee6c,0xfa32,
+	0x06d3,0x14dd,0x2293,0x300c,0x3b36,0x4400,0x4950,0x4afc,
+	0x48f9,0x4386,0x3bc2,0x3176,0x2629,0x1902,0x0bc9,0xfe53,
+	0xf214,0xe715,0xde16,0xd7a0,0xd348,0xd196,0xd16a,0xd2cc,
+	0xd434,0xd659,0xd813,0xd9e2,0xdb98,0xdd32,0xded3,0xe01f,
+	0xe1cc,0xe33c,0xe5cd,0xe8c3,0xed4f,0xf2e9,0xfa1e,0x025f,
+	0x0b43,0x1480,0x1d28,0x252e,0x2b7b,0x3093,0x3357,0x3494,
+	0x3313,0x2fc5,0x2a08,0x2275,0x19b8,0x0fdf,0x064d,0xfc7e,
+	0xf40f,0xec56,0xe692,0xe1a1,0xde6b,0xdc84,0xdbc7,0xdc85,
+	0xdda6,0xdfce,0xe1ae,0xe42b,0xe624,0xe806,0xe947,0xeae3,
+	0xec56,0xee13,0xf0a8,0xf34c,0xf737,0xfb3a,0x003b,0x0537,
+	0x0acf,0x1056,0x15d2,0x1acb,0x1f06,0x2282,0x242e,0x24b5,
+	0x22f7,0x2052,0x1be5,0x16a5,0x1046,0x095b,0x02b7,0xfc1a,
+	0xf5fd,0xf03e,0xec02,0xe81f,0xe5f4,0xe46a,0xe44f,0xe4a5,
+	0xe600,0xe7b0,0xe980,0xeba2,0xed20,0xef15,0xf079,0xf263,
+	0xf401,0xf5ca,0xf7a3,0xf9de,0xfc50,0xfec5,0x01fb,0x0551,
+	0x0942,0x0c9b,0x1077,0x1366,0x1628,0x17c2,0x1892,0x183f,
+	0x1728,0x151c,0x11ea,0x0e76,0x0994,0x04ff,0xffad,0xfaf6,
+	0xf68f,0xf2a8,0xef9a,0xed0c,0xebc1,0xeabf,0xeafa,0xeb20,
+	0xec46,0xed62,0xeeef,0xf0ae,0xf260,0xf413,0xf57f,0xf72f,
+	0xf852,0xf9be,0xfadb,0xfce1,0xfe73,0x0068,0x0255,0x0486,
+	0x06d7,0x0905,0x0b6f,0x0d00,0x0ec8,0x0f72,0x1057,0x0ffa,
+	0x0f24,0x0d79,0x0b35,0x08c1,0x0564,0x0240,0xfe98,0xfb61,
+	0xf7d8,0xf512,0xf203,0xefab,0xec43,0xe7e6,0xe2a4,0xdc39,
+	0xd6b2,0xd2ca,0xd2c5,0xd66c,0xdef8,0xeafb,0xfa69,0x0b47
+};
+
+static const UINT16 L1[] = {
+	0x04d0,0x0c6a,0x14e4,0x1d99,0x25cd,0x2cf5,0x3255,0x362a,
+	0x36b0,0x35ed,0x326c,0x2deb,0x2763,0x2016,0x17e9,0x0f1c,
+	0x0689,0xfe48,0xf7c5,0xf1f3,0xee1f,0xea86,0xe877,0xe630,
+	0xe4c2,0xe386,0xe248,0xe136,0xdf5a,0xddbe,0xdb0b,0xd8f4,
+	0xd5f8,0xd437,0xd2e9,0xd2b3,0xd3e3,0xd62f,0xda29,0xdec1,
+	0xe545,0xec31,0xf47f,0xfcb0,0x056e,0x0d20,0x145a,0x19fe,
+	0x1e38,0x2189,0x22dd,0x23dd,0x2271,0x20c6,0x1d6e,0x1a4d,
+	0x1668,0x1314,0x101c,0x0d07,0x0ad5,0x084c,0x06ab,0x0440,
+	0x0296,0x003d,0xfe23,0xfb52,0xf840,0xf4af,0xf08d,0xec68,
+	0xe7e1,0xe480,0xe0f0,0xdebf,0xdca2,0xdc0f,0xdbf8,0xdd6c,
+	0xe052,0xe3c2,0xe8cd,0xed75,0xf31a,0xf800,0xfd64,0x019d,
+	0x0607,0x096c,0x0cae,0x0ee8,0x1014,0x10fa,0x10b9,0x10fb,
+	0x1072,0x1097,0x104e,0x109c,0x1076,0x105f,0x101e,0x0f28,
+	0x0ec2,0x0d9d,0x0d1a,0x0b0d,0x08e8,0x056c,0x01e2,0xfdfb,
+	0xf9f3,0xf626,0xf207,0xef26,0xebf6,0xe9f5,0xe7bb,0xe6e2,
+	0xe687,0xe76f,0xe8e1,0xeaed,0xed7f,0xefd3,0xf2dd,0xf510,
+	0xf810,0xf9fa,0xfc80,0xfe0e,0xffdb,0x0149,0x026a,0x03a9,
+	0x0477,0x05f9,0x06fc,0x08bb,0x0984,0x0b14,0x0c19,0x0d5a,
+	0x0e41,0x0ed4,0x0f12,0x0e6b,0x0dea,0x0be1,0x0a2a,0x0779,
+	0x0527,0x01f8,0xff50,0xfc81,0xf9a6,0xf743,0xf4c4,0xf35f,
+	0xf1d1,0xf158,0xf092,0xf104,0xf111,0xf204,0xf2ad,0xf359,
+	0xf46f,0xf51d,0xf662,0xf68c,0xf7af,0xf81a,0xf94a,0xfa04,
+	0xfb1d,0xfc5d,0xfd84,0xff75,0x00e5,0x02fc,0x0458,0x0675,
+	0x0805,0x09a8,0x0a57,0x0b49,0x0bc5,0x0bab,0x0b44,0x09dc,
+	0x0914,0x0711,0x05e5,0x03e8,0x0292,0x005f,0xfedf,0xfd3e,
+	0xfb8f,0xfa82,0xf972,0xf980,0xf8d4,0xf8d7,0xf7e1,0xf7c4,
+	0xf74c,0xf739,0xf729,0xf6db,0xf6d5,0xf647,0xf69e,0xf5b5,
+	0xf563,0xf420,0xf2d4,0xf08e,0xee6b,0xed42,0xed6a,0xefda,
+	0xf33a,0xf8a9,0xfe60,0x0605
+};
+
+static const UINT16 J1[] = {
+	0xffff,0x0002,0xfec1,0xff55,0xfeca,0xff79,0xffb7,0x0076,
+	0x0020,0xffb2,0xff86,0xffab,0xfeee,0xfbda,0xfabc,0xfadc,
+	0xfee9,0x022d,0x0370,0x0119,0xfcae,0xf9bb,0xf96a,0xfd17,
+	0x008f,0x02cf,0x002e,0xfcdf,0xf938,0xf835,0xf9f7,0xfd49,
+	0x027c,0x051a,0x0416,0xfc75,0xf50b,0xf1a1,0xf6b5,0xfe2e,
+	0x02b2,0x03db,0x0125,0xfd30,0xf8ba,0xf6ef,0xf56b,0xf6e7,
+	0xf8fd,0xfd04,0xffb0,0xff58,0xfc3e,0xfa35,0xfcaa,0x0004,
+	0x00fc,0xfdfb,0xfcd6,0xfc8f,0xfc2a,0xfb61,0xfb86,0xff16,
+	0x0258,0x05d6,0x04f4,0x0210,0xfd09,0xf984,0xf7f9,0xf9e7,
+	0xfeef,0x02de,0x04e9,0x0318,0x00a5,0xfdb4,0xfdfd,0xfe29,
+	0xff49,0xff27,0xfdf8,0xfd99,0xfd59,0xffaa,0x011c,0x02c4,
+	0x01c5,0xffd7,0xfcea,0xfb8f,0xfd2a,0xff03,0x0049,0xff55,
+	0xff4e,0xff3e,0x016f,0x00d1,0xfea6,0xfaee,0xf938,0xfb91,
+	0xff6f,0x0381,0x03ff,0x0229,0xfc1c,0xf82b,0xf7f1,0xfbce,
+	0xffbc,0x0122,0x008a,0xff6a,0xff01,0xfc8b,0xfb96,0xfb1e,
+	0xfdff,0xff22,0xff2f,0xfd5e,0xfc16,0xfd56,0xfdea,0xffb7,
+	0xff73,0xff45,0xfd49,0xfc08,0xfaa9,0xfad3,0xfc7f,0xfe9e,
+	0x0103,0x003b,0xfee3,0xfb95,0xfa2d,0xf9a2,0xfbc8,0xfe47,
+	0x0076,0x0206,0x0159,0x001c,0xfd9c,0xfd11,0xfcd8,0xfe9a,
+	0xffd1,0x00d2,0x00c4,0xffbd,0xff8c,0xfef3,0x0057,0x00a6,
+	0x01f7,0x0168,0x00a8,0xfee3,0xfe07,0xfea8,0xff83,0x01d4,
+	0x0262,0x0306,0x010f,0xffe4,0xfdde,0xfd4c,0xfda3,0xfece,
+	0x0095,0x00c5,0x012e,0xff24,0xfe1d,0xfcaf,0xfd47,0xfda3,
+	0xfe8a,0xfecd,0xfe45,0xfdc1,0xfc04,0xfc26,0xfbbd,0xfd2e,
+	0xfd7d,0xfe17,0xfd0c,0xfbae,0xfb1a,0xfa3a,0xfb3c,0xfb68,
+	0xfce0,0xfcbc,0xfcd6,0xfb94,0xfaf2,0xfa75,0xfa71,0xfb81,
+	0xfbee,0xfd0c,0xfc6d,0xfc7a,0xfb67,0xfba0,0xfb9f,0xfc78,
+	0xfd21,0xfd22,0xfd98,0xfcdc,0xfd2e,0xfc51,0xfd2a,0xfd5a,
+	0xfe4c,0xfe75,0xfe6f,0xfe4c,0xfdc0,0xfe64,0xfdee,0xfed9,
+	0xfe94,0xff9d,0xff84,0xffaf,0xff47,0xfefd,0xff74,0xff25,
+	0x001c,0xff9e,0x0035,0xffa4,0x0035,0x0007,0xfff9,0xffbb,
+	0xff96,0xffe7,0xff80,0x0090,0xfff9,0x0090,0x0015,0x0065,
+	0xffba,0xfe8e,0xfd83,0xfdf8,0x0114,0x0236,0x0277,0xff05,
+	0xfc06,0xfa9c,0xfca6,0xff36,0xff5d,0xfed7,0xff0f,0x0218,
+	0x01f1,0xff33,0xfa05,0xf877,0xfa66,0xfec3,0x0199,0x00d9,
+	0xff0c,0xfc9b,0xfd1e,0xfbf8,0xfadc,0xfa03,0xfbf4,0xff88,
+	0x015a,0xff36,0xfb07,0xfb3c,0xfd80,0x0033,0xfd43,0xf9b8,
+	0xf951,0xfd30,0x00e1,0x001b,0xfcad,0xfa58,0xfd6b,0x002a,
+	0x0109,0xfe3c,0xfc77,0xfb25,0xfbb2,0xfbfa,0xfce2,0xffba,
+	0x01f5,0x03df,0x017e,0xfee0,0xfc46,0xfc3e,0xfbcf,0xfb49,
+	0xfb32,0xfd15,0x0218,0x0525,0x05f9,0x02a5,0xffa9,0xfcfc,
+	0xfcad,0xfc13,0xfadf,0xfa7e,0xfbf7,0x0184,0x05d3,0x0735,
+	0x02c3,0xfe20,0xfbfd,0xfd32,0xfec2,0xfda9,0xfc3b,0xfae5,
+	0xfd81,0x00d7,0x0405,0x02b4,0x00ee,0x001e,0x0036,0xfdf4,
+	0xf89f,0xf6cc,0xf8a8,0xff0a,0x0390,0x05a7,0x0333,0xffa6,
+	0xfc3a,0xfb0f,0xfb4a,0xfbe3,0xfda5,0xfe22,0xff7d,0xfe2d,
+	0xfd0f,0xfcfe,0xfebf,0x0094,0x0082,0x000a,0xfcbe,0xfa27,
+	0xf807,0xf99c,0xfc59,0x0120,0x04c8,0x05f5,0x03cb,0xfd5f,
+	0xf6e2,0xf233,0xf453,0xf9af,0x0127,0x054f,0x05ac,0x0240,
+	0xfce2,0xf8f5,0xf6db,0xf916,0xfc8d,0x0138,0x0276,0x01c3,
+	0xfec4,0xfcd6,0xfd26,0xfee5,0x01ab,0x0222,0x01d4,0xff16,
+	0xfd28,0xfb78,0xfc51,0xff50,0x0366,0x0656,0x0575,0x02d1,
+	0xfde7,0xfb94,0xfaae,0xfd57,0x007f,0x039c,0x04cb,0x0353,
+	0x00c2,0xfd23,0xfc68,0xfc75,0xfef0,0x0024,0x00f7,0xffa0,
+	0xfe17,0xfd1d,0xfc52,0xfd49,0xfddd,0xffa3,0xff40,0xfe69,
+	0xfbd4,0xfa49,0xf9c6,0xfb3e,0xfdc4,0xfeca,0xff58,0xfd62,
+	0xfc48,0xfa03,0xf995,0xf9b5,0xfb6a,0xfd2e,0xfdcb,0xfda8,
+	0xfbba,0xfb0b,0xf9dc,0xfb02,0xfb63,0xfcab,0xfce6,0xfd09,
+	0xfcbf,0xfbe1,0xfbf2,0xfba5,0xfd30,0xfd69,0xfe4a,0xfd4e,
+	0xfcbe,0xfc19,0xfc20,0xfcf9,0xfd37,0xfea6,0xfe95,0xff57,
+	0xfe66,0xfe40,0xfd6f,0xfdc9,0xfe9f,0xff64,0x0068,0xffd7,
+	0xffe2,0xfe67,0xfe8f,0xfe18,0xff1a,0xffa5,0xffde,0x001c,
+	0xff85,0xffa4,0xfecf,0xff81,0xff12,0xfff3,0xff93,0x002d,
+	0xffd8,0xff67,0xff4a,0xfe4d,0xfe2a,0xfe86,0x0180,0x0244,
+	0x01d2,0xfe7b,0xfc3c,0xfc53,0xfc88,0xfd3d,0xfd15,0x0061,
+	0x0367,0x04be,0x010c,0xfbfa,0xf80e,0xf762,0xf99c,0xfc9b,
+	0x0156,0x03f5,0x059a,0x0270,0xfd2a,0xf72c,0xf588,0xf73a,
+	0xfacc,0xff09,0x0253,0x0577,0x0359,0xfe39,0xf793,0xf667,
+	0xf90a,0xfdbf,0xff20,0xfdfa,0xfdaf,0xff63,0x0260,0x00cf,
+	0xfded,0xfaf5,0xfadd,0xfb7a,0xfbb9,0xfb6f,0xfd4e,0x0279,
+	0x05c4,0x0429,0xfcba,0xf868,0xf879,0xfc23,0xfe48,0xfee8,
+	0x012f,0x037d,0x0442,0xff1b,0xfa47,0xf8dc,0xfd38,0x0190,
+	0x0257,0xfea6,0xfa8f,0xfc07,0xff9d,0x0361,0x02dd,0x016f,
+	0xfe68,0xfd4f,0xfc95,0xfcbb,0xfcce,0xfd88,0x0073,0x0328,
+	0x052a,0x022e,0xfe38,0xf9a4,0xf8ff,0xfad4,0xfee4,0x01f2,
+	0x0284,0x0180,0xfe47,0xfc97,0xfac7,0xfc55,0xfe92,0x005f,
+	0xffa4,0xfd7f,0xfcc5,0xfd53,0x006e,0x004e,0xfe83,0xfb07,
+	0xfb2c,0xfd81,0xffce,0x0080,0xfecc,0xff50,0xfee4,0xfe4e,
+	0xfb57,0xfa0b,0xfad1,0xfd98,0x0028,0x00d7,0x0138,0x0034,
+	0xffd0,0xfce4,0xfa59,0xf80b,0xfa12,0xfd7c,0x0139,0x0243,
+	0x00ae,0xff03,0xfcb6,0xfba1,0xf9c2,0xfa37,0xfb29,0xfe30,
+	0x0031,0x00ac,0xffee,0xfebe,0xff70,0xff2e,0xffb0,0xfe6a,
+	0xfe30,0xfdc3,0xfe19,0xfe74,0xff31,0x00f4,0x0217,0x0373,
+	0x0221,0x00e2,0xfe15,0xfd62,0xfd4f,0xfec2,0x0083,0x0165,
+	0x0265,0x0200,0x019a,0xff5c,0xfecb,0xfdf5,0xfede,0xff70,
+	0xffd7,0xfff0,0xff03,0xfef8,0xfe29,0xfeb2,0xfe0a,0xfe7c,
+	0xfdf6,0xfdc6,0xfcca,0xfbef,0xfc2b,0xfc4f,0xfdc5,0xfdc3,
+	0xfe41,0xfc89,0xfbe2,0xfaca,0xfa94,0xfaa0,0xfaea,0xfc2b,
+	0xfc80,0xfd4f,0xfc07,0xfba5,0xfaa2,0xfae3,0xfb22,0xfbac,
+	0xfc36,0xfbcf,0xfc2e,0xfb85,0xfc18,0xfba7,0xfc8b,0xfcb1,
+	0xfd21,0xfd1b,0xfc9c,0xfc65,0xfbec,0xfcd7,0xfca3,0xfddf,
+	0xfde6,0xfe52,0xfe10,0xfdec,0xfdd4,0xfd9e,0xfe78,0xfe9d,
+	0xff81,0xfeac,0xfedb,0xfe4b,0xfe9e,0xfee4,0xff77,0x0028,
+	0xfff9,0x0067,0xff6d,0xff7f,0xfe7a,0xff01,0xff40,0x003a,
+	0x0094,0x0068,0x0074,0xff61,0xff85,0xfefa,0x0037,0xffb9,
+	0xff5d,0xfe3c,0xff5a,0x014e,0x01c4,0x0138,0xfde9,0xfbcf,
+	0xfa83,0xfd8d,0x0118,0x030c,0x01a6,0xff31,0xfe07,0xfc3f,
+	0xfb33,0xf9a7,0xfbbd,0xff0d,0x0361,0x0414,0x00fe,0xfc64,
+	0xf91d,0xf86c,0xf878,0xfbb0,0xff05,0x0361,0x03d2,0x0093,
+	0xfa08,0xf69f,0xf8f0,0xfddf,0x00f2,0xfe9a,0xfbd7,0xfb14,
+	0xfe67,0xff75,0xfecc,0xfc53,0xfbbc,0xfe0c,0xff0a,0xfee3,
+	0xfd24,0xfd11,0xfc1b,0xfcd3,0xfca2,0xfe2b,0x00b9,0x020d,
+	0x0066,0xfc52,0xfab1,0xfbb8,0x0034,0x0186,0x004e,0xfc10,
+	0xfabe,0xfca3,0xff17,0x0161,0x0195,0x036c,0x032d,0x00cf,
+	0xfaca,0xf67b,0xf731,0xfbb7,0x0201,0x0650,0x07ae,0x03d6,
+	0xffa1,0xfb5f,0xfb7c,0xfc6c,0xfe20,0xfdab,0xfc9d,0xfdcb,
+	0x00b0,0x04fa,0x0495,0x0193,0xfc85,0xfb52,0xfbd6,0xfcb2,
+	0xfcd4,0xfc27,0xfdf1,0x00b8,0x0341,0x0132,0xfef0,0xfd13,
+	0xfd0e,0xfcf7,0xfb88,0xfb58,0xfb99,0xfe99,0x0009,0x0160,
+	0x00b8,0xfff4,0xfd94,0xfc0d,0xfae2,0xf9e7,0xfbb9,0xfdce,
+	0x008c,0x0042,0x0028,0xfe52,0xfe46,0xfe45,0xfe0f,0xfc59,
+	0xf9d8,0xf991,0xfaaf,0xfe40,0x0080,0x0273,0x019e,0xffda,
+	0xfca7,0xf94d,0xf7d4,0xf87e,0xfcbd,0x0028,0x030e,0x0273,
+	0x014a,0xfeea,0xfd67,0xfcda,0xfd0f,0xfea0,0xffa6,0x0126,
+	0x0048,0x006e,0xff86,0x0099,0x0138,0x01cc,0x0171,0xffce,
+	0xff07,0xfd96,0xfe6c,0xfecf,0x0129,0x0279,0x038f,0x0288,
+	0x003d,0xfe3a,0xfc84,0xfd46,0xfdde,0xfff0,0x0018,0x00a0,
+	0xffbb,0xfed0,0xfda0,0xfc8d,0xfd59,0xfd57,0xfe54,0xfdca,
+	0xfda8,0xfc1f,0xfc2e,0xfc34,0xfce4,0xfd96,0xfd71,0xfd43,
+	0xfb71,0xfab5,0xf98b,0xfa56,0xfadf,0xfc99,0xfd57,0xfd63,
+	0xfced,0xfb42,0xfac2,0xf989,0xfa67,0xfae2,0xfc53,0xfc80,
+	0xfca6,0xfc4f,0xfba3,0xfbd4,0xfbbb,0xfd19,0xfcf6,0xfdb4,
+	0xfcfb,0xfc8e,0xfbef,0xfc3f,0xfd26,0xfddc,0xff6e,0xff68,
+	0xffb5,0xfe2f,0xfde5,0xfd15,0xfd71,0xfdcf,0xfeb2,0xffda,
+	0x0053,0x0124,0xfffe,0xffc9,0xfe70,0xfed9,0xff15,0xfff6,
+	0x0066,0x0032,0x0028,0xff23,0xff7b,0xfec4,0xffbe,0xffca,
+	0x00d1,0x00c5,0x0023,0xff53,0xfe5e,0xfe71,0xfe3e,0x009f,
+	0x0187,0x019e,0xfed9,0xfd2a,0xfd61,0xfedb,0x00ea,0x0031,0xfef1,0xfcf4,0xfd48,0xfc6c,0xfbc5,0xfb96,0xfe70,0x039e,
+	0x0557,0x024d,0xfb70,0xf777,0xf628,0xf8ef,0xfa95,0xfd8f,
+	0x018a,0x067a,0x0797,0x00a3,0xf769,0xf199,0xf489,0xf9e8,
+	0xff09,0x0129,0x03c8,0x0533,0x0291,0xfafd,0xf2dc,0xf3b6,
+	0xfa8c,0x02ea,0x045c,0x0102,0xfc87,0xfc18,0xfd8f,0xfd7a,
+	0xfce5,0xfc61,0xfef8,0x006c,0x0011,0xfb5b,0xf911,0xfc5a,
+	0x0252,0x0587,0x02b0,0xff31,0xfc3c,0xfc39,0xfabc,0xfaa6,
+	0xfcb4,0x0241,0x061b,0x055b,0x00dd,0xfbb3,0xfa91,0xfade,
+	0xfdd6,0x0051,0x02b8,0x0228,0xffc0,0xfd9e,0xfd20,0xfe93,
+	0xfea1,0xffd4,0x0077,0x01c2,0xff76,0xfd1a,0xfb59,0xfdb0,
+	0x00cb,0x0250,0x014d,0xfdf2,0xfcd4,0xfbe5,0xfd9e,0xfdc6,
+	0xfeee,0x0001,0x0054,0x006f,0xfedb,0xfdd9,0xfb6a,0xfa8d,
+	0xfab3,0xfe75,0x0218,0x0438,0x0301,0xff35,0xfb62,0xf86f,
+	0xf913,0xfad7,0xff26,0x018f,0x02bd,0x011a,0xfd41,0xfa49,
+	0xf989,0xfcc4,0xff10,0x00e9,0xff3d,0xfd95,0xfb6e,0xfb57,
+	0xfbc6,0xfcd1,0xfeef,0xff7c,0xff69,0xfc87,0xfab7,0xf940,
+	0xfb46,0xfe49,0x0123,0x0258,0x0134,0xffd3,0xfd11,0xfc6f,
+	0xfbf4,0xfe5b,0x0044,0x024b,0x0244,0x00b5,0xff25,0xfe05,
+	0xff4d,0x0030,0x020b,0x01d5,0x0205,0x007a,0xff66,0xfea2,
+	0xfed9,0x0073,0x015c,0x02a0,0x016e,0x0061,0xfe2e,0xfdb0,
+	0xfdaa,0xfeb9,0xffe5,0x0025,0x0095,0xff13,0xfe48,0xfcec,
+	0xfd45,0xfd46,0xfe70,0xfe98,0xfe2e,0xfd96,0xfc28,0xfbc0,
+	0xfb18,0xfc2e,0xfc6d,0xfd89,0xfd1c,0xfce6,0xfba9,0xfacc,
+	0xfada,0xfab2,0xfbbe,0xfb99,0xfcbb,0xfc16,0xfc07,0xfb05,
+	0xfada,0xfb34,0xfb53,0xfc39,0xfc0c,0xfcab,0xfb9f,0xfbfe,
+	0xfb92,0xfbf9,0xfc6e,0xfcf3,0xfd87,0xfd03,0xfd4f,0xfc86,
+	0xfd0b,0xfcad,0xfdab,0xfdf9,0xfeaf,0xfe8d,0xfdf2,0xfe21,
+	0xfdb3,0xfed4,0xfeaa,0xff91,0xff37,0xffc4,0xff62,0xff3b,
+	0xfef7,0xfeb8,0xffa2,0xff89,0x009c,0x0008,0x0028,0xff2a,
+	0xff6b,0xff58,0xff3b,0xffd3,0xff98,0x005a,0xffb0,0x004c,
+	0xffb8,0x001b,0xff82,0xff0c,0xfeee,0xfee0,0xffa3,0xff74,
+	0x009b,0x001b,0xff78,0xfced,0xfc83,0xfd2c,0xfdec,0xfe0d,
+	0xfd5f,0xfff7,0x0203,0x024e,0xfd7c,0xfa32,0xf9ec,0xfd0a,
+	0xfe32,0xfc2d,0xfba7,0xfd55,0x01ad,0x0184,0xfe70,0xfa4d,
+	0xf9fe,0xfb21,0xfbf9,0xfc07,0xfd93,0x0009,0x00ae,0xff36,
+	0xfb7c,0xfaaa,0xfb19,0xfda8,0xfe72,0xfe9c,0xfe63,0xff52,
+	0xff74,0xfcdc,0xfaf3,0xf9f9,0xfd4c,0x0036,0x0204,0x00d1,
+	0xff40,0xfe9c,0xfe3e,0xfe73,0xfc45,0xfb7e,0xfad6,0xfc7c,
+	0xfe5d,0x016e,0x042e,0x04e3,0x03ad,0xffa3,0xfc67,0xf8df,
+	0xf836,0xf883,0xfbe4,0x0120,0x06f1,0x0992,0x0546,0xfedb,
+	0xf954,0xf937,0xfa55,0xfce4,0xfd6d,0xfeab,0x0156,0x0422,
+	0x0466,0x0038,0xfc39,0xfac3,0xfe8b,0x0054,0xfe5b,0xf953,
+	0xf92e,0xfe5d,0x03a2,0x044e,0xff19,0xfbc3,0xfc06,0x003a,
+	0x00d3,0xfd28,0xf969,0xf9da,0xfea4,0x00eb,0x0044,0xfcfa,
+	0xfde0,0x001d,0x0183,0xfd93,0xf858,0xf73e,0xfb7b,0x01d1,
+	0x036a,0x017c,0xfdc8,0xfe21,0xfe62,0xfdbc,0xfb1b,0xfb43,
+	0xfe1c,0x007e,0xff48,0xfa9c,0xf8e4,0xfabe,0x00a4,0x02cc,
+	0x0151,0xfd80,0xfaf7,0xfa72,0xfa11,0xfaab,0xfbb7,0x0065,
+	0x03fd,0x0581,0x016a,0xfca9,0xfa13,0xfb2e,0xfdfb,0xff96,
+	0x0103,0x011d,0x0268,0x0141,0xffe9,0xfdf0,0xfe48,0x008d,
+	0x0241,0x025a,0xff91,0xfe42,0xfd79,0xff47,0x0054,0x0199,
+	0x01a3,0x01a3,0x00ff,0xfed7,0xfd43,0xfba7,0xfd71,0xff16,
+	0x0148,0x00c7,0xfff1,0xfe53,0xfd65,0xfd04,0xfc01,0xfc90,
+	0xfc59,0xfdef,0xfd8c,0xfd53,0xfbf6,0xfbdc,0xfc7a,0xfcd4,
+	0xfd37,0xfbe6,0xfb96,0xfa88,0xfb0b,0xfac1,0xfb80,0xfc08,
+	0xfce8,0xfd43,0xfc5c,0xfba7,0xfa01,0xfa86,0xfa90,0xfc31,
+	0xfcbb,0xfd13,0xfce5,0xfc9f,0xfc44,0xfb79,0xfc35,0xfc3c,
+	0xfd8d,0xfd5c,0xfde7,0xfd11,0xfca9,0xfcc5,0xfd31,0xfe34,
+	0xfe04,0xfedf,0xfe06,0xfe50,0xfd79,0xfdfa,0xfe30,0xfece,
+	0xffad,0xff52,0xff56,0xfe86,0xff27,0xfea4,0xff33,0xfee3,
+	0xff6f,0xffb4,0xff9b,0x0012,0xff2f,0xff54
+};
+
+static const UINT16 A1[] = {
+	0x082a,0x2047,0x30de,0x3528,0x2d08,0x1d67,0x0f75,0x09d5,
+	0x126a,0x263c,0x3f35,0x52ec,0x5a87,0x5272,0x3d4f,0x22a9,
+	0x0b9e,0x0025,0x0152,0x0cfe,0x1a8b,0x228b,0x1e7d,0x0e80,
+	0xf5e5,0xdc1a,0xc84e,0xbe6b,0xbf61,0xc6d2,0xd0e2,0xd71d,
+	0xd7c1,0xd14f,0xc7cd,0xbde2,0xb7ba,0xb71a,0xbcb6,0xc702,
+	0xd343,0xe05b,0xeb40,0xf3e4,0xf8cc,0xfb4b,0xfbdd,0xfc9c,
+	0xfeee,0x043e,0x0dbd,0x198e,0x2649,0x3070,0x361f,0x34cb,
+	0x2e95,0x24f2,0x1bd0,0x15fc,0x15cf,0x1ab1,0x2112,0x2613,
+	0x2508,0x1da6,0x0f4c,0xfed5,0xef99,0xe59e,0xe263,0xe540,
+	0xeb55,0xefe1,0xf0a2,0xeb15,0xe19d,0xd619,0xcd43,0xc8ee,
+	0xcb27,0xd29a,0xdd48,0xe79c,0xee5f,0xf175,0xf080,0xee42,
+	0xec25,0xed6a,0xf1a5,0xf9d6,0x0418,0x0eb4,0x1749,0x1bfa,
+	0x1d7f,0x1ba2,0x18d3,0x156f,0x141a,0x1485,0x17b9,0x1bdd,
+	0x1f96,0x2123,0x1f17,0x19e9,0x11c8,0x0902,0x001c,0xfaa7,
+	0xf874,0xf9b5,0xfb98,0xfcae,0xfb2b,0xf61f,0xeefe,0xe696,
+	0xdfd1,0xdbce,0xdc7a,0xe06e,0xe67a,0xeb93,0xeef3,0xef54,
+	0xed77,0xeb0a,0xe8e1,0xe986,0xecf1,0xf3ee,0xfbdd,0x03a8,
+	0x0916,0x0c66,0x0cf1,0x0bdf,0x0a64,0x099f,0x0aee,0x0df0,
+	0x12c9,0x166d,0x1923,0x1977,0x17ea,0x141d,0x0f54,0x0a8a,
+	0x06c7,0x050e,0x0447,0x04f8,0x04dd,0x0454,0x01bb,0xfde8,
+	0xf86a,0xf2aa,0xedf2,0xeb34,0xeafa,0xec8f,0xef7e,0xf114,
+	0xf25a,0xf13f,0xef49,0xec6f,0xeabe,0xeb08,0xed74,0xf22f,
+	0xf759,0xfcd9,0x002a,0x0225,0x01d7,0x0116,0x0023,0x00b4,
+	0x02bb,0x063b,0x0aaf,0x0e39,0x1111,0x116c,0x1056,0x0d8b,
+	0x0abf,0x07fb,0x06c4,0x068e,0x077e,0x08d3,0x08f0,0x0826,
+	0x0531,0x01a4,0xfcf7,0xf907,0xf5dc,0xf4f4,0xf541,0xf5ea,
+	0xf701,0xf730,0xf6c3,0xf493,0xf256,0xef9d,0xee91,0xee3a,
+	0xefca,0xf1b0,0xf2bb,0xf147,0xeb7a,0xe2f9,0xda9c,0xd863,
+	0xdf8f,0xf1c3,0x09fb
+};
+
+static const UINT16 AY1[] = {
+	0xfe5c,0x01d5,0x043e,0x0698,0x06f1,0x0677,0x04fb,0x03e2,
+	0x03c2,0x0499,0x0689,0x0877,0x0a2f,0x09ff,0x08e9,0x0680,
+	0x04bd,0x0329,0x0324,0x03de,0x0524,0x0618,0x058d,0x0449,
+	0x0141,0xfec0,0xfc91,0xfc0f,0xfb6f,0xfa64,0xf716,0xf185,
+	0xeb86,0xe6e4,0xe7ac,0xee52,0xf97e,0x0427,0x09ef,0x07bc,
+	0xff9c,0xf6ee,0xf316,0xf7de,0x043e,0x145a,0x2079,0x24c8,
+	0x1f26,0x1411,0x0901,0x04c4,0x0a0f,0x15e7,0x22d4,0x2a50,
+	0x29a4,0x200e,0x1375,0x07e9,0x02b9,0x04af,0x0ba3,0x12e4,
+	0x1589,0x11bf,0x07cb,0xfc2a,0xf1cd,0xec5b,0xeb75,0xee87,
+	0xf1a7,0xf32f,0xf12a,0xebb7,0xe4c5,0xdda6,0xd92a,0xd701,
+	0xd881,0xdb66,0xdf7b,0xe29c,0xe3e6,0xe28a,0xdeef,0xdb75,
+	0xd92c,0xdaa4,0xdf7a,0xe77b,0xef52,0xf52c,0xf6c2,0xf502,
+	0xf177,0xeefa,0xf0df,0xf698,0xffc2,0x08a6,0x0f6f,0x10db,
+	0x0e8e,0x0a33,0x06e2,0x06c9,0x0ad1,0x1203,0x18be,0x1d32,
+	0x1d14,0x19d2,0x13b0,0x0e8d,0x0c0b,0x0cb7,0x0ff4,0x13e9,
+	0x160f,0x1486,0x1097,0x0a34,0x0430,0xff29,0xfd7f,0xfdd3,
+	0x001b,0x01fb,0x0170,0xfe79,0xf8cb,0xf319,0xedb9,0xeb2d,
+	0xeae9,0xed7d,0xf0c1,0xf307,0xf2be,0xef87,0xeb3a,0xe6f7,
+	0xe562,0xe62f,0xea0c,0xeee3,0xf3b4,0xf616,0xf5b4,0xf2e3,
+	0xefbe,0xeeb3,0xf027,0xf4f1,0xfac7,0x00ad,0x0410,0x0527,
+	0x030d,0x0056,0xfe69,0xff24,0x0305,0x0822,0x0d56,0x0fb8,
+	0x1053,0x0e38,0x0b41,0x0821,0x0706,0x081d,0x0b07,0x0e79,
+	0x1037,0x100d,0x0d1f,0x0991,0x059d,0x02ef,0x01e4,0x0278,
+	0x0412,0x0591,0x05c4,0x034f,0xffbe,0xfb23,0xf808,0xf606,
+	0xf65f,0xf7ae,0xf957,0xfa14,0xf932,0xf6da,0xf398,0xf0f0,
+	0xef56,0xf01e,0xf1c1,0xf468,0xf64e,0xf751,0xf700,0xf55f,
+	0xf3bb,0xf281,0xf37b,0xf56d,0xf8e9,0xfbbc,0xfe34,0xff04,
+	0xfe6d,0xfd37,0xfbdc,0xfc3d,0xfded
+};
+
+static const UINT16 AH1[] = {
+	0x107d,0x247c,0x366c,0x45d3,0x507a,0x56d0,0x5779,0x5244,
+	0x4714,0x3529,0x1e7c,0x0394,0xe84b,0xce97,0xba73,0xad2a,
+	0xa769,0xa85a,0xaed1,0xb9c1,0xc768,0xd70a,0xe676,0xf5f1,
+	0x02ec,0x0e31,0x1581,0x18c0,0x17c3,0x13d0,0x0ec2,0x0a08,
+	0x077d,0x0683,0x08cb,0x0c29,0x10fc,0x14d0,0x17be,0x18a5,
+	0x1746,0x1420,0x0e1a,0x0581,0xf9ba,0xecbd,0xde83,0xd1c5,
+	0xc6fe,0xc083,0xbeef,0xc28e,0xcaf7,0xd6f6,0xe604,0xf5aa,
+	0x05f0,0x1453,0x2134,0x2a93,0x3096,0x3271,0x2ff3,0x29a3,
+	0x2006,0x1562,0x09f3,0x0022,0xf793,0xf1f9,0xee3c,0xecf2,
+	0xed04,0xedfb,0xef86,0xf0e8,0xf25b,0xf2a2,0xf2a0,0xf14a,
+	0xef57,0xec9c,0xea90,0xe960,0xe9ec,0xeccb,0xf1c4,0xf945,
+	0x017b,0x0b1c,0x13a6,0x1bb0,0x2194,0x25a7,0x2684,0x24c6,
+	0x2008,0x184a,0x0f28,0x040e,0xf93d,0xee9d,0xe632,0xdfbf,
+	0xdc7e,0xdba1,0xdd57,0xe133,0xe664,0xecfc,0xf34d,0xfa1b,
+	0xff6c,0x0416,0x06f6,0x08ed,0x094d,0x0901,0x082b,0x0704,
+	0x06bc,0x068d,0x07ca,0x08ac,0x0a8f,0x0b95,0x0ca2,0x0cc5,
+	0x0bc7,0x0987,0x05b2,0x014a,0xfb90,0xf614,0xefdf,0xeaa5,
+	0xe602,0xe396,0xe2e2,0xe43c,0xe7be,0xec94,0xf319,0xf9db,
+	0x014e,0x0793,0x0d52,0x115a,0x141e,0x1510,0x144e,0x1255,
+	0x0eec,0x0b00,0x0638,0x0251,0xfe55,0xfbe6,0xf9a7,0xf894,
+	0xf800,0xf7f3,0xf838,0xf818,0xf827,0xf787,0xf753,0xf650,
+	0xf5cc,0xf4f8,0xf4b4,0xf47b,0xf53d,0xf6df,0xf8e6,0xfc6f,
+	0x001d,0x04c7,0x0876,0x0c43,0x0e78,0x1075,0x10d4,0x0fb4,
+	0x0dac,0x09fc,0x0662,0x01c4,0xfd33,0xf84d,0xf4b8,0xf197,
+	0xf010,0xef67,0xefa2,0xf11b,0xf324,0xf603,0xf85b,0xfae2,
+	0xfcb6,0xff2f,0x0033,0x0174,0x0204,0x026b,0x02b2,0x02de,
+	0x0351,0x0344,0x03f6,0x0443,0x0543,0x0583,0x05e4,0x0559,
+	0x049d,0x0330,0x014d,0xff93,0xfcad,0xfa4c,0xf785,0xf5ba,
+	0xf38a,0xf274,0xf1f4,0xf2be,0xf497,0xf6a6,0xf97c,0xfc1d,
+	0xff07,0x011c,0x0379,0x0447,0x0477,0x023a,0xfd87,0xf5f5,
+	0xecc6,0xe514,0xe0ba,0xe2ca,0xeabb,0xf949,0x0b6d
+};
+
+static const UINT16 O1[] = {
+	0x05f1,0x0f75,0x1a4f,0x2618,0x3187,0x3c6a,0x451d,0x4bab,
+	0x4e89,0x4e5c,0x4a91,0x4416,0x3af1,0x2f5a,0x21a6,0x11b0,
+	0x0108,0xef64,0xdeb4,0xced2,0xc1bc,0xb726,0xafa4,0xab06,
+	0xa91d,0xaa1a,0xad38,0xb30f,0xba18,0xc315,0xccf2,0xd778,
+	0xe1b1,0xeb71,0xf3ee,0xfaf1,0x00d6,0x0564,0x0925,0x0b9b,
+	0x0dfd,0x0f32,0x10a0,0x116e,0x1271,0x13bc,0x1558,0x17a0,
+	0x1a10,0x1d53,0x1fe1,0x226c,0x23b0,0x2463,0x23b8,0x21db,
+	0x1eb7,0x1a0a,0x146f,0x0d50,0x054d,0xfbad,0xf1e8,0xe7cc,
+	0xdf0a,0xd6ae,0xcfa6,0xca34,0xc65e,0xc4a6,0xc452,0xc6a3,
+	0xca02,0xcfd7,0xd6f4,0xdfd3,0xe8cc,0xf21a,0xfb5a,0x03cb,
+	0x0bff,0x12c2,0x1871,0x1c8f,0x2006,0x21c0,0x2269,0x2160,
+	0x1f75,0x1d11,0x1a1b,0x173a,0x139b,0x10e6,0x0dcd,0x0b66,
+	0x089b,0x0675,0x0458,0x0297,0x0127,0xff74,0xfdde,0xfb5a,
+	0xf912,0xf629,0xf360,0xefd8,0xec7f,0xe90d,0xe60f,0xe359,
+	0xe122,0xdfd1,0xdea7,0xdf33,0xe050,0xe2fd,0xe63c,0xeae3,
+	0xf01f,0xf5d6,0xfc23,0x0233,0x0889,0x0df0,0x1379,0x17d0,
+	0x1b86,0x1da7,0x1ec0,0x1ef8,0x1e15,0x1c33,0x1909,0x1596,
+	0x1189,0x0d86,0x08e6,0x04aa,0x0024,0xfc57,0xf8d2,0xf626,
+	0xf38e,0xf17e,0xf056,0xef45,0xef40,0xeed9,0xef40,0xefa3,
+	0xf031,0xf0a8,0xf0c2,0xf139,0xf162,0xf244,0xf275,0xf355,
+	0xf40f,0xf557,0xf6cf,0xf8a8,0xfa88,0xfcbf,0xff8b,0x0253,
+	0x057f,0x080f,0x0b09,0x0d72,0x1024,0x11e0,0x1305,0x1346,
+	0x1317,0x12b7,0x1121,0x0f30,0x0c0c,0x0934,0x05b4,0x0233,
+	0xfe6b,0xfac7,0xf775,0xf47a,0xf214,0xefd9,0xeeac,0xeda7,
+	0xedb9,0xeda2,0xee56,0xef38,0xf0c8,0xf2b9,0xf481,0xf66c,
+	0xf813,0xfa1c,0xfb8d,0xfd7f,0xfea6,0x0014,0x00f1,0x01e8,
+	0x0314,0x03c8,0x04b7,0x0535,0x05c4,0x0628,0x06d6,0x06a8,
+	0x06cf,0x0586,0x0305,0xff34,0xfa45,0xf537,0xf062,0xeda1,
+	0xec54,0xedd1,0xf105,0xf669,0xfcd1,0x0511
+};
+
+static const UINT16 I1[] = {
+	0x0650,0x141c,0x1a91,0x1917,0x104b,0x05e0,0xff0f,0x0017,
+	0x098c,0x18b1,0x289c,0x3345,0x365f,0x30be,0x260b,0x1979,
+	0x104c,0x0c1c,0x0d1b,0x1141,0x1522,0x1755,0x154a,0x100e,
+	0x079f,0xfe29,0xf3f4,0xeb41,0xe3ee,0xde97,0xdbc5,0xdb68,
+	0xdda0,0xdfe3,0xe175,0xdfb6,0xdb71,0xd476,0xcd46,0xc846,
+	0xc7f9,0xcd09,0xd653,0xe1e4,0xebaa,0xf247,0xf382,0xf165,
+	0xed77,0xeb6d,0xed62,0xf3e8,0xfe13,0x0957,0x1379,0x19a5,
+	0x1c4a,0x1ad8,0x17e5,0x14ad,0x12fd,0x1363,0x1575,0x189b,
+	0x1b61,0x1da5,0x1da9,0x1c12,0x17e5,0x1283,0x0b98,0x04f4,
+	0xff6a,0xfb7a,0xf9c8,0xf9ae,0xfad5,0xfae0,0xf9b4,0xf540,
+	0xef0e,0xe7a7,0xe16b,0xddbf,0xdd69,0xe073,0xe4fd,0xea2c,
+	0xed55,0xee98,0xed0c,0xea94,0xe7e8,0xe77a,0xe9b0,0xee61,
+	0xf4db,0xfb58,0x0190,0x0550,0x07ce,0x07f9,0x07bd,0x073f,
+	0x07b8,0x095c,0x0bc9,0x0f7f,0x1309,0x165e,0x1805,0x185d,
+	0x160f,0x12d3,0x0e87,0x0af6,0x085d,0x0744,0x0784,0x0830,
+	0x0914,0x07e7,0x059f,0x00e6,0xfb9f,0xf674,0xf287,0xefde,
+	0xef0d,0xf046,0xf1c8,0xf35b,0xf2fa,0xf1ec,0xef85,0xed4d,
+	0xeb22,0xea61,0xeaf4,0xecff,0xf0a4,0xf424,0xf7e6,0xfa41,
+	0xfc3c,0xfc74,0xfc8e,0xfc68,0xfcd9,0xfe59,0x00d0,0x0492,
+	0x0835,0x0bc2,0x0d6e,0x0e64,0x0d6d,0x0bf2,0x0a09,0x08c4,
+	0x0868,0x08f2,0x0a6d,0x0b8f,0x0c6a,0x0b6a,0x09c8,0x0679,
+	0x031d,0xffcd,0xfd4e,0xfbea,0xfb40,0xfb7f,0xfb5d,0xfb92,
+	0xfa40,0xf8c2,0xf678,0xf487,0xf27e,0xf11e,0xf0c5,0xf15a,
+	0xf2ea,0xf45c,0xf63f,0xf70e,0xf7f7,0xf7fb,0xf7c7,0xf729,
+	0xf751,0xf883,0xfa5d,0xfd7a,0xffe1,0x02d2,0x0493,0x05d2,
+	0x0589,0x04e5,0x03ee,0x03a6,0x0462,0x0581,0x079d,0x08e6,
+	0x0a1e,0x09ae,0x08ee,0x071d,0x054a,0x030e,0x014d,0xffbf,
+	0xfe03,0xfb12,0xf4b5,0xece0,0xe4d9,0xe11f,0xe370,0xed47,
+	0xfc4c,0x0bd7
+};
+
+static const UINT16 U1[] = {
+	0x05c6,0x0c88,0x1386,0x1a54,0x20bb,0x261b,0x29a0,0x2bee,
+	0x2c5d,0x2bf6,0x2a12,0x2783,0x23f8,0x1fbd,0x1b0d,0x15bf,
+	0x1051,0x0aa1,0x05be,0x015a,0xfe06,0xfb6e,0xf944,0xf7c9,
+	0xf65c,0xf54a,0xf3fd,0xf305,0xf1c8,0xf08d,0xef07,0xed24,
+	0xea8e,0xe7b8,0xe474,0xe0da,0xdd4c,0xd99e,0xd6a3,0xd432,
+	0xd2f5,0xd1e9,0xd1eb,0xd2b9,0xd47f,0xd767,0xdabd,0xdf0e,
+	0xe408,0xe9ad,0xef6e,0xf549,0xfa63,0xff66,0x03cc,0x07bd,
+	0x0ad2,0x0cfb,0x0f19,0x1042,0x1127,0x116f,0x1165,0x1124,
+	0x110c,0x10eb,0x111f,0x1163,0x1204,0x12fb,0x1395,0x1462,
+	0x14c8,0x1571,0x15e4,0x1626,0x15c7,0x14eb,0x1378,0x1190,
+	0x0f26,0x0bfd,0x0890,0x04ac,0x0106,0xfcdd,0xf8e1,0xf51a,
+	0xf18d,0xee4a,0xeb98,0xe9b6,0xe810,0xe78b,0xe72e,0xe79c,
+	0xe825,0xe8ed,0xea11,0xeb52,0xecba,0xedff,0xef7d,0xf0a2,
+	0xf1cf,0xf296,0xf335,0xf3b2,0xf47e,0xf513,0xf5d4,0xf6c5,
+	0xf7b0,0xf8f1,0xfa80,0xfc93,0xfe6d,0x00a9,0x02ec,0x05d7,
+	0x0870,0x0ae0,0x0d27,0x0ee6,0x10ba,0x1216,0x1324,0x1370,
+	0x1371,0x1312,0x124f,0x1106,0x0f61,0x0d9b,0x0b80,0x09b0,
+	0x07c9,0x0620,0x0449,0x02cc,0x0173,0x005d,0xff3c,0xfe46,
+	0xfdad,0xfce8,0xfc74,0xfbcf,0xfb1d,0xfa13,0xf932,0xf82e,
+	0xf722,0xf615,0xf4a2,0xf397,0xf26c,0xf1b7,0xf0df,0xf04e,
+	0xefd3,0xefe5,0xf01d,0xf0b1,0xf1bf,0xf2d8,0xf46d,0xf5b9,
+	0xf742,0xf8e0,0xface,0xfccb,0xfea5,0x0045,0x01d9,0x0311,
+	0x03ea,0x04d8,0x0538,0x05cf,0x05f2,0x067d,0x068e,0x06b2,
+	0x0693,0x0695,0x06c4,0x0699,0x06ce,0x06b1,0x0759,0x078a,
+	0x07e3,0x079d,0x0742,0x0701,0x06ad,0x0653,0x057f,0x049f,
+	0x039f,0x0299,0x0104,0xff52,0xfd56,0xfbc2,0xf9ec,0xf7af,
+	0xf4d1,0xf182,0xee46,0xeb4d,0xe975,0xe886,0xe954,0xeb01,
+	0xee44,0xf28a,0xf75c,0xfcb1,0x02e0
+};
+
+static const UINT16 Y1[] = {
+	0x064e,0x0b99,0x0d7e,0x0ad0,0x0645,0x01d0,0x016a,0x056b,
+	0x0d9a,0x1677,0x1cb4,0x1d70,0x1805,0x1032,0x0903,0x0758,
+	0x0b36,0x139d,0x1b79,0x1f8c,0x1d4f,0x15c1,0x0bd3,0x0366,
+	0x0092,0x02db,0x099d,0x0f82,0x11a8,0x0d5f,0x04a7,0xfa76,
+	0xf285,0xef84,0xf112,0xf5b7,0xf9e1,0xfbcb,0xf85a,0xf18b,
+	0xe953,0xe30f,0xe0c0,0xe23b,0xe65c,0xea3a,0xecbe,0xebdc,
+	0xe8b9,0xe3a8,0xdfff,0xde63,0xe016,0xe3ca,0xe83a,0xec55,
+	0xee1e,0xee79,0xecee,0xeb89,0xea5c,0xeb77,0xee5c,0xf2dc,
+	0xf7b8,0xfbde,0xfeb2,0xff25,0xfe85,0xfce1,0xfc78,0xfd77,
+	0x0121,0x0619,0x0b01,0x0e58,0x0eed,0x0d93,0x0af5,0x0904,
+	0x081d,0x0a34,0x0dbd,0x1218,0x14e8,0x14f0,0x1240,0x0e07,
+	0x0a51,0x07e5,0x0859,0x0a4b,0x0d9e,0x0f55,0x0f33,0x0c0b,
+	0x0728,0x0268,0xff0a,0xfe81,0xff84,0x017d,0x025d,0x024b,
+	0xffd0,0xfbc5,0xf742,0xf40d,0xf327,0xf3f6,0xf60d,0xf73d,
+	0xf79b,0xf622,0xf3c8,0xf0a0,0xee6d,0xed9c,0xeea7,0xf133,
+	0xf34e,0xf4dc,0xf4ce,0xf3dc,0xf1e9,0xf0da,0xf076,0xf1e7,
+	0xf44c,0xf72b,0xf9df,0xfb14,0xfb63,0xfa43,0xf978,0xf8f1,
+	0xfa4c,0xfc81,0xffc0,0x02cf,0x04a1,0x0535,0x040e,0x02d5,
+	0x019d,0x0228,0x0395,0x065a,0x08cd,0x0a9d,0x0af3,0x09ca,
+	0x07f5,0x060a,0x054b,0x0539,0x06e1,0x0864,0x0a2e,0x0a23,
+	0x090b,0x06a5,0x03ac,0x01e2,0x00ac,0x0165,0x0286,0x0442,
+	0x046f,0x0382,0x00e1,0xfdd5,0xfb44,0xf9d8,0xfa2f,0xfaf0,
+	0xfca4,0xfd45,0xfd3f,0xfb19,0xf8c0,0xf643,0xf4ff,0xf521,
+	0xf63a,0xf80b,0xf916,0xfa00,0xf925,0xf7f9,0xf5b6,0xf4ad,
+	0xf4bb,0xf61e,0xf843,0xf9fc,0xfb2d,0xfb62,0xfb3c,0xf9db,
+	0xf94d,0xf8ca,0xf9e0,0xfc20,0xfe95,0x0084,0x00d4,0x0051,
+	0xfec6,0xfde7,0xfcf9,0xfc92,0xfba8,0xfaef,0xf9c6,0xf928,
+	0xfad0,0xfebe,0x04a9
+};
+
+static const UINT16 R1[] = {
+	0xfa80,0x0997,0x1a4a,0x2c29,0x3c40,0x4898,0x4fae,0x4ff2,
+	0x4a5c,0x3eb1,0x3038,0x1f77,0x10ae,0x0528,0xff84,0xff15,
+	0x0347,0x0b47,0x1402,0x1c16,0x1f51,0x1d9c,0x1515,0x0778,
+	0xf524,0xe121,0xcd5b,0xbcab,0xb156,0xac10,0xadd2,0xb49c,
+	0xc013,0xcce7,0xdab3,0xe629,0xee7d,0xf2a0,0xf2f4,0xf0e8,
+	0xecb6,0xe91d,0xe609,0xe662,0xe950,0xf043,0xf97a,0x04fb,
+	0x115a,0x1cfc,0x2785,0x2f2b,0x3469,0x35a3,0x3467,0x3021,
+	0x2a0f,0x2248,0x1a8a,0x132f,0x0c4e,0x0765,0x0382,0x01db,
+	0x00d0,0x0161,0x0156,0x0168,0x002f,0xfddc,0xf9de,0xf3cd,
+	0xecd9,0xe49f,0xdd38,0xd62e,0xd1a1,0xcec6,0xcf46,0xd232,
+	0xd848,0xe032,0xe8c3,0xf1ba,0xf98b,0x0056,0x0409,0x0608,
+	0x0589,0x0464,0x0293,0x0119,0x00a1,0x01c4,0x0561,0x0a54,
+	0x1141,0x17bf,0x1e8c,0x237b,0x26b4,0x2762,0x2564,0x20da,
+	0x1a20,0x1305,0x0afc,0x03ee,0xfd2d,0xf8f1,0xf632,0xf58e,
+	0xf5e6,0xf6f1,0xf866,0xf904,0xf929,0xf751,0xf4bd,0xf067,
+	0xec9a,0xe7f4,0xe45e,0xe1a0,0xe04a,0xe145,0xe3ac,0xe828,
+	0xece2,0xf2fd,0xf8a4,0xfec7,0x033b,0x06c4,0x08c8,0x09c8,
+	0x0a1a,0x0921,0x08af,0x07a0,0x07e3,0x0838,0x09e9,0x0b89,
+	0x0dfa,0x104d,0x12a1,0x14a7,0x1513,0x14aa,0x1233,0x0f5b,
+	0x0adb,0x060c,0x008d,0xfba7,0xf778,0xf43d,0xf24e,0xf0e8,
+	0xf156,0xf1f1,0xf382,0xf498,0xf5c5,0xf5bc,0xf54b,0xf460,
+	0xf2e3,0xf135,0xef5e,0xee86,0xee11,0xef6c,0xf0f7,0xf412,
+	0xf793,0xfbf8,0x0061,0x0439,0x07b6,0x09d9,0x0bc3,0x0bf7,
+	0x0c26,0x0a80,0x0958,0x0819,0x0743,0x06d1,0x068b,0x074c,
+	0x07f3,0x0978,0x09f5,0x0a95,0x0a03,0x0959,0x0778,0x04dc,
+	0x018a,0xfdde,0xfaa3,0xf75a,0xf509,0xf2e1,0xf266,0xf1eb,
+	0xf2f2,0xf41e,0xf573,0xf6d1,0xf798,0xf875,0xf831,0xf7f4,
+	0xf689,0xf5b6,0xf3e0,0xf1a4,0xee36,0xeaa0,0xe702,0xe492,
+	0xe4d9,0xe7a8,0xef04,0xf9c7
+};
+
+static const UINT16 E1[] = {
+	0x08c5,0x0f33,0x115e,0x0dbf,0x0766,0x01d0,0x0176,0x075b,
+	0x123f,0x1dae,0x2437,0x23d7,0x1c8c,0x1362,0x0bba,0x0b61,
+	0x1185,0x1b72,0x242b,0x2776,0x2351,0x194a,0x0eaa,0x0722,
+	0x05c8,0x091d,0x0f8b,0x13aa,0x1343,0x0d87,0x0423,0xfa83,
+	0xf397,0xf178,0xf266,0xf566,0xf6a8,0xf629,0xf22d,0xecba,
+	0xe675,0xe138,0xde65,0xddbb,0xdf92,0xe136,0xe31d,0xe324,
+	0xe23d,0xdf7e,0xdc3b,0xd949,0xd857,0xdaa8,0xdec7,0xe486,
+	0xe88e,0xeaf9,0xea33,0xe7e6,0xe503,0xe498,0xe7c7,0xee45,
+	0xf61a,0xfc43,0xff4b,0xfe67,0xfc42,0xf9f6,0xfa4a,0xfd36,
+	0x0323,0x09f1,0x0f9e,0x127a,0x1146,0x0ea3,0x0b98,0x0b20,
+	0x0cb2,0x10d9,0x14fa,0x1849,0x198f,0x1807,0x14ca,0x10f7,
+	0x0ec7,0x0e0d,0x0f7a,0x1115,0x124a,0x11f0,0x1052,0x0d2f,
+	0x08fd,0x053c,0x0271,0x01ad,0x0176,0x0263,0x023e,0x0167,
+	0xfeb7,0xfb33,0xf70b,0xf371,0xf201,0xf1f8,0xf3aa,0xf4a7,
+	0xf52e,0xf3b2,0xf117,0xedbf,0xeb01,0xe97c,0xe9fc,0xec8e,
+	0xef78,0xf22c,0xf28c,0xf140,0xeeb8,0xed30,0xec95,0xee3f,
+	0xf18a,0xf53d,0xf8bc,0xfa6a,0xfa9c,0xf8cb,0xf780,0xf6de,
+	0xf8dc,0xfc45,0x008e,0x042d,0x0616,0x064d,0x04b7,0x034f,
+	0x0243,0x0364,0x05e6,0x095e,0x0c1b,0x0d8c,0x0d58,0x0b83,
+	0x0977,0x0788,0x0730,0x07bb,0x0a1c,0x0bc7,0x0cf5,0x0c29,
+	0x0a16,0x0773,0x04e6,0x0386,0x02d6,0x03ef,0x04e2,0x060e,
+	0x0532,0x0352,0x0014,0xfcf8,0xfb11,0xfa9e,0xfb82,0xfc13,
+	0xfcdf,0xfc6e,0xfb71,0xf8e4,0xf648,0xf47a,0xf3f4,0xf4c6,
+	0xf620,0xf765,0xf78c,0xf743,0xf5e3,0xf4b0,0xf338,0xf336,
+	0xf3f0,0xf5dc,0xf7d8,0xf8f7,0xf991,0xf8d4,0xf878,0xf7b7,
+	0xf80c,0xf8db,0xfabb,0xfc9b,0xfe4f,0xff3c,0xff2d,0xfeaf,
+	0xfdda,0xfdf8,0xfdd2,0xfdec,0xfbf4,0xf96b,0xf67d,0xf5ac,
+	0xf898,0xff50,0x0832
+};
+
+static const UINT16 W1[] = {
+	0x0310,0x0980,0x10a3,0x17a7,0x1e65,0x2495,0x2a0c,0x2eba,
+	0x3260,0x3573,0x36e8,0x3774,0x364a,0x341c,0x3060,0x2b93,
+	0x2562,0x1e3d,0x16a2,0x0e3a,0x061e,0xfd8f,0xf544,0xecf3,
+	0xe55b,0xde30,0xd84e,0xd325,0xcf06,0xcc19,0xc9df,0xc919,
+	0xc937,0xca80,0xcc09,0xce67,0xd116,0xd4af,0xd8ca,0xdcc3,
+	0xe0a9,0xe480,0xe892,0xec00,0xef79,0xf221,0xf494,0xf697,
+	0xf89e,0xfa3a,0xfb89,0xfc98,0xfd67,0xfed0,0xffaf,0x0127,
+	0x024c,0x0432,0x0618,0x083c,0x0a75,0x0cc5,0x0fa7,0x1233,
+	0x1517,0x1785,0x1a3d,0x1c61,0x1e6c,0x201b,0x2113,0x215b,
+	0x2108,0x205b,0x1e8b,0x1c56,0x1975,0x168c,0x12fa,0x0f09,
+	0x0a4c,0x0531,0x0076,0xfb78,0xf6c0,0xf1fc,0xee19,0xea35,
+	0xe757,0xe455,0xe217,0xe042,0xdf2d,0xdefb,0xdf48,0xe04c,
+	0xe123,0xe2f7,0xe4f3,0xe7a0,0xe9f9,0xec7a,0xef33,0xf1f1,
+	0xf4ed,0xf761,0xf9bb,0xfb8a,0xfd82,0xff01,0x00ca,0x01d6,
+	0x02f3,0x03fa,0x04c3,0x0564,0x05d1,0x068c,0x06df,0x07ba,
+	0x0868,0x0993,0x0a3f,0x0b0e,0x0be0,0x0cb5,0x0d7e,0x0e23,
+	0x0f41,0x0fb7,0x1086,0x1088,0x10b2,0x104f,0x0fdc,0x0ef1,
+	0x0da7,0x0c4c,0x0a7a,0x0908,0x06ae,0x042c,0x0152,0xfed9,
+	0xfbfd,0xf93c,0xf6c3,0xf463,0xf26f,0xf06b,0xef1f,0xed73,
+	0xec89,0xeb91,0xeb6f,0xeb7d,0xebe5,0xec9f,0xeda7,0xef57,
+	0xf092,0xf229,0xf381,0xf543,0xf6f5,0xf8ed,0xfaa1,0xfc74,
+	0xfe1e,0xff8f,0x00fe,0x01c2,0x02db,0x033a,0x0419,0x0497,
+	0x0504,0x0547,0x0592,0x05f8,0x0606,0x065a,0x061e,0x0696,
+	0x06b5,0x0740,0x0751,0x077a,0x0793,0x07c1,0x0811,0x07de,
+	0x07d3,0x075c,0x074d,0x06ae,0x0644,0x0552,0x048c,0x033a,
+	0x0200,0x00a4,0xfeec,0xfd9c,0xfb83,0xf970,0xf66f,0xf3cf,
+	0xf0b1,0xeded,0xeba3,0xe9d6,0xe8fa,0xe8cd,0xe9b0,0xeb0e,
+	0xeda7,0xf0d8,0xf530,0xfa0c,0xffd3,0x0639
+};
+
+static const UINT16 AE1[] = {
+	0xfbc8,0xf0bf,0xe3a0,0xd630,0xcdb3,0xcf8d,0xde4d,0xf9a6,
+	0x1adb,0x3a2a,0x4d21,0x5099,0x43eb,0x2d86,0x158c,0x0619,
+	0x0527,0x11fe,0x2745,0x3aab,0x44fd,0x3f34,0x2b6a,0x0d3a,
+	0xed6d,0xd2a2,0xc2da,0xbf1c,0xc461,0xcf1e,0xd92c,0xe115,
+	0xe41c,0xe3f7,0xe05f,0xdc11,0xd7e3,0xd614,0xd846,0xdf4b,
+	0xec2d,0xfda3,0x12aa,0x25ee,0x345f,0x38d1,0x33f9,0x26cc,
+	0x1652,0x07bc,0xff83,0x005b,0x0825,0x13cc,0x1be8,0x1d5d,
+	0x13fb,0x0307,0xed4b,0xd8e4,0xca4f,0xc4ac,0xc8b1,0xd322,
+	0xe102,0xed1e,0xf64c,0xf97d,0xf94e,0xf601,0xf2f3,0xf146,
+	0xf31f,0xf94e,0x02c9,0x0f98,0x1bd6,0x2715,0x2d30,0x2e4b,
+	0x28dd,0x1e71,0x1112,0x040a,0xfb26,0xf748,0xf960,0xfdf6,
+	0x03cb,0x05d1,0x0344,0xfaab,0xee6e,0xe164,0xd744,0xd342,
+	0xd58e,0xde62,0xea02,0xf740,0x0183,0x0840,0x09ea,0x0867,
+	0x04e4,0x0233,0x0236,0x048f,0x0a6f,0x1130,0x1926,0x1ebf,
+	0x21c5,0x203e,0x1ab8,0x118c,0x0698,0xfc72,0xf452,0xf07a,
+	0xefdb,0xf30e,0xf6ea,0xfa7f,0xfaae,0xf7cc,0xf230,0xeb40,
+	0xe5a5,0xe2fa,0xe532,0xeb22,0xf4f7,0xff28,0x0894,0x0e7b,
+	0x110c,0x101a,0x0d48,0x0a26,0x0788,0x07a5,0x0919,0x0ccf,
+	0x0fe9,0x1313,0x1384,0x1199,0x0cce,0x05b6,0xfdea,0xf634,
+	0xf0f3,0xed84,0xed77,0xef28,0xf32a,0xf68c,0xf903,0xf958,
+	0xf7a9,0xf51b,0xf23e,0xf15d,0xf252,0xf6cc,0xfcd9,0x0502,
+	0x0b85,0x10aa,0x1286,0x119d,0x0ef6,0x0add,0x07c9,0x0555,
+	0x0552,0x05d3,0x078c,0x083d,0x081b,0x0634,0x02ef,0xfea0,
+	0xf93c,0xf4de,0xf0b6,0xef4f,0xef53,0xf18e,0xf45d,0xf7fb,
+	0xfadd,0xfcf8,0xfde4,0xfd5d,0xfcac,0xfb7e,0xfc6a,0xfe3a,
+	0x0252,0x0666,0x0ae3,0x0e31,0x0fc4,0x0f7e,0x0c7d,0x08f7,
+	0x04a4,0x0219,0xffb4,0xff55,0xff80,0x00b1,0x013a,0x0088,
+	0xfec9,0xfb5c,0xf809,0xf45a,0xf2a8,0xf19c,0xf2f5,0xf51d,
+	0xf89f,0xfc13,0xfede,0x00d5,0x0177,0x01c6,0x011f,0x0153,
+	0x011f,0x023e,0x03bf,0x065f,0x0873,0x0a1e,0x0a84,0x0954,
+	0x06e7,0x0178,0xf9e6
+};
+
+static const UINT16 UH1[] = {
+	0x0795,0x1cce,0x3296,0x45fa,0x567c,0x61f8,0x6942,0x6acf,
+	0x66b0,0x5ba0,0x4a07,0x3299,0x16d5,0xfa4a,0xded2,0xc80c,
+	0xb760,0xadf6,0xa9e5,0xab10,0xaf91,0xb68d,0xbf9f,0xc939,
+	0xd350,0xdc27,0xe417,0xe91c,0xec7e,0xed19,0xecd8,0xece0,
+	0xeedd,0xf421,0xfc76,0x0807,0x14a9,0x2231,0x2e16,0x38a6,
+	0x3f78,0x42b9,0x420b,0x3d46,0x3456,0x264b,0x1533,0x0113,
+	0xed26,0xda3b,0xcaaf,0xbf1f,0xb8d9,0xb769,0xba4e,0xc0f6,
+	0xc97f,0xd3e2,0xdeb1,0xea29,0xf43c,0xfd3d,0x03a9,0x07fc,
+	0x0a27,0x0aaf,0x0ae0,0x0aff,0x0c62,0x0ec4,0x133d,0x17d4,
+	0x1d69,0x21b4,0x251e,0x2716,0x26ee,0x2484,0x1ebb,0x16e1,
+	0x0c49,0x0059,0xf2be,0xe57f,0xd97d,0xd023,0xc9ca,0xc6c7,
+	0xc79b,0xcb48,0xd26f,0xdb24,0xe5a1,0xf011,0xfae8,0x042c,
+	0x0c0d,0x11d4,0x156e,0x170e,0x16ca,0x1608,0x1405,0x12ce,
+	0x115f,0x111b,0x1100,0x114a,0x11d3,0x11db,0x118c,0x0fd5,
+	0x0d32,0x08a7,0x0326,0xfc03,0xf44c,0xec34,0xe49d,0xde42,
+	0xd987,0xd721,0xd693,0xd902,0xdd52,0xe42f,0xebe9,0xf4f3,
+	0xfdb0,0x060c,0x0da6,0x1319,0x174f,0x191f,0x19cf,0x1853,
+	0x1661,0x132a,0x101e,0x0ccc,0x09dd,0x07b0,0x05b2,0x04ba,
+	0x0374,0x025e,0x006e,0xfecd,0xfc09,0xf900,0xf516,0xf11d,
+	0xed52,0xe98d,0xe6f3,0xe4af,0xe456,0xe50e,0xe841,0xec63,
+	0xf1dd,0xf83c,0xff0c,0x05f1,0x0bac,0x10a8,0x13df,0x164d,
+	0x16cb,0x1650,0x13fb,0x1106,0x0d7e,0x096c,0x059b,0x01ba,
+	0xfeda,0xfc51,0xfb33,0xf9b2,0xf925,0xf7d1,0xf738,0xf685,
+	0xf556,0xf42f,0xf256,0xf156,0xf025,0xefdf,0xef40,0xefbe,
+	0xf13b,0xf3f7,0xf76c,0xfb59,0xffde,0x0439,0x0916,0x0c8d,
+	0x0fb0,0x114e,0x126c,0x11f8,0x1083,0x0dee,0x0ac7,0x072a,
+	0x030c,0xff90,0xfbff,0xf990,0xf75b,0xf652,0xf561,0xf520,
+	0xf52d,0xf522,0xf5a5,0xf5bf,0xf63d,0xf63b,0xf6d6,0xf6b4,
+	0xf73c,0xf7ad,0xf897,0xf9a3,0xfb45,0xfd52,0xfebc,0xffa1,
+	0xfd60,0xf8ba,0xf0d8,0xe8c3,0xe21f,0xe07a,0xe5d0,0xf1c0,
+	0x0394
+};
+
+static const UINT16 IU1[] = {
+	0x0e9b,0x1b85,0x261b,0x2bf9,0x2e2d,0x2c59,0x2839,0x2310,
+	0x1dc8,0x19e6,0x1676,0x149f,0x1375,0x13eb,0x14d3,0x16fe,
+	0x192e,0x1b16,0x1c1e,0x1af8,0x1719,0x0fae,0x05df,0xf934,
+	0xeccf,0xe0b4,0xd712,0xd02e,0xccc6,0xccad,0xcea7,0xd233,
+	0xd591,0xd946,0xdb86,0xdd68,0xdd7a,0xdd35,0xdc5c,0xdb3a,
+	0xda35,0xd961,0xd9e1,0xdba3,0xdffd,0xe5cb,0xee26,0xf769,
+	0x0218,0x0bef,0x143e,0x1a6b,0x1da3,0x1edf,0x1d92,0x1b9e,
+	0x1873,0x1628,0x1434,0x13ae,0x13c8,0x14ab,0x1632,0x179c,
+	0x18f2,0x1921,0x18c0,0x1677,0x1332,0x0df6,0x07d3,0x0074,
+	0xf8b3,0xf147,0xeac2,0xe699,0xe341,0xe258,0xe27a,0xe4b5,
+	0xe6c2,0xe8b9,0xea03,0xeab2,0xea91,0xe9c9,0xe8fb,0xe764,
+	0xe6b1,0xe642,0xe78b,0xe913,0xec04,0xf00f,0xf538,0xfb62,
+	0x015d,0x0775,0x0c56,0x108d,0x1300,0x148f,0x141a,0x12e8,
+	0x1142,0x0f91,0x0e9f,0x0e10,0x0ec5,0x0f5d,0x109d,0x115e,
+	0x125d,0x1229,0x1162,0x0f9c,0x0d2b,0x0a01,0x05ba,0x016f,
+	0xfc48,0xf805,0xf3b1,0xf0d8,0xee46,0xed35,0xed2f,0xedd1,
+	0xeeff,0xefe2,0xf117,0xf11a,0xf13e,0xf082,0xefa9,0xee9c,
+	0xee0a,0xee14,0xeea6,0xf035,0xf224,0xf51f,0xf81d,0xfbf8,
+	0xff84,0x0342,0x065b,0x093b,0x0b13,0x0be5,0x0c29,0x0b9e,
+	0x0b4f,0x09f1,0x0996,0x091f,0x096d,0x09e5,0x0ab7,0x0b93,
+	0x0c04,0x0c4c,0x0bac,0x0ad1,0x0896,0x0653,0x032b,0x005f,
+	0xfd70,0xfa97,0xf831,0xf642,0xf53f,0xf46d,0xf482,0xf451,
+	0xf502,0xf543,0xf5be,0xf586,0xf53e,0xf4fc,0xf438,0xf3f6,
+	0xf36a,0xf394,0xf37e,0xf4c4,0xf617,0xf830,0xfa50,0xfcc7,
+	0xff7e,0x01d0,0x03d2,0x04eb,0x05ea,0x062b,0x06e5,0x0696,
+	0x0656,0x05d1,0x05ed,0x062e,0x060f,0x067c,0x0678,0x075a,
+	0x077e,0x07d8,0x06f0,0x05fc,0x044a,0x01f5,0xfeaf,0xf936,
+	0xf251,0xea61,0xe392,0xde70,0xdd6c,0xe0cc,0xe980,0xf5be,
+	0x046a,0x12e2
+};
+
+static const UINT16 THV1[] = {
+	0x019c,0x02bf,0x01c9,0x014c,0x0064,0x00bf,0x0023,0xfff3,
+	0xff7b,0xffe9,0x013f,0x01cd,0x02cc,0x0268,0x030d,0x0280,
+	0x025e,0x010c,0xff91,0xfe8f,0xfdf1,0xfe20,0xfdc6,0xfd7a,
+	0xfc8a,0xfd77,0xfd50,0xfd28,0xfc20,0xfaee,0xfa01,0xf908,
+	0xf8b6,0xf7e3,0xf85d,0xf7fe,0xf8f5,0xf915,0xfa61,0xfb45,
+	0xfb5a,0xfbab,0xfb1e,0xfab8,0xf955,0xf97c,0xf91d,0xfa03,
+	0xfa39,0xfb6e,0xfc58,0xfd16,0xfe6e,0xfe3c,0xfe6b,0xfd9e,
+	0xfde8,0xfd5b,0xfd98,0xfd6a,0xfdd0,0xff1a,0xff94,0x00b4,
+	0x0096,0x0161,0x00e2,0x015b,0x00c1,0x006b,0x0003,0xffb9,
+	0x000f,0xffc8,0x0085,0x002c,0x00d0,0x0084,0x0102,0x00a2,
+	0x0031,0xff8b,0xfedd,0xfeb0,0xfdc0,0xfdf0,0xfd41,0xfde5,
+	0xfe02,0xfe84,0xfe6b,0xfe08,0xfdc7,0xfcfa,0xfcdf,0xfbea,
+	0xfc54,0xfbb8,0xfc30,0xfbf8,0xfc1b,0xfc06,0xfbc8,0xfc81,
+	0xfcaa,0xfd9c,0xfd28,0xfdb6,0xfd2c,0xfcf6,0xfc6b,0xfc18,
+	0xfc9c,0xfd1a,0xfe32,0xfe25,0xfe97,0xfecc,0xff6f,0xfefc,
+	0xfefb,0xfe7f,0xfecb,0xffd9,0xffd1,0xff9c,0xff07,0xffa3,
+	0xff5e,0x0061,0x005e,0x00bf,0x00cd,0x0019,0xffb3,0xfedc,
+	0xff64,0xff1e,0xffff,0xff45,0xffe3,0xffb1,0xff38,0xfe99,
+	0xfe29,0xfe58,0xfda9,0xfe81,0xfe2a,0xfefc,0xfeac,0xfe31,
+	0xfd33,0xfc59,0xfc77,0xfce8,0xfdaf,0xfcef,0xfd84,0xfd59,
+	0xfe02,0xfd83,0xfc9b,0xfbe3,0xfc33,0xfd85,0xfdf4,0xfe76,
+	0xfd17,0xfd32,0xfd2a,0xfde2,0xfdd5,0xfdda,0xfe08,0xfe11,
+	0xfee1,0xfe94,0xff47,0xfe73,0xff16,0xfe8a,0xff4d,0xff70,
+	0xffa4,0x000f,0xff8a,0x003f,0xff6c,0xff43,0xfeae,0xff6c,
+	0xff9f,0xff94,0xff53,0xff2c,0xfffd,0xff92,0xff7e,0xfeb7,
+	0xff93,0xffae,0xffd9,0xfe79,0xfd79,0xfdef,0xfe68,0xff02,
+	0xfdf5,0xfde2,0xfd32,0xfe5f,0xfe80,0xfe4b,0xfdc4,0xfd16,
+	0xfdc0,0xfdbc,0xfe02,0xfcfa,0xfd02,0xfcdd,0xfd65,0xfddf,
+	0xfe0e,0xfe17,0xfdb7,0xfe48,0xfde4,0xfe27,0xfdc6,0xfe41,
+	0xfddf,0xfdf7,0xfdbf,0xfdc8,0xfeac,0xfe81,0xff10,0xfe0b,
+	0xfe79,0xfe47,0xfeee,0xfe5a,0xfdf8,0xfdaa,0xfdea,0xfe6f,
+	0xfd8d,0xfd7a,0xfc7e,0xfcc2,0xfc8a,0xfd7a,0xfe0e,0xfeec,
+	0x000f,0x00c6,0x0167,0x00a8,0x004c,0xff3d,0xffd3,0xffb0,
+	0x002d,0x0073,0x00bd,0x017c,0x01f0,0x0295,0x01cd,0x0205,
+	0x012c,0x0144,0x007f,0xfff0,0xff3b,0xfe9b,0xff03,0xfe9a,
+	0xff5a,0xfee8,0xff9d,0xff3a,0xfee7,0xfda9,0xfc6d,0xfbe4,
+	0xfb24,0xfb0d,0xfa6b,0xfad7,0xfa5a,0xfb3f,0xfb01,0xfb1f,
+	0xfaee,0xfadb,0xfb30,0xfa82,0xfab1,0xf9c3,0xf9ce,0xf99e,
+	0xfab9,0xfb5a,0xfc1d,0xfcbf,0xfd20,0xfdcb,0xfd47,0xfd6e,
+	0xfc87,0xfcde,0xfcb9,0xfdb2,0xfdfa,0xfea5,0xff88,0xffb9,
+	0x00a8,0x003a,0x00c5,0x004c,0x00aa,0x003e,0x0018,0xffec,
+	0xffc6,0x0020,0xfff3,0x00d0,0x008c,0x012c,0x008d,0x006b,
+	0xffbd,0xff36,0xfedd,0xfe5f,0xfe73,0xfde7,0xfe52,0xfdf0,
+	0xfe7f,0xfdda,0xfdb5,0xfd86,0xfd8b,0xfd7d,0xfc75,0xfc77,
+	0xfbca,0xfc2a,0xfb7d,0xfbee,0xfbcf,0xfc67,0xfcdc,0xfd1f,
+	0xfdc9,0xfd01,0xfce3,0xfbc2,0xfc00,0xfb96,0xfc6b,0xfd11,
+	0xfd8b,0xfe4c,0xfe95,0xff7c,0xff75,0xff9b,0xfe65,0xfe20,
+	0xfd8a,0xfdd8,0xfe2d,0xfe26,0xfe5d,0xfe79,0xffef,0xfffd,
+	0x00af,0xfff8,0x0012,0xff96,0xff56,0xff02,0xfe79,0xff02,
+	0xff4e,0xffec,0xff3d,0xffd6,0xff71,0xffb6,0xff47,0xfe66,
+	0xfd93,0xfced,0xfd7c,0xfd16,0xfd62,0xfcd4,0xfde3,0xfe91,
+	0xfe99,0xfdf3,0xfd2f,0xfd3d,0xfd0a,0xfd7d,0xfc17,0xfc33,
+	0xfbe5,0xfcd6,0xfccc,0xfccc,0xfce7,0xfcf4,0xfde2,0xfd7f,
+	0xfdd1,0xfd01,0xfd89,0xfd35,0xfd29,0xfd1f,0xfd15,0xfdd9,
+	0xfdf8,0xfec9,0xfea3,0xff5c,0xff19,0xff55,0xfeb6,0xfeec,
+	0xfea9,0xfe82,0xff49,0xff37,0xffaa,0xfeac,0xff7d,0xff6c,
+	0x00c5,0x00a3,0x0020,0xffca,0xff3c,0xff6f,0xfea7,0xfea1,
+	0xfe25,0xff52,0xffae,0x0058,0xff70,0xff14,0xff5e,0xfec5,
+	0xfeb0,0xfd81,0xfdcc,0xfe13,0xff2e,0xfec7,0xfd84,0xfc45,
+	0xfc2e,0xfdb4,0xfe9b,0xff4d,0xfe25,0xfe1e,0xfd5a,0xfdda,
+	0xfce7,0xfc29,0xfc1d,0xfca9,0xfe3d,0xfe62,0xfeca,0xfdbf,
+	0xfe60,0xfdfd,0xfdf9,0xfdbf,0xfd7f,0xfe30,0xfe2a,0xfef4,
+	0xfe41,0xfe75,0xfdc6,0xfe2e,0xfe3a,0xfea4,0xfebb,0xfe59,
+	0xfe78,0xfd9e,0xfd3e,0xfbfb,0xfc05,0xfc12,0xfd4a,0xfe63
+};
+
+static const UINT16 ER1[] = {
+	0x08e1,0x1e13,0x3455,0x48ca,0x58cf,0x62c0,0x6443,0x5e18,
+	0x5040,0x3e33,0x29ff,0x1752,0x08a2,0x003f,0xfecd,0x03e2,
+	0x0dbc,0x1860,0x2224,0x26be,0x252a,0x1b40,0x0a6f,0xf3f3,
+	0xdad1,0xc255,0xad23,0x9e86,0x9739,0x98a6,0xa0a3,0xae69,
+	0xbea9,0xcf8d,0xddea,0xe890,0xee46,0xeed5,0xebfa,0xe6f2,
+	0xe247,0xde90,0xdeb7,0xe25a,0xeb15,0xf736,0x05cf,0x153f,
+	0x2434,0x31e4,0x3bcf,0x4266,0x4412,0x426f,0x3d0c,0x35ad,
+	0x2c50,0x223c,0x18b7,0x1027,0x09ff,0x0548,0x02fa,0x01d4,
+	0x0258,0x02cb,0x0329,0x01f5,0xfe9a,0xf96b,0xf219,0xe956,
+	0xdec2,0xd4c6,0xcba0,0xc578,0xc1e4,0xc24e,0xc644,0xcd9f,
+	0xd802,0xe365,0xeeed,0xf89f,0x00a5,0x056e,0x07bf,0x06f3,
+	0x04c0,0x0225,0x0037,0x0013,0x01fc,0x06bd,0x0d7a,0x1695,
+	0x1f76,0x2835,0x2e3c,0x3211,0x324e,0x2f2e,0x2927,0x204a,
+	0x16cf,0x0cee,0x0483,0xfd41,0xf83b,0xf574,0xf50e,0xf5e4,
+	0xf713,0xf826,0xf85a,0xf7ba,0xf550,0xf188,0xec30,0xe70f,
+	0xe1dd,0xddd2,0xdaf1,0xd9c9,0xdaea,0xddf9,0xe33d,0xe91a,
+	0xf04e,0xf70f,0xfe0d,0x03c7,0x0881,0x0b5f,0x0d14,0x0ded,
+	0x0da0,0x0d25,0x0c0d,0x0c1e,0x0c77,0x0e1f,0x1021,0x12ef,
+	0x15c6,0x18ba,0x1af4,0x1b95,0x1b16,0x185a,0x14c4,0x0f53,
+	0x090b,0x0239,0xfbae,0xf63c,0xf220,0xefd4,0xeec0,0xef58,
+	0xf07f,0xf2b6,0xf40f,0xf516,0xf4fe,0xf3f0,0xf20f,0xef5c,
+	0xecbd,0xea5d,0xe957,0xe91f,0xeb11,0xedd3,0xf286,0xf7d7,
+	0xfdad,0x031f,0x07cf,0x0bc5,0x0ded,0x0f4a,0x0eed,0x0e2b,
+	0x0c93,0x0b45,0x0a1f,0x095c,0x094e,0x09f4,0x0b5d,0x0c85,
+	0x0df2,0x0e55,0x0eb2,0x0da8,0x0bf1,0x08db,0x0555,0x0171,
+	0xfd39,0xf98b,0xf608,0xf3a3,0xf186,0xf0e8,0xf079,0xf15d,
+	0xf251,0xf38d,0xf4d7,0xf5e7,0xf658,0xf61b,0xf5d8,0xf49b,
+	0xf39f,0xf173,0xee70,0xea2b,0xe575,0xe11b,0xde16,0xde3c,
+	0xe212,0xebf1,0xfa4a,0x0db8
+};
+
+static const UINT16 EH1[] = {
+	0xfffd,0xfe8d,0xfcb6,0xf901,0xf5f3,0xf297,0xf09e,0xef1a,
+	0xeeff,0xf00e,0xf18f,0xf429,0xf62c,0xf8b4,0xfa14,0xfb78,
+	0xfb91,0xfbc7,0xfae5,0xf908,0xf4fc,0xedfa,0xe52c,0xdcbe,
+	0xda6d,0xe0c2,0xf28a,0x0bd2,0x288c,0x40a2,0x4ef9,0x50a6,
+	0x4689,0x3605,0x24a7,0x1a2a,0x191a,0x213f,0x2d6e,0x3921,
+	0x3eac,0x3bdb,0x3064,0x1dd8,0x0894,0xf363,0xe1eb,0xd44f,
+	0xcb9a,0xc618,0xc4f7,0xc6f2,0xcb48,0xd013,0xd2ff,0xd32f,
+	0xceed,0xc81d,0xbf2c,0xb9cb,0xba0b,0xc312,0xd3fe,0xea0d,
+	0x012f,0x13c8,0x1fd7,0x234a,0x2098,0x1973,0x1377,0x10d9,
+	0x1391,0x1a54,0x2360,0x2bd2,0x3138,0x329f,0x2e5b,0x260c,
+	0x193e,0x0b76,0xfcc4,0xf016,0xe5e3,0xdf7d,0xdd72,0xdeb9,
+	0xe291,0xe591,0xe744,0xe4cb,0xdf69,0xd719,0xcf13,0xc9d4,
+	0xc9ba,0xd027,0xdbc4,0xeb02,0xf9a4,0x0672,0x0e7e,0x1251,
+	0x11c4,0x0f82,0x0d3f,0x0cfa,0x0f54,0x1388,0x19f5,0x1ff9,
+	0x255b,0x2798,0x275a,0x22e8,0x1bc6,0x121a,0x072e,0xfcd2,
+	0xf464,0xef9f,0xed45,0xee47,0xefe1,0xf1cd,0xf149,0xee6a,
+	0xe8c2,0xe188,0xdaeb,0xd693,0xd67e,0xd9f9,0xe15f,0xea4e,
+	0xf4a6,0xfcec,0x031f,0x0693,0x0753,0x070c,0x0647,0x06d1,
+	0x0807,0x0b99,0x0fdd,0x15a6,0x1a7f,0x1e13,0x1f4a,0x1d85,
+	0x190d,0x120a,0x0a7c,0x0261,0xfc9b,0xf878,0xf77a,0xf796,
+	0xf8ff,0xf99c,0xf864,0xf580,0xf030,0xeb26,0xe58a,0xe251,
+	0xe0c7,0xe29a,0xe659,0xec1a,0xf23c,0xf7e4,0xfcd2,0xffcc,
+	0x019b,0x017e,0x0183,0x0123,0x0278,0x04d5,0x08b4,0x0d53,
+	0x11e2,0x15ae,0x1746,0x1727,0x13dc,0x0fc5,0x0a00,0x050a,
+	0x00be,0xfe5a,0xfd55,0xfd3a,0xfda4,0xfd4e,0xfc8e,0xf9ab,
+	0xf64d,0xf1a9,0xedd3,0xea4d,0xe8db,0xe912,0xeac1,0xee65,
+	0xf25e,0xf6e9,0xfa15,0xfc92,0xfd5d,0xfdcf,0xfda2,0xfde3,
+	0xfe9f,0x0072,0x03c7,0x0753,0x0b8e,0x0e5b,0x1063,0x103e,
+	0x0f2c,0x0c8f,0x09b6,0x0621,0x0334,0x0184,0x003a,0x002e,
+	0xffe4
+};
+
+static const UINT16 AW1[] = {
+	0xfdc8,0xf547,0xea56,0xdff6,0xd6d0,0xd1ed,0xd254,0xd8bd,
+	0xe538,0xf5e7,0x0a3e,0x1ef2,0x33d8,0x4669,0x56ca,0x62cf,
+	0x6a64,0x6c07,0x66e1,0x5a8c,0x472c,0x2e96,0x10ec,0xf29e,
+	0xd533,0xbc08,0xa73c,0x98e5,0x90ad,0x8e68,0x9253,0x9b6c,
+	0xaa30,0xbc4b,0xd204,0xe7ea,0xfdd2,0x1085,0x1f8a,0x29b5,
+	0x2ecb,0x3036,0x2dac,0x299f,0x235a,0x1d40,0x164e,0x108b,
+	0x0b01,0x072e,0x04c4,0x03ef,0x04ac,0x05d4,0x0778,0x0743,
+	0x05fd,0x01b4,0xfbc8,0xf381,0xea5d,0xe06b,0xd6df,0xcece,
+	0xc840,0xc4e2,0xc374,0xc648,0xcc28,0xd64e,0xe33d,0xf2fb,
+	0x0415,0x1508,0x2532,0x3261,0x3cac,0x4237,0x4430,0x417e,
+	0x3b55,0x317f,0x252b,0x1675,0x06dc,0xf7d1,0xe940,0xdd65,
+	0xd395,0xce35,0xcba2,0xcd4a,0xd0eb,0xd6fa,0xde4c,0xe632,
+	0xee86,0xf5e8,0xfd0d,0x0246,0x0706,0x09b3,0x0b83,0x0ba0,
+	0x0b4d,0x0a7a,0x09f5,0x0a51,0x0b0c,0x0d23,0x0ede,0x119b,
+	0x138c,0x1597,0x15ec,0x15a0,0x138e,0x1084,0x0c0d,0x058e,
+	0xfe5c,0xf592,0xed84,0xe512,0xde4e,0xd887,0xd561,0xd497,
+	0xd63b,0xda97,0xe0cb,0xe93e,0xf25a,0xfcc3,0x0662,0x100c,
+	0x180f,0x1e8a,0x22e3,0x24ef,0x24b4,0x21b4,0x1d58,0x16f1,
+	0x1079,0x08be,0x01ed,0xfb0b,0xf599,0xf0ed,0xeda0,0xebc9,
+	0xead3,0xebbb,0xeca9,0xeef8,0xf0a0,0xf2e0,0xf47c,0xf640,
+	0xf768,0xf82e,0xf8e7,0xf936,0xfa7b,0xfb6d,0xfd53,0xfed9,
+	0x0183,0x0438,0x0764,0x0aa9,0x0da5,0x1068,0x1260,0x13e9,
+	0x13ad,0x12bb,0x0fab,0x0c68,0x0771,0x022d,0xfc74,0xf6b0,
+	0xf17c,0xec60,0xe908,0xe61c,0xe560,0xe56e,0xe7a8,0xeab7,
+	0xef45,0xf44a,0xf98c,0xfefe,0x03a8,0x087a,0x0ba0,0x0e83,
+	0x0fb2,0x1080,0x0ffa,0x0ed8,0x0cc7,0x09df,0x072d,0x0431,
+	0x01a8,0xfedb,0xfd41,0xfb5b,0xfaa3,0xf98f,0xf8e7,0xf857,
+	0xf7d4,0xf7ce,0xf716,0xf717,0xf623,0xf5f5,0xf54a,0xf548,
+	0xf528,0xf59b,0xf681,0xf807,0xfa57,0xfc61,0xff77,0x01c9,
+	0x0519,0x0787,0x0a50,0x0bdb,0x0cf2,0x0cfa,0x0c36,0x0a72,
+	0x0717,0x02eb,0xfc43
+};
+
+static const UINT16 ZH2[] = {
+	0xfede,0x0030,0xfe52,0xfa8e,0xf8c8,0xfa22,0xfdfe,0xffb8,
+	0x00a9,0xff25,0xff1d,0xfe07,0xfc2e,0xf7eb,0xf572,0xf932,
+	0x00fa,0x07bb,0x05c3,0xfec4,0xf769,0xf806,0xfcde,0x019b,
+	0x0118,0xfe8a,0xfcbe,0xfca2,0xfdfd,0xfdb8,0x0037,0x0282,
+	0x05dd,0x044f,0xfdb7,0xf6d6,0xf58c,0xfaf3,0x0176,0x071c,
+	0x07cb,0x0623,0x001d,0xfa2f,0xf65e,0xf865,0xff3f,0x0578,
+	0x0892,0x04bd,0xfe17,0xf765,0xf72e,0xfa2d,0x007b,0x052b,
+	0x0777,0x04db,0xfd2b,0xf69a,0xf3bb,0xf8a8,0xff3e,0x04e9,
+	0x04ad,0x0174,0xfe3e,0xfbf6,0xfa46,0xf8ec,0xfb48,0xfe7e,
+	0x0272,0x007f,0xfc1d,0xf98f,0xfc63,0x00b6,0x01df,0xff21,
+	0xfaaf,0xfaf5,0xfc7e,0xfefb,0xff4b,0x0007,0x0060,0x006f,
+	0xfec0,0xfc04,0xfb52,0xfb42,0xfe65,0x0017,0x0105,0xfe61,
+	0xfcb6,0xfd92,0x011a,0x03fd,0x014b,0xfd83,0xfa8c,0xfc02,
+	0xfc89,0xfbe3,0xfaf9,0xfe98,0x0659,0x0ad2,0x06f4,0xfb32,
+	0xf3d8,0xf362,0xf951,0xfdc7,0x02a1,0x063d,0x08c0,0x0740,
+	0xfdf9,0xf447,0xeff4,0xf73b,0x00a1,0x0692,0x0465,0x001c,
+	0xfd05,0xfbf5,0xfb29,0xf927,0xfa55,0xfd33,0x016d,0x0051,
+	0xfc92,0xf91a,0xfb1d,0x0041,0x039e,0x0392,0xffb1,0xfd9e,
+	0xfbc9,0xfbfc,0xfbaf,0xfdef,0x01f4,0x0651,0x0797,0x0333,
+	0xfdbb,0xf983,0xfb0d,0xfdb7,0x01b8,0x031e,0x03e3,0x03a8,
+	0x01e3,0xff1d,0xfbd6,0xfc40,0xfdd8,0x011f,0x0140,0x005b,
+	0xfe09,0xfd29,0xfd7e,0xfdb5,0xfe60,0xfdb6,0xfe5e,0xfcf3,
+	0xfc00,0xf9dc,0xf9e8,0xfb6f,0xfdce,0xff28,0xfdee,0xfc36,
+	0xf977,0xf91d,0xf87c,0xf9d3,0xfadc,0xfcef,0xfdf5,0xfd87,
+	0xfc66,0xfa0b,0xf9f5,0xf9ec,0xfc13,0xfc7a,0xfd31,0xfcde,
+	0xfd2c,0xfd3c,0xfcf4,0xfda6,0xfd74,0xfe77,0xfdbd,0xfdfc,
+	0xfd00,0xfd67,0xfe3a,0xffa6,0x00d5,0x009c,0x00f5,0xff93,
+	0xff4a,0xfe17,0xfeb8,0xff3c,0x00e2,0x01f0,0x021b,0x019f,
+	0xfff6,0xff9e,0xfe9c,0xff7e,0xff54,0x0069,0x0070,0x00b1,
+	0x0048,0xff2e,0xfeca,0xfe47,0xff9c,0xff42,0xffb2,0xfe80,
+	0xfe19,0xfd3d,0xfd0d,0xfdd8,0xfde5,0xff16,0xfee7,0xff0f,
+	0xfd3a,0xfc8a,0xfb4f,0xfacf,0xfbc0,0xfe37,0x00ff,0xffe2,
+	0xfd49,0xf9d2,0xf9c4,0xfae3,0xfe81,0xff50,0xfe7f,0xfcdc,
+	0xfc85,0xfdea,0xfcdd,0xfae6,0xf8f4,0xfd6e,0x0251,0x0392,
+	0xfec9,0xfa06,0xfaef,0xfed9,0x0133,0xfe40,0xfd16,0xfd96,
+	0x0040,0xff98,0xfce6,0xfc5c,0xfeee,0x03b0,0x03ec,0x00b9,
+	0xfbef,0xfb61,0xfbab,0xfd94,0xff55,0x0245,0x0575,0x053e,
+	0x00fb,0xf9d7,0xf7cc,0xfa5a,0x0107,0x046e,0x049d,0x011d,
+	0xff21,0xfd8d,0xfb5a,0xfa5b,0xfa56,0xff02,0x0330,0x05a8,
+	0x031b,0xfefd,0xfa6d,0xf7cc,0xf818,0xfa0a,0xff18,0x02b0,
+	0x0505,0x02b6,0xff49,0xfbef,0xfbfc,0xfc91,0xfbc3,0xf9c8,
+	0xf82a,0xfbb1,0x0085,0x052a,0x0417,0x00c5,0xfccd,0xf9ce,
+	0xf8b7,0xf8d2,0xfbfc,0xfe69,0x0186,0x0239,0x0240,0xfea4,
+	0xfb7d,0xfb16,0xfdc0,0x009f,0xffba,0xfd35,0xf9c1,0xfa8a,
+	0xfd92,0x03a2,0x06e4,0x05fd,0x0006,0xfa2d,0xf755,0xf786,
+	0xfb37,0xfe71,0x040d,0x0746,0x0748,0x011e,0xf87f,0xf545,
+	0xf7e5,0xff95,0x04a3,0x0651,0x02c0,0xff77,0xfb02,0xf8ea,
+	0xf9a0,0xfec0,0x052f,0x06e9,0x029a,0xf919,0xf397,0xf3c7,
+	0xfb2e,0x023d,0x0642,0x056c,0x0101,0xfb5e,0xf51b,0xf373,
+	0xf656,0xff09,0x0691,0x09f5,0x05aa,0xfe4e,0xf89c,0xf6cd,
+	0xfa2e,0xfe38,0x032e,0x0556,0x05e1,0x01c5,0xfd82,0xfaa1,
+	0xfbf2,0x00a9,0x0447,0x0607,0x029d,0xff3f,0xfbc3,0xfbd4,
+	0xfd28,0x008d,0x03bb,0x04bd,0x0350,0xfe51,0xfa47,0xf7b8,
+	0xfa8e,0xfe42,0x024c,0x02e3,0x00cd,0xfd59,0xf9be,0xf869,
+	0xf84c,0xfb85,0xfe1d,0x00c5,0xff63,0xfc99,0xf8fb,0xf767,
+	0xf8a2,0xfac9,0xfdd9,0xfe47,0xfe5c,0xfb6b,0xf972,0xf7ac,
+	0xf883,0xfb23,0xfe41,0x0058,0xfeb3,0xfc99,0xf97b,0xf967,
+	0xf9fe,0xfcf7,0xfef6,0x009e,0x0048,0xfe24,0xfc71,0xfaba,
+	0xfc2d,0xfe19,0x0175,0x01e9,0x01ab,0xff9e,0xfd9e,0xfce5,
+	0xfce1,0xff07,0x0039,0x0252,0x01bd,0x0141,0xff02,0xfe29,
+	0xfddf,0xfef4,0x0092,0x00f7,0x0168,0xff9f,0xff3b,0xfde3,
+	0xfe47,0xfe7b,0xff79,0x0063,0xffd0,0xff1e,0xfd29,0xfd0e,
+	0xfc7b,0xfe1a,0xfee3,0xff90,0xfeda,0xfddd,0xfcc7,0xfb77,
+	0xfbef,0xfc27,0xfe01,0xfdec,0xfe9f,0xfd94,0xfc9d,0xfb0c,
+	0xfa40,0xfcea,0xff89,0x0149,0xfe83,0xfc0e,0xfa0d,0xfabd,
+	0xfaaa,0xfbd9,0xfe41,0x0101,0x021e,0xfeb9,0xfae7,0xf7e8,
+	0xfacd,0xfe8c,0x0254,0x0363,0x02d7,0xfffe,0xfa5b,0xf768,
+	0xf7ca,0xfe0f,0x0405,0x07e4,0x055d,0xffe3,0xf974,0xf67f,
+	0xf910,0xff94,0x0765,0x093d,0x0628,0xfd7b,0xf72d,0xf466,
+	0xf77e,0xfe3f,0x067b,0x0c92,0x0a4b,0x00e8,0xf3b9,0xef35,
+	0xf3f8,0xfed5,0x0732,0x0a50,0x08a8,0x0307,0xfc4f,0xf4e7,
+	0xf362,0xf673,0xfe40,0x043f,0x0681,0x02ed,0xfcdb,0xfa62,
+	0xfafa,0xfe58,0xff74,0xffde,0xfd34,0xfb02,0xf888,0xf80a,
+	0xfb22,0x01d0,0x0802,0x08c4,0x04a9,0xfb77,0xf48e,0xf09f,
+	0xf39b,0xfaee,0x04e1,0x0c96,0x0c61,0x04e9,0xf7a0,0xef2f,
+	0xeee7,0xf8f1,0x0557,0x0cf5,0x0a84,0x013b,0xf8ed,0xf4e8,
+	0xf7b7,0xfb89,0x0093,0x0403,0x0645,0x033e,0xfc21,0xf611,
+	0xf6ef,0xfe74,0x04c2,0x0764,0x040f,0x002b,0xfb1a,0xf6ea,
+	0xf50f,0xf8ab,0x0116,0x0988,0x0d7a,0x06a0,0xfa6b,0xeff9,
+	0xf0e6,0xf8fe,0x025e,0x0604,0x04cd,0x01b4,0xfd2b,0xf970,
+	0xf590,0xf6ba,0xfb96,0x02d5,0x048f,0x009a,0xfa6e,0xf77d,
+	0xfa50,0xfeb6,0x0319,0x030d,0x0278,0xff74,0xfcc8,0xf98b,
+	0xf8e7,0xfcca,0x0321,0x08c5,0x0796,0x0300,0xfc49,0xf9f8,
+	0xfa4a,0xfda3,0x0105,0x03af,0x05a7,0x0476,0x0179,0xfc1b,
+	0xfa92,0xfb7a,0xffc2,0x0249,0x0252,0xffc8,0xfd4c,0xfc86,
+	0xfc02,0xfd67,0xfdb3,0xff96,0xff58,0xfe6c,0xfb14,0xf874,
+	0xf857,0xfa54,0xfe47,0xff7d,0xff5b,0xfc13,0xfa60,0xf829,
+	0xf819,0xf8e1,0xfb4e,0xfe4d,0xfefb,0xfe51,0xfaad,0xf8db,
+	0xf7e1,0xfa2c,0xfc1b,0xfde0,0xfe79,0xfdea,0xfd48,0xfb35,
+	0xfb15,0xfb19,0xfd9c,0xfec6,0x0017,0xfed3,0xfd5b,0xfc9a,
+	0xfcb0,0xfe5a,0xff4b,0x0116,0x009e,0x00a0,0xfee0,0xfe02,
+	0xfd73,0xfe75,0x0089,0x0199,0x028d,0x00e1,0x0059,0xfe6c,
+	0xfe5f,0xfe69,0xffbe,0x0105,0x0167,0x018a,0xff92,0xfe9e,
+	0xfd13,0xfe37,0xfec0,0x000c,0x0013,0xffa0,0xfedb,0xfd41,
+	0xfce4,0xfc37,0xfd6b,0xfdab,0xfedd,0xfe1b,0xfdb9,0xfc9a,
+	0xfbd3,0xfc0c,0xfc4c,0xfdd9,0xfd35
+};
+
+static const UINT16 M2[] = {
+	0x000c,0x00cb,0x0156,0x027e,0x02c7,0x03b8,0x042b,0x0558,
+	0x05cb,0x0694,0x06d2,0x073d,0x07b2,0x07c0,0x083e,0x0826,
+	0x08b6,0x08a0,0x0913,0x08b9,0x08d0,0x0851,0x0801,0x07ba,
+	0x074a,0x0763,0x069c,0x06a3,0x05d6,0x05c3,0x04fa,0x0454,
+	0x038a,0x02eb,0x0287,0x01e3,0x0193,0x0094,0x006b,0xff60,
+	0xfedd,0xfdd2,0xfd38,0xfc8e,0xfbf2,0xfb9a,0xfb10,0xfae3,
+	0xf9fe,0xf9ee,0xf8ef,0xf8a0,0xf80a,0xf7d0,0xf77d,0xf74b,
+	0xf77c,0xf72f,0xf797,0xf6ec,0xf742,0xf705,0xf73f,0xf729,
+	0xf782,0xf78d,0xf770,0xf80b,0xf81b,0xf8a4,0xf857,0xf915,
+	0xf944,0xf9fb,0xfa42,0xfac1,0xfb67,0xfb6b,0xfbff,0xfc0f,
+	0xfcea,0xfce3,0xfdae,0xfdeb,0xfe97,0xfeed,0xff60,0xffc2,
+	0xff74,0xffc8,0xff35,0xff5f,0xfede,0xff82,0xffa9,0x0064,
+	0x0113,0x01b9,0x02aa,0x02f6,0x03f0,0x0403,0x04f9,0x05b9,
+	0x071e,0x081d,0x08fc,0x09a5,0x0a27,0x0ad8,0x0af0,0x0b92,
+	0x0b9f,0x0c58,0x0c7b,0x0cf4,0x0ccb,0x0ca8,0x0c51,0x0be5,
+	0x0b99,0x0a89,0x0a53,0x0975,0x0947,0x080b,0x0739,0x05fd,
+	0x04c1,0x03d5,0x0278,0x0183,0xffff,0xff80,0xfe00,0xfd23,
+	0xfb88,0xfa5f,0xf943,0xf827,0xf746,0xf5eb,0xf4fc,0xf3aa,
+	0xf35e,0xf251,0xf1c2,0xf0a7,0xf057,0xefd6,0xef59,0xef26,
+	0xee75,0xee71,0xee2f,0xeea1,0xee1d,0xee32,0xee09,0xee5b,
+	0xeec7,0xef13,0xefa2,0xeff4,0xf134,0xf14e,0xf25e,0xf2a0,
+	0xf37f,0xf420,0xf53f,0xf642,0xf700,0xf854,0xf914,0xfa51,
+	0xfac2,0xfbb6,0xfc65,0xfd9c,0xfe83,0xffa8
+};
+
+static const UINT16 N2[] = {
+	0xffe3,0x005c,0x018c,0x026e,0x03d6,0x04dd,0x05a4,0x06ba,
+	0x0744,0x0885,0x08d6,0x09b6,0x09c6,0x0a54,0x0ad2,0x0b88,
+	0x0bde,0x0bd9,0x0c12,0x0bef,0x0c31,0x0bd5,0x0bcf,0x0b3f,
+	0x0b5a,0x0b12,0x0ac1,0x0a66,0x0985,0x092a,0x0841,0x07d0,
+	0x06b7,0x065b,0x058f,0x051d,0x0450,0x0343,0x0270,0x0162,
+	0x00e5,0xffcb,0xff64,0xfe83,0xfe38,0xfd34,0xfc28,0xfb36,
+	0xfa85,0xfa47,0xf998,0xf95a,0xf874,0xf857,0xf7b9,0xf794,
+	0xf6d6,0xf690,0xf67d,0xf642,0xf69f,0xf635,0xf6a4,0xf63d,
+	0xf67f,0xf661,0xf6c6,0xf6b6,0xf6ff,0xf77b,0xf7b8,0xf838,
+	0xf843,0xf8f4,0xf92b,0xfa14,0xfa40,0xfb0b,0xfb86,0xfc2a,
+	0xfcd6,0xfcf4,0xfde8,0xfe30,0xff35,0xff7c,0x004e,0x00a0,
+	0x012a,0x017c,0x0190,0x01b8,0x00ec,0x0096,0xffbd,0xffe6,
+	0x001d,0x0127,0x0259,0x039c,0x04b8,0x0587,0x0657,0x06d1,
+	0x084f,0x0958,0x0b1e,0x0bff,0x0d18,0x0d9d,0x0dff,0x0e85,
+	0x0ec8,0x0fc8,0x102f,0x1128,0x10ed,0x10f5,0x1030,0x0fdf,
+	0x0f7b,0x0f74,0x0f64,0x0eba,0x0e29,0x0ca1,0x0bb1,0x0a2a,
+	0x0958,0x0801,0x074b,0x0615,0x04b0,0x036f,0x018d,0x0025,
+	0xfdfe,0xfcfa,0xfb6f,0xfa7b,0xf8d8,0xf7a6,0xf64b,0xf4a0,
+	0xf389,0xf20e,0xf156,0xf04e,0xefc7,0xee8b,0xedf7,0xed02,
+	0xec97,0xec13,0xeb71,0xeb7f,0xeb2a,0xebd1,0xeb7f,0xebb9,
+	0xeb5c,0xebb8,0xec4a,0xecfb,0xedc2,0xee4e,0xef36,0xefb7,
+	0xf0f2,0xf174,0xf277,0xf35d,0xf4bd,0xf614,0xf748,0xf862,
+	0xf916,0xfa97,0xfb9b,0xfd43,0xfe14,0xffc7
+};
+
+static const UINT16 V2[] = {
+	0xfffb,0x000a,0xfeb8,0xfdfb,0xfc9c,0xfd84,0xfd78,0xfc96,
+	0xfc96,0xfbbe,0xfb5a,0xfa66,0xfa3c,0xf9f0,0xfb25,0xfafe,
+	0xfc5a,0xfcba,0xfc85,0xfc0e,0xfb1c,0xfb3f,0xfa69,0xfad3,
+	0xfa10,0xfaf4,0xfb7a,0xfc64,0xfc4f,0xfbae,0xfbfb,0xfb89,
+	0xfbfb,0xfb95,0xfc47,0xfc20,0xfd62,0xfdcb,0xfe2c,0xfdc0,
+	0xfd28,0xfd64,0xfd13,0xfded,0xfdc4,0xfeec,0xff16,0x0002,
+	0x0002,0xffbc,0xff64,0xfed0,0xff74,0xff15,0xffbb,0xff21,
+	0xfff7,0x002c,0x008e,0x0021,0xff94,0xffb0,0xff9c,0x0064,
+	0xffd3,0x0012,0xff8a,0x0017,0xfff2,0xff98,0xff18,0xfe7d,
+	0xfef5,0xfebe,0xff45,0xfe5d,0xfe95,0xfe20,0xfe62,0xfdcf,
+	0xfd1a,0xfcb6,0xfca3,0xfd51,0xfd15,0xfe1d,0xfd76,0xfde9,
+	0xfcb1,0xfc8d,0xfc83,0xfc6a,0xfca9,0xfc8c,0xfdde,0xfede,
+	0x0044,0xfe84,0xfcd3,0xfa0a,0xf97e,0xfa8d,0xfbe6,0xfd88,
+	0xfdb9,0xfedd,0xff47,0x00da,0x0050,0xfef7,0xfc93,0xfbe4,
+	0xfd5b,0xff23,0x0046,0xfeb3,0xfe41,0xfdfc,0xff7e,0xffa3,
+	0xff54,0xff98,0x0045,0x011f,0x009e,0xffe1,0xfd9d,0xfd54,
+	0xfdf2,0x0064,0x0077,0xffb1,0xffca,0x003b,0x0115,0xff68,
+	0xfdc0,0xfc53,0xfdfa,0xff22,0x00d7,0x0056,0xfff8,0x0021,
+	0xff63,0xfe95,0xfbec,0xfb55,0xfc67,0xff9d,0x00f9,0xffb3,
+	0xfcf5,0xfb9a,0xfd51,0xfe97,0xfeb8,0xfccb,0xfd72,0xff12,
+	0x013a,0x0006,0xfda0,0xfc18,0xfc0c,0xfda5,0xfd0a,0xfc20,
+	0xfb01,0xfcfd,0xfe01,0xfdb6,0xfcc8,0xfd02,0xff33,0x0093,
+	0x00b2,0xfe23,0xfcc2,0xfc80,0xfe52,0xff18,0xff70,0xfeb1,
+	0xfefc,0x0035,0xffe3,0xfea6,0xfbb4,0xfc6d,0xfdf0,0x0031,
+	0x0038,0xfeb0,0xfe16,0xff1c,0x00fd,0xff96,0xfe69,0xfdd2,
+	0x0052,0x01b4,0x0119,0xfeb5,0xfd42,0xfebb,0x0048,0x00d8,
+	0xfe11,0xfc37,0xfb70,0xfddb,0xfee6,0xfebd,0xfe42,0xfed5,
+	0x00c4,0x002b,0xfe8d,0xfb6f,0xfb77,0xfc51,0xfdf0,0xfd76,
+	0xfc9f,0xfccf,0xfd43,0xfdf0,0xfc30,0xfb63,0xfb00,0xfd5f,
+	0xff03,0x003c,0x0028,0x0022,0x0100,0x00c7,0x0073,0xfe87,
+	0xfeaf,0xff1a,0x00c5,0x0113,0x00c2,0x0059,0x0030,0x00aa,
+	0xffe9,0xfff2,0xff68,0x00ac,0x015b,0x0201,0x0127,0x001f,
+	0xff7d,0xfec1,0xfead,0xfd94,0xfde8,0xfd79,0xfe68,0xfe1d,
+	0xfdac,0xfca7,0xfbf3,0xfc4c,0xfc07,0xfc82,0xfc11,0xfccf,
+	0xfc6f,0xfcdb,0xfc08,0xfb3e,0xfa8c,0xf9fe,0xfa9a,0xfa73,
+	0xfaf6,0xfab9,0xfb9b,0xfb60,0xfbb7,0xfb69,0xfb4f,0xfbc4,
+	0xfc0a,0xfd1f,0xfcd9,0xfd9b,0xfd0a,0xfda2,0xfd2b,0xfd61,
+	0xfd15,0xfd23,0xfdcc,0xfdd2,0xfea3,0xfe39,0xfefd,0xfed9,
+	0xff83,0xff53,0xff9e,0x0006,0x000c,0x00a9,0x000e,0x008b,
+	0xff88,0xffcc,0xff49,0xff5e,0xff40,0xff4e,0xffa9,0xff99,
+	0x0077,0xfff5,0x0040,0xff27,0xff70,0xff31,0xff2a,0xfef9,
+	0xfeb2,0xfef7,0xfe65,0xfeb6,0xfdac,0xfda9,0xfccb,0xfd3e,
+	0xfd0d,0xfd20,0xfd42,0xfd55,0xfe2d,0xfd70,0xfcca,0xfba0,
+	0xfd3d,0xfe89,0xff9b,0xfe0a,0xfc07,0xfc2d,0xfc73,0xfc54,
+	0xfa12,0xfa12,0xfbff,0xffc3,0x0038,0xfdcb,0xfbdc,0xfc20,
+	0xfe3e,0xfe97,0xfdf5,0xfb99,0xfc54,0xfe74,0x008a,0xff7e,
+	0xfe2f,0xfd81,0xfe0a,0xff3f,0xfe52,0xfe22,0xfd4c,0xff27,
+	0x0026,0x0168,0x00d1,0x0038,0x0004,0xfefd,0xfeb0,0xfdf2,
+	0xff9a,0x0068,0x010d,0x003c,0xffa3,0xff74,0xffbf,0x00db,
+	0x0002,0xff10,0xfd70,0xfe2e,0xff0f,0x00fb,0x0111,0xffbb,
+	0xfdfb,0xfd15,0xfe55,0xfe64,0xfe82,0xfd09,0xfca5,0xfce8,
+	0xfdf1,0xfe64,0xfe15,0xfeb5,0xfe63,0xfe85,0xfd70,0xfd11,
+	0xfc85,0xfcfd,0xfd97,0xfe8e,0xff14,0xfdf8,0xfc65,0xfabb,
+	0xfb7c,0xfc61,0xfefc,0x004a,0x0082,0xff2d,0xfe0f,0xfd9e,
+	0xfce3,0xfd09,0xfcf5,0xff2b,0x006a,0x0082,0xfec0,0xfd54,
+	0xfd0b,0xfc65,0xfc45,0xfbfa,0xfdd4,0x0024,0x035f,0x0210,
+	0xff07,0xfcd3,0xfb43,0xface,0xfa8a,0xfb43,0xfc2f,0xffa0,
+	0x01ae,0x0159,0xfd24,0xf9d7,0xf8df,0xfa92,0xfe2b,0x0057,
+	0x0125,0x006d,0x0059,0xfe78,0xfd34,0xfbdb,0xfc78,0xfdd9,
+	0xfefe,0xffc7,0xff2e,0xff45,0xfdc9,0xfd0c,0xfb60,0xfb20,
+	0xfb04,0xfc3b,0xfdc2,0xfe40,0xfee9,0xfe3a,0xfe86,0xfde5,
+	0xfe4b,0xfe1a,0xff0e,0x0074,0x0182,0x0212,0x016e,0x0111,
+	0xff90,0xffa1,0xfed5,0xff4b,0xff94,0x009d,0x0151,0x0144,
+	0x0154,0x0071,0x008d,0xffa7,0x0033,0xff9e,0x0049,0x0048,
+	0x005d,0xffea,0xfe8e,0xfe13,0xfce8,0xfcd5,0xfc07,0xfcb2,
+	0xfca4,0xfd4e,0xfd42,0xfcb3,0xfc3b,0xfb48,0xfbae,0xfb26,
+	0xfb82,0xfb62,0xfc0c,0xfbb6,0xfbee,0xfba4,0xfaeb,0xfad1,
+	0xfa41,0xfae6,0xfabe,0xfbd0,0xfba7,0xfc32,0xfbf4,0xfc05,
+	0xfc31,0xfbdf,0xfc71,0xfc43,0xfd49,0xfd1c,0xfddd,0xfdca,
+	0xfe0c,0xfe1a,0xfe23,0xfea3,0xfea9,0xff6d,0xff3c,0xffef,
+	0xff45,0xffa6,0xff7f,0xff64,0xff85,0xffb5,0x0095,0x0059,
+	0x00e2,0x0028,0x0073,0xffe4,0x002e,0x0004,0x0014,0x0038,
+	0x0019,0x0093,0xff7f,0xff5a,0xfe90,0xfed0,0xfe6e,0xfeb2,
+	0xfea0,0xfe68,0xfea8,0xfe34,0xfe7c,0xfd61,0xfd89,0xfcde,
+	0xfd65,0xfd45,0xfd4e,0xfd7a,0xfcbb,0xfca5,0xfc06,0xfc1f,
+	0xfba8,0xfd1b,0xfdbe,0xfe0d,0xfd2b,0xfcfe,0xfd29,0xfc94,
+	0xfc1b,0xfa92,0xfb7c,0xfc49,0xfdd4,0xfe0f,0xfe4d,0xff1f,
+	0xffef,0x0016,0xfdef,0xfc2c,0xfb09,0xfd7c,0xff5d,0x00b5,
+	0xfed4,0xfd34,0xfd38,0xfeb2,0x00e1,0x0080,0x003d,0xff02,
+	0xffa6,0xfff6,0xffe3,0xff6e,0xff52,0x0021,0x00ab,0x010d,
+	0xff01,0xfe41,0xfde3,0xfeb0,0xfeaa,0xff4f,0xff82,0xffeb,
+	0x012a,0x014a,0x00de,0xfdd3,0xfcb5,0xfc76,0xfe96,0xffc5,
+	0xff66,0xfeb0,0xfe9c,0xff56,0xfe21,0xfd35,0xfb60,0xfc3e,
+	0xfdb8,0xffee,0xffea,0xfe7c,0xfda4,0xfcca,0xfc99,0xfad5,
+	0xfb08,0xfbc6,0xfe59,0x0002,0x0094,0xff2b,0xfdd8,0xfdaf,
+	0xfcea,0xfce2,0xfb8d,0xfbfd,0xfd6d,0xffe1,0x0051,0xfee7,
+	0xfd0f,0xfc6a,0xfdf8,0xfe40,0xfea6,0xfe80,0x0036,0x00aa,
+	0x00f9,0xff86,0xfe56,0xfe92,0xfe17,0xfe20,0xfcec,0xfe25,
+	0xffdc,0x015a,0x002e,0xfee7,0xfe59,0xfe0a,0xfec4,0xfeeb,
+	0x0016,0xffc7,0xffbb,0xfe38,0xfe2c,0xfe89,0xfed7,0xfe80,
+	0xfc88,0xfcd0,0xfe42,0x0106,0x0074,0xfefc,0xfca4,0xfc85,
+	0xfceb,0xfcc6,0xfc42,0xfba8,0xfd53,0xfe51,0xfec7,0xfc8b,
+	0xfb4f,0xfafd,0xfc17,0xfd3c,0xfd29,0xfdd4,0xfec3,0x00cf,
+	0x00c9,0x0070,0xfeb2,0xfef6,0xffde,0x00a4,0x00b0,0x0018,
+	0x00c9,0x00b2,0x015d,0xffb9,0xfeea,0xfe6b,0xffae,0x00cf,
+	0x0102,0x011f,0x008b,0x016e,0x00e1,0x00b7,0xfee6,0xfe71,
+	0xfe60,0xff29,0xff15,0xfdf4,0xfd75,0xfc9e,0xfd3c,0xfc6f,
+	0xfc12,0xfb74,0xfc13,0xfc8f,0xfcf9,0xfcbf,0xfbb5,0xfbd2,
+	0xfb27,0xfbad,0xfa91,0xfa9b,0xfa6c,0xfaf3,0xfb25,0xfac0,
+	0xfabf,0xfa9a,0xfbb2,0xfb95,0xfc4a,0xfbd7,0xfc87,0xfcc7,
+	0xfd07,0xfcfa,0xfc54,0xfcf6,0xfcc0,0xfda2,0xfd5d,0xfe01,
+	0xfdb1,0xfe29,0xfeaf,0xfe8f,0xfea5,0xfe54,0xff30,0xfef6,
+	0x002b,0x000f,0x00bb,0x008b,0x00c2,0x0075,0xffbd,0xffd5,
+	0xff58,0x0012,0xffc6,0x0086,0xffb2,0x000d,0xffb7,0xff89,
+	0xff8f,0xff5e,0x001e,0xffe6,0x0089,0xff82,0xff93,0xfeb4,
+	0xfe80,0xfe0f,0xfd8f,0xfda2,0xfd37,0xfe0e,0xfdde,0xfe11,
+	0xfd24,0xfd6b,0xfc31,0xfc23,0xfc38,0xfcee,0xfe72,0xfe89,
+	0xfe83,0xfc7d,0xfc25,0xfb97,0xfc43,0xfb20,0xfab2,0xfbae,
+	0xfda1,0xff4e,0xfd90,0xfc19,0xfb0d,0xfd64,0xffa8,0x00da,
+	0xff66,0xfd91,0xfdf4,0xfed5,0xff3d,0xfc0a,0xfac8,0xfb8e,
+	0xff64,0x00f7,0x0019,0xfe6b,0xfea1,0x0026,0xff84,0xfe3c,
+	0xfc21,0xfe37,0x008d,0x02c8,0x013c,0xff6a,0xfef7,0xff14,
+	0xff7a,0xfd8d,0xfcba,0xfd5f,0x0102,0x01fb,0x0056,0xfd8b,
+	0xfcd0,0xfeda,0xffd3,0x0001,0xfe5a,0xff45,0x0050,0x0187,
+	0xff7c,0xfd7f,0xfc6c,0xfcc7,0xfdb4,0xfcae,0xfc90,0xfc96,
+	0xfe78,0xfed4,0xfe3a,0xfc75,0xfbf4,0xfd36,0xfe50,0xff70,
+	0xfe4a,0xfe26,0xfdc0,0xfe6c,0xfe1d,0xfe0a,0xfdda,0xfe8d,
+	0xff79,0xfe89,0xfd07,0xfa9d,0xfb07,0xfbb3,0xfd03,0xfd53,
+	0xfd9d,0xfecb,0x0093,0x021d,0x00e0,0xff02,0xfc46,0xfd0b,
+	0xfe33,0xff29,0xfe84,0xfdcf,0xfe75,0xfeec,0xff5d,0xfd36,
+	0xfbf4,0xfb88,0xff14,0x023f,0x036a,0x018d,0xfeac,0xfe31,
+	0xfe95,0xff70,0xfd83,0xfce4,0xfd41,0xff95,0x006d,0xfe17,
+	0xfbb6,0xfb7b,0xfe79,0xffc9,0xfffe,0xfe1d,0xfe88,0xff4b,
+	0x0036,0xfe58,0xfb80,0xfac7,0xfb5f,0xfd3f,0xfc7d,0xfbe5,
+	0xfaf8,0xfcad,0xfdcd,0xfe3c,0xfdad,0xfd80,0xff8f,0x011a,
+	0x0230,0x00be,0x0079,0x003a,0x00f6,0x007d,0xff7a,0xfee3,
+	0xff0c,0x00b0,0x00b1,0x00a1,0xff66,0xfffe,0x006e,0x0118,
+	0x0095,0xfff4,0x006f,0x00b1,0x0156,0xffea,0xff1a,0xfdcd,0xfe0a,0xfda0,0xfd45,0xfcdd,0xfc77,0xfd38,0xfd1c,0xfd91,
+	0xfc31,0xfc54,0xfbd6,0xfc4c,0xfc23,0xfbd3,0xfb9f,0xfb90,
+	0xfbe3,0xfb11,0xfb45,0xfa5a,0xfaaf,0xfa8f,0xfb2c,0xfb62,
+	0xfb2e,0xfb80,0xfb61,0xfc32,0xfbd8,0xfc8f,0xfc3f,0xfcdb,
+	0xfce7,0xfd2a,0xfd7d,0xfd1c,0xfd6e,0xfd28,0xfdcf,0xfd68,
+	0xfe3b,0xfe5e,0xff1e,0xff36,0xff58,0xffaf,0xff54,0xffec,
+	0xff55,0xffc5,0xff41,0xfff2,0xffee,0x0023,0x0000,0xffcb,
+	0xffea,0xff33,0xff94,0xff23,0xffb4,0xff76,0xfffd,0xffb7,
+	0xff8f,0xff72,0xfee5,0xff30,0xfe8b,0xff29,0xfeb1,0xfef9,
+	0xfe3d,0xfe49,0xfdc1,0xfd5f,0xfd71,0xfd46,0xfde7,0xfd8f,
+	0xfe2d,0xfd18,0xfd52,0xfce5,0xfcce,0xfd43,0xfda9,0xfe5a,
+	0xfe1e,0xfe2b,0xfc56,0xfb87,0xfaf3,0xfc01,0xfc36,0xfcf9,
+	0xfda3,0xfdd4,0xfe63,0xfdef,0xfe8c,0xfd83,0xfd8c,0xfca6,
+	0xfe16,0xff50,0xff8e,0xff0f,0xfd8d,0xfd79,0xfd4f,0xfdb8,
+	0xfcf7,0xfe18,0xff58,0x0096,0x001a,0xff18,0xffaa,0x0005,
+	0x0033,0xfe33,0xfe0d,0xfe72,0x0131,0x0209,0x0060,0xfed6,
+	0xfe3d,0xffd9,0xff9c,0xfebf,0xfd5a,0xfe22,0xffc3,0x00de,
+	0xfffb,0xfed3,0xfef6,0xfea6,0xfe72,0xfcb0,0xfd37,0xfe33,
+	0x0005,0x0001,0xff66,0xfed7,0xfea9,0xfef0,0xfd9c,0xfcd3,
+	0xfbf2,0xfdf6,0xff55,0xff4b,0xfd0a,0xfb6b,0xfb4e,0xfc07,
+	0xfd9d,0xfd9d,0xfe5d,0xfe2b,0xff19,0xfea2,0xfd9f,0xfc4c,
+	0xfb95,0xfcba,0xfdaa,0xfef5,0xfeb5,0xff6b,0xff7f,0x0003,
+	0xfefa,0xfdaf,0xfcaa,0xfc47,0xfd23,0xfd1b,0xfe3e,0xfe1e,
+	0xfe59,0xfdad,0xfe72,0xff9c,0x0155,0x01cd,0x002e,0xfed0,
+	0xfde3,0xff95,0xff9e,0xff2f,0xfd71,0xfcdf,0xfd49,0xfd77,
+	0xfd20,0xfcc6,0xfe3c,0xff1e,0x00e9,0x003b,0x0004,0xffb8,
+	0x003d,0xfff4,0xfdec,0xfcea,0xfc17,0xfce4,0xfca4,0xfcd0,
+	0xfbe8,0xfc57,0xfcbd,0xfce9,0xfcce,0xfc21,0xfd06,0xfd79,
+	0xfeb2,0xfe53,0xfec7,0xfe8c,0xff66,0xffaf,0xff49,0xfef6,
+	0xfe6e,0xff99,0xffa0,0x005b,0xffbf,0x0033,0x0064,0x00b9,
+	0x00bd,0x003b,0x00b8,0x006d,0x015c,0x00ef,0x00f9,0x003e,
+	0x0041,0xffe2,0xff49,0xfef0,0xfe76,0xff05,0xfed7,0xff7d,
+	0xfe4b,0xfe2d,0xfd66,0xfd9f,0xfd43,0xfc7c,0xfc84,0xfc21,
+	0xfce5,0xfc1c,0xfc18,0xfb0f,0xfb0c,0xfad3,0xfb18,0xfb11,
+	0xfaaf,0xfb6a,0xfb45,0xfc04,0xfb21,0xfb4f,0xfadf,0xfb56,
+	0xfb91,0xfb6d,0xfbd1,0xfba3,0xfc7e,0xfc52,0xfcd9,0xfc35,
+	0xfcda,0xfcfb,0xfd90,0xfde7,0xfde8,0xfe60,0xfe40,0xff30,
+	0xfec0,0xff18,0xfe7a,0xff1b,0xff2a,0xff2c,0xff52,0xff30,
+	0xffab,0xff50,0x002c,0xffb2,0x0056,0x0011,0x006b,0x006b,
+	0x005a,0x0050,0xff93,0xffe8,0xff0c,0xffa3,0xff43,0xff60,
+	0xfefd,0xff20,0xfee4,0xfe7e,0xfec7,0xfe3d,0xfebf,0xfe4b,
+	0xfef0,0xfe69,0xfe99,0xfe39,0xfe39,0xfdd1,0xfd5f,0xfd4d,
+	0xfc24,0xfca0,0xfc5a,0xfcfa,0xfc87,0xfd15,0xfdb5,0xfdfb,
+	0xfdf7,0xfce9,0xfcfc,0xfcff,0xfe39,0xfd64,0xfcb5,0xfadd,
+	0xfa43,0xfb14,0xfc8a,0xfecc,0xff95,0x004e,0xff13,0xfeda,
+	0xfd51,0xfcda,0xfb9c,0xfbf8,0xfe17,0x0016,0x01cb,0x003d,
+	0xff5f,0xfe6f,0xfe2c,0xfd44,0xfd5c,0xfe46,0x0010,0x01fa,
+	0x01b8,0x009a,0xfd9e,0xfd3a,0xfdbe,0xff9c,0xffe3,0xff8f,
+	0x000c,0x0123,0x01d3,0xffa4,0xfe31,0xfd63,0xff0e,0xff44,
+	0xff1c,0xfd52,0xfd4b,0xfe60,0xff43,0xffd8,0xfe2f,0xfe54,
+	0xfe44,0xff36,0xff15,0xfe3f,0xfd8e,0xfde8,0xfeca,0xfdd8,
+	0xfcbf,0xfa76,0xfa92,0xfb74,0xfdc2,0xfe83,0xff1b,0xffac,
+	0x009f,0x0117,0xfe80,0xfbdd,0xf9aa,0xfbcc,0xfde4,0xff3a,
+	0xfda1,0xfbfb,0xfcff,0xfe57,0xfedb,0xfca7,0xfc4e,0xfd26,
+	0xff98,0x000c,0xfffa,0x0051,0x00c9,0x0159,0xffd8,0xfe65,
+	0xfbcf,0xfc50,0xfd2c,0xff7e,0x0059,0xffe8,0xffb2,0xfea3,
+	0xfea9,0xfdbb,0xfdfd,0xfe2a,0x0049,0x00ea,0x0216,0x01a3,
+	0x0061,0xfeaf,0xfc63,0xfca6,0xfca3,0xfd74,0xfd7f,0xfe7c,
+	0xfe6b,0xfe60,0xfdc8,0xfce3,0xfcd3,0xfce4,0xfebf,0xfeee,
+	0xff6b,0xfe96,0xfe51,0xfd21,0xfc0d,0xfb1a,0xfa81,0xfb83,
+	0xfc1f,0xfe10,0xfe63,0xff8c,0xff6f,0xfff3,0xfff4,0xffca,
+	0x0060,0x00aa,0x01c9,0x0170,0x01f3,0x009c,0x000c,0xff36,
+	0xfece,0xfebd,0xfeb7,0xff91,0xffe7,0x0110,0x0080,0x00c5,
+	0xffe0,0xffee
+};
+
+static const UINT16 Z2[] = {
+	0xffd1,0xff65,0xff75,0xfef0,0xfed1,0xfed9,0xfeb0,0xfec9,
+	0xfdba,0xfdf0,0xfd95,0xfdeb,0xfe43,0xfe93,0xfbca,0xfbed,
+	0xfbf8,0xfc81,0xff56,0xfd3e,0xfa47,0xf9e1,0xfe55,0x00ff,
+	0xfd98,0xfb32,0xfb01,0xfd76,0xfd02,0xfd97,0xfd97,0xfd7b,
+	0xfb6f,0xfb6b,0xff29,0x000d,0xfc5e,0xfa2f,0xff1c,0x025a,
+	0x006f,0xf9d5,0xf89c,0xff5c,0x06a1,0x0286,0xf84e,0xf6d5,
+	0x012a,0x0953,0x026c,0xf954,0xf858,0x00fc,0x07c5,0x0257,
+	0xfa55,0xfae9,0x00f1,0x05fd,0x0282,0xfb85,0xfa84,0xfef8,
+	0x048f,0x019e,0xfde1,0xfc53,0xfec4,0x01f2,0x00e1,0xfcc7,
+	0xfb5f,0x0081,0x02a2,0x0046,0xfb93,0xfb04,0xfea6,0x0128,
+	0xffe0,0xfbaf,0xf9aa,0xfb83,0x00fc,0x01c2,0xfefd,0xfc9b,
+	0xfbcf,0xfbfa,0xfcff,0xff04,0xfe54,0xfd6c,0xfc08,0xfd00,
+	0xfe39,0xfee4,0xfeb7,0xfb1d,0xfab0,0xfd68,0x0269,0x0094,
+	0xfc29,0xfa13,0xfbc4,0x0013,0x013d,0xfeb0,0xfb67,0xfcae,
+	0xff96,0x02b1,0x0086,0xfafc,0xf7fe,0xfe49,0x05e0,0x0403,
+	0xfbd7,0xf755,0xfb92,0x023d,0x050d,0xff7d,0xfa67,0xfb57,
+	0x01dd,0x0567,0xff52,0xfab6,0xfa18,0x0115,0x038e,0xfeed,
+	0xf9e0,0xfc4b,0x024c,0x0228,0xfd98,0xfaa8,0xfd76,0x0117,
+	0x018e,0xfca4,0xfa1c,0xfb91,0x000b,0x00b9,0xfd3f,0xfa1c,
+	0xfa5e,0xfdeb,0xfecd,0xfd99,0xfaeb,0xfc47,0xfea3,0x001f,
+	0xfe82,0xfbdf,0xfc7f,0xff06,0x017a,0x0039,0xfecd,0xfdfe,
+	0xfffd,0x0179,0x0114,0xffa1,0xfef3,0x00e7,0x01db,0x0210,
+	0x0013,0xffb5,0x001f,0x01a7,0x0193,0x0065,0xffe9,0xffdc,
+	0x0102,0x001e,0xff28,0xfd9f,0xfe4e,0xfedb,0xff27,0xfe03,
+	0xfcc6,0xfd14,0xfd38,0xfdcc,0xfc6e,0xfc0b,0xfba8,0xfc94,
+	0xfc7d,0xfbea,0xfb75,0xfafe,0xfb87,0xfb50,0xfb67,0xfa60,
+	0xfaba,0xfade,0xfb97,0xfb6f,0xfafa,0xfb20,0xfb3c,0xfc0e,
+	0xfbc7,0xfc3b,0xfb75,0xfc56,0xfc9e,0xfced,0xfcc9,0xfcab,
+	0xfd58,0xfd47,0xfe28,0xfda2,0xfe30,0xfe0f,0xfebe,0xfeae,
+	0xfeeb,0xff05,0xff40,0x0014,0xff97,0x0032,0xffbe,0x0021,
+	0xffd4,0x003d,0xfffd,0xfff2,0x0031,0x000b,0x0075,0xffcf,
+	0x002d,0xffc1,0x0017,0xffdc,0x001f,0xffd3,0xffaf,0xffa1,
+	0xfef6,0xff2a,0xfe56,0xfecd,0xfe48,0xfe9f,0xfe3e,0xfe4a,
+	0xfe39,0xfdf3,0xfe06,0xfdcc,0xff8c,0xff0a,0xfc17,0xfa1a,
+	0xfdea,0x0013,0xfd8f,0xf826,0xf845,0xfe40,0x01ab,0x00f1,
+	0xfb7b,0xf8ae,0xfae1,0xff69,0xff79,0xfb1c,0xfb1b,0xfd97,
+	0xfe7e,0xfc48,0xfd47,0xfd87,0xfd08,0xfd1f,0xff15,0x00b9,
+	0xfd7b,0xfafd,0xfc46,0x00c5,0x02a5,0x011d,0xfa94,0xf9ba,
+	0xff73,0x02e2,0x0284,0xfd1f,0xf93e,0xfc5d,0x04fe,0x06ab,
+	0xfea1,0xf65d,0xfaa0,0x0521,0x0949,0x0028,0xf821,0xfb28,
+	0x033c,0x065d,0xfe27,0xf7ee,0xfb35,0x028e,0x0626,0xff04,
+	0xf9a2,0xf965,0xffb4,0x0517,0x032c,0xfab0,0xf6f0,0xfa8a,
+	0x027e,0x046f,0xff99,0xf993,0xf88d,0xfe6d,0x0210,0x0003,
+	0xfa58,0xf899,0xfbf6,0x0201,0x0043,0xfa9d,0xfaeb,0xfd67,
+	0x001b,0x005c,0xfe0f,0xf9be,0xfb4d,0xff80,0x0177,0xff00,
+	0xfb5e,0xfd98,0x0060,0x0098,0xfb85,0xf9e5,0xfec2,0x025f,
+	0x0008,0xfd3a,0xfcd3,0xfca7,0xfea0,0xff7e,0x0016,0xfebb,
+	0xff88,0x00b0,0xfe73,0xfdcb,0x0010,0x0187,0xfdc3,0xfd04,
+	0xff37,0x0084,0xff26,0xfead,0xfccd,0xfde5,0x0074,0x012b,
+	0x0186,0xfec3,0xfb9c,0xfab7,0xff01,0x018d,0x0015,0xfc14,
+	0xfadd,0xfdb9,0x0019,0xffc1,0xfbff,0xfafb,0xfc6c,0xff4c,
+	0xfec5,0xfc23,0xfaa3,0xfbea,0xfed6,0xfee1,0xfdca,0xfbfd,
+	0xfd8e,0xffb7,0x00ca,0xff61,0xfdfe,0xfed6,0x0066,0x01d8,
+	0x0086,0xffb7,0xff25,0x00fb,0x0186,0x00cb,0xff75,0xff50,
+	0x00a6,0x0122,0x010a,0xff6a,0xff67,0xff8a,0x00a2,0x0006,
+	0xff14,0xfebd,0xff13,0xffc6,0xfec3,0xfe30,0xfcc6,0xfd6e,
+	0xfd89,0xfdbd,0xfd10,0xfc22,0xfc42,0xfc58,0xfc94,0xfb7b,
+	0xfb88,0xfb0f,0xfc00,0xfbe3,0xfbcc,0xfb3d,0xfacd,0xfb21,
+	0xfaed,0xfb50,0xfb22,0xfbb3,0xfb89,0xfc0b,0xfbaf,0xfb78,
+	0xfb4b,0xfb8e,0xfc98,0xfccb,0xfd96,0xfd19,0xfd90,0xfd27,
+	0xfd9c,0xfd60,0xfd70,0xfde1,0xfe2e,0xff37,0xfea8,0xfebe,
+	0xfe3a,0xff15,0xff3c,0xffbe,0xffb5,0xffb8,0x0040,0x0018,
+	0x008b,0xff97,0xffba,0xff60,0x003a,0x0011,0x0006,0xff9c,
+	0xff32,0xff7a,0xff46,0xffb9,0xff31,0xffa5,0xff7a,0xffe5
+};
+
+static const UINT16 NG2[] = {
+	0xff96,0x013d,0x01ce,0x02e3,0x036d,0x04cf,0x0654,0x07c5,
+	0x08f4,0x0957,0x0a06,0x0a00,0x0a5c,0x0a4d,0x0ae3,0x0b27,
+	0x0bc5,0x0bb6,0x0b4f,0x0ac0,0x09cd,0x097f,0x085d,0x081b,
+	0x0750,0x06fe,0x0623,0x0504,0x03de,0x0276,0x01aa,0x007b,
+	0x0016,0xfea6,0xfdf2,0xfc99,0xfbc9,0xfaa1,0xf96a,0xf8b7,
+	0xf7c3,0xf7a1,0xf700,0xf6d2,0xf5de,0xf54c,0xf4c0,0xf488,
+	0xf40f,0xf407,0xf467,0xf477,0xf517,0xf4eb,0xf555,0xf4fd,
+	0xf584,0xf5e9,0xf6be,0xf78c,0xf850,0xf96a,0xf9a2,0xfaa3,
+	0xfaee,0xfbe0,0xfc64,0xfd85,0xfe83,0xff7b,0x006a,0x00eb,
+	0x0199,0x01da,0x02bc,0x02cc,0x03b3,0x0406,0x04ed,0x054c,
+	0x056a,0x05b1,0x058a,0x0600,0x05bb,0x063b,0x05c7,0x05e1,
+	0x0591,0x056e,0x051f,0x0480,0x0427,0x0382,0x0388,0x02fa,
+	0x02bc,0x01db,0x012f,0x0008,0xff8a,0xfe73,0xfd75,0xfc4b,
+	0xfa16,0xf7bb,0xf4b4,0xf364,0xf2ec,0xf4b6,0xf747,0xfa44,
+	0xfc83,0xfd9d,0xfdde,0xfd25,0xfd67,0xfe10,0x0060,0x02fa,
+	0x0619,0x085e,0x09c3,0x0a1a,0x0938,0x093e,0x09a0,0x0b58,
+	0x0cf2,0x0ebe,0x0f30,0x0f19,0x0e1a,0x0cc4,0x0b6c,0x0a64,
+	0x0a84,0x0a64,0x0aa3,0x0995,0x0806,0x053f,0x02d6,0x00a0,
+	0xfef5,0xfe02,0xfcd9,0xfc40,0xfa54,0xf8b7,0xf621,0xf422,
+	0xf1e3,0xf0c3,0xf041,0xefae,0xef1f,0xee0f,0xed3b,0xeb9e,
+	0xeab6,0xe9ac,0xe9c9,0xea28,0xeab9,0xeb67,0xeb6f,0xebcc,
+	0xeb9f,0xec10,0xec92,0xee21,0xef57,0xf149,0xf27c,0xf39f,
+	0xf4b5,0xf566,0xf70c,0xf85e,0xfa58,0xfbbd,0xfdba,0xff29,
+	0x00c1
+};
+
+static const UINT16 OO2[] = {
+	0x0c0c,0x1d38,0x2edb,0x3f92,0x4fa9,0x5d59,0x6874,0x6f35,
+	0x70dc,0x6d7a,0x6486,0x56c0,0x4480,0x2ff7,0x1a44,0x0581,
+	0xf1b1,0xdfeb,0xd084,0xc3ee,0xbaa9,0xb453,0xb14d,0xb098,
+	0xb333,0xb706,0xbc19,0xc0ad,0xc4ca,0xc78c,0xc959,0xcad5,
+	0xcbf5,0xce3c,0xd12f,0xd60d,0xdbbc,0xe354,0xec45,0xf6f8,
+	0x0346,0x10d7,0x1f25,0x2cff,0x3a25,0x44af,0x4d19,0x5184,
+	0x5237,0x4f21,0x48d6,0x3f77,0x3382,0x263c,0x174a,0x0834,
+	0xf922,0xebad,0xdf96,0xd5f0,0xcecd,0xca5c,0xc88a,0xc88d,
+	0xca67,0xccb2,0xcff3,0xd319,0xd6a1,0xd970,0xdc7c,0xdf1b,
+	0xe1d6,0xe48a,0xe748,0xeab3,0xee66,0xf3a3,0xf96d,0x00d6,
+	0x08eb,0x11de,0x1b26,0x23c9,0x2be5,0x3224,0x36ee,0x3913,
+	0x3999,0x3766,0x3365,0x2cc9,0x246a,0x1a85,0x0fdd,0x04f7,
+	0xf9fb,0xf05b,0xe77b,0xe0dc,0xdb89,0xd85d,0xd653,0xd613,
+	0xd739,0xd914,0xdbcf,0xde8d,0xe1fb,0xe4e8,0xe817,0xea7c,
+	0xed0f,0xef5d,0xf1c6,0xf47c,0xf78b,0xfb6d,0xff82,0x0499,
+	0x098b,0x0f23,0x1484,0x19c2,0x1e6b,0x22b2,0x25c1,0x271c,
+	0x2738,0x255c,0x2290,0x1d84,0x17b9,0x10b7,0x0966,0x01d0,
+	0xfa4f,0xf388,0xed55,0xe88f,0xe48f,0xe210,0xe066,0xe044,
+	0xe0d9,0xe286,0xe4a7,0xe727,0xe9b7,0xec40,0xef12,0xf13b,
+	0xf3e9,0xf5f2,0xf864,0xfa90,0xfd12,0xff75,0x022e,0x056e,
+	0x0865,0x0c42,0x0f9f,0x133f,0x15f5,0x187d,0x1a04,0x1ae8,
+	0x1a7f,0x190d,0x16a6,0x12fb,0x0f1b,0x0a04,0x050a,0xff6f,
+	0xfa99,0xf5d0,0xf1b2,0xee14,0xeb08,0xe929,0xe799,0xe789,
+	0xe77a,0xe7d6,0xe6e0,0xe4cc,0xe13f,0xdcc6,0xd8dc,0xd6f5,
+	0xd868,0xddbd,0xe7dd,0xf4d0,0x04df
+};
+
+static const UINT16 L2[] = {
+	0x0373,0x08c0,0x0de9,0x149c,0x1afe,0x21b2,0x26d5,0x2ab4,
+	0x2c7c,0x2ba8,0x298b,0x2563,0x2130,0x1aea,0x142d,0x0c1d,
+	0x0480,0xfc9f,0xf58e,0xefbf,0xeb25,0xe878,0xe651,0xe560,
+	0xe3ef,0xe3dc,0xe31c,0xe374,0xe33d,0xe31f,0xe279,0xe13c,
+	0xe02f,0xde23,0xdd22,0xdbf2,0xdd03,0xde53,0xe0f5,0xe411,
+	0xe82d,0xed6c,0xf377,0xfab8,0x0173,0x0893,0x0e91,0x146d,
+	0x187a,0x1ba8,0x1d18,0x1dd2,0x1dbc,0x1c19,0x1a10,0x1644,
+	0x12d4,0x0eeb,0x0bf1,0x0888,0x05d4,0x0361,0x018a,0x0026,
+	0xfe46,0xfceb,0xfacc,0xf9b8,0xf7e3,0xf648,0xf33a,0xf035,
+	0xed21,0xea15,0xe7b4,0xe4fd,0xe39d,0xe235,0xe297,0xe336,
+	0xe4be,0xe69e,0xea06,0xee7f,0xf320,0xf82d,0xfc28,0x00aa,
+	0x0444,0x0830,0x0a93,0x0caf,0x0e06,0x0f17,0x0fa1,0x0f12,
+	0x0e55,0x0d41,0x0d44,0x0c4e,0x0c24,0x0b1b,0x0ab7,0x0a55,
+	0x09fa,0x0977,0x0810,0x0720,0x0571,0x0421,0x015b,0xfec7,
+	0xfb40,0xf82e,0xf526,0xf25d,0xefd9,0xed19,0xeb9e,0xea3c,
+	0xea75,0xea27,0xeb4d,0xeca6,0xef28,0xf179,0xf3eb,0xf69c,
+	0xf870,0xfb38,0xfd1d,0xff68,0x005f,0x01d5,0x02ad,0x039e,
+	0x0438,0x04f0,0x05e5,0x0690,0x07c3,0x07f0,0x08e3,0x0941,
+	0x0a43,0x0aa6,0x0afd,0x0ab1,0x0a0a,0x0980,0x07c4,0x0629,
+	0x03b5,0x01bd,0xff1d,0xfd07,0xfa70,0xf82c,0xf62a,0xf476,
+	0xf3d9,0xf2b1,0xf28e,0xf20c,0xf2c4,0xf2bd,0xf3c1,0xf446,
+	0xf511,0xf644,0xf71d,0xf85f,0xf881,0xf992,0xf9f3,0xfb4d,
+	0xfbe5,0xfcfd,0xfd85,0xfe6f,0xffa1,0x0029,0x00de,0xffec,
+	0xff02,0xfcb2,0xfaee,0xf910,0xf8bf,0xf989,0xfc02,0xffc6,
+	0x03ed
+};
+
+static const UINT16 J2[] = {
+	0xffff,0x0002,0xfec1,0xff55,0xfeca,0xff79,0xffb7,0x0076,
+	0x0020,0xffb2,0xff86,0xffab,0xfeee,0xfbda,0xfabc,0xfadc,
+	0xfee9,0x022d,0x0370,0x0119,0xfcae,0xf9bb,0xf96a,0xfd17,
+	0x008f,0x02cf,0x002e,0xfcdf,0xf938,0xf835,0xf9f7,0xfd49,
+	0x027c,0x051a,0x0416,0xfc75,0xf50b,0xf1a1,0xf6b5,0xfe2e,
+	0x02b2,0x03db,0x0125,0xfd30,0xf8ba,0xf6ef,0xf56b,0xf6e7,
+	0xf8fd,0xfd04,0xffb0,0xff58,0xfc3e,0xfa35,0xfcaa,0x0004,
+	0x00fc,0xfdfb,0xfcd6,0xfc8f,0xfc2a,0xfb61,0xfb86,0xff16,
+	0x0258,0x05d6,0x04f4,0x0210,0xfd09,0xf984,0xf7f9,0xf9e7,
+	0xfeef,0x02de,0x04e9,0x0318,0x00a5,0xfdb4,0xfdfd,0xfe29,
+	0xff49,0xff27,0xfdf8,0xfd99,0xfd59,0xffaa,0x011c,0x02c4,
+	0x01c5,0xffd7,0xfcea,0xfb8f,0xfd2a,0xff03,0x0049,0xff55,
+	0xff4e,0xff3e,0x016f,0x00d1,0xfea6,0xfaee,0xf938,0xfb91,
+	0xff6f,0x0381,0x03ff,0x0229,0xfc1c,0xf82b,0xf7f1,0xfbce,
+	0xffbc,0x0122,0x008a,0xff6a,0xff01,0xfc8b,0xfb96,0xfb1e,
+	0xfdff,0xff22,0xff2f,0xfd5e,0xfc16,0xfd56,0xfdea,0xffb7,
+	0xff73,0xff45,0xfd49,0xfc08,0xfaa9,0xfad3,0xfc7f,0xfe9e,
+	0x0103,0x003b,0xfee3,0xfb95,0xfa2d,0xf9a2,0xfbc8,0xfe47,
+	0x0076,0x0206,0x0159,0x001c,0xfd9c,0xfd11,0xfcd8,0xfe9a,
+	0xffd1,0x00d2,0x00c4,0xffbd,0xff8c,0xfef3,0x0057,0x00a6,
+	0x01f7,0x0168,0x00a8,0xfee3,0xfe07,0xfea8,0xff83,0x01d4,
+	0x0262,0x0306,0x010f,0xffe4,0xfdde,0xfd4c,0xfda3,0xfece,
+	0x0095,0x00c5,0x012e,0xff24,0xfe1d,0xfcaf,0xfd47,0xfda3,
+	0xfe8a,0xfecd,0xfe45,0xfdc1,0xfc04,0xfc26,0xfbbd,0xfd2e,
+	0xfd7d,0xfe17,0xfd0c,0xfbae,0xfb1a,0xfa3a,0xfb3c,0xfb68,
+	0xfce0,0xfcbc,0xfcd6,0xfb94,0xfaf2,0xfa75,0xfa71,0xfb81,
+	0xfbee,0xfd0c,0xfc6d,0xfc7a,0xfb67,0xfba0,0xfb9f,0xfc78,
+	0xfd21,0xfd22,0xfd98,0xfcdc,0xfd2e,0xfc51,0xfd2a,0xfd5a,
+	0xfe4c,0xfe75,0xfe6f,0xfe4c,0xfdc0,0xfe64,0xfdee,0xfed9,
+	0xfe94,0xff9d,0xff84,0xffaf,0xff47,0xfefd,0xff74,0xff25,
+	0x001c,0xff9e,0x0035,0xffa4,0x0035,0x0007,0xfff9,0xffbb,
+	0xff96,0xffe7,0xff80,0x0090,0xfff9,0x0090,0x0015,0x0065,
+	0xffba,0xfe8e,0xfd83,0xfdf8,0x0114,0x0236,0x0277,0xff05,
+	0xfc06,0xfa9c,0xfca6,0xff36,0xff5d,0xfed7,0xff0f,0x0218,
+	0x01f1,0xff33,0xfa05,0xf877,0xfa66,0xfec3,0x0199,0x00d9,
+	0xff0c,0xfc9b,0xfd1e,0xfbf8,0xfadc,0xfa03,0xfbf4,0xff88,
+	0x015a,0xff36,0xfb07,0xfb3c,0xfd80,0x0033,0xfd43,0xf9b8,
+	0xf951,0xfd30,0x00e1,0x001b,0xfcad,0xfa58,0xfd6b,0x002a,
+	0x0109,0xfe3c,0xfc77,0xfb25,0xfbb2,0xfbfa,0xfce2,0xffba,
+	0x01f5,0x03df,0x017e,0xfee0,0xfc46,0xfc3e,0xfbcf,0xfb49,
+	0xfb32,0xfd15,0x0218,0x0525,0x05f9,0x02a5,0xffa9,0xfcfc,
+	0xfcad,0xfc13,0xfadf,0xfa7e,0xfbf7,0x0184,0x05d3,0x0735,
+	0x02c3,0xfe20,0xfbfd,0xfd32,0xfec2,0xfda9,0xfc3b,0xfae5,
+	0xfd81,0x00d7,0x0405,0x02b4,0x00ee,0x001e,0x0036,0xfdf4,
+	0xf89f,0xf6cc,0xf8a8,0xff0a,0x0390,0x05a7,0x0333,0xffa6,
+	0xfc3a,0xfb0f,0xfb4a,0xfbe3,0xfda5,0xfe22,0xff7d,0xfe2d,
+	0xfd0f,0xfcfe,0xfebf,0x0094,0x0082,0x000a,0xfcbe,0xfa27,
+	0xf807,0xf99c,0xfc59,0x0120,0x04c8,0x05f5,0x03cb,0xfd5f,
+	0xf6e2,0xf233,0xf453,0xf9af,0x0127,0x054f,0x05ac,0x0240,
+	0xfce2,0xf8f5,0xf6db,0xf916,0xfc8d,0x0138,0x0276,0x01c3,
+	0xfec4,0xfcd6,0xfd26,0xfee5,0x01ab,0x0222,0x01d4,0xff16,
+	0xfd28,0xfb78,0xfc51,0xff50,0x0366,0x0656,0x0575,0x02d1,
+	0xfde7,0xfb94,0xfaae,0xfd57,0x007f,0x039c,0x04cb,0x0353,
+	0x00c2,0xfd23,0xfc68,0xfc75,0xfef0,0x0024,0x00f7,0xffa0,
+	0xfe17,0xfd1d,0xfc52,0xfd49,0xfddd,0xffa3,0xff40,0xfe69,
+	0xfbd4,0xfa49,0xf9c6,0xfb3e,0xfdc4,0xfeca,0xff58,0xfd62,
+	0xfc48,0xfa03,0xf995,0xf9b5,0xfb6a,0xfd2e,0xfdcb,0xfda8,
+	0xfbba,0xfb0b,0xf9dc,0xfb02,0xfb63,0xfcab,0xfce6,0xfd09,
+	0xfcbf,0xfbe1,0xfbf2,0xfba5,0xfd30,0xfd69,0xfe4a,0xfd4e,
+	0xfcbe,0xfc19,0xfc20,0xfcf9,0xfd37,0xfea6,0xfe95,0xff57,
+	0xfe66,0xfe40,0xfd6f,0xfdc9,0xfe9f,0xff64,0x0068,0xffd7,
+	0xffe2,0xfe67,0xfe8f,0xfe18,0xff1a,0xffa5,0xffde,0x001c,
+	0xff85,0xffa4,0xfecf,0xff81,0xff12,0xfff3,0xff93,0x002d,
+	0xffd8,0xff67,0xff4a,0xfe4d,0xfe2a,0xfe86,0x0180,0x0244,
+	0x01d2,0xfe7b,0xfc3c,0xfc53,0xfc88,0xfd3d,0xfd15,0x0061,
+	0x0367,0x04be,0x010c,0xfbfa,0xf80e,0xf762,0xf99c,0xfc9b,
+	0x0156,0x03f5,0x059a,0x0270,0xfd2a,0xf72c,0xf588,0xf73a,
+	0xfacc,0xff09,0x0253,0x0577,0x0359,0xfe39,0xf793,0xf667,
+	0xf90a,0xfdbf,0xff20,0xfdfa,0xfdaf,0xff63,0x0260,0x00cf,
+	0xfded,0xfaf5,0xfadd,0xfb7a,0xfbb9,0xfb6f,0xfd4e,0x0279,
+	0x05c4,0x0429,0xfcba,0xf868,0xf879,0xfc23,0xfe48,0xfee8,
+	0x012f,0x037d,0x0442,0xff1b,0xfa47,0xf8dc,0xfd38,0x0190,
+	0x0257,0xfea6,0xfa8f,0xfc07,0xff9d,0x0361,0x02dd,0x016f,
+	0xfe68,0xfd4f,0xfc95,0xfcbb,0xfcce,0xfd88,0x0073,0x0328,
+	0x052a,0x022e,0xfe38,0xf9a4,0xf8ff,0xfad4,0xfee4,0x01f2,
+	0x0284,0x0180,0xfe47,0xfc97,0xfac7,0xfc55,0xfe92,0x005f,
+	0xffa4,0xfd7f,0xfcc5,0xfd53,0x006e,0x004e,0xfe83,0xfb07,
+	0xfb2c,0xfd81,0xffce,0x0080,0xfecc,0xff50,0xfee4,0xfe4e,
+	0xfb57,0xfa0b,0xfad1,0xfd98,0x0028,0x00d7,0x0138,0x0034,
+	0xffd0,0xfce4,0xfa59,0xf80b,0xfa12,0xfd7c,0x0139,0x0243,
+	0x00ae,0xff03,0xfcb6,0xfba1,0xf9c2,0xfa37,0xfb29,0xfe30,
+	0x0031,0x00ac,0xffee,0xfebe,0xff70,0xff2e,0xffb0,0xfe6a,
+	0xfe30,0xfdc3,0xfe19,0xfe74,0xff31,0x00f4,0x0217,0x0373,
+	0x0221,0x00e2,0xfe15,0xfd62,0xfd4f,0xfec2,0x0083,0x0165,
+	0x0265,0x0200,0x019a,0xff5c,0xfecb,0xfdf5,0xfede,0xff70,
+	0xffd7,0xfff0,0xff03,0xfef8,0xfe29,0xfeb2,0xfe0a,0xfe7c,
+	0xfdf6,0xfdc6,0xfcca,0xfbef,0xfc2b,0xfc4f,0xfdc5,0xfdc3,
+	0xfe41,0xfc89,0xfbe2,0xfaca,0xfa94,0xfaa0,0xfaea,0xfc2b,
+	0xfc80,0xfd4f,0xfc07,0xfba5,0xfaa2,0xfae3,0xfb22,0xfbac,
+	0xfc36,0xfbcf,0xfc2e,0xfb85,0xfc18,0xfba7,0xfc8b,0xfcb1,
+	0xfd21,0xfd1b,0xfc9c,0xfc65,0xfbec,0xfcd7,0xfca3,0xfddf,
+	0xfde6,0xfe52,0xfe10,0xfdec,0xfdd4,0xfd9e,0xfe78,0xfe9d,
+	0xff81,0xfeac,0xfedb,0xfe4b,0xfe9e,0xfee4,0xff77,0x0028,
+	0xfff9,0x0067,0xff6d,0xff7f,0xfe7a,0xff01,0xff40,0x003a,
+	0x0094,0x0068,0x0074,0xff61,0xff85,0xfefa,0x0037,0xffb9,
+	0xff5d,0xfe3c,0xff5a,0x014e,0x01c4,0x0138,0xfde9,0xfbcf,
+	0xfa83,0xfd8d,0x0118,0x030c,0x01a6,0xff31,0xfe07,0xfc3f,
+	0xfb33,0xf9a7,0xfbbd,0xff0d,0x0361,0x0414,0x00fe,0xfc64,
+	0xf91d,0xf86c,0xf878,0xfbb0,0xff05,0x0361,0x03d2,0x0093,
+	0xfa08,0xf69f,0xf8f0,0xfddf,0x00f2,0xfe9a,0xfbd7,0xfb14,
+	0xfe67,0xff75,0xfecc,0xfc53,0xfbbc,0xfe0c,0xff0a,0xfee3,
+	0xfd24,0xfd11,0xfc1b,0xfcd3,0xfca2,0xfe2b,0x00b9,0x020d,
+	0x0066,0xfc52,0xfab1,0xfbb8,0x0034,0x0186,0x004e,0xfc10,
+	0xfabe,0xfca3,0xff17,0x0161,0x0195,0x036c,0x032d,0x00cf,
+	0xfaca,0xf67b,0xf731,0xfbb7,0x0201,0x0650,0x07ae,0x03d6,
+	0xffa1,0xfb5f,0xfb7c,0xfc6c,0xfe20,0xfdab,0xfc9d,0xfdcb,
+	0x00b0,0x04fa,0x0495,0x0193,0xfc85,0xfb52,0xfbd6,0xfcb2,
+	0xfcd4,0xfc27,0xfdf1,0x00b8,0x0341,0x0132,0xfef0,0xfd13,
+	0xfd0e,0xfcf7,0xfb88,0xfb58,0xfb99,0xfe99,0x0009,0x0160,
+	0x00b8,0xfff4,0xfd94,0xfc0d,0xfae2,0xf9e7,0xfbb9,0xfdce,
+	0x008c,0x0042,0x0028,0xfe52,0xfe46,0xfe45,0xfe0f,0xfc59,
+	0xf9d8,0xf991,0xfaaf,0xfe40,0x0080,0x0273,0x019e,0xffda,
+	0xfca7,0xf94d,0xf7d4,0xf87e,0xfcbd,0x0028,0x030e,0x0273,
+	0x014a,0xfeea,0xfd67,0xfcda,0xfd0f,0xfea0,0xffa6,0x0126,
+	0x0048,0x006e,0xff86,0x0099,0x0138,0x01cc,0x0171,0xffce,
+	0xff07,0xfd96,0xfe6c,0xfecf,0x0129,0x0279,0x038f,0x0288,
+	0x003d,0xfe3a,0xfc84,0xfd46,0xfdde,0xfff0,0x0018,0x00a0,
+	0xffbb,0xfed0,0xfda0,0xfc8d,0xfd59,0xfd57,0xfe54,0xfdca,
+	0xfda8,0xfc1f,0xfc2e,0xfc34,0xfce4,0xfd96,0xfd71,0xfd43,
+	0xfb71,0xfab5,0xf98b,0xfa56,0xfadf,0xfc99,0xfd57,0xfd63,
+	0xfced,0xfb42,0xfac2,0xf989,0xfa67,0xfae2,0xfc53,0xfc80,
+	0xfca6,0xfc4f,0xfba3,0xfbd4,0xfbbb,0xfd19,0xfcf6,0xfdb4,
+	0xfcfb,0xfc8e,0xfbef,0xfc3f,0xfd26,0xfddc,0xff6e,0xff68,
+	0xffb5,0xfe2f,0xfde5,0xfd15,0xfd71,0xfdcf,0xfeb2,0xffda,
+	0x0053,0x0124,0xfffe,0xffc9,0xfe70,0xfed9,0xff15,0xfff6,
+	0x0066,0x0032,0x0028,0xff23,0xff7b,0xfec4,0xffbe,0xffca,
+	0x00d1,0x00c5,0x0023,0xff53,0xfe5e,0xfe71,0xfe3e,0x009f,
+	0x0187,0x019e,0xfed9,0xfd2a,0xfd61,0xfedb,0x00ea,0x0031,0xfef1,0xfcf4,0xfd48,0xfc6c,0xfbc5,0xfb96,0xfe70,0x039e,
+	0x0557,0x024d,0xfb70,0xf777,0xf628,0xf8ef,0xfa95,0xfd8f,
+	0x018a,0x067a,0x0797,0x00a3,0xf769,0xf199,0xf489,0xf9e8,
+	0xff09,0x0129,0x03c8,0x0533,0x0291,0xfafd,0xf2dc,0xf3b6,
+	0xfa8c,0x02ea,0x045c,0x0102,0xfc87,0xfc18,0xfd8f,0xfd7a,
+	0xfce5,0xfc61,0xfef8,0x006c,0x0011,0xfb5b,0xf911,0xfc5a,
+	0x0252,0x0587,0x02b0,0xff31,0xfc3c,0xfc39,0xfabc,0xfaa6,
+	0xfcb4,0x0241,0x061b,0x055b,0x00dd,0xfbb3,0xfa91,0xfade,
+	0xfdd6,0x0051,0x02b8,0x0228,0xffc0,0xfd9e,0xfd20,0xfe93,
+	0xfea1,0xffd4,0x0077,0x01c2,0xff76,0xfd1a,0xfb59,0xfdb0,
+	0x00cb,0x0250,0x014d,0xfdf2,0xfcd4,0xfbe5,0xfd9e,0xfdc6,
+	0xfeee,0x0001,0x0054,0x006f,0xfedb,0xfdd9,0xfb6a,0xfa8d,
+	0xfab3,0xfe75,0x0218,0x0438,0x0301,0xff35,0xfb62,0xf86f,
+	0xf913,0xfad7,0xff26,0x018f,0x02bd,0x011a,0xfd41,0xfa49,
+	0xf989,0xfcc4,0xff10,0x00e9,0xff3d,0xfd95,0xfb6e,0xfb57,
+	0xfbc6,0xfcd1,0xfeef,0xff7c,0xff69,0xfc87,0xfab7,0xf940,
+	0xfb46,0xfe49,0x0123,0x0258,0x0134,0xffd3,0xfd11,0xfc6f,
+	0xfbf4,0xfe5b,0x0044,0x024b,0x0244,0x00b5,0xff25,0xfe05,
+	0xff4d,0x0030,0x020b,0x01d5,0x0205,0x007a,0xff66,0xfea2,
+	0xfed9,0x0073,0x015c,0x02a0,0x016e,0x0061,0xfe2e,0xfdb0,
+	0xfdaa,0xfeb9,0xffe5,0x0025,0x0095,0xff13,0xfe48,0xfcec,
+	0xfd45,0xfd46,0xfe70,0xfe98,0xfe2e,0xfd96,0xfc28,0xfbc0,
+	0xfb18,0xfc2e,0xfc6d,0xfd89,0xfd1c,0xfce6,0xfba9,0xfacc,
+	0xfada,0xfab2,0xfbbe,0xfb99,0xfcbb,0xfc16,0xfc07,0xfb05,
+	0xfada,0xfb34,0xfb53,0xfc39,0xfc0c,0xfcab,0xfb9f,0xfbfe,
+	0xfb92,0xfbf9,0xfc6e,0xfcf3,0xfd87,0xfd03,0xfd4f,0xfc86,
+	0xfd0b,0xfcad,0xfdab,0xfdf9,0xfeaf,0xfe8d,0xfdf2,0xfe21,
+	0xfdb3,0xfed4,0xfeaa,0xff91,0xff37,0xffc4,0xff62,0xff3b,
+	0xfef7,0xfeb8,0xffa2,0xff89,0x009c,0x0008,0x0028,0xff2a,
+	0xff6b,0xff58,0xff3b,0xffd3,0xff98,0x005a,0xffb0,0x004c,
+	0xffb8,0x001b,0xff82,0xff0c,0xfeee,0xfee0,0xffa3,0xff74,
+	0x009b,0x001b,0xff78,0xfced,0xfc83,0xfd2c,0xfdec,0xfe0d,
+	0xfd5f,0xfff7,0x0203,0x024e,0xfd7c,0xfa32,0xf9ec,0xfd0a,
+	0xfe32,0xfc2d,0xfba7,0xfd55,0x01ad,0x0184,0xfe70,0xfa4d,
+	0xf9fe,0xfb21,0xfbf9,0xfc07,0xfd93,0x0009,0x00ae,0xff36,
+	0xfb7c,0xfaaa,0xfb19,0xfda8,0xfe72,0xfe9c,0xfe63,0xff52,
+	0xff74,0xfcdc,0xfaf3,0xf9f9,0xfd4c,0x0036,0x0204,0x00d1,
+	0xff40,0xfe9c,0xfe3e,0xfe73,0xfc45,0xfb7e,0xfad6,0xfc7c,
+	0xfe5d,0x016e,0x042e,0x04e3,0x03ad,0xffa3,0xfc67,0xf8df,
+	0xf836,0xf883,0xfbe4,0x0120,0x06f1,0x0992,0x0546,0xfedb,
+	0xf954,0xf937,0xfa55,0xfce4,0xfd6d,0xfeab,0x0156,0x0422,
+	0x0466,0x0038,0xfc39,0xfac3,0xfe8b,0x0054,0xfe5b,0xf953,
+	0xf92e,0xfe5d,0x03a2,0x044e,0xff19,0xfbc3,0xfc06,0x003a,
+	0x00d3,0xfd28,0xf969,0xf9da,0xfea4,0x00eb,0x0044,0xfcfa,
+	0xfde0,0x001d,0x0183,0xfd93,0xf858,0xf73e,0xfb7b,0x01d1,
+	0x036a,0x017c,0xfdc8,0xfe21,0xfe62,0xfdbc,0xfb1b,0xfb43,
+	0xfe1c,0x007e,0xff48,0xfa9c,0xf8e4,0xfabe,0x00a4,0x02cc,
+	0x0151,0xfd80,0xfaf7,0xfa72,0xfa11,0xfaab,0xfbb7,0x0065,
+	0x03fd,0x0581,0x016a,0xfca9,0xfa13,0xfb2e,0xfdfb,0xff96,
+	0x0103,0x011d,0x0268,0x0141,0xffe9,0xfdf0,0xfe48,0x008d,
+	0x0241,0x025a,0xff91,0xfe42,0xfd79,0xff47,0x0054,0x0199,
+	0x01a3,0x01a3,0x00ff,0xfed7,0xfd43,0xfba7,0xfd71,0xff16,
+	0x0148,0x00c7,0xfff1,0xfe53,0xfd65,0xfd04,0xfc01,0xfc90,
+	0xfc59,0xfdef,0xfd8c,0xfd53,0xfbf6,0xfbdc,0xfc7a,0xfcd4,
+	0xfd37,0xfbe6,0xfb96,0xfa88,0xfb0b,0xfac1,0xfb80,0xfc08,
+	0xfce8,0xfd43,0xfc5c,0xfba7,0xfa01,0xfa86,0xfa90,0xfc31,
+	0xfcbb,0xfd13,0xfce5,0xfc9f,0xfc44,0xfb79,0xfc35,0xfc3c,
+	0xfd8d,0xfd5c,0xfde7,0xfd11,0xfca9,0xfcc5,0xfd31,0xfe34,
+	0xfe04,0xfedf,0xfe06,0xfe50,0xfd79,0xfdfa,0xfe30,0xfece,
+	0xffad,0xff52,0xff56,0xfe86,0xff27,0xfea4,0xff33,0xfee3,
+	0xff6f,0xffb4,0xff9b,0x0012,0xff2f,0xff54
+};
+
+static const UINT16 A2[] = {
+	0xf6e7,0x07b5,0x1a7f,0x2aaf,0x31d4,0x2ea5,0x22cc,0x1413,
+	0x0971,0x0864,0x141d,0x27de,0x3ccd,0x4961,0x494f,0x3abd,
+	0x235f,0x0aa9,0xf903,0xf3b1,0xfaa1,0x0961,0x168f,0x1b75,
+	0x1348,0x00d9,0xe8ae,0xd2cd,0xc4c4,0xc181,0xc80f,0xd393,
+	0xdeea,0xe3c9,0xe1d5,0xd97a,0xcf10,0xc5f9,0xc21d,0xc4a1,
+	0xccd5,0xd8ea,0xe571,0xf0d7,0xf865,0xfd1a,0xfe42,0xfe1c,
+	0xfd2b,0xfdaf,0x00cf,0x06e2,0x1013,0x1a7a,0x24b0,0x2b49,
+	0x2d2c,0x292e,0x219b,0x17f1,0x104a,0x0cef,0x0e6f,0x1440,
+	0x1a6c,0x1e91,0x1c97,0x142c,0x0624,0xf744,0xeaa2,0xe3dd,
+	0xe3d5,0xe8c4,0xeffd,0xf4b6,0xf52b,0xef48,0xe5ab,0xdae9,
+	0xd37d,0xd146,0xd529,0xddf2,0xe83c,0xf1c6,0xf74f,0xf8a7,
+	0xf5f3,0xf24a,0xefca,0xf0d3,0xf578,0xfd6f,0x074b,0x1061,
+	0x1726,0x19ae,0x195b,0x1612,0x1293,0x0f5d,0x0e61,0x0fb2,
+	0x1308,0x1738,0x1a2a,0x1b2c,0x1851,0x1312,0x0b3f,0x0377,
+	0xfc99,0xf8e4,0xf868,0xfa36,0xfcc6,0xfd90,0xfc6c,0xf7d8,
+	0xf1ba,0xea62,0xe4d5,0xe1c9,0xe2f3,0xe715,0xec5f,0xf1a2,
+	0xf471,0xf546,0xf304,0xf091,0xee36,0xee59,0xf125,0xf6bb,
+	0xfdcf,0x0467,0x0979,0x0bd3,0x0c2b,0x0a61,0x0891,0x0761,
+	0x0837,0x0a7e,0x0e08,0x11be,0x1419,0x14f9,0x1352,0x102a,
+	0x0b54,0x0745,0x03a3,0x023b,0x0191,0x027c,0x03ab,0x0370,
+	0x0212,0xfe13,0xf96d,0xf3f8,0xf022,0xedf7,0xee22,0xefd9,
+	0xf275,0xf4f1,0xf573,0xf4f1,0xf2bb,0xf0ce,0xef20,0xef46,
+	0xf11f,0xf4b9,0xf91c,0xfd4f,0x007e,0x01f4,0x0269,0x0147,
+	0x0076,0xfecd,0xfd41,0xfa21,0xf537,0xef6c,0xeb62,0xed43,
+	0xf6bf
+};
+
+static const UINT16 AY2[] = {
+	0xfe38,0xfd95,0xf8c2,0xf1e5,0xeb9d,0xeb20,0xf220,0x000f,
+	0x0f9a,0x1ac3,0x1d22,0x15ed,0x0ac6,0x0192,0x017a,0x0b5f,
+	0x1cb9,0x2dc8,0x3794,0x3655,0x2aa7,0x1b40,0x0f4d,0x0da3,
+	0x157b,0x2363,0x2f89,0x3391,0x2d10,0x1e5d,0x0d89,0x007c,
+	0xfcb4,0x00b1,0x08de,0x0ec8,0x0ee9,0x077d,0xfadc,0xed69,
+	0xe27b,0xdd41,0xdd34,0xe17b,0xe585,0xe750,0xe48d,0xdeaf,
+	0xd737,0xd064,0xcc5a,0xcb91,0xceb1,0xd42f,0xdb08,0xdfa0,
+	0xe160,0xdf9d,0xdc26,0xd8d2,0xd827,0xdbe0,0xe390,0xee0f,
+	0xf7ba,0xfe96,0xff91,0xfcd9,0xf89f,0xf6ea,0xf9e8,0x017d,
+	0x0c42,0x1605,0x1ca8,0x1d33,0x1969,0x12f3,0x0eb6,0x0ee2,
+	0x13fc,0x1ba6,0x2254,0x2594,0x235f,0x1dbe,0x15dc,0x0f93,
+	0x0c17,0x0d1b,0x1063,0x13dc,0x14c9,0x1188,0x0b89,0x03c7,
+	0xfd05,0xf813,0xf66f,0xf6db,0xf90b,0xf9ff,0xf8bc,0xf4cc,
+	0xef36,0xe9e9,0xe573,0xe409,0xe432,0xe6f0,0xe9b4,0xec3a,
+	0xec68,0xea61,0xe759,0xe46e,0xe3c7,0xe517,0xe940,0xee45,
+	0xf3cb,0xf734,0xf831,0xf690,0xf46c,0xf3f0,0xf5e6,0xfa9a,
+	0x0035,0x0662,0x0a25,0x0b9e,0x0a51,0x07ea,0x0655,0x0700,
+	0x0a16,0x0e51,0x12b5,0x14e2,0x158d,0x139a,0x10bd,0x0d2b,
+	0x0b33,0x0b75,0x0d27,0x0fa1,0x1095,0x102a,0x0d4c,0x0a02,
+	0x05b4,0x0207,0xff8f,0xfef3,0xffe9,0x00d2,0x0137,0xff48,
+	0xfc21,0xf786,0xf3ff,0xf12f,0xf091,0xf173,0xf36c,0xf55f,
+	0xf599,0xf43e,0xf0e9,0xee0b,0xebc8,0xec29,0xee52,0xf1ac,
+	0xf4ee,0xf6df,0xf74b,0xf5b1,0xf412,0xf2e5,0xf3ad,0xf5ee,
+	0xfa09,0xfcfd,0xfe14
+};
+
+static const UINT16 AH2[] = {
+	0x0149,0x140f,0x2893,0x3ab8,0x4a4d,0x5588,0x5bc2,0x5ce5,
+	0x5776,0x4c1d,0x39f3,0x22d5,0x0745,0xea8e,0xcf06,0xb843,
+	0xa861,0x9fff,0x9f0a,0xa450,0xaf3e,0xbd4f,0xce38,0xdf6f,
+	0xf0a0,0x0046,0x0dd6,0x17c7,0x1d27,0x1e84,0x1bfe,0x182e,
+	0x1318,0x0f82,0x0d1b,0x0d4c,0x0f3d,0x1245,0x1573,0x1718,
+	0x17a0,0x15c1,0x1276,0x0be2,0x039c,0xf863,0xebab,0xde02,
+	0xd0c4,0xc5bd,0xbdf9,0xbb73,0xbdb0,0xc59e,0xd12f,0xe072,
+	0xf0f3,0x022a,0x1265,0x20ee,0x2c76,0x3417,0x3865,0x3755,
+	0x328b,0x2948,0x1e32,0x1199,0x05f3,0xfba7,0xf342,0xed7e,
+	0xe9f7,0xe8fb,0xe87c,0xe984,0xea82,0xec6b,0xedb7,0xeeae,
+	0xef05,0xee58,0xed33,0xeb5a,0xea8a,0xea63,0xecee,0xf116,
+	0xf7c0,0xffd8,0x0905,0x1275,0x1ac9,0x2198,0x2607,0x2875,
+	0x278b,0x2477,0x1deb,0x1538,0x0a4f,0xfe52,0xf2cc,0xe822,
+	0xdfff,0xd9e9,0xd7ac,0xd7a5,0xdac3,0xdf83,0xe5e9,0xecdc,
+	0xf43b,0xfbac,0x01b3,0x06f6,0x0a1a,0x0c60,0x0caf,0x0c67,
+	0x0b30,0x0a49,0x09a9,0x09a1,0x0a3a,0x0aba,0x0be3,0x0c4a,
+	0x0ca1,0x0bba,0x0a2f,0x070a,0x0310,0xfe08,0xf80b,0xf22a,
+	0xebd6,0xe6ff,0xe2ec,0xe169,0xe11e,0xe3a8,0xe7a6,0xed7d,
+	0xf482,0xfbf5,0x03f8,0x0ab6,0x10fa,0x14fe,0x17fd,0x1878,
+	0x177c,0x1493,0x1085,0x0c1d,0x0724,0x02d6,0xfe52,0xfb0a,
+	0xf833,0xf6b5,0xf5b1,0xf545,0xf523,0xf57a,0xf5e2,0xf60d,
+	0xf5fe,0xf525,0xf4e8,0xf3fd,0xf418,0xf455,0xf5d0,0xf7d4,
+	0xfacd,0xfe69,0x024a,0x068a,0x0a19,0x0e05,0x104d,0x121a,
+	0x11f7,0x10fb,0x0eaa,0x0abb,0x0629,0x00c6,0xfbfb,0xf6ed,
+	0xf37e,0xeff8,0xee14,0xed31,0xedce,0xef6c,0xf172,0xf3eb,
+	0xf6ac,0xfa08,0xfc08,0xfd2e,0xfb7c,0xf7a2,0xf14d,0xea78,
+	0xe513,0xe390,0xe840,0xf2f5,0x0378
+};
+
+static const UINT16 O2[] = {
+	0xff65,0x0c0e,0x1a75,0x2921,0x37c3,0x448a,0x4e82,0x5503,
+	0x577b,0x568d,0x5191,0x49ba,0x3e6c,0x3144,0x21d7,0x10f6,
+	0xfee3,0xec58,0xdb37,0xcbd2,0xbf9e,0xb61d,0xb035,0xad0d,
+	0xad3c,0xaf59,0xb3b9,0xb9a0,0xc11b,0xca22,0xd39d,0xdd70,
+	0xe5fc,0xedd2,0xf3c0,0xf8a7,0xfbfe,0xfe9b,0x0056,0x01d4,
+	0x0387,0x048e,0x061d,0x075a,0x09ce,0x0c82,0x105e,0x1498,
+	0x19a0,0x1ed8,0x23aa,0x27a7,0x2a35,0x2bde,0x2b8b,0x2a22,
+	0x26a8,0x21dc,0x1afe,0x12aa,0x0914,0xfe2f,0xf341,0xe7ec,
+	0xddeb,0xd48e,0xcd59,0xc785,0xc3e6,0xc207,0xc260,0xc4d1,
+	0xc941,0xcfec,0xd79b,0xe07b,0xe99d,0xf33b,0xfc37,0x04b3,
+	0x0bfc,0x122a,0x1731,0x1aeb,0x1d7e,0x1e23,0x1e30,0x1cce,
+	0x1b3d,0x188e,0x1603,0x1388,0x1179,0x0fb6,0x0dbe,0x0c77,
+	0x0aea,0x0a16,0x091a,0x085d,0x0729,0x05ee,0x0442,0x01d5,
+	0xff20,0xfb66,0xf765,0xf297,0xee65,0xe9eb,0xe5fa,0xe1f1,
+	0xdeff,0xdcad,0xdb70,0xdb95,0xdc9f,0xdf61,0xe2bb,0xe7d4,
+	0xed4e,0xf3cc,0xfa28,0x00d7,0x076b,0x0d50,0x12dd,0x173f,
+	0x1b07,0x1d38,0x1eb5,0x1e86,0x1d79,0x1b56,0x1893,0x14f0,
+	0x10bb,0x0ccd,0x0846,0x046b,0x0057,0xfd1b,0xfa11,0xf7cc,
+	0xf5ed,0xf4a7,0xf3eb,0xf343,0xf327,0xf291,0xf2db,0xf27a,
+	0xf281,0xf202,0xf1b8,0xf14f,0xf137,0xf0f9,0xf0aa,0xf0dc,
+	0xf0e6,0xf1cc,0xf2d6,0xf513,0xf744,0xfa0a,0xfd08,0x0031,
+	0x03bc,0x06f3,0x0a93,0x0d7a,0x1075,0x1266,0x145c,0x153a,
+	0x1533,0x1412,0x126d,0x100e,0x0c7b,0x08cf,0x0333,0xfca3,
+	0xf452,0xec13,0xe441,0xde24,0xda89,0xd9a9,0xdc03,0xe09f,
+	0xe878,0xf1cc,0xfd62
+};
+
+static const UINT16 I2[] = {
+	0x0f4b,0x1855,0x193e,0x12e6,0x0a57,0x054c,0x078a,0x1289,
+	0x22bd,0x3468,0x40a8,0x4530,0x4075,0x3585,0x28aa,0x1e92,
+	0x19f9,0x1a48,0x1e08,0x216b,0x22c8,0x1f76,0x1833,0x0d6f,
+	0x01e3,0xf669,0xec25,0xe398,0xdc99,0xd873,0xd651,0xd6a8,
+	0xd732,0xd7a0,0xd54d,0xd09d,0xc974,0xc1ae,0xbca4,0xbbbd,
+	0xc0ec,0xca44,0xd66d,0xe15c,0xe962,0xec6e,0xeb63,0xe887,
+	0xe733,0xea75,0xf202,0xfe0e,0x0a95,0x167f,0x1e5c,0x2263,
+	0x221c,0x1fe3,0x1d30,0x1bc4,0x1ccf,0x1f0c,0x229d,0x2581,
+	0x27f6,0x280b,0x261f,0x214c,0x1a98,0x12bf,0x0aa5,0x0445,
+	0xff18,0xfcad,0xfbb5,0xfbe8,0xfb14,0xf856,0xf2c2,0xeb2f,
+	0xe30f,0xdbc6,0xd793,0xd641,0xd8c1,0xdcc7,0xe1ce,0xe507,
+	0xe68b,0xe5b5,0xe35b,0xe163,0xe0ec,0xe38c,0xe83f,0xef6a,
+	0xf6d5,0xfea8,0x044a,0x07e2,0x09a7,0x0a22,0x0a3f,0x0a93,
+	0x0ce0,0x0fb7,0x1424,0x1848,0x1c5c,0x1eb4,0x1f4d,0x1db1,
+	0x1a1c,0x15f4,0x1189,0x0e8f,0x0c6d,0x0c2b,0x0c24,0x0c9c,
+	0x0b57,0x0884,0x03da,0xfd84,0xf737,0xf16d,0xed9f,0xebcb,
+	0xeca6,0xedce,0xef30,0xef32,0xee33,0xeb76,0xe820,0xe5a9,
+	0xe440,0xe536,0xe7b1,0xec38,0xf055,0xf452,0xf711,0xf8bd,
+	0xf9f1,0xfa46,0xfb45,0xfc8f,0xff5f,0x0269,0x06c3,0x0a98,
+	0x0e1f,0x107f,0x11ea,0x11f8,0x10de,0x0fa9,0x0e1e,0x0dc3,
+	0x0db0,0x0efb,0x0fb7,0x1071,0x0fef,0x0e38,0x0af9,0x06ab,
+	0x02ed,0xff59,0xfd5a,0xfbd8,0xfbdc,0xfb65,0xfb2c,0xf9e6,
+	0xf795,0xf498,0xf132,0xee44,0xeaec,0xe7aa,0xe287,0xdcf1,
+	0xd74a,0xd52f,0xd930,0xe439,0xf4a3,0x05c7,0x133d
+};
+
+static const UINT16 U2[] = {
+	0x0046,0x03d7,0x077a,0x0c13,0x1119,0x16ba,0x1ccd,0x22e1,
+	0x290a,0x2e73,0x330e,0x3607,0x379e,0x377d,0x3602,0x3324,
+	0x2f70,0x2aa7,0x250c,0x1e8f,0x170a,0x0f89,0x0800,0x00f8,
+	0xf9fb,0xf42f,0xef69,0xeba1,0xe893,0xe605,0xe3d9,0xe1d8,
+	0xe0ba,0xdf92,0xdecb,0xdda4,0xdcab,0xdb7a,0xd9de,0xd811,
+	0xd599,0xd3cd,0xd1c2,0xd055,0xcef3,0xce76,0xceda,0xd003,
+	0xd1cb,0xd484,0xd802,0xdc8e,0xe1fe,0xe7b8,0xedf2,0xf41b,
+	0xfb12,0x018d,0x07ba,0x0cf0,0x1166,0x1576,0x18e8,0x1b8d,
+	0x1d04,0x1e13,0x1e51,0x1e4d,0x1da8,0x1c7b,0x1b55,0x1a57,
+	0x198b,0x1889,0x17d2,0x16ef,0x1671,0x15d0,0x1523,0x1443,
+	0x1351,0x1225,0x107b,0x0e82,0x0ba5,0x08b0,0x051f,0x0181,
+	0xfd73,0xf941,0xf4eb,0xf0c0,0xecb2,0xe8ea,0xe5c5,0xe2c9,
+	0xe0b4,0xdf3c,0xdeb1,0xdeaf,0xdf3d,0xe03a,0xe17a,0xe349,
+	0xe57d,0xe7fb,0xea6b,0xecc5,0xeee8,0xf137,0xf354,0xf524,
+	0xf6b4,0xf840,0xf9e2,0xfb40,0xfced,0xfe14,0xffba,0x0136,
+	0x0363,0x0540,0x078b,0x09b7,0x0c01,0x0e65,0x1052,0x1269,
+	0x13e2,0x1589,0x1690,0x1765,0x1765,0x1715,0x163b,0x1500,
+	0x1371,0x1146,0x0efe,0x0c39,0x09a3,0x06f0,0x047f,0x01ea,
+	0xffac,0xfd6c,0xfb56,0xf9c8,0xf85f,0xf75c,0xf632,0xf583,
+	0xf4b2,0xf429,0xf39e,0xf316,0xf28c,0xf1bf,0xf116,0xf06a,
+	0xefd3,0xef17,0xeecf,0xee72,0xee84,0xeeab,0xeeea,0xef72,
+	0xf054,0xf1ad,0xf2cf,0xf45d,0xf5d9,0xf7ee,0xf9e4,0xfbcb,
+	0xfd56,0xfe24,0xfe43,0xfd82,0xfcc2,0xfbb6,0xfb6f,0xfba3,
+	0xfd14,0xff32,0x0226
+};
+
+static const UINT16 Y2[] = {
+	0x0526,0x07e7,0x08fb,0x07a5,0x0578,0x0345,0x02c6,0x04e4,
+	0x0883,0x0cf3,0x0f60,0x0fe5,0x0dca,0x0ae6,0x07e9,0x0664,
+	0x06ac,0x08b5,0x0ba9,0x0da0,0x0df8,0x0b28,0x077f,0x036b,
+	0x012c,0x00ae,0x01ea,0x03cb,0x052a,0x0560,0x02f7,0xff6c,
+	0xfb14,0xf8ab,0xf7c4,0xf8c2,0xfa72,0xfb7b,0xfb7d,0xf9f6,
+	0xf7e9,0xf506,0xf2fb,0xf1e3,0xf2c6,0xf467,0xf62a,0xf700,
+	0xf6bc,0xf5c3,0xf457,0xf3a9,0xf30b,0xf3f6,0xf528,0xf766,
+	0xf8e7,0xf996,0xf9ad,0xf973,0xf957,0xf931,0xfa01,0xfac4,
+	0xfc9b,0xfe85,0x006b,0x012e,0x0153,0x010d,0x009a,0x00e7,
+	0x0152,0x02ea,0x0463,0x0630,0x0693,0x0698,0x05c5,0x04b7,
+	0x041a,0x0418,0x0564,0x066c,0x0796,0x076b,0x06ec,0x05a0,
+	0x0485,0x037a,0x02ed,0x0355,0x039e,0x0413,0x038a,0x0300,
+	0x016c,0x0005,0xfe84,0xfdda,0xfd51,0xfc9d,0xfb20,0xf806,
+	0xf446,0xf0aa,0xf01d,0xf292,0xf87d,0xfee7,0x03c4,0x044c,
+	0x0042,0xfa56,0xf550,0xf559,0xfa6a,0x03fd,0x0d8a,0x1379,
+	0x134d,0x0d90,0x055f,0xff15,0xfead,0x0430,0x0dee,0x16a6,
+	0x1b5b,0x1903,0x1191,0x082b,0x0167,0xffa4,0x03ad,0x0b28,
+	0x115e,0x13f8,0x1085,0x08f9,0xff97,0xf8ab,0xf614,0xf7f9,
+	0xfc95,0x0097,0x026d,0xffde,0xfa80,0xf360,0xeda8,0xea3c,
+	0xeaae,0xed56,0xf0a7,0xf304,0xf309,0xf12b,0xecf8,0xe901,
+	0xe5ba,0xe526,0xe69b,0xea27,0xedfc,0xf0c6,0xf1cc,0xf08a,
+	0xee40,0xeb60,0xea62,0xeb6c,0xef1d,0xf3fb,0xf8fb,0xfc2d,
+	0xfcb5,0xfb57,0xf89d,0xf733,0xf762,0xfa93,0xff48,0x04de
+};
+
+static const UINT16 R2[] = {
+	0x09da,0x1ae6,0x2ce8,0x3c0f,0x478a,0x4c16,0x49d8,0x40fe,
+	0x3240,0x20a2,0x0daa,0xfdcb,0xf1f0,0xecd2,0xed9d,0xf4bb,
+	0xff02,0x0a50,0x1451,0x19c7,0x19ad,0x121d,0x0547,0xf33a,
+	0xdff1,0xccb4,0xbd1a,0xb2c6,0xaea2,0xb1d8,0xba5c,0xc79e,
+	0xd5fc,0xe506,0xf166,0xfa7d,0xfe91,0xfeac,0xfb33,0xf59e,
+	0xefff,0xeb17,0xe930,0xe9d6,0xef25,0xf741,0x01ff,0x0d8d,
+	0x1926,0x2376,0x2b0e,0x2ffa,0x30e0,0x2ee9,0x2969,0x226c,
+	0x1965,0x1073,0x07e7,0x008e,0xfba0,0xf885,0xf80c,0xf85f,
+	0xfab7,0xfcbf,0xff82,0x004e,0xff6a,0xfc57,0xf754,0xf0cc,
+	0xe8d4,0xe112,0xd987,0xd484,0xd180,0xd287,0xd615,0xdca3,
+	0xe546,0xef21,0xf908,0x0105,0x0732,0x0a2c,0x0b77,0x0991,
+	0x067d,0x0252,0xff02,0xfd44,0xfd71,0x0033,0x0486,0x0b55,
+	0x124e,0x19a1,0x1ec0,0x2222,0x2252,0x1ff0,0x1b20,0x13f7,
+	0x0bdb,0x0348,0xfc51,0xf62f,0xf2c0,0xf0d2,0xf17c,0xf33f,
+	0xf5d5,0xf88c,0xfa26,0xfb24,0xfa05,0xf872,0xf4eb,0xf0fe,
+	0xec26,0xe84e,0xe55c,0xe404,0xe495,0xe68e,0xeab9,0xef8a,
+	0xf5fb,0xfbdf,0x01d2,0x060f,0x09c1,0x0ba5,0x0beb,0x0b25,
+	0x092e,0x07ad,0x0598,0x04c3,0x042d,0x0512,0x06a0,0x093c,
+	0x0c17,0x0e68,0x10bd,0x119c,0x11ba,0x0faa,0x0cd5,0x0847,
+	0x0395,0xfe4f,0xf99d,0xf566,0xf24b,0xf0ed,0xf090,0xf1de,
+	0xf309,0xf591,0xf70d,0xf8d9,0xf98a,0xf91e,0xf7f4,0xf60b,
+	0xf459,0xf203,0xf110,0xf01d,0xf11f,0xf2a7,0xf5bf,0xf93e,
+	0xfd33,0x011b,0x0482,0x0773,0x08a0,0x0942,0x0752,0x0459,
+	0xfee9,0xf8a2,0xf1fd,0xec8d,0xe994,0xea08,0xeff8,0xf9fb,
+	0x08ea
+};
+
+static const UINT16 E2[] = {
+	0x029d,0x0232,0x0165,0xffac,0xff59,0x000a,0x02b3,0x05c2,
+	0x0839,0x0983,0x09a1,0x085d,0x0627,0x04e0,0x045f,0x05ee,
+	0x07a3,0x09e2,0x0a9b,0x0a73,0x0907,0x06ba,0x0479,0x02a3,
+	0x02d2,0x0330,0x04f7,0x05d1,0x05e9,0x0475,0x0214,0xff12,
+	0xfc9b,0xfb09,0xf9bb,0xf90f,0xf679,0xf318,0xeef2,0xed87,
+	0xef99,0xf5aa,0xfd03,0x0226,0x02c7,0xfede,0xf94b,0xf4d5,
+	0xf5db,0xfc08,0x06ae,0x1081,0x1623,0x14a6,0x0de9,0x0628,
+	0x01b1,0x03bc,0x0b1a,0x1510,0x1c57,0x1ebe,0x1a65,0x123b,
+	0x09d2,0x0546,0x066c,0x0b77,0x120d,0x151b,0x144b,0x0e5a,
+	0x069c,0xfef2,0xfa9d,0xf9ba,0xfbbe,0xfebb,0xffbf,0xfe55,
+	0xf9f2,0xf4b8,0xef2c,0xeb8d,0xe92b,0xe8f5,0xe9b9,0xeb07,
+	0xebce,0xeb2b,0xe9b6,0xe6a3,0xe3b4,0xe0a2,0xdfce,0xe077,
+	0xe39e,0xe782,0xeaf8,0xec61,0xeb3b,0xe8a7,0xe5ad,0xe4f0,
+	0xe6a1,0xebaf,0xf20d,0xf818,0xfadd,0xfa7f,0xf7f0,0xf510,
+	0xf4a8,0xf6e3,0xfc64,0x02ab,0x088f,0x0b0e,0x0ae0,0x07ee,
+	0x04ba,0x03ce,0x0560,0x09c8,0x0e86,0x129b,0x13d8,0x12d7,
+	0x0f7c,0x0c4b,0x09fd,0x09f6,0x0c12,0x0ecc,0x1113,0x1147,
+	0x1002,0x0c44,0x08c4,0x054c,0x03c3,0x0378,0x049e,0x0618,
+	0x061c,0x050f,0x01c0,0xfe60,0xfab6,0xf88d,0xf77b,0xf816,
+	0xf923,0xfa18,0xfa0c,0xf81e,0xf54e,0xf1ec,0xefbb,0xee7b,
+	0xefe0,0xf1c2,0xf40e,0xf4fc,0xf489,0xf2cb,0xf08a,0xef2e,
+	0xeeaf,0xf064,0xf2d5,0xf632,0xf825,0xf920,0xf83c,0xf6f9,
+	0xf617,0xf614,0xf7d7,0xfa4d,0xfdcd,0x0039,0x01d7,0x01c4
+};
+
+static const UINT16 W2[] = {
+	0xff94,0x0163,0x02ab,0x0392,0x0389,0x035c,0x0257,0x016a,
+	0x00a5,0x0092,0x00e9,0x0187,0x02e3,0x04a9,0x0750,0x0a1d,
+	0x0dc5,0x1175,0x1632,0x1b45,0x20b3,0x2653,0x2bae,0x3092,
+	0x349c,0x37ed,0x39aa,0x3ae1,0x3aa1,0x39ba,0x375e,0x33cf,
+	0x2ecc,0x2860,0x213c,0x18cd,0x0ff9,0x05e7,0xfc41,0xf268,
+	0xe90f,0xe005,0xd74d,0xcfa1,0xc899,0xc30f,0xbe5f,0xbb40,
+	0xb910,0xb89b,0xb943,0xbb3a,0xbdf3,0xc191,0xc5fa,0xcac6,
+	0xd061,0xd623,0xdc4c,0xe212,0xe85d,0xedf4,0xf360,0xf7e9,
+	0xfc0c,0x000c,0x0354,0x0654,0x086a,0x0aa2,0x0c39,0x0e0d,
+	0x0f9d,0x10cf,0x11e2,0x132c,0x14cf,0x1612,0x1753,0x189d,
+	0x1a9c,0x1c15,0x1dd5,0x1f4a,0x2095,0x21aa,0x227c,0x22eb,
+	0x225c,0x223c,0x20de,0x1f94,0x1d39,0x1a85,0x16bd,0x12bd,
+	0x0e63,0x0954,0x0429,0xfe75,0xf979,0xf42e,0xef3e,0xea02,
+	0xe588,0xe166,0xde0c,0xdb4d,0xd90e,0xd7c4,0xd706,0xd78b,
+	0xd83b,0xd9b6,0xdb52,0xdded,0xe0d5,0xe40c,0xe7d3,0xeb63,
+	0xef92,0xf34c,0xf776,0xfadc,0xfe28,0x00f9,0x03b7,0x0655,
+	0x08ab,0x0aad,0x0c37,0x0d95,0x0e6e,0x0f83,0x0ff0,0x1056,
+	0x1086,0x1109,0x117d,0x11cd,0x1232,0x1214,0x1265,0x1236,
+	0x1276,0x122a,0x1234,0x1225,0x1225,0x11bb,0x10f2,0x0ffe,
+	0x0e9e,0x0d7b,0x0b9b,0x09f1,0x07c7,0x05a0,0x0332,0x00b8,
+	0xfdd2,0xfac0,0xf811,0xf51e,0xf2b3,0xefef,0xedcf,0xebf1,
+	0xeaa5,0xe95f,0xe86d,0xe7ee,0xe7b6,0xe83b,0xe89e,0xea0b,
+	0xeb2c,0xed32,0xef36,0xf17e,0xf3cb,0xf60f,0xf826,0xfa41,
+	0xfccb,0xfecd,0x010b
+};
+
+static const UINT16 AE2[] = {
+	0xf9d0,0xec5f,0xddd0,0xd231,0xd018,0xd9dd,0xf157,0x109f,
+	0x3111,0x4810,0x4ff5,0x4753,0x31bb,0x17ca,0x0273,0xfb5d,
+	0x02ad,0x1633,0x2bf9,0x3be5,0x3dcd,0x3035,0x165d,0xf699,
+	0xd9b3,0xc4d3,0xbd1f,0xbfd2,0xca70,0xd696,0xe199,0xe817,
+	0xe9df,0xe7be,0xe2a8,0xdd32,0xd883,0xd7cb,0xdb2f,0xe53a,
+	0xf42a,0x0790,0x1ba2,0x2bfb,0x34c7,0x3352,0x2919,0x185c,
+	0x07db,0xfb6d,0xf81f,0xfcc7,0x07ac,0x1327,0x19bc,0x17bb,
+	0x0b6a,0xf8cd,0xe321,0xd1f0,0xc737,0xc656,0xcd5d,0xda5f,
+	0xe892,0xf43f,0xfb6a,0xfcb4,0xfa9c,0xf630,0xf2e1,0xf12b,
+	0xf3d8,0xfa4d,0x04b5,0x10e6,0x1c87,0x25c2,0x2990,0x2869,
+	0x2069,0x14ee,0x0725,0xfba7,0xf499,0xf360,0xf712,0xfcfe,
+	0x02af,0x03df,0x006f,0xf6e4,0xeafc,0xde80,0xd661,0xd428,
+	0xd884,0xe256,0xeebc,0xfb8b,0x0481,0x09ec,0x09e5,0x072a,
+	0x02e8,0xffe4,0xff8c,0x0255,0x081b,0x0f44,0x1723,0x1c39,
+	0x1e65,0x1b30,0x14ca,0x0ac1,0x003c,0xf6da,0xf061,0xee0b,
+	0xef3d,0xf372,0xf785,0xfac0,0xfa37,0xf72c,0xf120,0xeab0,
+	0xe5b2,0xe3da,0xe6e1,0xed36,0xf6df,0x0063,0x094b,0x0e6e,
+	0x105e,0x0e71,0x0abf,0x06ae,0x03f0,0x03af,0x0528,0x090e,
+	0x0cd7,0x104b,0x10e7,0x0f01,0x09c0,0x0298,0xfacf,0xf36d,
+	0xee9b,0xec28,0xecf5,0xef52,0xf3b7,0xf711,0xf972,0xf979,
+	0xf7d4,0xf518,0xf216,0xf14b,0xf212,0xf664,0xfc03,0x03a3,
+	0x0a09,0x0f19,0x10e9,0x0fe7,0x0ccf,0x082b,0x0472,0x0156,
+	0x0126,0x01b7,0x03fd,0x059f,0x0687,0x058d,0x026c,0xfdc1,
+	0xf7d8,0xf31c,0xef0c,0xee1a,0xee8d,0xf164,0xf4f3,0xf934,
+	0xfc69,0xfdea,0xfe1e,0xfc7e,0xfb9a,0xfa27,0xfac8,0xfc89,
+	0x008d,0x04e8,0x095c,0x0c91,0x0d6f,0x0c12,0x0731,0xff5f
+};
+
+static const UINT16 UH2[] = {
+	0x086b,0x1c46,0x319f,0x44de,0x5587,0x615a,0x68ce,0x6bdb,
+	0x691f,0x6088,0x509d,0x3af0,0x1fc2,0x02c5,0xe5fc,0xccdf,
+	0xb958,0xacbe,0xa6a6,0xa5f3,0xa97d,0xaf5d,0xb7df,0xc15b,
+	0xcc4f,0xd6dd,0xe0b6,0xe886,0xedd2,0xf101,0xf1c1,0xf25b,
+	0xf361,0xf7dc,0xfe73,0x08a7,0x1452,0x20c6,0x2c84,0x363d,
+	0x3d5e,0x40f7,0x41a0,0x3def,0x3695,0x2a41,0x1a62,0x0736,
+	0xf2da,0xdef4,0xcda4,0xc0af,0xb7e9,0xb4d0,0xb5af,0xbb25,
+	0xc30a,0xcd40,0xd895,0xe493,0xf019,0xfa50,0x0342,0x0929,
+	0x0d57,0x0efb,0x0fbf,0x0f82,0x1021,0x11af,0x149d,0x18c1,
+	0x1d05,0x2159,0x2412,0x262e,0x25e4,0x240e,0x1f79,0x18a5,
+	0x0f4d,0x0428,0xf799,0xea1b,0xddbd,0xd262,0xcac4,0xc625,
+	0xc5e8,0xc87a,0xce9d,0xd6ee,0xe087,0xeb5f,0xf5da,0x0063,
+	0x0920,0x10c8,0x15e3,0x1948,0x1a4f,0x19a8,0x181d,0x1640,
+	0x14b1,0x130b,0x1261,0x11a4,0x11e9,0x115a,0x10dc,0x0f2c,
+	0x0c97,0x08d6,0x03b6,0xfdd6,0xf6a2,0xef5f,0xe78a,0xe0c0,
+	0xdae3,0xd766,0xd5f5,0xd72a,0xdaf3,0xe0ac,0xe846,0xf05e,
+	0xf96d,0x01bc,0x0a45,0x1106,0x166b,0x19bc,0x1b6d,0x1b6f,
+	0x1984,0x16b7,0x12e8,0x0f8c,0x0be6,0x0995,0x070a,0x04f0,
+	0x0320,0x0183,0x0016,0xfdc7,0xfba2,0xf84f,0xf590,0xf1ff,
+	0xeec0,0xeb04,0xe7bf,0xe55b,0xe470,0xe53e,0xe724,0xeb12,
+	0xefb0,0xf5dc,0xfc18,0x02e6,0x08d1,0x0e64,0x12f3,0x161e,
+	0x1835,0x1808,0x16f8,0x1445,0x1110,0x0cbd,0x08cc,0x04a5,
+	0x010a,0xfe5a,0xfbfd,0xfa46,0xf84c,0xf756,0xf60f,0xf593,
+	0xf462,0xf380,0xf24e,0xf153,0xf067,0xef7a,0xef5c,0xef51,
+	0xf0cb,0xf277,0xf5c6,0xf8e5,0xfbdf,0xfcd9,0xfad7,0xf65d,
+	0xefa0,0xe9ac,0xe61a,0xe90d,0xf206,0x016a
+};
+
+static const UINT16 IU2[] = {
+	0x01a1,0x12b6,0x218a,0x2d40,0x342e,0x37f6,0x37a8,0x35af,
+	0x3211,0x2e49,0x2aa7,0x2788,0x24fd,0x22a5,0x2142,0x2087,
+	0x217a,0x2238,0x234f,0x22af,0x2054,0x1ad5,0x11d3,0x05de,
+	0xf7b8,0xe946,0xdb5c,0xd066,0xc807,0xc399,0xc1f5,0xc314,
+	0xc594,0xc88d,0xcb82,0xcdb1,0xcfb5,0xd0a1,0xd1a2,0xd165,
+	0xd1a6,0xd17f,0xd23b,0xd3cc,0xd6c6,0xdc1e,0xe364,0xed30,
+	0xf7c9,0x03ee,0x0ec3,0x18b5,0x2007,0x24c4,0x270e,0x271f,
+	0x25c0,0x2343,0x2135,0x1f0a,0x1e5a,0x1dc6,0x1e2b,0x1e8f,
+	0x1f21,0x1f6b,0x1f21,0x1ddc,0x1aa6,0x166f,0x102b,0x0941,
+	0x0094,0xf7f9,0xef1e,0xe782,0xe17e,0xdd50,0xdb98,0xdb24,
+	0xdc85,0xdde8,0xdff7,0xe10b,0xe1ed,0xe203,0xe1a1,0xe137,
+	0xe08c,0xe0d5,0xe13e,0xe330,0xe584,0xe951,0xeddf,0xf424,
+	0xfaa5,0x01c0,0x0869,0x0e28,0x1342,0x1664,0x18f7,0x19b9,
+	0x1999,0x1811,0x16e3,0x15cc,0x1527,0x1505,0x14ee,0x158a,
+	0x15da,0x1698,0x15f8,0x14b8,0x1259,0x0f76,0x0bbb,0x06ea,
+	0x01c4,0xfc1b,0xf6f9,0xf1d2,0xee0f,0xea9c,0xe8bf,0xe7aa,
+	0xe7fe,0xe8ba,0xe983,0xeaaf,0xeb0c,0xeba8,0xeb05,0xeadf,
+	0xea07,0xe9b4,0xe9c0,0xeae6,0xecdf,0xef50,0xf2c1,0xf65e,
+	0xfaf4,0xff47,0x03d1,0x0778,0x0ad8,0x0d51,0x0ef5,0x0fe7,
+	0x0ff9,0x0fb6,0x0ec0,0x0e8c,0x0ddb,0x0e54,0x0e4b,0x0edd,
+	0x0f39,0x0f51,0x0f28,0x0e13,0x0cd3,0x0a6b,0x0829,0x04e7,
+	0x01f8,0xfe0b,0xfa9d,0xf760,0xf4bd,0xf2b1,0xf114,0xf05e,
+	0xefad,0xeff1,0xef5d,0xef19,0xeccd,0xe90f,0xe360,0xdd18,
+	0xd7f2,0xd4c1,0xd66e,0xdc42,0xe7c5,0xf64b,0x0745
+};
+
+static const UINT16 THV2[] = {
+	0x019c,0x02bf,0x01c9,0x014c,0x0064,0x00bf,0x0023,0xfff3,
+	0xff7b,0xffe9,0x013f,0x01cd,0x02cc,0x0268,0x030d,0x0280,
+	0x025e,0x010c,0xff91,0xfe8f,0xfdf1,0xfe20,0xfdc6,0xfd7a,
+	0xfc8a,0xfd77,0xfd50,0xfd28,0xfc20,0xfaee,0xfa01,0xf908,
+	0xf8b6,0xf7e3,0xf85d,0xf7fe,0xf8f5,0xf915,0xfa61,0xfb45,
+	0xfb5a,0xfbab,0xfb1e,0xfab8,0xf955,0xf97c,0xf91d,0xfa03,
+	0xfa39,0xfb6e,0xfc58,0xfd16,0xfe6e,0xfe3c,0xfe6b,0xfd9e,
+	0xfde8,0xfd5b,0xfd98,0xfd6a,0xfdd0,0xff1a,0xff94,0x00b4,
+	0x0096,0x0161,0x00e2,0x015b,0x00c1,0x006b,0x0003,0xffb9,
+	0x000f,0xffc8,0x0085,0x002c,0x00d0,0x0084,0x0102,0x00a2,
+	0x0031,0xff8b,0xfedd,0xfeb0,0xfdc0,0xfdf0,0xfd41,0xfde5,
+	0xfe02,0xfe84,0xfe6b,0xfe08,0xfdc7,0xfcfa,0xfcdf,0xfbea,
+	0xfc54,0xfbb8,0xfc30,0xfbf8,0xfc1b,0xfc06,0xfbc8,0xfc81,
+	0xfcaa,0xfd9c,0xfd28,0xfdb6,0xfd2c,0xfcf6,0xfc6b,0xfc18,
+	0xfc9c,0xfd1a,0xfe32,0xfe25,0xfe97,0xfecc,0xff6f,0xfefc,
+	0xfefb,0xfe7f,0xfecb,0xffd9,0xffd1,0xff9c,0xff07,0xffa3,
+	0xff5e,0x0061,0x005e,0x00bf,0x00cd,0x0019,0xffb3,0xfedc,
+	0xff64,0xff1e,0xffff,0xff45,0xffe3,0xffb1,0xff38,0xfe99,
+	0xfe29,0xfe58,0xfda9,0xfe81,0xfe2a,0xfefc,0xfeac,0xfe31,
+	0xfd33,0xfc59,0xfc77,0xfce8,0xfdaf,0xfcef,0xfd84,0xfd59,
+	0xfe02,0xfd83,0xfc9b,0xfbe3,0xfc33,0xfd85,0xfdf4,0xfe76,
+	0xfd17,0xfd32,0xfd2a,0xfde2,0xfdd5,0xfdda,0xfe08,0xfe11,
+	0xfee1,0xfe94,0xff47,0xfe73,0xff16,0xfe8a,0xff4d,0xff70,
+	0xffa4,0x000f,0xff8a,0x003f,0xff6c,0xff43,0xfeae,0xff6c,
+	0xff9f,0xff94,0xff53,0xff2c,0xfffd,0xff92,0xff7e,0xfeb7,
+	0xff93,0xffae,0xffd9,0xfe79,0xfd79,0xfdef,0xfe68,0xff02,
+	0xfdf5,0xfde2,0xfd32,0xfe5f,0xfe80,0xfe4b,0xfdc4,0xfd16,
+	0xfdc0,0xfdbc,0xfe02,0xfcfa,0xfd02,0xfcdd,0xfd65,0xfddf,
+	0xfe0e,0xfe17,0xfdb7,0xfe48,0xfde4,0xfe27,0xfdc6,0xfe41,
+	0xfddf,0xfdf7,0xfdbf,0xfdc8,0xfeac,0xfe81,0xff10,0xfe0b,
+	0xfe79,0xfe47,0xfeee,0xfe5a,0xfdf8,0xfdaa,0xfdea,0xfe6f,
+	0xfd8d,0xfd7a,0xfc7e,0xfcc2,0xfc8a,0xfd7a,0xfe0e,0xfeec,
+	0x000f,0x00c6,0x0167,0x00a8,0x004c,0xff3d,0xffd3,0xffb0,
+	0x002d,0x0073,0x00bd,0x017c,0x01f0,0x0295,0x01cd,0x0205,
+	0x012c,0x0144,0x007f,0xfff0,0xff3b,0xfe9b,0xff03,0xfe9a,
+	0xff5a,0xfee8,0xff9d,0xff3a,0xfee7,0xfda9,0xfc6d,0xfbe4,
+	0xfb24,0xfb0d,0xfa6b,0xfad7,0xfa5a,0xfb3f,0xfb01,0xfb1f,
+	0xfaee,0xfadb,0xfb30,0xfa82,0xfab1,0xf9c3,0xf9ce,0xf99e,
+	0xfab9,0xfb5a,0xfc1d,0xfcbf,0xfd20,0xfdcb,0xfd47,0xfd6e,
+	0xfc87,0xfcde,0xfcb9,0xfdb2,0xfdfa,0xfea5,0xff88,0xffb9,
+	0x00a8,0x003a,0x00c5,0x004c,0x00aa,0x003e,0x0018,0xffec,
+	0xffc6,0x0020,0xfff3,0x00d0,0x008c,0x012c,0x008d,0x006b,
+	0xffbd,0xff36,0xfedd,0xfe5f,0xfe73,0xfde7,0xfe52,0xfdf0,
+	0xfe7f,0xfdda,0xfdb5,0xfd86,0xfd8b,0xfd7d,0xfc75,0xfc77,
+	0xfbca,0xfc2a,0xfb7d,0xfbee,0xfbcf,0xfc67,0xfcdc,0xfd1f,
+	0xfdc9,0xfd01,0xfce3,0xfbc2,0xfc00,0xfb96,0xfc6b,0xfd11,
+	0xfd8b,0xfe4c,0xfe95,0xff7c,0xff75,0xff9b,0xfe65,0xfe20,
+	0xfd8a,0xfdd8,0xfe2d,0xfe26,0xfe5d,0xfe79,0xffef,0xfffd,
+	0x00af,0xfff8,0x0012,0xff96,0xff56,0xff02,0xfe79,0xff02,
+	0xff4e,0xffec,0xff3d,0xffd6,0xff71,0xffb6,0xff47,0xfe66,
+	0xfd93,0xfced,0xfd7c,0xfd16,0xfd62,0xfcd4,0xfde3,0xfe91,
+	0xfe99,0xfdf3,0xfd2f,0xfd3d,0xfd0a,0xfd7d,0xfc17,0xfc33,
+	0xfbe5,0xfcd6,0xfccc,0xfccc,0xfce7,0xfcf4,0xfde2,0xfd7f,
+	0xfdd1,0xfd01,0xfd89,0xfd35,0xfd29,0xfd1f,0xfd15,0xfdd9,
+	0xfdf8,0xfec9,0xfea3,0xff5c,0xff19,0xff55,0xfeb6,0xfeec,
+	0xfea9,0xfe82,0xff49,0xff37,0xffaa,0xfeac,0xff7d,0xff6c,
+	0x00c5,0x00a3,0x0020,0xffca,0xff3c,0xff6f,0xfea7,0xfea1,
+	0xfe25,0xff52,0xffae,0x0058,0xff70,0xff14,0xff5e,0xfec5,
+	0xfeb0,0xfd81,0xfdcc,0xfe13,0xff2e,0xfec7,0xfd84,0xfc45,
+	0xfc2e,0xfdb4,0xfe9b,0xff4d,0xfe25,0xfe1e,0xfd5a,0xfdda,
+	0xfce7,0xfc29,0xfc1d,0xfca9,0xfe3d,0xfe62,0xfeca,0xfdbf,
+	0xfe60,0xfdfd,0xfdf9,0xfdbf,0xfd7f,0xfe30,0xfe2a,0xfef4,
+	0xfe41,0xfe75,0xfdc6,0xfe2e,0xfe3a,0xfea4,0xfebb,0xfe59,
+	0xfe78,0xfd9e,0xfd3e,0xfbfb,0xfc05,0xfc12,0xfd4a,0xfe63
+};
+
+static const UINT16 ER2[] = {
+	0x0a4a,0x1fdb,0x366a,0x4a4d,0x5924,0x6051,0x5e93,0x54a6,
+	0x430d,0x2d47,0x157c,0x00a2,0xf112,0xe931,0xe933,0xf0a6,
+	0xfd37,0x0b71,0x185e,0x1ff9,0x2089,0x1866,0x08e7,0xf313,
+	0xda8a,0xc239,0xad95,0x9fa1,0x99cb,0x9c91,0xa687,0xb658,
+	0xc8d5,0xdbea,0xec06,0xf7e6,0xfe27,0xff15,0xfb89,0xf4ad,
+	0xedb7,0xe78d,0xe4a6,0xe51a,0xeaf9,0xf48f,0x0193,0x1029,
+	0x1eae,0x2bed,0x35e2,0x3c7a,0x3e53,0x3c40,0x35e1,0x2cf2,
+	0x21d8,0x162f,0x0b36,0x01c7,0xfaeb,0xf69b,0xf576,0xf64e,
+	0xf91a,0xfc17,0xff2e,0x0082,0xffc2,0xfc32,0xf5ed,0xed8b,
+	0xe34c,0xd944,0xcfff,0xc98d,0xc5ef,0xc6db,0xcb6a,0xd3e7,
+	0xdecd,0xeb03,0xf744,0x017e,0x0965,0x0d9d,0x0f0f,0x0d03,
+	0x0952,0x0450,0x001c,0xfdc8,0xfdf4,0x00f3,0x064e,0x0e7e,
+	0x16fd,0x1fea,0x26cf,0x2b22,0x2beb,0x2961,0x2384,0x1ac0,
+	0x10aa,0x05c4,0xfc65,0xf48c,0xef5b,0xecad,0xecf1,0xef08,
+	0xf268,0xf5ee,0xf875,0xf9e9,0xf913,0xf6f0,0xf261,0xed48,
+	0xe737,0xe23d,0xde86,0xdcb5,0xdd4a,0xe00a,0xe55e,0xec05,
+	0xf415,0xfbc4,0x0306,0x08eb,0x0d61,0x0fbf,0x100a,0x0eca,
+	0x0c4d,0x0a0a,0x0794,0x064a,0x0550,0x06c2,0x0916,0x0ca6,
+	0x1023,0x1366,0x1635,0x1733,0x16df,0x1434,0x101c,0x0a3f,
+	0x042a,0xfd47,0xf73e,0xf203,0xee5d,0xeccd,0xeca3,0xee03,
+	0xefdf,0xf2cb,0xf509,0xf723,0xf757,0xf6f5,0xf598,0xf375,
+	0xf133,0xeed4,0xed7b,0xeca8,0xedd5,0xeff3,0xf3c4,0xf833,
+	0xfd89,0x0265,0x06de,0x0a84,0x0c39,0x0c9d,0x0a5a,0x05ce,
+	0xfe74,0xf65a,0xed6e,0xe69d,0xe347,0xe4f6,0xeccb,0xfaa0,
+	0x0e49
+};
+
+static const UINT16 EH2[] = {
+	0x0315,0x1db4,0x374d,0x48e4,0x4f48,0x4910,0x3a85,0x281e,
+	0x1a94,0x156a,0x1a00,0x24e0,0x30db,0x38b4,0x3862,0x3038,
+	0x203e,0x0d02,0xf8d3,0xe7db,0xda86,0xd0ee,0xcadc,0xc7d0,
+	0xc87a,0xcb1c,0xcf97,0xd385,0xd60f,0xd47c,0xcfcd,0xc873,
+	0xc18e,0xbf03,0xc33f,0xd04d,0xe30b,0xf94f,0x0d36,0x1c14,
+	0x2247,0x2148,0x1b3c,0x1478,0x105c,0x1068,0x15ab,0x1d4a,
+	0x25c4,0x2b9d,0x2e60,0x2bc1,0x2531,0x1aa0,0x0e3b,0x016a,
+	0xf4eb,0xeade,0xe323,0xdfb2,0xdf29,0xe1ed,0xe514,0xe7b2,
+	0xe736,0xe382,0xdd94,0xd5fa,0xcffc,0xcd79,0xd156,0xd9f6,
+	0xe73b,0xf57a,0x02ab,0x0c14,0x1119,0x1216,0x0ffe,0x0d87,
+	0x0bdb,0x0d74,0x10d1,0x165a,0x1bd1,0x212f,0x2425,0x247a,
+	0x21e7,0x1be6,0x1414,0x0a52,0x00fd,0xf7e2,0xf1c1,0xee10,
+	0xed96,0xef16,0xf0ec,0xf238,0xf0e2,0xed77,0xe767,0xe14b,
+	0xdbb4,0xd9c0,0xdb19,0xe090,0xe8c1,0xf1ee,0xfaf3,0x01aa,
+	0x063c,0x07c2,0x084b,0x0717,0x0722,0x07ea,0x0a6d,0x0de4,
+	0x1235,0x16c6,0x1a30,0x1c7e,0x1bcf,0x1997,0x1441,0x0da6,
+	0x0604,0xff45,0xfa04,0xf73b,0xf6b1,0xf723,0xf86f,0xf876,
+	0xf7c3,0xf41f,0xef4a,0xe9bb,0xe55c,0xe30d,0xe315,0xe640,
+	0xeae3,0xf11f,0xf6b6,0xfc18,0xff00,0x0109,0x01a9,0x01c2,
+	0x01f4,0x0284,0x047b,0x070c,0x0b0f,0x0e92,0x1262,0x146e,
+	0x1557,0x13d1,0x10a9,0x0c62,0x0766,0x0322,0xff85,0xfdb9,
+	0xfc76,0xfcec,0xfcbb,0xfc6b,0xfac4,0xf845,0xf4ff,0xf121,
+	0xee15,0xeb4d,0xeaf4,0xeb64,0xee26,0xf15b,0xf537,0xf88f,
+	0xfba5,0xfd93,0xfe4e,0xfe4c,0xfddf,0xfe59,0xfe03,0xfd40,
+	0xf915,0xf214,0xe922,0xe21b,0xe178,0xea2a,0xfd78
+};
+
+static const UINT16 AW2[] = {
+	0xfb8f,0x0dd2,0x2005,0x3235,0x418f,0x4eab,0x5823,0x5dd8,
+	0x5ea4,0x5925,0x4e03,0x3c14,0x2613,0x0bbe,0xf10e,0xd6fe,
+	0xc0cb,0xaf61,0xa339,0x9cc5,0x9b49,0x9f4a,0xa728,0xb3e9,
+	0xc36c,0xd63d,0xe936,0xfc66,0x0d5a,0x1a9a,0x23c8,0x281c,
+	0x2996,0x2784,0x2430,0x1ef9,0x19e3,0x1474,0x0f81,0x0b04,
+	0x0735,0x04bf,0x0334,0x03a4,0x041b,0x0536,0x04ef,0x03d7,
+	0x0001,0xfaa4,0xf38f,0xeb4b,0xe311,0xda91,0xd423,0xceb6,
+	0xcc08,0xcb3f,0xcd77,0xd258,0xda9d,0xe5e0,0xf314,0x0213,
+	0x109f,0x1f28,0x2aeb,0x344d,0x397d,0x3b7b,0x39b6,0x34bc,
+	0x2cc7,0x21d2,0x15b8,0x07f1,0xfac1,0xed86,0xe2b3,0xd9df,
+	0xd451,0xd1d4,0xd1eb,0xd4ed,0xd93a,0xdfbe,0xe650,0xeded,
+	0xf4b0,0xfb82,0x00a1,0x0544,0x084e,0x09cd,0x0aa6,0x09f1,
+	0x09d8,0x0946,0x09a8,0x09f5,0x0b3c,0x0ca0,0x0e96,0x104a,
+	0x1156,0x124d,0x11e1,0x1134,0x0e77,0x0b1c,0x05e1,0xffb7,
+	0xf88e,0xf143,0xea57,0xe3b2,0xdf49,0xdbda,0xdac6,0xdaf5,
+	0xde1b,0xe281,0xe958,0xf0e1,0xf95e,0x02d1,0x0b50,0x137c,
+	0x1945,0x1e02,0x2016,0x20f9,0x1eb8,0x1b6f,0x16a3,0x10d2,
+	0x0aab,0x03fa,0xfe21,0xf859,0xf3f8,0xf004,0xee2d,0xeced,
+	0xed1a,0xee14,0xef78,0xf17c,0xf332,0xf57b,0xf6a6,0xf820,
+	0xf8df,0xfa22,0xfad8,0xfbad,0xfcc1,0xfd82,0xff0e,0x0099,
+	0x0325,0x0541,0x0857,0x0abd,0x0d8f,0x0f6b,0x10ce,0x112e,
+	0x1067,0x0f04,0x0bdb,0x088f,0x0406,0xffb0,0xfa8a,0xf5f7,
+	0xf12b,0xed57,0xeaa4,0xe8de,0xe8eb,0xe98f,0xec1a,0xef02,
+	0xf38e,0xf7f6,0xfcac,0x011e,0x051f,0x08dd,0x0b69,0x0de5,
+	0x0ec2,0x0f0f,0x0da9,0x0c4f,0x0982,0x065a,0x0192,0xfb0c,
+	0xf315,0xe994,0xe189,0xdb67,0xda0b,0xdd0d,0xe63f,0xf38d,
+	0x045c
+};
+
+static const UINT16 ZH3[] = {
+	0xfede,0x0030,0xfe52,0xfa8e,0xf8c8,0xfa22,0xfdfe,0xffb8,
+	0x00a9,0xff25,0xff1d,0xfe07,0xfc2e,0xf7eb,0xf572,0xf932,
+	0x00fa,0x07bb,0x05c3,0xfec4,0xf769,0xf806,0xfcde,0x019b,
+	0x0118,0xfe8a,0xfcbe,0xfca2,0xfdfd,0xfdb8,0x0037,0x0282,
+	0x05dd,0x044f,0xfdb7,0xf6d6,0xf58c,0xfaf3,0x0176,0x071c,
+	0x07cb,0x0623,0x001d,0xfa2f,0xf65e,0xf865,0xff3f,0x0578,
+	0x0892,0x04bd,0xfe17,0xf765,0xf72e,0xfa2d,0x007b,0x052b,
+	0x0777,0x04db,0xfd2b,0xf69a,0xf3bb,0xf8a8,0xff3e,0x04e9,
+	0x04ad,0x0174,0xfe3e,0xfbf6,0xfa46,0xf8ec,0xfb48,0xfe7e,
+	0x0272,0x007f,0xfc1d,0xf98f,0xfc63,0x00b6,0x01df,0xff21,
+	0xfaaf,0xfaf5,0xfc7e,0xfefb,0xff4b,0x0007,0x0060,0x006f,
+	0xfec0,0xfc04,0xfb52,0xfb42,0xfe65,0x0017,0x0105,0xfe61,
+	0xfcb6,0xfd92,0x011a,0x03fd,0x014b,0xfd83,0xfa8c,0xfc02,
+	0xfc89,0xfbe3,0xfaf9,0xfe98,0x0659,0x0ad2,0x06f4,0xfb32,
+	0xf3d8,0xf362,0xf951,0xfdc7,0x02a1,0x063d,0x08c0,0x0740,
+	0xfdf9,0xf447,0xeff4,0xf73b,0x00a1,0x0692,0x0465,0x001c,
+	0xfd05,0xfbf5,0xfb29,0xf927,0xfa55,0xfd33,0x016d,0x0051,
+	0xfc92,0xf91a,0xfb1d,0x0041,0x039e,0x0392,0xffb1,0xfd9e,
+	0xfbc9,0xfbfc,0xfbaf,0xfdef,0x01f4,0x0651,0x0797,0x0333,
+	0xfdbb,0xf983,0xfb0d,0xfdb7,0x01b8,0x031e,0x03e3,0x03a8,
+	0x01e3,0xff1d,0xfbd6,0xfc40,0xfdd8,0x011f,0x0140,0x005b,
+	0xfe09,0xfd29,0xfd7e,0xfdb5,0xfe60,0xfdb6,0xfe5e,0xfcf3,
+	0xfc00,0xf9dc,0xf9e8,0xfb6f,0xfdce,0xff28,0xfdee,0xfc36,
+	0xf977,0xf91d,0xf87c,0xf9d3,0xfadc,0xfcef,0xfdf5,0xfd87,
+	0xfc66,0xfa0b,0xf9f5,0xf9ec,0xfc13,0xfc7a,0xfd31,0xfcde,
+	0xfd2c,0xfd3c,0xfcf4,0xfda6,0xfd74,0xfe77,0xfdbd,0xfdfc,
+	0xfd00,0xfd67,0xfe3a,0xffa6,0x00d5,0x009c,0x00f5,0xff93,
+	0xff4a,0xfe17,0xfeb8,0xff3c,0x00e2,0x01f0,0x021b,0x019f,
+	0xfff6,0xff9e,0xfe9c,0xff7e,0xff54,0x0069,0x0070,0x00b1,
+	0x0048,0xff2e,0xfeca,0xfe47,0xff9c,0xff42,0xffb2,0xfe80,
+	0xfe19,0xfd3d,0xfd0d,0xfdd8,0xfde5,0xff16,0xfee7,0xff0f,
+	0xfd3a,0xfc8a,0xfb4f,0xfacf,0xfbc0,0xfe37,0x00ff,0xffe2,
+	0xfd49,0xf9d2,0xf9c4,0xfae3,0xfe81,0xff50,0xfe7f,0xfcdc,
+	0xfc85,0xfdea,0xfcdd,0xfae6,0xf8f4,0xfd6e,0x0251,0x0392,
+	0xfec9,0xfa06,0xfaef,0xfed9,0x0133,0xfe40,0xfd16,0xfd96,
+	0x0040,0xff98,0xfce6,0xfc5c,0xfeee,0x03b0,0x03ec,0x00b9,
+	0xfbef,0xfb61,0xfbab,0xfd94,0xff55,0x0245,0x0575,0x053e,
+	0x00fb,0xf9d7,0xf7cc,0xfa5a,0x0107,0x046e,0x049d,0x011d,
+	0xff21,0xfd8d,0xfb5a,0xfa5b,0xfa56,0xff02,0x0330,0x05a8,
+	0x031b,0xfefd,0xfa6d,0xf7cc,0xf818,0xfa0a,0xff18,0x02b0,
+	0x0505,0x02b6,0xff49,0xfbef,0xfbfc,0xfc91,0xfbc3,0xf9c8,
+	0xf82a,0xfbb1,0x0085,0x052a,0x0417,0x00c5,0xfccd,0xf9ce,
+	0xf8b7,0xf8d2,0xfbfc,0xfe69,0x0186,0x0239,0x0240,0xfea4,
+	0xfb7d,0xfb16,0xfdc0,0x009f,0xffba,0xfd35,0xf9c1,0xfa8a,
+	0xfd92,0x03a2,0x06e4,0x05fd,0x0006,0xfa2d,0xf755,0xf786,
+	0xfb37,0xfe71,0x040d,0x0746,0x0748,0x011e,0xf87f,0xf545,
+	0xf7e5,0xff95,0x04a3,0x0651,0x02c0,0xff77,0xfb02,0xf8ea,
+	0xf9a0,0xfec0,0x052f,0x06e9,0x029a,0xf919,0xf397,0xf3c7,
+	0xfb2e,0x023d,0x0642,0x056c,0x0101,0xfb5e,0xf51b,0xf373,
+	0xf656,0xff09,0x0691,0x09f5,0x05aa,0xfe4e,0xf89c,0xf6cd,
+	0xfa2e,0xfe38,0x032e,0x0556,0x05e1,0x01c5,0xfd82,0xfaa1,
+	0xfbf2,0x00a9,0x0447,0x0607,0x029d,0xff3f,0xfbc3,0xfbd4,
+	0xfd28,0x008d,0x03bb,0x04bd,0x0350,0xfe51,0xfa47,0xf7b8,
+	0xfa8e,0xfe42,0x024c,0x02e3,0x00cd,0xfd59,0xf9be,0xf869,
+	0xf84c,0xfb85,0xfe1d,0x00c5,0xff63,0xfc99,0xf8fb,0xf767,
+	0xf8a2,0xfac9,0xfdd9,0xfe47,0xfe5c,0xfb6b,0xf972,0xf7ac,
+	0xf883,0xfb23,0xfe41,0x0058,0xfeb3,0xfc99,0xf97b,0xf967,
+	0xf9fe,0xfcf7,0xfef6,0x009e,0x0048,0xfe24,0xfc71,0xfaba,
+	0xfc2d,0xfe19,0x0175,0x01e9,0x01ab,0xff9e,0xfd9e,0xfce5,
+	0xfce1,0xff07,0x0039,0x0252,0x01bd,0x0141,0xff02,0xfe29,
+	0xfddf,0xfef4,0x0092,0x00f7,0x0168,0xff9f,0xff3b,0xfde3,
+	0xfe47,0xfe7b,0xff79,0x0063,0xffd0,0xff1e,0xfd29,0xfd0e,
+	0xfc7b,0xfe1a,0xfee3,0xff90,0xfeda,0xfddd,0xfcc7,0xfb77,
+	0xfbef,0xfc27,0xfe01,0xfdec,0xfe9f,0xfd94,0xfc9d,0xfb0c,
+	0xfa40,0xfcea,0xff89,0x0149,0xfe83,0xfc0e,0xfa0d,0xfabd,
+	0xfaaa,0xfbd9,0xfe41,0x0101,0x021e,0xfeb9,0xfae7,0xf7e8,
+	0xfacd,0xfe8c,0x0254,0x0363,0x02d7,0xfffe,0xfa5b,0xf768,
+	0xf7ca,0xfe0f,0x0405,0x07e4,0x055d,0xffe3,0xf974,0xf67f,
+	0xf910,0xff94,0x0765,0x093d,0x0628,0xfd7b,0xf72d,0xf466,
+	0xf77e,0xfe3f,0x067b,0x0c92,0x0a4b,0x00e8,0xf3b9,0xef35,
+	0xf3f8,0xfed5,0x0732,0x0a50,0x08a8,0x0307,0xfc4f,0xf4e7,
+	0xf362,0xf673,0xfe40,0x043f,0x0681,0x02ed,0xfcdb,0xfa62,
+	0xfafa,0xfe58,0xff74,0xffde,0xfd34,0xfb02,0xf888,0xf80a,
+	0xfb22,0x01d0,0x0802,0x08c4,0x04a9,0xfb77,0xf48e,0xf09f,
+	0xf39b,0xfaee,0x04e1,0x0c96,0x0c61,0x04e9,0xf7a0,0xef2f,
+	0xeee7,0xf8f1,0x0557,0x0cf5,0x0a84,0x013b,0xf8ed,0xf4e8,
+	0xf7b7,0xfb89,0x0093,0x0403,0x0645,0x033e,0xfc21,0xf611,
+	0xf6ef,0xfe74,0x04c2,0x0764,0x040f,0x002b,0xfb1a,0xf6ea,
+	0xf50f,0xf8ab,0x0116,0x0988,0x0d7a,0x06a0,0xfa6b,0xeff9,
+	0xf0e6,0xf8fe,0x025e,0x0604,0x04cd,0x01b4,0xfd2b,0xf970,
+	0xf590,0xf6ba,0xfb96,0x02d5,0x048f,0x009a,0xfa6e,0xf77d,
+	0xfa50,0xfeb6,0x0319,0x030d,0x0278,0xff74,0xfcc8,0xf98b,
+	0xf8e7,0xfcca,0x0321,0x08c5,0x0796,0x0300,0xfc49,0xf9f8,
+	0xfa4a,0xfda3,0x0105,0x03af,0x05a7,0x0476,0x0179,0xfc1b,
+	0xfa92,0xfb7a,0xffc2,0x0249,0x0252,0xffc8,0xfd4c,0xfc86,
+	0xfc02,0xfd67,0xfdb3,0xff96,0xff58,0xfe6c,0xfb14,0xf874,
+	0xf857,0xfa54,0xfe47,0xff7d,0xff5b,0xfc13,0xfa60,0xf829,
+	0xf819,0xf8e1,0xfb4e,0xfe4d,0xfefb,0xfe51,0xfaad,0xf8db,
+	0xf7e1,0xfa2c,0xfc1b,0xfde0,0xfe79,0xfdea,0xfd48,0xfb35,
+	0xfb15,0xfb19,0xfd9c,0xfec6,0x0017,0xfed3,0xfd5b,0xfc9a,
+	0xfcb0,0xfe5a,0xff4b,0x0116,0x009e,0x00a0,0xfee0,0xfe02,
+	0xfd73,0xfe75,0x0089,0x0199,0x028d,0x00e1,0x0059,0xfe6c,
+	0xfe5f,0xfe69,0xffbe,0x0105,0x0167,0x018a,0xff92,0xfe9e,
+	0xfd13,0xfe37,0xfec0,0x000c,0x0013,0xffa0,0xfedb,0xfd41,
+	0xfce4,0xfc37,0xfd6b,0xfdab,0xfedd,0xfe1b,0xfdb9,0xfc9a,
+	0xfbd3,0xfc0c,0xfc4c,0xfdd9,0xfd35
+};
+
+static const UINT16 M3[] = {
+	0xffdf,0xff92,0xfeff,0xfe65,0xfdcb,0xfcc6,0xfcae,0xfc2d,
+	0xfc5c,0xfb35,0xfa80,0xf96a,0xf8b8,0xf7da,0xf71a,0xf6b7,
+	0xf681,0xf761,0xf79f,0xf87f,0xf841,0xf8dc,0xf960,0xfa3c,
+	0xfae9,0xfbb7,0xfd2c,0xfe38,0xfff0,0x0073,0x018a,0x01d8,
+	0x02bc,0x0350,0x043e,0x0501,0x05e2,0x06dd,0x0745,0x0814,
+	0x0805,0x0872,0x082d,0x0897,0x0884,0x08a9,0x088d,0x0837,
+	0x0834,0x077d,0x0741,0x0614,0x05ac,0x04d4,0x0483,0x0383,
+	0x02bf,0x01de,0x00cc,0x0066,0xff25,0xfe85,0xfd23,0xfcaa,
+	0xfb8c,0xfb13,0xfa08,0xf93a,0xf85c,0xf790,0xf707,0xf5d7,
+	0xf585,0xf4a7,0xf4c8,0xf3f6,0xf3a5,0xf2da,0xf291,0xf25f,
+	0xf20d,0xf20f,0xf1a6,0xf22c,0xf1f4,0xf275,0xf237,0xf2a5,
+	0xf2d1,0xf33a,0xf3d2,0xf410,0xf495,0xf4b5,0xf5e2,0xf610,
+	0xf708,0xf74f,0xf834,0xf891,0xf98d,0xfa7b,0xfb01,0xfbcf,
+	0xfc51,0xfdbb,0xfdfa,0xfef0,0xff1f,0xffe8,0x0082,0x016f,
+	0x021a,0x0280,0x0328,0x037e,0x0467,0x045b,0x04d9,0x04f4,
+	0x0591,0x05a7,0x05fe,0x0641,0x060d,0x0645,0x0613,0x065c,
+	0x05bb,0x05fd,0x05ca,0x05f0,0x0591,0x0544,0x0515,0x04b2,
+	0x04a2,0x03c9,0x03d8,0x0301,0x02f7,0x0240,0x01f0,0x0163,
+	0x00f1,0x0079,0xffaf,0xff70,0xfea5,0xfea6,0xfdae,0xfd47,
+	0xfc56,0xfbe1,0xfb56,0xfadf,0xfa10,0xf8a6,0xf841,0xf76e,
+	0xf755,0xf6d7,0xf721,0xf739,0xf7f8,0xf864,0xf8ed,0xf983,
+	0xf9c0,0xfb04,0xfbb3,0xfd1c,0xfddd,0xff29,0xffff,0x0155,
+	0x022c,0x02be,0x039c,0x0402,0x053d,0x0592,0x06a1,0x06d1,
+	0x07a0,0x07d2,0x0847,0x0853,0x0849,0x0899,0x085d,0x08b6,
+	0x0839,0x0822,0x077d,0x0729,0x065b,0x05e5,0x04f7,0x0443,
+	0x03b9,0x02d2,0x0293,0x014b,0x00ab,0xff58,0xfef4,0xfd86,
+	0xfcb6,0xfb9d,0xfaf7,0xfa7b,0xf964,0xf8e3,0xf78c,0xf73b,
+	0xf635,0xf5c6,0xf4f8,0xf474,0xf411,0xf3d2,0xf388,0xf2cf,
+	0xf2d2,0xf21f,0xf22e,0xf1ca,0xf20a,0xf205,0xf276,0xf297,
+	0xf2a0,0xf2ea,0xf2df,0xf380,0xf387,0xf441,0xf491,0xf58f,
+	0xf5ef,0xf6c5,0xf74a,0xf7f7,0xf8d5,0xf939,0xfa16,0xfa57,
+	0xfb87,0xfc2d,0xfd83,0xfdd7,0xfe8d,0xff2c,0xffca,0x009a,
+	0x00dd,0x01b4,0x01ed,0x0316,0x0355,0x03fe,0x0416,0x049b,
+	0x0534,0x0550,0x05ac,0x0597,0x0617,0x05cc,0x0649,0x060b,
+	0x068a,0x0659,0x0681,0x062c,0x05c8,0x05b0,0x0511,0x0534,
+	0x047b,0x0476,0x03fb,0x0406,0x0358,0x02e7,0x025a,0x018c,
+	0x0149,0x0080,0x005e,0xffb3
+};
+
+static const UINT16 N3[] = {
+	0x0115,0x0225,0x026a,0x035f,0x03e7,0x0480,0x0530,0x0598,
+	0x0649,0x0624,0x06b8,0x06b3,0x076d,0x0745,0x07a2,0x07b1,
+	0x07d4,0x07ac,0x070e,0x0722,0x0699,0x06f4,0x0673,0x0676,
+	0x0599,0x054d,0x04bf,0x042f,0x039b,0x0317,0x0313,0x0252,
+	0x01fb,0x00e8,0x0069,0xff71,0xff18,0xfe6c,0xfde9,0xfd99,
+	0xfced,0xfcad,0xfb81,0xfb13,0xf9ef,0xf98b,0xf869,0xf757,
+	0xf5b7,0xf440,0xf3b9,0xf373,0xf441,0xf4f7,0xf679,0xf6f0,
+	0xf7db,0xf84d,0xf920,0xfa27,0xfb96,0xfd42,0xfe90,0x0015,
+	0x0088,0x019e,0x021a,0x0384,0x048d,0x0600,0x0732,0x07f2,
+	0x08b0,0x088e,0x0916,0x091e,0x09f1,0x0a1d,0x0ac9,0x0ab0,
+	0x0a76,0x0a04,0x0970,0x0916,0x0852,0x0858,0x0782,0x06f5,
+	0x05b5,0x04f4,0x0394,0x02c5,0x01b9,0x00bc,0x0017,0xfec2,
+	0xfdc1,0xfc47,0xfb66,0xf9d2,0xf934,0xf844,0xf7d1,0xf6c4,
+	0xf5bb,0xf4b1,0xf354,0xf2af,0xf1c2,0xf1da,0xf13e,0xf0f7,
+	0xf027,0xefb0,0xef40,0xee90,0xeeb2,0xee90,0xef24,0xef2a,
+	0xefbb,0xef4c,0xefaa,0xefb4,0xf02a,0xf0c9,0xf155,0xf26b,
+	0xf2f9,0xf407,0xf444,0xf4ce,0xf52a,0xf652,0xf753,0xf873,
+	0xf942,0xf9e7,0xfaff,0xfb99,0xfcc1,0xfd3e,0xfe70,0xff2e,
+	0x0046,0x00ee,0x019b,0x0217,0x02c7,0x03b2,0x03ee,0x04c7,
+	0x04e0,0x05cb,0x05fe,0x06ce,0x06cf,0x06d7,0x070f,0x0729,
+	0x07d2,0x074d,0x076d,0x06f1,0x0713,0x0699,0x06c0,0x065f,
+	0x0624,0x05dd,0x055b,0x0516,0x0415,0x03f7,0x032e,0x0317,
+	0x0267,0x0205,0x014f,0x009e,0x0014,0xff64,0xfece,0xfdb4,
+	0xfda7,0xfcd1,0xfc9f,0xfb99,0xfb4d,0xfa93,0xf9be,0xf907,
+	0xf777,0xf630,0xf46f,0xf3c6,0xf319,0xf3e5,0xf4ac,0xf5ff,
+	0xf6c9,0xf764,0xf7e4,0xf864,0xf9bd,0xfab4,0xfc91,0xfdce,
+	0xff99,0x0047,0x0149,0x01b1,0x02a2,0x03f4,0x050c,0x0699,
+	0x0759,0x086e,0x0848,0x08cc,0x0901,0x098f,0x09fc,0x0a5d,
+	0x0a9e,0x0a50,0x0a65,0x098d,0x0903,0x0827,0x080f,0x0751,
+	0x0704,0x061b,0x051f,0x045b,0x0301,0x0240,0x011d,0x0092,
+	0xff2c,0xfe4f,0xfd00,0xfbe5,0xfaa9,0xf974,0xf87f,0xf761,
+	0xf6de,0xf5a2,0xf4f4,0xf396,0xf33c,0xf249,0xf1cf,0xf13f,
+	0xf0ad,0xf073,0xefbb,0xefac,0xeecc,0xeee0,0xee9a,0xef06,
+	0xef1b,0xef6c,0xef75,0xef97,0xf00f,0xefed,0xf0ab,0xf0ed,
+	0xf240,0xf2a1,0xf378,0xf39e,0xf457,0xf525,0xf619,0xf712,
+	0xf7b3,0xf8fc,0xf9c1,0xfb3d,0xfb82,0xfc67,0xfce2,0xfdfb,
+	0xff12,0xffd2,0x00a9,0x0113
+};
+
+static const UINT16 V3[] = {
+	0xfffb,0x000a,0xfeb8,0xfdfb,0xfc9c,0xfd84,0xfd78,0xfc96,
+	0xfc96,0xfbbe,0xfb5a,0xfa66,0xfa3c,0xf9f0,0xfb25,0xfafe,
+	0xfc5a,0xfcba,0xfc85,0xfc0e,0xfb1c,0xfb3f,0xfa69,0xfad3,
+	0xfa10,0xfaf4,0xfb7a,0xfc64,0xfc4f,0xfbae,0xfbfb,0xfb89,
+	0xfbfb,0xfb95,0xfc47,0xfc20,0xfd62,0xfdcb,0xfe2c,0xfdc0,
+	0xfd28,0xfd64,0xfd13,0xfded,0xfdc4,0xfeec,0xff16,0x0002,
+	0x0002,0xffbc,0xff64,0xfed0,0xff74,0xff15,0xffbb,0xff21,
+	0xfff7,0x002c,0x008e,0x0021,0xff94,0xffb0,0xff9c,0x0064,
+	0xffd3,0x0012,0xff8a,0x0017,0xfff2,0xff98,0xff18,0xfe7d,
+	0xfef5,0xfebe,0xff45,0xfe5d,0xfe95,0xfe20,0xfe62,0xfdcf,
+	0xfd1a,0xfcb6,0xfca3,0xfd51,0xfd15,0xfe1d,0xfd76,0xfde9,
+	0xfcb1,0xfc8d,0xfc83,0xfc6a,0xfca9,0xfc8c,0xfdde,0xfede,
+	0x0044,0xfe84,0xfcd3,0xfa0a,0xf97e,0xfa8d,0xfbe6,0xfd88,
+	0xfdb9,0xfedd,0xff47,0x00da,0x0050,0xfef7,0xfc93,0xfbe4,
+	0xfd5b,0xff23,0x0046,0xfeb3,0xfe41,0xfdfc,0xff7e,0xffa3,
+	0xff54,0xff98,0x0045,0x011f,0x009e,0xffe1,0xfd9d,0xfd54,
+	0xfdf2,0x0064,0x0077,0xffb1,0xffca,0x003b,0x0115,0xff68,
+	0xfdc0,0xfc53,0xfdfa,0xff22,0x00d7,0x0056,0xfff8,0x0021,
+	0xff63,0xfe95,0xfbec,0xfb55,0xfc67,0xff9d,0x00f9,0xffb3,
+	0xfcf5,0xfb9a,0xfd51,0xfe97,0xfeb8,0xfccb,0xfd72,0xff12,
+	0x013a,0x0006,0xfda0,0xfc18,0xfc0c,0xfda5,0xfd0a,0xfc20,
+	0xfb01,0xfcfd,0xfe01,0xfdb6,0xfcc8,0xfd02,0xff33,0x0093,
+	0x00b2,0xfe23,0xfcc2,0xfc80,0xfe52,0xff18,0xff70,0xfeb1,
+	0xfefc,0x0035,0xffe3,0xfea6,0xfbb4,0xfc6d,0xfdf0,0x0031,
+	0x0038,0xfeb0,0xfe16,0xff1c,0x00fd,0xff96,0xfe69,0xfdd2,
+	0x0052,0x01b4,0x0119,0xfeb5,0xfd42,0xfebb,0x0048,0x00d8,
+	0xfe11,0xfc37,0xfb70,0xfddb,0xfee6,0xfebd,0xfe42,0xfed5,
+	0x00c4,0x002b,0xfe8d,0xfb6f,0xfb77,0xfc51,0xfdf0,0xfd76,
+	0xfc9f,0xfccf,0xfd43,0xfdf0,0xfc30,0xfb63,0xfb00,0xfd5f,
+	0xff03,0x003c,0x0028,0x0022,0x0100,0x00c7,0x0073,0xfe87,
+	0xfeaf,0xff1a,0x00c5,0x0113,0x00c2,0x0059,0x0030,0x00aa,
+	0xffe9,0xfff2,0xff68,0x00ac,0x015b,0x0201,0x0127,0x001f,
+	0xff7d,0xfec1,0xfead,0xfd94,0xfde8,0xfd79,0xfe68,0xfe1d,
+	0xfdac,0xfca7,0xfbf3,0xfc4c,0xfc07,0xfc82,0xfc11,0xfccf,
+	0xfc6f,0xfcdb,0xfc08,0xfb3e,0xfa8c,0xf9fe,0xfa9a,0xfa73,
+	0xfaf6,0xfab9,0xfb9b,0xfb60,0xfbb7,0xfb69,0xfb4f,0xfbc4,
+	0xfc0a,0xfd1f,0xfcd9,0xfd9b,0xfd0a,0xfda2,0xfd2b,0xfd61,
+	0xfd15,0xfd23,0xfdcc,0xfdd2,0xfea3,0xfe39,0xfefd,0xfed9,
+	0xff83,0xff53,0xff9e,0x0006,0x000c,0x00a9,0x000e,0x008b,
+	0xff88,0xffcc,0xff49,0xff5e,0xff40,0xff4e,0xffa9,0xff99,
+	0x0077,0xfff5,0x0040,0xff27,0xff70,0xff31,0xff2a,0xfef9,
+	0xfeb2,0xfef7,0xfe65,0xfeb6,0xfdac,0xfda9,0xfccb,0xfd3e,
+	0xfd0d,0xfd20,0xfd42,0xfd55,0xfe2d,0xfd70,0xfcca,0xfba0,
+	0xfd3d,0xfe89,0xff9b,0xfe0a,0xfc07,0xfc2d,0xfc73,0xfc54,
+	0xfa12,0xfa12,0xfbff,0xffc3,0x0038,0xfdcb,0xfbdc,0xfc20,
+	0xfe3e,0xfe97,0xfdf5,0xfb99,0xfc54,0xfe74,0x008a,0xff7e,
+	0xfe2f,0xfd81,0xfe0a,0xff3f,0xfe52,0xfe22,0xfd4c,0xff27,
+	0x0026,0x0168,0x00d1,0x0038,0x0004,0xfefd,0xfeb0,0xfdf2,
+	0xff9a,0x0068,0x010d,0x003c,0xffa3,0xff74,0xffbf,0x00db,
+	0x0002,0xff10,0xfd70,0xfe2e,0xff0f,0x00fb,0x0111,0xffbb,
+	0xfdfb,0xfd15,0xfe55,0xfe64,0xfe82,0xfd09,0xfca5,0xfce8,
+	0xfdf1,0xfe64,0xfe15,0xfeb5,0xfe63,0xfe85,0xfd70,0xfd11,
+	0xfc85,0xfcfd,0xfd97,0xfe8e,0xff14,0xfdf8,0xfc65,0xfabb,
+	0xfb7c,0xfc61,0xfefc,0x004a,0x0082,0xff2d,0xfe0f,0xfd9e,
+	0xfce3,0xfd09,0xfcf5,0xff2b,0x006a,0x0082,0xfec0,0xfd54,
+	0xfd0b,0xfc65,0xfc45,0xfbfa,0xfdd4,0x0024,0x035f,0x0210,
+	0xff07,0xfcd3,0xfb43,0xface,0xfa8a,0xfb43,0xfc2f,0xffa0,
+	0x01ae,0x0159,0xfd24,0xf9d7,0xf8df,0xfa92,0xfe2b,0x0057,
+	0x0125,0x006d,0x0059,0xfe78,0xfd34,0xfbdb,0xfc78,0xfdd9,
+	0xfefe,0xffc7,0xff2e,0xff45,0xfdc9,0xfd0c,0xfb60,0xfb20,
+	0xfb04,0xfc3b,0xfdc2,0xfe40,0xfee9,0xfe3a,0xfe86,0xfde5,
+	0xfe4b,0xfe1a,0xff0e,0x0074,0x0182,0x0212,0x016e,0x0111,
+	0xff90,0xffa1,0xfed5,0xff4b,0xff94,0x009d,0x0151,0x0144,
+	0x0154,0x0071,0x008d,0xffa7,0x0033,0xff9e,0x0049,0x0048,
+	0x005d,0xffea,0xfe8e,0xfe13,0xfce8,0xfcd5,0xfc07,0xfcb2,
+	0xfca4,0xfd4e,0xfd42,0xfcb3,0xfc3b,0xfb48,0xfbae,0xfb26,
+	0xfb82,0xfb62,0xfc0c,0xfbb6,0xfbee,0xfba4,0xfaeb,0xfad1,
+	0xfa41,0xfae6,0xfabe,0xfbd0,0xfba7,0xfc32,0xfbf4,0xfc05,
+	0xfc31,0xfbdf,0xfc71,0xfc43,0xfd49,0xfd1c,0xfddd,0xfdca,
+	0xfe0c,0xfe1a,0xfe23,0xfea3,0xfea9,0xff6d,0xff3c,0xffef,
+	0xff45,0xffa6,0xff7f,0xff64,0xff85,0xffb5,0x0095,0x0059,
+	0x00e2,0x0028,0x0073,0xffe4,0x002e,0x0004,0x0014,0x0038,
+	0x0019,0x0093,0xff7f,0xff5a,0xfe90,0xfed0,0xfe6e,0xfeb2,
+	0xfea0,0xfe68,0xfea8,0xfe34,0xfe7c,0xfd61,0xfd89,0xfcde,
+	0xfd65,0xfd45,0xfd4e,0xfd7a,0xfcbb,0xfca5,0xfc06,0xfc1f,
+	0xfba8,0xfd1b,0xfdbe,0xfe0d,0xfd2b,0xfcfe,0xfd29,0xfc94,
+	0xfc1b,0xfa92,0xfb7c,0xfc49,0xfdd4,0xfe0f,0xfe4d,0xff1f,
+	0xffef,0x0016,0xfdef,0xfc2c,0xfb09,0xfd7c,0xff5d,0x00b5,
+	0xfed4,0xfd34,0xfd38,0xfeb2,0x00e1,0x0080,0x003d,0xff02,
+	0xffa6,0xfff6,0xffe3,0xff6e,0xff52,0x0021,0x00ab,0x010d,
+	0xff01,0xfe41,0xfde3,0xfeb0,0xfeaa,0xff4f,0xff82,0xffeb,
+	0x012a,0x014a,0x00de,0xfdd3,0xfcb5,0xfc76,0xfe96,0xffc5,
+	0xff66,0xfeb0,0xfe9c,0xff56,0xfe21,0xfd35,0xfb60,0xfc3e,
+	0xfdb8,0xffee,0xffea,0xfe7c,0xfda4,0xfcca,0xfc99,0xfad5,
+	0xfb08,0xfbc6,0xfe59,0x0002,0x0094,0xff2b,0xfdd8,0xfdaf,
+	0xfcea,0xfce2,0xfb8d,0xfbfd,0xfd6d,0xffe1,0x0051,0xfee7,
+	0xfd0f,0xfc6a,0xfdf8,0xfe40,0xfea6,0xfe80,0x0036,0x00aa,
+	0x00f9,0xff86,0xfe56,0xfe92,0xfe17,0xfe20,0xfcec,0xfe25,
+	0xffdc,0x015a,0x002e,0xfee7,0xfe59,0xfe0a,0xfec4,0xfeeb,
+	0x0016,0xffc7,0xffbb,0xfe38,0xfe2c,0xfe89,0xfed7,0xfe80,
+	0xfc88,0xfcd0,0xfe42,0x0106,0x0074,0xfefc,0xfca4,0xfc85,
+	0xfceb,0xfcc6,0xfc42,0xfba8,0xfd53,0xfe51,0xfec7,0xfc8b,
+	0xfb4f,0xfafd,0xfc17,0xfd3c,0xfd29,0xfdd4,0xfec3,0x00cf,
+	0x00c9,0x0070,0xfeb2,0xfef6,0xffde,0x00a4,0x00b0,0x0018,
+	0x00c9,0x00b2,0x015d,0xffb9,0xfeea,0xfe6b,0xffae,0x00cf,
+	0x0102,0x011f,0x008b,0x016e,0x00e1,0x00b7,0xfee6,0xfe71,
+	0xfe60,0xff29,0xff15,0xfdf4,0xfd75,0xfc9e,0xfd3c,0xfc6f,
+	0xfc12,0xfb74,0xfc13,0xfc8f,0xfcf9,0xfcbf,0xfbb5,0xfbd2,
+	0xfb27,0xfbad,0xfa91,0xfa9b,0xfa6c,0xfaf3,0xfb25,0xfac0,
+	0xfabf,0xfa9a,0xfbb2,0xfb95,0xfc4a,0xfbd7,0xfc87,0xfcc7,
+	0xfd07,0xfcfa,0xfc54,0xfcf6,0xfcc0,0xfda2,0xfd5d,0xfe01,
+	0xfdb1,0xfe29,0xfeaf,0xfe8f,0xfea5,0xfe54,0xff30,0xfef6,
+	0x002b,0x000f,0x00bb,0x008b,0x00c2,0x0075,0xffbd,0xffd5,
+	0xff58,0x0012,0xffc6,0x0086,0xffb2,0x000d,0xffb7,0xff89,
+	0xff8f,0xff5e,0x001e,0xffe6,0x0089,0xff82,0xff93,0xfeb4,
+	0xfe80,0xfe0f,0xfd8f,0xfda2,0xfd37,0xfe0e,0xfdde,0xfe11,
+	0xfd24,0xfd6b,0xfc31,0xfc23,0xfc38,0xfcee,0xfe72,0xfe89,
+	0xfe83,0xfc7d,0xfc25,0xfb97,0xfc43,0xfb20,0xfab2,0xfbae,
+	0xfda1,0xff4e,0xfd90,0xfc19,0xfb0d,0xfd64,0xffa8,0x00da,
+	0xff66,0xfd91,0xfdf4,0xfed5,0xff3d,0xfc0a,0xfac8,0xfb8e,
+	0xff64,0x00f7,0x0019,0xfe6b,0xfea1,0x0026,0xff84,0xfe3c,
+	0xfc21,0xfe37,0x008d,0x02c8,0x013c,0xff6a,0xfef7,0xff14,
+	0xff7a,0xfd8d,0xfcba,0xfd5f,0x0102,0x01fb,0x0056,0xfd8b,
+	0xfcd0,0xfeda,0xffd3,0x0001,0xfe5a,0xff45,0x0050,0x0187,
+	0xff7c,0xfd7f,0xfc6c,0xfcc7,0xfdb4,0xfcae,0xfc90,0xfc96,
+	0xfe78,0xfed4,0xfe3a,0xfc75,0xfbf4,0xfd36,0xfe50,0xff70,
+	0xfe4a,0xfe26,0xfdc0,0xfe6c,0xfe1d,0xfe0a,0xfdda,0xfe8d,
+	0xff79,0xfe89,0xfd07,0xfa9d,0xfb07,0xfbb3,0xfd03,0xfd53,
+	0xfd9d,0xfecb,0x0093,0x021d,0x00e0,0xff02,0xfc46,0xfd0b,
+	0xfe33,0xff29,0xfe84,0xfdcf,0xfe75,0xfeec,0xff5d,0xfd36,
+	0xfbf4,0xfb88,0xff14,0x023f,0x036a,0x018d,0xfeac,0xfe31,
+	0xfe95,0xff70,0xfd83,0xfce4,0xfd41,0xff95,0x006d,0xfe17,
+	0xfbb6,0xfb7b,0xfe79,0xffc9,0xfffe,0xfe1d,0xfe88,0xff4b,
+	0x0036,0xfe58,0xfb80,0xfac7,0xfb5f,0xfd3f,0xfc7d,0xfbe5,
+	0xfaf8,0xfcad,0xfdcd,0xfe3c,0xfdad,0xfd80,0xff8f,0x011a,
+	0x0230,0x00be,0x0079,0x003a,0x00f6,0x007d,0xff7a,0xfee3,
+	0xff0c,0x00b0,0x00b1,0x00a1,0xff66,0xfffe,0x006e,0x0118,
+	0x0095,0xfff4,0x006f,0x00b1,0x0156,0xffea,0xff1a,0xfdcd,0xfe0a,0xfda0,0xfd45,0xfcdd,0xfc77,0xfd38,0xfd1c,0xfd91,
+	0xfc31,0xfc54,0xfbd6,0xfc4c,0xfc23,0xfbd3,0xfb9f,0xfb90,
+	0xfbe3,0xfb11,0xfb45,0xfa5a,0xfaaf,0xfa8f,0xfb2c,0xfb62,
+	0xfb2e,0xfb80,0xfb61,0xfc32,0xfbd8,0xfc8f,0xfc3f,0xfcdb,
+	0xfce7,0xfd2a,0xfd7d,0xfd1c,0xfd6e,0xfd28,0xfdcf,0xfd68,
+	0xfe3b,0xfe5e,0xff1e,0xff36,0xff58,0xffaf,0xff54,0xffec,
+	0xff55,0xffc5,0xff41,0xfff2,0xffee,0x0023,0x0000,0xffcb,
+	0xffea,0xff33,0xff94,0xff23,0xffb4,0xff76,0xfffd,0xffb7,
+	0xff8f,0xff72,0xfee5,0xff30,0xfe8b,0xff29,0xfeb1,0xfef9,
+	0xfe3d,0xfe49,0xfdc1,0xfd5f,0xfd71,0xfd46,0xfde7,0xfd8f,
+	0xfe2d,0xfd18,0xfd52,0xfce5,0xfcce,0xfd43,0xfda9,0xfe5a,
+	0xfe1e,0xfe2b,0xfc56,0xfb87,0xfaf3,0xfc01,0xfc36,0xfcf9,
+	0xfda3,0xfdd4,0xfe63,0xfdef,0xfe8c,0xfd83,0xfd8c,0xfca6,
+	0xfe16,0xff50,0xff8e,0xff0f,0xfd8d,0xfd79,0xfd4f,0xfdb8,
+	0xfcf7,0xfe18,0xff58,0x0096,0x001a,0xff18,0xffaa,0x0005,
+	0x0033,0xfe33,0xfe0d,0xfe72,0x0131,0x0209,0x0060,0xfed6,
+	0xfe3d,0xffd9,0xff9c,0xfebf,0xfd5a,0xfe22,0xffc3,0x00de,
+	0xfffb,0xfed3,0xfef6,0xfea6,0xfe72,0xfcb0,0xfd37,0xfe33,
+	0x0005,0x0001,0xff66,0xfed7,0xfea9,0xfef0,0xfd9c,0xfcd3,
+	0xfbf2,0xfdf6,0xff55,0xff4b,0xfd0a,0xfb6b,0xfb4e,0xfc07,
+	0xfd9d,0xfd9d,0xfe5d,0xfe2b,0xff19,0xfea2,0xfd9f,0xfc4c,
+	0xfb95,0xfcba,0xfdaa,0xfef5,0xfeb5,0xff6b,0xff7f,0x0003,
+	0xfefa,0xfdaf,0xfcaa,0xfc47,0xfd23,0xfd1b,0xfe3e,0xfe1e,
+	0xfe59,0xfdad,0xfe72,0xff9c,0x0155,0x01cd,0x002e,0xfed0,
+	0xfde3,0xff95,0xff9e,0xff2f,0xfd71,0xfcdf,0xfd49,0xfd77,
+	0xfd20,0xfcc6,0xfe3c,0xff1e,0x00e9,0x003b,0x0004,0xffb8,
+	0x003d,0xfff4,0xfdec,0xfcea,0xfc17,0xfce4,0xfca4,0xfcd0,
+	0xfbe8,0xfc57,0xfcbd,0xfce9,0xfcce,0xfc21,0xfd06,0xfd79,
+	0xfeb2,0xfe53,0xfec7,0xfe8c,0xff66,0xffaf,0xff49,0xfef6,
+	0xfe6e,0xff99,0xffa0,0x005b,0xffbf,0x0033,0x0064,0x00b9,
+	0x00bd,0x003b,0x00b8,0x006d,0x015c,0x00ef,0x00f9,0x003e,
+	0x0041,0xffe2,0xff49,0xfef0,0xfe76,0xff05,0xfed7,0xff7d,
+	0xfe4b,0xfe2d,0xfd66,0xfd9f,0xfd43,0xfc7c,0xfc84,0xfc21,
+	0xfce5,0xfc1c,0xfc18,0xfb0f,0xfb0c,0xfad3,0xfb18,0xfb11,
+	0xfaaf,0xfb6a,0xfb45,0xfc04,0xfb21,0xfb4f,0xfadf,0xfb56,
+	0xfb91,0xfb6d,0xfbd1,0xfba3,0xfc7e,0xfc52,0xfcd9,0xfc35,
+	0xfcda,0xfcfb,0xfd90,0xfde7,0xfde8,0xfe60,0xfe40,0xff30,
+	0xfec0,0xff18,0xfe7a,0xff1b,0xff2a,0xff2c,0xff52,0xff30,
+	0xffab,0xff50,0x002c,0xffb2,0x0056,0x0011,0x006b,0x006b,
+	0x005a,0x0050,0xff93,0xffe8,0xff0c,0xffa3,0xff43,0xff60,
+	0xfefd,0xff20,0xfee4,0xfe7e,0xfec7,0xfe3d,0xfebf,0xfe4b,
+	0xfef0,0xfe69,0xfe99,0xfe39,0xfe39,0xfdd1,0xfd5f,0xfd4d,
+	0xfc24,0xfca0,0xfc5a,0xfcfa,0xfc87,0xfd15,0xfdb5,0xfdfb,
+	0xfdf7,0xfce9,0xfcfc,0xfcff,0xfe39,0xfd64,0xfcb5,0xfadd,
+	0xfa43,0xfb14,0xfc8a,0xfecc,0xff95,0x004e,0xff13,0xfeda,
+	0xfd51,0xfcda,0xfb9c,0xfbf8,0xfe17,0x0016,0x01cb,0x003d,
+	0xff5f,0xfe6f,0xfe2c,0xfd44,0xfd5c,0xfe46,0x0010,0x01fa,
+	0x01b8,0x009a,0xfd9e,0xfd3a,0xfdbe,0xff9c,0xffe3,0xff8f,
+	0x000c,0x0123,0x01d3,0xffa4,0xfe31,0xfd63,0xff0e,0xff44,
+	0xff1c,0xfd52,0xfd4b,0xfe60,0xff43,0xffd8,0xfe2f,0xfe54,
+	0xfe44,0xff36,0xff15,0xfe3f,0xfd8e,0xfde8,0xfeca,0xfdd8,
+	0xfcbf,0xfa76,0xfa92,0xfb74,0xfdc2,0xfe83,0xff1b,0xffac,
+	0x009f,0x0117,0xfe80,0xfbdd,0xf9aa,0xfbcc,0xfde4,0xff3a,
+	0xfda1,0xfbfb,0xfcff,0xfe57,0xfedb,0xfca7,0xfc4e,0xfd26,
+	0xff98,0x000c,0xfffa,0x0051,0x00c9,0x0159,0xffd8,0xfe65,
+	0xfbcf,0xfc50,0xfd2c,0xff7e,0x0059,0xffe8,0xffb2,0xfea3,
+	0xfea9,0xfdbb,0xfdfd,0xfe2a,0x0049,0x00ea,0x0216,0x01a3,
+	0x0061,0xfeaf,0xfc63,0xfca6,0xfca3,0xfd74,0xfd7f,0xfe7c,
+	0xfe6b,0xfe60,0xfdc8,0xfce3,0xfcd3,0xfce4,0xfebf,0xfeee,
+	0xff6b,0xfe96,0xfe51,0xfd21,0xfc0d,0xfb1a,0xfa81,0xfb83,
+	0xfc1f,0xfe10,0xfe63,0xff8c,0xff6f,0xfff3,0xfff4,0xffca,
+	0x0060,0x00aa,0x01c9,0x0170,0x01f3,0x009c,0x000c,0xff36,
+	0xfece,0xfebd,0xfeb7,0xff91,0xffe7,0x0110,0x0080,0x00c5,
+	0xffe0,0xffee
+};
+
+static const UINT16 Z3[] = {
+	0xffd1,0xff65,0xff75,0xfef0,0xfed1,0xfed9,0xfeb0,0xfec9,
+	0xfdba,0xfdf0,0xfd95,0xfdeb,0xfe43,0xfe93,0xfbca,0xfbed,
+	0xfbf8,0xfc81,0xff56,0xfd3e,0xfa47,0xf9e1,0xfe55,0x00ff,
+	0xfd98,0xfb32,0xfb01,0xfd76,0xfd02,0xfd97,0xfd97,0xfd7b,
+	0xfb6f,0xfb6b,0xff29,0x000d,0xfc5e,0xfa2f,0xff1c,0x025a,
+	0x006f,0xf9d5,0xf89c,0xff5c,0x06a1,0x0286,0xf84e,0xf6d5,
+	0x012a,0x0953,0x026c,0xf954,0xf858,0x00fc,0x07c5,0x0257,
+	0xfa55,0xfae9,0x00f1,0x05fd,0x0282,0xfb85,0xfa84,0xfef8,
+	0x048f,0x019e,0xfde1,0xfc53,0xfec4,0x01f2,0x00e1,0xfcc7,
+	0xfb5f,0x0081,0x02a2,0x0046,0xfb93,0xfb04,0xfea6,0x0128,
+	0xffe0,0xfbaf,0xf9aa,0xfb83,0x00fc,0x01c2,0xfefd,0xfc9b,
+	0xfbcf,0xfbfa,0xfcff,0xff04,0xfe54,0xfd6c,0xfc08,0xfd00,
+	0xfe39,0xfee4,0xfeb7,0xfb1d,0xfab0,0xfd68,0x0269,0x0094,
+	0xfc29,0xfa13,0xfbc4,0x0013,0x013d,0xfeb0,0xfb67,0xfcae,
+	0xff96,0x02b1,0x0086,0xfafc,0xf7fe,0xfe49,0x05e0,0x0403,
+	0xfbd7,0xf755,0xfb92,0x023d,0x050d,0xff7d,0xfa67,0xfb57,
+	0x01dd,0x0567,0xff52,0xfab6,0xfa18,0x0115,0x038e,0xfeed,
+	0xf9e0,0xfc4b,0x024c,0x0228,0xfd98,0xfaa8,0xfd76,0x0117,
+	0x018e,0xfca4,0xfa1c,0xfb91,0x000b,0x00b9,0xfd3f,0xfa1c,
+	0xfa5e,0xfdeb,0xfecd,0xfd99,0xfaeb,0xfc47,0xfea3,0x001f,
+	0xfe82,0xfbdf,0xfc7f,0xff06,0x017a,0x0039,0xfecd,0xfdfe,
+	0xfffd,0x0179,0x0114,0xffa1,0xfef3,0x00e7,0x01db,0x0210,
+	0x0013,0xffb5,0x001f,0x01a7,0x0193,0x0065,0xffe9,0xffdc,
+	0x0102,0x001e,0xff28,0xfd9f,0xfe4e,0xfedb,0xff27,0xfe03,
+	0xfcc6,0xfd14,0xfd38,0xfdcc,0xfc6e,0xfc0b,0xfba8,0xfc94,
+	0xfc7d,0xfbea,0xfb75,0xfafe,0xfb87,0xfb50,0xfb67,0xfa60,
+	0xfaba,0xfade,0xfb97,0xfb6f,0xfafa,0xfb20,0xfb3c,0xfc0e,
+	0xfbc7,0xfc3b,0xfb75,0xfc56,0xfc9e,0xfced,0xfcc9,0xfcab,
+	0xfd58,0xfd47,0xfe28,0xfda2,0xfe30,0xfe0f,0xfebe,0xfeae,
+	0xfeeb,0xff05,0xff40,0x0014,0xff97,0x0032,0xffbe,0x0021,
+	0xffd4,0x003d,0xfffd,0xfff2,0x0031,0x000b,0x0075,0xffcf,
+	0x002d,0xffc1,0x0017,0xffdc,0x001f,0xffd3,0xffaf,0xffa1,
+	0xfef6,0xff2a,0xfe56,0xfecd,0xfe48,0xfe9f,0xfe3e,0xfe4a,
+	0xfe39,0xfdf3,0xfe06,0xfdcc,0xff8c,0xff0a,0xfc17,0xfa1a,
+	0xfdea,0x0013,0xfd8f,0xf826,0xf845,0xfe40,0x01ab,0x00f1,
+	0xfb7b,0xf8ae,0xfae1,0xff69,0xff79,0xfb1c,0xfb1b,0xfd97,
+	0xfe7e,0xfc48,0xfd47,0xfd87,0xfd08,0xfd1f,0xff15,0x00b9,
+	0xfd7b,0xfafd,0xfc46,0x00c5,0x02a5,0x011d,0xfa94,0xf9ba,
+	0xff73,0x02e2,0x0284,0xfd1f,0xf93e,0xfc5d,0x04fe,0x06ab,
+	0xfea1,0xf65d,0xfaa0,0x0521,0x0949,0x0028,0xf821,0xfb28,
+	0x033c,0x065d,0xfe27,0xf7ee,0xfb35,0x028e,0x0626,0xff04,
+	0xf9a2,0xf965,0xffb4,0x0517,0x032c,0xfab0,0xf6f0,0xfa8a,
+	0x027e,0x046f,0xff99,0xf993,0xf88d,0xfe6d,0x0210,0x0003,
+	0xfa58,0xf899,0xfbf6,0x0201,0x0043,0xfa9d,0xfaeb,0xfd67,
+	0x001b,0x005c,0xfe0f,0xf9be,0xfb4d,0xff80,0x0177,0xff00,
+	0xfb5e,0xfd98,0x0060,0x0098,0xfb85,0xf9e5,0xfec2,0x025f,
+	0x0008,0xfd3a,0xfcd3,0xfca7,0xfea0,0xff7e,0x0016,0xfebb,
+	0xff88,0x00b0,0xfe73,0xfdcb,0x0010,0x0187,0xfdc3,0xfd04,
+	0xff37,0x0084,0xff26,0xfead,0xfccd,0xfde5,0x0074,0x012b,
+	0x0186,0xfec3,0xfb9c,0xfab7,0xff01,0x018d,0x0015,0xfc14,
+	0xfadd,0xfdb9,0x0019,0xffc1,0xfbff,0xfafb,0xfc6c,0xff4c,
+	0xfec5,0xfc23,0xfaa3,0xfbea,0xfed6,0xfee1,0xfdca,0xfbfd,
+	0xfd8e,0xffb7,0x00ca,0xff61,0xfdfe,0xfed6,0x0066,0x01d8,
+	0x0086,0xffb7,0xff25,0x00fb,0x0186,0x00cb,0xff75,0xff50,
+	0x00a6,0x0122,0x010a,0xff6a,0xff67,0xff8a,0x00a2,0x0006,
+	0xff14,0xfebd,0xff13,0xffc6,0xfec3,0xfe30,0xfcc6,0xfd6e,
+	0xfd89,0xfdbd,0xfd10,0xfc22,0xfc42,0xfc58,0xfc94,0xfb7b,
+	0xfb88,0xfb0f,0xfc00,0xfbe3,0xfbcc,0xfb3d,0xfacd,0xfb21,
+	0xfaed,0xfb50,0xfb22,0xfbb3,0xfb89,0xfc0b,0xfbaf,0xfb78,
+	0xfb4b,0xfb8e,0xfc98,0xfccb,0xfd96,0xfd19,0xfd90,0xfd27,
+	0xfd9c,0xfd60,0xfd70,0xfde1,0xfe2e,0xff37,0xfea8,0xfebe,
+	0xfe3a,0xff15,0xff3c,0xffbe,0xffb5,0xffb8,0x0040,0x0018,
+	0x008b,0xff97,0xffba,0xff60,0x003a,0x0011,0x0006,0xff9c,
+	0xff32,0xff7a,0xff46,0xffb9,0xff31,0xffa5,0xff7a,0xffe5
+};
+
+static const UINT16 NG3[] = {
+	0xffe9,0xfe8f,0xfd97,0xfe2b,0xffe0,0x034a,0x06a7,0x0a69,
+	0x0c9a,0x0e02,0x0ded,0x0de7,0x0e8b,0x0fec,0x128e,0x14e9,
+	0x1787,0x1830,0x1876,0x175d,0x16c1,0x15f4,0x15d1,0x165c,
+	0x167d,0x167f,0x1532,0x13b4,0x108f,0x0e39,0x0bd6,0x0a74,
+	0x090d,0x079f,0x05f7,0x0328,0x002a,0xfc3d,0xf94c,0xf63b,
+	0xf497,0xf2d2,0xf1bc,0xefc0,0xed9f,0xeb0f,0xe835,0xe65f,
+	0xe47d,0xe41c,0xe383,0xe3e8,0xe35e,0xe2f3,0xe240,0xe16c,
+	0xe167,0xe190,0xe2f3,0xe427,0xe622,0xe777,0xe8e8,0xe972,
+	0xeabd,0xec2c,0xee30,0xf0b2,0xf30e,0xf5e3,0xf7a8,0xf9e6,
+	0xfb3f,0xfd4c,0xfee5,0x0150,0x0355,0x05bc,0x0805,0x0954,
+	0x0ad2,0x0b61,0x0ca5,0x0d7c,0x0f20,0x101a,0x111b,0x1199,
+	0x11e6,0x11e6,0x113e,0x1112,0x1047,0x1060,0x0fb7,0x0f7b,
+	0x0e6b,0x0d4a,0x0bec,0x0a92,0x0967,0x07d8,0x06eb,0x052e,
+	0x042d,0x0258,0x00f6,0xfeee,0xfd3b,0xfbd0,0xfa83,0xf98c,
+	0xf824,0xf713,0xf589,0xf4a1,0xf344,0xf2ad,0xf198,0xf15c,
+	0xf12c,0xf0b8,0xf07e,0xefb0,0xefb1,0xef6d,0xf043,0xf054,
+	0xf12d,0xf1a7,0xf258,0xf329,0xf390,0xf438,0xf4d8,0xf67d,
+	0xf77e,0xf939,0xf9f6,0xfb36,0xfbff,0xfd1e,0xfe14,0xfef8,
+	0x0031,0x00dc,0x0191,0x009f
+};
+
+static const UINT16 OO3[] = {
+	0xf825,0x085f,0x1b57,0x2eaa,0x4237,0x53ee,0x641e,0x713d,
+	0x7a59,0x7e83,0x7d05,0x751b,0x668d,0x532b,0x3aef,0x2133,
+	0x06e2,0xee7b,0xd826,0xc54c,0xb666,0xab41,0xa486,0xa14d,
+	0xa20b,0xa55c,0xac1c,0xb3e8,0xbc57,0xc373,0xc952,0xcd68,
+	0xd046,0xd22d,0xd35e,0xd57b,0xd84e,0xddae,0xe3f6,0xec76,
+	0xf633,0x01f9,0x0ff4,0x1e6f,0x2d5d,0x3b85,0x4885,0x5290,
+	0x5953,0x5af5,0x58b6,0x51ec,0x47dd,0x3a76,0x2a5a,0x193f,
+	0x0731,0xf5f9,0xe55d,0xd769,0xcb63,0xc315,0xbe21,0xbca2,
+	0xbdc9,0xc0f1,0xc5c8,0xcb4a,0xd130,0xd667,0xdb6e,0xdf4d,
+	0xe32e,0xe630,0xe8ff,0xeb71,0xede2,0xf166,0xf556,0xfadc,
+	0x014b,0x099b,0x1277,0x1c6a,0x25bb,0x2e6c,0x3596,0x3af7,
+	0x3e63,0x3f04,0x3d1d,0x37e5,0x30ce,0x2702,0x1bef,0x0ef6,
+	0x023b,0xf5bf,0xea39,0xe07f,0xd889,0xd351,0xcfaf,0xceb8,
+	0xcf24,0xd179,0xd4c9,0xd946,0xddf8,0xe2a8,0xe71b,0xeab4,
+	0xee39,0xf0c7,0xf379,0xf55b,0xf7ad,0xfa30,0xfd93,0x0170,
+	0x05e8,0x0b54,0x10d1,0x170a,0x1c94,0x222a,0x2607,0x2965,
+	0x2ac6,0x2ac7,0x28cb,0x24d9,0x1f58,0x1816,0x1025,0x0712,
+	0xfe51,0xf568,0xedc0,0xe6d1,0xe1bb,0xde26,0xdbc5,0xdb1e,
+	0xdb74,0xdda1,0xe03d,0xe3a3,0xe6bf,0xea62,0xed2f,0xef99,
+	0xf038,0xeeaf,0xeb41,0xe632,0xe1ab,0xdef0,0xe056,0xe59c,
+	0xf053,0xfed9
+};
+
+static const UINT16 L3[] = {
+	0xfd9c,0xf9d4,0xf618,0xf46a,0xf378,0xf4c5,0xf6ca,0xfa77,
+	0xff3d,0x0533,0x0c64,0x1398,0x1b1d,0x20f1,0x25fe,0x27d3,
+	0x286c,0x26b3,0x239f,0x1edc,0x18cb,0x11f0,0x0a10,0x0293,
+	0xfaf6,0xf4fe,0xefaf,0xecb3,0xea84,0xe9a4,0xe938,0xe97a,
+	0xea65,0xeb27,0xec0a,0xebd9,0xebc0,0xe9d8,0xe849,0xe59f,
+	0xe334,0xe0ed,0xdf30,0xde93,0xde9b,0xe04c,0xe258,0xe66f,
+	0xeade,0xf14b,0xf7f8,0xff59,0x0619,0x0c2f,0x11ba,0x159a,
+	0x18e9,0x1a61,0x1b69,0x1a54,0x18bf,0x1596,0x125e,0x0ebf,
+	0x0b6d,0x088e,0x05d6,0x0410,0x024f,0x019b,0x0064,0x005c,
+	0xffc4,0xff95,0xfe96,0xfd25,0xfb2b,0xf85d,0xf5cb,0xf23b,
+	0xef0e,0xeb6c,0xe913,0xe6bd,0xe557,0xe464,0xe487,0xe647,
+	0xe87a,0xec70,0xf003,0xf4ba,0xf8c3,0xfd81,0x013c,0x051c,
+	0x0826,0x0a82,0x0c07,0x0cbd,0x0d11,0x0c07,0x0b90,0x0a62,
+	0x0a1d,0x091d,0x08ed,0x088b,0x0879,0x0896,0x0887,0x092f,
+	0x08f5,0x094a,0x0866,0x07c1,0x0587,0x032c,0x0059,0xfd68,
+	0xfa89,0xf754,0xf4a0,0xf190,0xef98,0xed54,0xeca8,0xebf7,
+	0xecaf,0xedf9,0xefbc,0xf1f1,0xf3d3,0xf66b,0xf86c,0xfb45,
+	0xfce1,0xfeec,0xffb2,0x0107,0x016b,0x01c6,0x0224,0x022f,
+	0x02cd,0x0315,0x0464,0x04c6,0x05cd,0x0627,0x0762,0x0809,
+	0x0879,0x07db,0x05b9,0x02e8,0xfe51
+};
+
+static const UINT16 J3[] = {
+	0xffff,0x0002,0xfec1,0xff55,0xfeca,0xff79,0xffb7,0x0076,
+	0x0020,0xffb2,0xff86,0xffab,0xfeee,0xfbda,0xfabc,0xfadc,
+	0xfee9,0x022d,0x0370,0x0119,0xfcae,0xf9bb,0xf96a,0xfd17,
+	0x008f,0x02cf,0x002e,0xfcdf,0xf938,0xf835,0xf9f7,0xfd49,
+	0x027c,0x051a,0x0416,0xfc75,0xf50b,0xf1a1,0xf6b5,0xfe2e,
+	0x02b2,0x03db,0x0125,0xfd30,0xf8ba,0xf6ef,0xf56b,0xf6e7,
+	0xf8fd,0xfd04,0xffb0,0xff58,0xfc3e,0xfa35,0xfcaa,0x0004,
+	0x00fc,0xfdfb,0xfcd6,0xfc8f,0xfc2a,0xfb61,0xfb86,0xff16,
+	0x0258,0x05d6,0x04f4,0x0210,0xfd09,0xf984,0xf7f9,0xf9e7,
+	0xfeef,0x02de,0x04e9,0x0318,0x00a5,0xfdb4,0xfdfd,0xfe29,
+	0xff49,0xff27,0xfdf8,0xfd99,0xfd59,0xffaa,0x011c,0x02c4,
+	0x01c5,0xffd7,0xfcea,0xfb8f,0xfd2a,0xff03,0x0049,0xff55,
+	0xff4e,0xff3e,0x016f,0x00d1,0xfea6,0xfaee,0xf938,0xfb91,
+	0xff6f,0x0381,0x03ff,0x0229,0xfc1c,0xf82b,0xf7f1,0xfbce,
+	0xffbc,0x0122,0x008a,0xff6a,0xff01,0xfc8b,0xfb96,0xfb1e,
+	0xfdff,0xff22,0xff2f,0xfd5e,0xfc16,0xfd56,0xfdea,0xffb7,
+	0xff73,0xff45,0xfd49,0xfc08,0xfaa9,0xfad3,0xfc7f,0xfe9e,
+	0x0103,0x003b,0xfee3,0xfb95,0xfa2d,0xf9a2,0xfbc8,0xfe47,
+	0x0076,0x0206,0x0159,0x001c,0xfd9c,0xfd11,0xfcd8,0xfe9a,
+	0xffd1,0x00d2,0x00c4,0xffbd,0xff8c,0xfef3,0x0057,0x00a6,
+	0x01f7,0x0168,0x00a8,0xfee3,0xfe07,0xfea8,0xff83,0x01d4,
+	0x0262,0x0306,0x010f,0xffe4,0xfdde,0xfd4c,0xfda3,0xfece,
+	0x0095,0x00c5,0x012e,0xff24,0xfe1d,0xfcaf,0xfd47,0xfda3,
+	0xfe8a,0xfecd,0xfe45,0xfdc1,0xfc04,0xfc26,0xfbbd,0xfd2e,
+	0xfd7d,0xfe17,0xfd0c,0xfbae,0xfb1a,0xfa3a,0xfb3c,0xfb68,
+	0xfce0,0xfcbc,0xfcd6,0xfb94,0xfaf2,0xfa75,0xfa71,0xfb81,
+	0xfbee,0xfd0c,0xfc6d,0xfc7a,0xfb67,0xfba0,0xfb9f,0xfc78,
+	0xfd21,0xfd22,0xfd98,0xfcdc,0xfd2e,0xfc51,0xfd2a,0xfd5a,
+	0xfe4c,0xfe75,0xfe6f,0xfe4c,0xfdc0,0xfe64,0xfdee,0xfed9,
+	0xfe94,0xff9d,0xff84,0xffaf,0xff47,0xfefd,0xff74,0xff25,
+	0x001c,0xff9e,0x0035,0xffa4,0x0035,0x0007,0xfff9,0xffbb,
+	0xff96,0xffe7,0xff80,0x0090,0xfff9,0x0090,0x0015,0x0065,
+	0xffba,0xfe8e,0xfd83,0xfdf8,0x0114,0x0236,0x0277,0xff05,
+	0xfc06,0xfa9c,0xfca6,0xff36,0xff5d,0xfed7,0xff0f,0x0218,
+	0x01f1,0xff33,0xfa05,0xf877,0xfa66,0xfec3,0x0199,0x00d9,
+	0xff0c,0xfc9b,0xfd1e,0xfbf8,0xfadc,0xfa03,0xfbf4,0xff88,
+	0x015a,0xff36,0xfb07,0xfb3c,0xfd80,0x0033,0xfd43,0xf9b8,
+	0xf951,0xfd30,0x00e1,0x001b,0xfcad,0xfa58,0xfd6b,0x002a,
+	0x0109,0xfe3c,0xfc77,0xfb25,0xfbb2,0xfbfa,0xfce2,0xffba,
+	0x01f5,0x03df,0x017e,0xfee0,0xfc46,0xfc3e,0xfbcf,0xfb49,
+	0xfb32,0xfd15,0x0218,0x0525,0x05f9,0x02a5,0xffa9,0xfcfc,
+	0xfcad,0xfc13,0xfadf,0xfa7e,0xfbf7,0x0184,0x05d3,0x0735,
+	0x02c3,0xfe20,0xfbfd,0xfd32,0xfec2,0xfda9,0xfc3b,0xfae5,
+	0xfd81,0x00d7,0x0405,0x02b4,0x00ee,0x001e,0x0036,0xfdf4,
+	0xf89f,0xf6cc,0xf8a8,0xff0a,0x0390,0x05a7,0x0333,0xffa6,
+	0xfc3a,0xfb0f,0xfb4a,0xfbe3,0xfda5,0xfe22,0xff7d,0xfe2d,
+	0xfd0f,0xfcfe,0xfebf,0x0094,0x0082,0x000a,0xfcbe,0xfa27,
+	0xf807,0xf99c,0xfc59,0x0120,0x04c8,0x05f5,0x03cb,0xfd5f,
+	0xf6e2,0xf233,0xf453,0xf9af,0x0127,0x054f,0x05ac,0x0240,
+	0xfce2,0xf8f5,0xf6db,0xf916,0xfc8d,0x0138,0x0276,0x01c3,
+	0xfec4,0xfcd6,0xfd26,0xfee5,0x01ab,0x0222,0x01d4,0xff16,
+	0xfd28,0xfb78,0xfc51,0xff50,0x0366,0x0656,0x0575,0x02d1,
+	0xfde7,0xfb94,0xfaae,0xfd57,0x007f,0x039c,0x04cb,0x0353,
+	0x00c2,0xfd23,0xfc68,0xfc75,0xfef0,0x0024,0x00f7,0xffa0,
+	0xfe17,0xfd1d,0xfc52,0xfd49,0xfddd,0xffa3,0xff40,0xfe69,
+	0xfbd4,0xfa49,0xf9c6,0xfb3e,0xfdc4,0xfeca,0xff58,0xfd62,
+	0xfc48,0xfa03,0xf995,0xf9b5,0xfb6a,0xfd2e,0xfdcb,0xfda8,
+	0xfbba,0xfb0b,0xf9dc,0xfb02,0xfb63,0xfcab,0xfce6,0xfd09,
+	0xfcbf,0xfbe1,0xfbf2,0xfba5,0xfd30,0xfd69,0xfe4a,0xfd4e,
+	0xfcbe,0xfc19,0xfc20,0xfcf9,0xfd37,0xfea6,0xfe95,0xff57,
+	0xfe66,0xfe40,0xfd6f,0xfdc9,0xfe9f,0xff64,0x0068,0xffd7,
+	0xffe2,0xfe67,0xfe8f,0xfe18,0xff1a,0xffa5,0xffde,0x001c,
+	0xff85,0xffa4,0xfecf,0xff81,0xff12,0xfff3,0xff93,0x002d,
+	0xffd8,0xff67,0xff4a,0xfe4d,0xfe2a,0xfe86,0x0180,0x0244,
+	0x01d2,0xfe7b,0xfc3c,0xfc53,0xfc88,0xfd3d,0xfd15,0x0061,
+	0x0367,0x04be,0x010c,0xfbfa,0xf80e,0xf762,0xf99c,0xfc9b,
+	0x0156,0x03f5,0x059a,0x0270,0xfd2a,0xf72c,0xf588,0xf73a,
+	0xfacc,0xff09,0x0253,0x0577,0x0359,0xfe39,0xf793,0xf667,
+	0xf90a,0xfdbf,0xff20,0xfdfa,0xfdaf,0xff63,0x0260,0x00cf,
+	0xfded,0xfaf5,0xfadd,0xfb7a,0xfbb9,0xfb6f,0xfd4e,0x0279,
+	0x05c4,0x0429,0xfcba,0xf868,0xf879,0xfc23,0xfe48,0xfee8,
+	0x012f,0x037d,0x0442,0xff1b,0xfa47,0xf8dc,0xfd38,0x0190,
+	0x0257,0xfea6,0xfa8f,0xfc07,0xff9d,0x0361,0x02dd,0x016f,
+	0xfe68,0xfd4f,0xfc95,0xfcbb,0xfcce,0xfd88,0x0073,0x0328,
+	0x052a,0x022e,0xfe38,0xf9a4,0xf8ff,0xfad4,0xfee4,0x01f2,
+	0x0284,0x0180,0xfe47,0xfc97,0xfac7,0xfc55,0xfe92,0x005f,
+	0xffa4,0xfd7f,0xfcc5,0xfd53,0x006e,0x004e,0xfe83,0xfb07,
+	0xfb2c,0xfd81,0xffce,0x0080,0xfecc,0xff50,0xfee4,0xfe4e,
+	0xfb57,0xfa0b,0xfad1,0xfd98,0x0028,0x00d7,0x0138,0x0034,
+	0xffd0,0xfce4,0xfa59,0xf80b,0xfa12,0xfd7c,0x0139,0x0243,
+	0x00ae,0xff03,0xfcb6,0xfba1,0xf9c2,0xfa37,0xfb29,0xfe30,
+	0x0031,0x00ac,0xffee,0xfebe,0xff70,0xff2e,0xffb0,0xfe6a,
+	0xfe30,0xfdc3,0xfe19,0xfe74,0xff31,0x00f4,0x0217,0x0373,
+	0x0221,0x00e2,0xfe15,0xfd62,0xfd4f,0xfec2,0x0083,0x0165,
+	0x0265,0x0200,0x019a,0xff5c,0xfecb,0xfdf5,0xfede,0xff70,
+	0xffd7,0xfff0,0xff03,0xfef8,0xfe29,0xfeb2,0xfe0a,0xfe7c,
+	0xfdf6,0xfdc6,0xfcca,0xfbef,0xfc2b,0xfc4f,0xfdc5,0xfdc3,
+	0xfe41,0xfc89,0xfbe2,0xfaca,0xfa94,0xfaa0,0xfaea,0xfc2b,
+	0xfc80,0xfd4f,0xfc07,0xfba5,0xfaa2,0xfae3,0xfb22,0xfbac,
+	0xfc36,0xfbcf,0xfc2e,0xfb85,0xfc18,0xfba7,0xfc8b,0xfcb1,
+	0xfd21,0xfd1b,0xfc9c,0xfc65,0xfbec,0xfcd7,0xfca3,0xfddf,
+	0xfde6,0xfe52,0xfe10,0xfdec,0xfdd4,0xfd9e,0xfe78,0xfe9d,
+	0xff81,0xfeac,0xfedb,0xfe4b,0xfe9e,0xfee4,0xff77,0x0028,
+	0xfff9,0x0067,0xff6d,0xff7f,0xfe7a,0xff01,0xff40,0x003a,
+	0x0094,0x0068,0x0074,0xff61,0xff85,0xfefa,0x0037,0xffb9,
+	0xff5d,0xfe3c,0xff5a,0x014e,0x01c4,0x0138,0xfde9,0xfbcf,
+	0xfa83,0xfd8d,0x0118,0x030c,0x01a6,0xff31,0xfe07,0xfc3f,
+	0xfb33,0xf9a7,0xfbbd,0xff0d,0x0361,0x0414,0x00fe,0xfc64,
+	0xf91d,0xf86c,0xf878,0xfbb0,0xff05,0x0361,0x03d2,0x0093,
+	0xfa08,0xf69f,0xf8f0,0xfddf,0x00f2,0xfe9a,0xfbd7,0xfb14,
+	0xfe67,0xff75,0xfecc,0xfc53,0xfbbc,0xfe0c,0xff0a,0xfee3,
+	0xfd24,0xfd11,0xfc1b,0xfcd3,0xfca2,0xfe2b,0x00b9,0x020d,
+	0x0066,0xfc52,0xfab1,0xfbb8,0x0034,0x0186,0x004e,0xfc10,
+	0xfabe,0xfca3,0xff17,0x0161,0x0195,0x036c,0x032d,0x00cf,
+	0xfaca,0xf67b,0xf731,0xfbb7,0x0201,0x0650,0x07ae,0x03d6,
+	0xffa1,0xfb5f,0xfb7c,0xfc6c,0xfe20,0xfdab,0xfc9d,0xfdcb,
+	0x00b0,0x04fa,0x0495,0x0193,0xfc85,0xfb52,0xfbd6,0xfcb2,
+	0xfcd4,0xfc27,0xfdf1,0x00b8,0x0341,0x0132,0xfef0,0xfd13,
+	0xfd0e,0xfcf7,0xfb88,0xfb58,0xfb99,0xfe99,0x0009,0x0160,
+	0x00b8,0xfff4,0xfd94,0xfc0d,0xfae2,0xf9e7,0xfbb9,0xfdce,
+	0x008c,0x0042,0x0028,0xfe52,0xfe46,0xfe45,0xfe0f,0xfc59,
+	0xf9d8,0xf991,0xfaaf,0xfe40,0x0080,0x0273,0x019e,0xffda,
+	0xfca7,0xf94d,0xf7d4,0xf87e,0xfcbd,0x0028,0x030e,0x0273,
+	0x014a,0xfeea,0xfd67,0xfcda,0xfd0f,0xfea0,0xffa6,0x0126,
+	0x0048,0x006e,0xff86,0x0099,0x0138,0x01cc,0x0171,0xffce,
+	0xff07,0xfd96,0xfe6c,0xfecf,0x0129,0x0279,0x038f,0x0288,
+	0x003d,0xfe3a,0xfc84,0xfd46,0xfdde,0xfff0,0x0018,0x00a0,
+	0xffbb,0xfed0,0xfda0,0xfc8d,0xfd59,0xfd57,0xfe54,0xfdca,
+	0xfda8,0xfc1f,0xfc2e,0xfc34,0xfce4,0xfd96,0xfd71,0xfd43,
+	0xfb71,0xfab5,0xf98b,0xfa56,0xfadf,0xfc99,0xfd57,0xfd63,
+	0xfced,0xfb42,0xfac2,0xf989,0xfa67,0xfae2,0xfc53,0xfc80,
+	0xfca6,0xfc4f,0xfba3,0xfbd4,0xfbbb,0xfd19,0xfcf6,0xfdb4,
+	0xfcfb,0xfc8e,0xfbef,0xfc3f,0xfd26,0xfddc,0xff6e,0xff68,
+	0xffb5,0xfe2f,0xfde5,0xfd15,0xfd71,0xfdcf,0xfeb2,0xffda,
+	0x0053,0x0124,0xfffe,0xffc9,0xfe70,0xfed9,0xff15,0xfff6,
+	0x0066,0x0032,0x0028,0xff23,0xff7b,0xfec4,0xffbe,0xffca,
+	0x00d1,0x00c5,0x0023,0xff53,0xfe5e,0xfe71,0xfe3e,0x009f,
+	0x0187,0x019e,0xfed9,0xfd2a,0xfd61,0xfedb,0x00ea,0x0031,0xfef1,0xfcf4,0xfd48,0xfc6c,0xfbc5,0xfb96,0xfe70,0x039e,
+	0x0557,0x024d,0xfb70,0xf777,0xf628,0xf8ef,0xfa95,0xfd8f,
+	0x018a,0x067a,0x0797,0x00a3,0xf769,0xf199,0xf489,0xf9e8,
+	0xff09,0x0129,0x03c8,0x0533,0x0291,0xfafd,0xf2dc,0xf3b6,
+	0xfa8c,0x02ea,0x045c,0x0102,0xfc87,0xfc18,0xfd8f,0xfd7a,
+	0xfce5,0xfc61,0xfef8,0x006c,0x0011,0xfb5b,0xf911,0xfc5a,
+	0x0252,0x0587,0x02b0,0xff31,0xfc3c,0xfc39,0xfabc,0xfaa6,
+	0xfcb4,0x0241,0x061b,0x055b,0x00dd,0xfbb3,0xfa91,0xfade,
+	0xfdd6,0x0051,0x02b8,0x0228,0xffc0,0xfd9e,0xfd20,0xfe93,
+	0xfea1,0xffd4,0x0077,0x01c2,0xff76,0xfd1a,0xfb59,0xfdb0,
+	0x00cb,0x0250,0x014d,0xfdf2,0xfcd4,0xfbe5,0xfd9e,0xfdc6,
+	0xfeee,0x0001,0x0054,0x006f,0xfedb,0xfdd9,0xfb6a,0xfa8d,
+	0xfab3,0xfe75,0x0218,0x0438,0x0301,0xff35,0xfb62,0xf86f,
+	0xf913,0xfad7,0xff26,0x018f,0x02bd,0x011a,0xfd41,0xfa49,
+	0xf989,0xfcc4,0xff10,0x00e9,0xff3d,0xfd95,0xfb6e,0xfb57,
+	0xfbc6,0xfcd1,0xfeef,0xff7c,0xff69,0xfc87,0xfab7,0xf940,
+	0xfb46,0xfe49,0x0123,0x0258,0x0134,0xffd3,0xfd11,0xfc6f,
+	0xfbf4,0xfe5b,0x0044,0x024b,0x0244,0x00b5,0xff25,0xfe05,
+	0xff4d,0x0030,0x020b,0x01d5,0x0205,0x007a,0xff66,0xfea2,
+	0xfed9,0x0073,0x015c,0x02a0,0x016e,0x0061,0xfe2e,0xfdb0,
+	0xfdaa,0xfeb9,0xffe5,0x0025,0x0095,0xff13,0xfe48,0xfcec,
+	0xfd45,0xfd46,0xfe70,0xfe98,0xfe2e,0xfd96,0xfc28,0xfbc0,
+	0xfb18,0xfc2e,0xfc6d,0xfd89,0xfd1c,0xfce6,0xfba9,0xfacc,
+	0xfada,0xfab2,0xfbbe,0xfb99,0xfcbb,0xfc16,0xfc07,0xfb05,
+	0xfada,0xfb34,0xfb53,0xfc39,0xfc0c,0xfcab,0xfb9f,0xfbfe,
+	0xfb92,0xfbf9,0xfc6e,0xfcf3,0xfd87,0xfd03,0xfd4f,0xfc86,
+	0xfd0b,0xfcad,0xfdab,0xfdf9,0xfeaf,0xfe8d,0xfdf2,0xfe21,
+	0xfdb3,0xfed4,0xfeaa,0xff91,0xff37,0xffc4,0xff62,0xff3b,
+	0xfef7,0xfeb8,0xffa2,0xff89,0x009c,0x0008,0x0028,0xff2a,
+	0xff6b,0xff58,0xff3b,0xffd3,0xff98,0x005a,0xffb0,0x004c,
+	0xffb8,0x001b,0xff82,0xff0c,0xfeee,0xfee0,0xffa3,0xff74,
+	0x009b,0x001b,0xff78,0xfced,0xfc83,0xfd2c,0xfdec,0xfe0d,
+	0xfd5f,0xfff7,0x0203,0x024e,0xfd7c,0xfa32,0xf9ec,0xfd0a,
+	0xfe32,0xfc2d,0xfba7,0xfd55,0x01ad,0x0184,0xfe70,0xfa4d,
+	0xf9fe,0xfb21,0xfbf9,0xfc07,0xfd93,0x0009,0x00ae,0xff36,
+	0xfb7c,0xfaaa,0xfb19,0xfda8,0xfe72,0xfe9c,0xfe63,0xff52,
+	0xff74,0xfcdc,0xfaf3,0xf9f9,0xfd4c,0x0036,0x0204,0x00d1,
+	0xff40,0xfe9c,0xfe3e,0xfe73,0xfc45,0xfb7e,0xfad6,0xfc7c,
+	0xfe5d,0x016e,0x042e,0x04e3,0x03ad,0xffa3,0xfc67,0xf8df,
+	0xf836,0xf883,0xfbe4,0x0120,0x06f1,0x0992,0x0546,0xfedb,
+	0xf954,0xf937,0xfa55,0xfce4,0xfd6d,0xfeab,0x0156,0x0422,
+	0x0466,0x0038,0xfc39,0xfac3,0xfe8b,0x0054,0xfe5b,0xf953,
+	0xf92e,0xfe5d,0x03a2,0x044e,0xff19,0xfbc3,0xfc06,0x003a,
+	0x00d3,0xfd28,0xf969,0xf9da,0xfea4,0x00eb,0x0044,0xfcfa,
+	0xfde0,0x001d,0x0183,0xfd93,0xf858,0xf73e,0xfb7b,0x01d1,
+	0x036a,0x017c,0xfdc8,0xfe21,0xfe62,0xfdbc,0xfb1b,0xfb43,
+	0xfe1c,0x007e,0xff48,0xfa9c,0xf8e4,0xfabe,0x00a4,0x02cc,
+	0x0151,0xfd80,0xfaf7,0xfa72,0xfa11,0xfaab,0xfbb7,0x0065,
+	0x03fd,0x0581,0x016a,0xfca9,0xfa13,0xfb2e,0xfdfb,0xff96,
+	0x0103,0x011d,0x0268,0x0141,0xffe9,0xfdf0,0xfe48,0x008d,
+	0x0241,0x025a,0xff91,0xfe42,0xfd79,0xff47,0x0054,0x0199,
+	0x01a3,0x01a3,0x00ff,0xfed7,0xfd43,0xfba7,0xfd71,0xff16,
+	0x0148,0x00c7,0xfff1,0xfe53,0xfd65,0xfd04,0xfc01,0xfc90,
+	0xfc59,0xfdef,0xfd8c,0xfd53,0xfbf6,0xfbdc,0xfc7a,0xfcd4,
+	0xfd37,0xfbe6,0xfb96,0xfa88,0xfb0b,0xfac1,0xfb80,0xfc08,
+	0xfce8,0xfd43,0xfc5c,0xfba7,0xfa01,0xfa86,0xfa90,0xfc31,
+	0xfcbb,0xfd13,0xfce5,0xfc9f,0xfc44,0xfb79,0xfc35,0xfc3c,
+	0xfd8d,0xfd5c,0xfde7,0xfd11,0xfca9,0xfcc5,0xfd31,0xfe34,
+	0xfe04,0xfedf,0xfe06,0xfe50,0xfd79,0xfdfa,0xfe30,0xfece,
+	0xffad,0xff52,0xff56,0xfe86,0xff27,0xfea4,0xff33,0xfee3,
+	0xff6f,0xffb4,0xff9b,0x0012,0xff2f,0xff54
+};
+
+static const UINT16 A3[] = {
+	0xfe94,0xee0c,0xdf91,0xda22,0xe112,0xf4ce,0x0fa5,0x28dc,
+	0x371c,0x35aa,0x25c1,0x0d26,0xf7cf,0xef3d,0xf8fe,0x11a7,
+	0x3172,0x4ab3,0x544a,0x4a2e,0x2fec,0x0f54,0xf3cb,0xe834,
+	0xee26,0x022e,0x18fa,0x28c2,0x294f,0x1990,0xfe06,0xdffb,
+	0xc8f9,0xbf0c,0xc380,0xd1d2,0xe2b8,0xee34,0xf140,0xe9fb,
+	0xdc8e,0xcd35,0xc21f,0xbe28,0xc29f,0xce97,0xde08,0xedb8,
+	0xf986,0x00b8,0x016f,0xfdc0,0xf791,0xf293,0xf1e9,0xf79d,
+	0x0379,0x12cb,0x222c,0x2cda,0x30a6,0x2bba,0x2079,0x1276,
+	0x07c8,0x03da,0x0871,0x1308,0x1efc,0x2722,0x26ae,0x1d5d,
+	0x0c20,0xf92f,0xe92e,0xe1e8,0xe39a,0xec7c,0xf7a0,0xffb5,
+	0x00c0,0xf92b,0xec24,0xdd2f,0xd23b,0xce09,0xd30e,0xdde1,
+	0xeb7a,0xf6c6,0xfcea,0xfc9e,0xf774,0xf097,0xeac7,0xea12,
+	0xee98,0xf8b1,0x0489,0x0fdc,0x17b6,0x1b4c,0x19e0,0x1486,
+	0x0e03,0x08ab,0x0733,0x098a,0x0ff0,0x1704,0x1d17,0x1f47,
+	0x1cf5,0x156a,0x0b16,0x00ac,0xf8b3,0xf624,0xf7cc,0xfd28,
+	0x0239,0x0578,0x03b9,0xfd80,0xf3af,0xe965,0xe229,0xdfc3,
+	0xe2ff,0xe99e,0xf24d,0xf896,0xfb68,0xf95b,0xf45b,0xedf8,
+	0xea17,0xea3d,0xee93,0xf6b0,0xffe6,0x0883,0x0d3c,0x0e6c,
+	0x0b82,0x0751,0x030b,0x01ae,0x0308,0x07b4,0x0da0,0x131d,
+	0x15fc,0x140b,0x0cf1,0xff99
+};
+
+static const UINT16 AY3[] = {
+	0x001c,0xfdc9,0xfa1a,0xf638,0xf356,0xf321,0xf7aa,0xffee,
+	0x0a67,0x11ce,0x1421,0x0f42,0x073e,0x0055,0x004a,0x0847,
+	0x15d7,0x23b6,0x2bac,0x2a9d,0x20c0,0x143a,0x0ac3,0x09ec,
+	0x11a8,0x1e37,0x28c0,0x2baa,0x2596,0x1815,0x09cd,0xff6f,
+	0xfd95,0x024c,0x0a8d,0x0fd9,0x0f09,0x06d7,0xfa5b,0xedf4,
+	0xe544,0xe2d7,0xe539,0xea22,0xed1c,0xed2a,0xe8b3,0xe1a3,
+	0xda10,0xd4b6,0xd31c,0xd4bc,0xd951,0xddf1,0xe215,0xe366,
+	0xe2de,0xe044,0xdd92,0xdc97,0xde54,0xe386,0xea96,0xf28e,
+	0xf822,0xfb53,0xfae5,0xf8f0,0xf6a3,0xf799,0xfc37,0x0405,
+	0x0ce8,0x13c2,0x1700,0x1567,0x11c9,0x0d43,0x0bec,0x0e01,
+	0x13f2,0x1ab5,0x1fae,0x206e,0x1c91,0x168e,0x0fce,0x0c3f,
+	0x0b90,0x0e95,0x122c,0x1495,0x1358,0x0e88,0x0795,0x00c8,
+	0xfbe3,0xf9b7,0xfabe,0xfc3a,0xfdd9,0xfcd6,0xf9c5,0xf4a1,
+	0xef5f,0xeb65,0xe958,0xe9ea,0xeb84,0xee46,0xef9e,0xefc5,
+	0xedd8,0xeb2d,0xe866,0xe73a,0xe863,0xeb94,0xf020,0xf3fa,
+	0xf700,0xf74f,0xf6b6,0xf4fc,0xf459,0xf561,0xf910,0xfe3b,
+	0x0340,0x0730,0x087f,0x0810,0x05b7,0x04b4,0x04e6,0x078b,
+	0x0b55,0x0f5a,0x11d4,0x1244,0x1109,0x0e4e,0x0c34,0x0a8c,
+	0x0af1,0x0be5,0x0e1a,0x0f49,0x0f57,0x0d20,0x09a3,0x0630,
+	0x02d8,0x0160,0x00a8,0x01d0,0x0288,0x02ab,0x00ec,0xfe2b,
+	0xfa72,0xf712,0xf537,0xf443,0xf53f,0xf671,0xf7bf,0xf762,
+	0xf5f5,0xf346,0xf11d,0xefbd,0xefc6,0xf16f,0xf386,0xf624,
+	0xf748,0xf7eb,0xf6d2,0xf5b7,0xf50a,0xf589,0xf761,0xfa38,
+	0xfd67,0xffcf,0x0163,0x00ec,0x0025,0xfeb8,0xff3d,0x00a9,
+	0x03c3,0x06cd,0x0922,0x0a27,0x08f8,0x07a8,0x0580,0x04ee,
+	0x05a9,0x07f7,0x09d8,0x0b34,0x0aee,0x0958,0x06fe,0x04a8,
+	0x0377,0x02ee,0x03f1,0x0482,0x0532,0x0452,0x02dc,0x0051,
+	0xfdf5,0xfc7e,0xfb88,0xfbd4,0xfc14,0xfccc,0xfc2e,0xfbb0,
+	0xf9f9,0xf890,0xf728,0xf65f,0xf668,0xf6e6,0xf814,0xf8ce,
+	0xf9cd,0xf985,0xf8e8,0xf7bf,0xf6fa,0xf6d4,0xf81e,0xfa54,
+	0xfc2b,0xfdbd,0xfdc6,0xfda9,0xfcb3,0xfc8a,0xfc5f,0xfda4,
+	0xff84,0x021d,0x03cb,0x03fb,0x036d,0x0219,0x015a,0xffda
+};
+
+static const UINT16 AH3[] = {
+	0xfd0b,0xfac2,0xf834,0xf6b5,0xf4d0,0xf3ca,0xf275,0xf049,
+	0xece4,0xe6b0,0xdedc,0xd5c4,0xced1,0xcbb8,0xd041,0xdc39,
+	0xefef,0x08ac,0x23f7,0x3e8b,0x55b8,0x6860,0x748b,0x7a64,
+	0x77f3,0x6de3,0x5b13,0x4165,0x2122,0xfdcb,0xdb28,0xbce1,
+	0xa613,0x9749,0x9177,0x92ee,0x9b5f,0xa81e,0xb88f,0xca97,
+	0xdd85,0xef87,0xff83,0x0c74,0x14ac,0x18cf,0x18ff,0x17f1,
+	0x15b0,0x1529,0x15f2,0x1947,0x1e30,0x23b0,0x2843,0x2ac9,
+	0x2adc,0x27ce,0x220d,0x1831,0x0b8e,0xfb6e,0xe993,0xd6a2,
+	0xc4fc,0xb63f,0xac2a,0xa854,0xaa91,0xb39b,0xc190,0xd408,
+	0xe818,0xfd97,0x11db,0x23f2,0x325e,0x3c79,0x41ec,0x41c2,
+	0x3d16,0x33ba,0x2855,0x1b1e,0x0ef4,0x03b2,0xfaf2,0xf435,
+	0xefe7,0xed24,0xeb42,0xea75,0xe980,0xe926,0xe7ee,0xe68c,
+	0xe3d2,0xe16e,0xded4,0xdd3c,0xdd2f,0xdf7c,0xe4f7,0xece8,
+	0xf7c7,0x0373,0x1054,0x1c38,0x2767,0x2f61,0x34ae,0x3645,
+	0x3466,0x2edc,0x2569,0x1964,0x0ae5,0xfc6b,0xee2d,0xe2ae,
+	0xd9a5,0xd446,0xd1e2,0xd2ac,0xd61b,0xdb47,0xe233,0xe989,
+	0xf19c,0xf898,0xff67,0x0425,0x080a,0x0a0e,0x0b4e,0x0c0e,
+	0x0c9a,0x0db5,0x0f15,0x1152,0x134e,0x1551,0x1608,0x1672,
+	0x14d9,0x121c,0x0dce,0x083b,0x0199,0xf98f,0xf130,0xe886,
+	0xe172,0xdb9d,0xd8e7,0xd829,0xda89,0xdf77,0xe689,0xeed0,
+	0xf7c8,0x0104,0x0970,0x1152,0x170e,0x1b64,0x1c95,0x1c7b,
+	0x1a0f,0x165c,0x1164,0x0c0c,0x073d,0x0287,0xff18,0xfbca
+};
+
+static const UINT16 O3[] = {
+	0x07af,0x1603,0x252d,0x347c,0x4291,0x4e5a,0x5772,0x5ce2,
+	0x5f2e,0x5d25,0x57e7,0x4f27,0x441e,0x3656,0x2613,0x1400,
+	0x00fe,0xeeb2,0xdcd7,0xcd47,0xbfb3,0xb5a2,0xadf5,0xa967,
+	0xa733,0xa75f,0xaa15,0xaed9,0xb5ed,0xbdc7,0xc6b5,0xcf77,
+	0xd877,0xe083,0xe7b5,0xee0b,0xf3c6,0xf949,0xfdc4,0x0237,
+	0x0578,0x093c,0x0c8f,0x10ac,0x1474,0x18dc,0x1d59,0x2235,
+	0x26f0,0x2b26,0x2eaf,0x3089,0x3211,0x31d7,0x307e,0x2cf0,
+	0x27e6,0x20fd,0x1863,0x0e98,0x036b,0xf80f,0xec68,0xe1c2,
+	0xd74c,0xce96,0xc6c3,0xc13b,0xbdb3,0xbc19,0xbccc,0xbfa8,
+	0xc4c5,0xcb15,0xd36b,0xdc15,0xe5b3,0xef06,0xf8ce,0x01a7,
+	0x09bf,0x10ec,0x16bb,0x1b92,0x1eb1,0x212d,0x21ca,0x21cc,
+	0x209d,0x1fb3,0x1dda,0x1bb1,0x1974,0x1704,0x152e,0x12e5,
+	0x10d5,0x0e43,0x0c39,0x09b0,0x073e,0x042e,0x00a9,0xfd0d,
+	0xf8d1,0xf472,0xef50,0xeac3,0xe5e7,0xe1ca,0xddb7,0xda75,
+	0xd822,0xd70a,0xd724,0xd829,0xda85,0xddc2,0xe2b7,0xe852,
+	0xeef9,0xf580,0xfca3,0x0398,0x0abf,0x1103,0x1624,0x1abe,
+	0x1dc5,0x2058,0x2140,0x2152,0x1fef,0x1e19,0x1b02,0x177a,
+	0x1370,0x0ed9,0x0aaf,0x0640,0x023c,0xfdbe,0xfa55,0xf6a8,
+	0xf371,0xefa2,0xeb4b,0xe641,0xe03f,0xdab0,0xd5f8,0xd39c,
+	0xd363,0xd674,0xdb51,0xe2ef,0xec08,0xf716,0x03c6
+};
+
+static const UINT16 I3[] = {
+	0xff25,0xf8fe,0xf2ef,0xedd8,0xee2b,0xf5e6,0x04f0,0x1870,
+	0x2ab1,0x365f,0x37c3,0x3085,0x237e,0x17d9,0x1216,0x1662,
+	0x23d4,0x3552,0x4448,0x4af9,0x476a,0x39af,0x27f5,0x1669,
+	0x0ae9,0x0603,0x07e8,0x0ce5,0x1142,0x1186,0x0c8b,0x0316,
+	0xf628,0xe8f1,0xdc05,0xd2a2,0xcc58,0xcaca,0xcc79,0xd09a,
+	0xd595,0xd92c,0xda90,0xd7a3,0xd19b,0xc9f0,0xc509,0xc478,
+	0xcab8,0xd65a,0xe528,0xf389,0xfdea,0x02fc,0x01ef,0xfe4b,
+	0xfa1c,0xfa5a,0xff47,0x098c,0x15f5,0x224f,0x2b8f,0x2fb6,
+	0x2ee3,0x29c0,0x2364,0x1d1e,0x1a05,0x1944,0x1b75,0x1ec4,
+	0x21c9,0x22c8,0x2089,0x1b4a,0x1254,0x0896,0xfe2c,0xf644,
+	0xf106,0xefa3,0xf0c8,0xf369,0xf535,0xf43b,0xf039,0xe905,
+	0xe114,0xd999,0xd5ea,0xd5e5,0xda90,0xe194,0xe984,0xefcd,
+	0xf2cb,0xf2e4,0xf053,0xee03,0xec76,0xeeac,0xf3d6,0xfc16,
+	0x0500,0x0d72,0x13b5,0x16b0,0x171d,0x14f4,0x12c5,0x10e1,
+	0x119a,0x13ad,0x177c,0x1b97,0x1f45,0x2138,0x2077,0x1d39,
+	0x177f,0x1168,0x0af0,0x06cf,0x044e,0x0463,0x055e,0x06c5,
+	0x06ac,0x040b,0xff34,0xf85c,0xf19a,0xeb71,0xe89d,0xe82a,
+	0xeaaf,0xee25,0xf17f,0xf304,0xf26b,0xf052,0xed2b,0xeafb,
+	0xe9a8,0xeb9f,0xef27,0xf4c0,0xfa67,0xff2e,0x0281,0x03fd,
+	0x03e4,0x018d,0xfdd2
+};
+
+static const UINT16 U3[] = {
+	0xffc9,0x04df,0x0a9b,0x1083,0x16db,0x1bd2,0x2007,0x2304,
+	0x24dc,0x2521,0x2416,0x21ed,0x1eed,0x1b91,0x1764,0x12e9,
+	0x0d6d,0x0851,0x0328,0xfecd,0xfabb,0xf77d,0xf553,0xf3e2,
+	0xf308,0xf223,0xf1a6,0xf0f0,0xf0ac,0xf015,0xef90,0xee71,
+	0xed28,0xebb5,0xe9a5,0xe705,0xe3af,0xe0cf,0xddab,0xdb7f,
+	0xd9bb,0xd89a,0xd809,0xd85a,0xd9b1,0xdb8c,0xde1f,0xe13a,
+	0xe58f,0xea2c,0xefa0,0xf4a8,0xf9d1,0xfe3f,0x028d,0x0606,
+	0x08f8,0x0b3a,0x0ce4,0x0e8b,0x0f5b,0x0fd5,0x0f92,0x0f48,
+	0x0ece,0x0e98,0x0e37,0x0dc8,0x0dfb,0x0e60,0x0f37,0x0f96,
+	0x1037,0x107b,0x111a,0x1165,0x111d,0x109f,0x0fba,0x0e72,
+	0x0c6c,0x0a53,0x0742,0x0408,0x004c,0xfd20,0xf994,0xf659,
+	0xf35d,0xf073,0xee2f,0xebff,0xeaa1,0xe99c,0xe979,0xe97a,
+	0xea2e,0xeb2e,0xec7e,0xedf2,0xef21,0xf0a3,0xf1a4,0xf2e7,
+	0xf3d8,0xf517,0xf5c8,0xf65c,0xf6ce,0xf737,0xf7c5,0xf84b,
+	0xf930,0xfa19,0xfb68,0xfca3,0xfe70,0x001d,0x0222,0x0410,
+	0x0633,0x085c,0x0a78,0x0c6e,0x0dc9,0x0f1f,0x0f7b,0x1013,
+	0x0ff0,0x0fb0,0x0eed,0x0dfd,0x0c92,0x0ae9,0x090f,0x06a8,
+	0x04b3,0x01de,0xfef2,0xfb01,0xf74a,0xf3eb,0xf12f,0xef5c,
+	0xee7e,0xef78,0xf14e,0xf485,0xf844,0xfcf7,0x01ed
+};
+
+static const UINT16 Y3[] = {
+	0x0209,0x0389,0x0316,0x012c,0x0064,0x00ce,0x041d,0x08db,
+	0x0e8b,0x1292,0x13e1,0x1268,0x0eff,0x0bdc,0x0a6a,0x0c88,
+	0x1030,0x14ad,0x172d,0x176c,0x1431,0x0f58,0x0ab8,0x082a,
+	0x08a1,0x0b0e,0x0e5b,0x0f66,0x0e51,0x0a4f,0x055d,0x004d,
+	0xfd04,0xfc61,0xfdc4,0xffff,0x0106,0x0046,0xfc75,0xf87c,
+	0xf424,0xf17d,0xf065,0xf16c,0xf35c,0xf4f1,0xf591,0xf3d8,
+	0xf175,0xee45,0xec66,0xebbc,0xed1f,0xef34,0xf1f4,0xf3f2,
+	0xf478,0xf3f5,0xf205,0xf0dd,0xf05c,0xf1fc,0xf457,0xf807,
+	0xfb0d,0xfd1f,0xfd75,0xfc74,0xfb62,0xfac0,0xfba4,0xfd69,
+	0x00cc,0x0330,0x0480,0x02a7,0xfe4e,0xf96b,0xf71a,0xf9f8,
+	0x0137,0x0b46,0x137a,0x1781,0x1452,0x0d37,0x0560,0x01f4,
+	0x0564,0x0f20,0x1b0b,0x23e5,0x263d,0x2077,0x168a,0x0c51,
+	0x07c4,0x0a63,0x1347,0x1d6e,0x23a0,0x229d,0x1a2a,0x0e91,
+	0x03ba,0xfe98,0xffc3,0x0670,0x0d50,0x10f4,0x0e71,0x05c2,
+	0xfa8e,0xf064,0xeb64,0xeb63,0xf023,0xf4ef,0xf7ef,0xf61c,
+	0xf034,0xe813,0xe090,0xdc8c,0xdc41,0xdfe8,0xe44d,0xe87f,
+	0xe978,0xe7aa,0xe35a,0xdf21,0xdc25,0xdc1b,0xdf9e,0xe482,
+	0xea08,0xedd9,0xefb1,0xeed4,0xed50,0xeb47,0xeb0c,0xed26,
+	0xf1af,0xf836,0xfdc8,0x0205
+};
+
+static const UINT16 R3[] = {
+	0x07f0,0x1a04,0x2aac,0x3825,0x3fe7,0x4174,0x3be6,0x2fa9,
+	0x1fc6,0x0dcf,0xfe1c,0xf1a9,0xebf4,0xebb4,0xf1da,0xfbf6,
+	0x0803,0x1308,0x19c9,0x1bac,0x16a3,0x0c7e,0xfc79,0xea85,
+	0xd7e3,0xc861,0xbd3d,0xb80c,0xb905,0xbf39,0xca4f,0xd6eb,
+	0xe436,0xeecc,0xf6e8,0xfac2,0xfaf1,0xf80f,0xf32e,0xedc2,
+	0xe94c,0xe779,0xe7e9,0xec07,0xf21e,0xfb40,0x0515,0x0f7e,
+	0x185a,0x1fa8,0x24a4,0x26d4,0x2670,0x22c8,0x1e09,0x173a,
+	0x1052,0x08f9,0x0318,0xfe43,0xfb18,0xf9b3,0xf9bf,0xfba3,
+	0xfd75,0xffc0,0x0078,0x00a7,0xfe23,0xfa64,0xf4b7,0xeda5,
+	0xe64d,0xdf37,0xda59,0xd6d8,0xd6e4,0xd8e5,0xde3f,0xe52f,
+	0xedab,0xf5ea,0xfd33,0x02aa,0x0590,0x06b1,0x04f6,0x025d,
+	0xfe8e,0xfc02,0xf9ea,0xfa83,0xfcc7,0x0100,0x0705,0x0d8b,
+	0x1436,0x18d3,0x1c55,0x1c96,0x1b42,0x1705,0x114a,0x0a64,
+	0x037e,0xfd86,0xf880,0xf582,0xf3e5,0xf496,0xf5b5,0xf7f0,
+	0xf98c,0xfb23,0xfb67,0xfa9d,0xf8b4,0xf52d,0xf18e,0xed6f,
+	0xea7c,0xe77f,0xe647,0xe618,0xe82d,0xeb45,0xef96,0xf49d,
+	0xf97f,0xfe85,0x0238,0x0589,0x06d5,0x0795,0x069c,0x0589,
+	0x03d2,0x0277,0x018e,0x013f,0x0250,0x038a,0x0624,0x0806,
+	0x0a58,0x0a7a,0x0977,0x0552,0xfeda,0xf6b8,0xedff,0xe767,
+	0xe330,0xe476,0xea44,0xf5f4,0x0523
+};
+
+static const UINT16 E3[] = {
+	0x04e5,0x05e5,0x03f4,0x0026,0xfe7f,0xffd6,0x055a,0x0c87,
+	0x138d,0x181f,0x18bb,0x1662,0x1239,0x0fa2,0x0f00,0x11a2,
+	0x157b,0x1a02,0x1cb7,0x1cca,0x19e1,0x155d,0x114c,0x0e0d,
+	0x0d70,0x0e43,0x1065,0x11a1,0x1194,0x0ee9,0x0a76,0x0509,
+	0x0016,0xfd48,0xfc4f,0xfd9a,0xfee3,0xffde,0xfe3b,0xfac5,
+	0xf560,0xf065,0xecd7,0xec01,0xedeb,0xf063,0xf2c4,0xf2aa,
+	0xf0a4,0xec98,0xe922,0xe694,0xe69d,0xe8eb,0xeca5,0xf0c3,
+	0xf29e,0xf2f0,0xf0b7,0xee5c,0xecaf,0xed89,0xf022,0xf49b,
+	0xf909,0xfc6a,0xfe05,0xfd61,0xfc24,0xfa80,0xfaa8,0xfc54,
+	0x0034,0x03b2,0x060e,0x04ba,0x0085,0xfb16,0xf743,0xf90b,
+	0x006e,0x0c2e,0x16a6,0x1c75,0x1a3a,0x12f8,0x0a91,0x0659,
+	0x0984,0x134c,0x209a,0x2acb,0x2e37,0x28df,0x1e57,0x1351,
+	0x0e8d,0x1163,0x19e6,0x23a9,0x2940,0x2862,0x2020,0x1503,
+	0x0a3f,0x0497,0x04ae,0x0990,0x0ecc,0x10b2,0x0da4,0x058d,
+	0xfb8f,0xf22a,0xecca,0xeacb,0xecc2,0xef0d,0xf076,0xeed2,
+	0xea92,0xe4a2,0xde08,0xd93a,0xd667,0xd719,0xd96e,0xdd2e,
+	0xdfd8,0xe0e3,0xdefe,0xdb31,0xd71d,0xd4b6,0xd5f7,0xda45,
+	0xe121,0xe766,0xebf7,0xecbd,0xeaf7,0xe790,0xe5fa,0xe7da,
+	0xed6f,0xf5ec,0xfd7f,0x031b
+};
+
+static const UINT16 W3[] = {
+	0xffd0,0x01a6,0x02ca,0x0443,0x0534,0x064a,0x06e9,0x0766,
+	0x0772,0x079e,0x07bb,0x0758,0x0783,0x0750,0x07ca,0x07e7,
+	0x0868,0x08a4,0x0920,0x098c,0x09d8,0x09fe,0x0a60,0x0a95,
+	0x0a9a,0x0acb,0x09a7,0x0881,0x067b,0x0417,0x0110,0xfe0d,
+	0xfb2e,0xf87e,0xf6b1,0xf507,0xf418,0xf303,0xf377,0xf44c,
+	0xf641,0xf8ba,0xfbff,0x0050,0x053f,0x0ab9,0x0fb0,0x14ea,
+	0x198f,0x1e4c,0x2238,0x25af,0x27f2,0x295c,0x29dc,0x294d,
+	0x278a,0x2406,0x1fd0,0x1a44,0x144e,0x0d62,0x0655,0xfeab,
+	0xf714,0xefc3,0xe87f,0xe194,0xdb0a,0xd5c6,0xd140,0xce1b,
+	0xcb8f,0xca45,0xc9e2,0xcab9,0xcca3,0xced6,0xd1e4,0xd540,
+	0xd9d7,0xde41,0xe319,0xe76e,0xec4c,0xf026,0xf35f,0xf6f0,
+	0xf9c0,0xfc91,0xfe79,0x0051,0x0154,0x0274,0x02d1,0x038c,
+	0x03da,0x040e,0x0454,0x0468,0x0561,0x06d5,0x07ed,0x08b4,
+	0x0a65,0x0bde,0x0dcf,0x0f83,0x1134,0x1331,0x14d6,0x1698,
+	0x17ac,0x187e,0x189d,0x18c1,0x17d2,0x16ba,0x14dc,0x12af,
+	0x0fe4,0x0cd0,0x094d,0x0523,0x0121,0xfca0,0xf881,0xf41a,
+	0xf061,0xecaf,0xe97e,0xe6cf,0xe470,0xe2bb,0xe16b,0xe11b,
+	0xe11a,0xe222,0xe333,0xe502,0xe703,0xe967,0xec19,0xeec6,
+	0xf1b2,0xf487,0xf7a6,0xfa64,0xfd11,0xff17,0x014d
+};
+
+static const UINT16 AE3[] = {
+	0xf65c,0xe467,0xd394,0xccc1,0xd3d3,0xec0f,0x1011,0x36c3,
+	0x5433,0x6044,0x58b6,0x3f6c,0x1fac,0x0375,0xf675,0xfa9b,
+	0x0e8f,0x2784,0x3ad8,0x3fc7,0x3372,0x1885,0xf517,0xd439,
+	0xbc01,0xb1d9,0xb401,0xc014,0xcf3c,0xde3c,0xe8a4,0xedbe,
+	0xed33,0xe844,0xe12b,0xd9ed,0xd73d,0xd9ee,0xe4e0,0xf68a,
+	0x0e52,0x25c7,0x37f3,0x3f2e,0x3a17,0x2a73,0x1484,0x0084,
+	0xf2f5,0xf0b5,0xf85d,0x0722,0x147c,0x1ade,0x1586,0x05d3,
+	0xef59,0xd821,0xc6e1,0xbe5b,0xc191,0xcd20,0xdea3,0xeeb4,
+	0xfb8a,0x01db,0x02d3,0xff11,0xf90b,0xf430,0xf27f,0xf6a4,
+	0xff25,0x0c50,0x19f7,0x26a1,0x2e50,0x2fbb,0x28b3,0x1b29,
+	0x0a8a,0xfb20,0xf0c2,0xec5f,0xef84,0xf660,0xff3c,0x03fd,
+	0x0345,0xfaec,0xee1d,0xe052,0xd5ab,0xd165,0xd3f2,0xde41,
+	0xec6b,0xfbde,0x077c,0x0ed4,0x0fe9,0x0d1b,0x07b8,0x02bb,
+	0x004d,0x0161,0x06c9,0x0e25,0x16bb,0x1c8f,0x1f8a,0x1cee,
+	0x162f,0x0af3,0xfe7b,0xf32c,0xeb45,0xe824,0xe987,0xef50,
+	0xf53f,0xfab6,0xfb88,0xf8df,0xf221,0xeab4,0xe4b0,0xe2bc,
+	0xe5f6,0xede0,0xf98d,0x04d4,0x0ee0,0x13ee,0x1528,0x1165,
+	0x0c73,0x06f7,0x03b8,0x02d4,0x051c,0x0965,0x0d34,0x105a,
+	0x1055,0x0e0b,0x076d,0xff59,0xf5e5,0xee2c,0xe90f,0xe7cc,
+	0xea12,0xeed8,0xf503,0xf972,0xfc7d,0xfb9b,0xf917,0xf4d7,
+	0xf1e3,0xf103,0xf3e4,0xf9a2,0x01a4,0x099d,0x0fae,0x129e,
+	0x0fc0,0x080a,0xf957
+};
+
+static const UINT16 UH3[] = {
+	0x032d,0x1663,0x2bad,0x4172,0x540d,0x63a3,0x6e13,0x7435,
+	0x74d6,0x6f83,0x63a1,0x508a,0x3751,0x18e3,0xf940,0xda72,
+	0xc108,0xad3c,0xa0d9,0x9ad5,0x9ab5,0x9eec,0xa5d2,0xaf11,
+	0xb9ed,0xc6c7,0xd2ff,0xdf0a,0xe845,0xef50,0xf39a,0xf60b,
+	0xf836,0xfb8e,0x01bf,0x0a1d,0x153f,0x20f8,0x2d6f,0x37ae,
+	0x3fef,0x4499,0x4653,0x4445,0x3ddf,0x3348,0x23d3,0x1180,
+	0xfbfb,0xe67e,0xd1e1,0xc13e,0xb4c2,0xae04,0xac72,0xaf39,
+	0xb649,0xbfc3,0xcb86,0xd7f5,0xe5c9,0xf263,0xfe31,0x0770,
+	0x0e67,0x12d8,0x1516,0x1642,0x169c,0x17ee,0x19ad,0x1d50,
+	0x20b9,0x2472,0x26cc,0x2871,0x2879,0x2606,0x21ac,0x1a7c,
+	0x11c4,0x0690,0xf9fc,0xeba7,0xddd4,0xd173,0xc7e5,0xc1cb,
+	0xbf56,0xc115,0xc5f4,0xce9c,0xd891,0xe40a,0xefae,0xfbca,
+	0x06d1,0x1086,0x1828,0x1d07,0x1ff8,0x201a,0x1f3e,0x1ccc,
+	0x1a92,0x183a,0x16f2,0x1597,0x149e,0x135e,0x1182,0x0f64,
+	0x0bbc,0x07dd,0x023c,0xfc7a,0xf543,0xedc2,0xe5b1,0xde61,
+	0xd820,0xd3f5,0xd248,0xd2c9,0xd6ab,0xdc0f,0xe426,0xeceb,
+	0xf6a2,0x0051,0x099f,0x1204,0x1883,0x1d67,0x1f9c,0x2062,
+	0x1ea1,0x1c18,0x1810,0x1424,0x0fe3,0x0bf7,0x0875,0x053b,
+	0x02da,0x0008,0xfdee,0xfb39,0xf908,0xf5fe,0xf2f9,0xef50,
+	0xebd2,0xe854,0xe53c,0xe35f,0xe23d,0xe32a,0xe4e7,0xe88e,
+	0xec84,0xf14f,0xf47b,0xf50c,0xf28a,0xee62,0xeb6b,0xeba2,
+	0xf214,0xfde6
+};
+
+static const UINT16 IU3[] = {
+	0x0203,0xff99,0xfc13,0xf8d0,0xf6a9,0xf80d,0xfcfd,0x06a9,
+	0x12c9,0x20aa,0x2d5d,0x37ef,0x3ee2,0x41c5,0x40ea,0x3d01,
+	0x37e0,0x3169,0x2b72,0x24f8,0x1f42,0x19b2,0x151d,0x112b,
+	0x0e7a,0x0cc5,0x0b4f,0x0a4d,0x07e7,0x045b,0xfda6,0xf4ff,
+	0xe9dd,0xde00,0xd239,0xc83d,0xc0dd,0xbc81,0xbbba,0xbd51,
+	0xc15f,0xc5e7,0xcb73,0xd064,0xd4f4,0xd8ed,0xdc3e,0xdf3f,
+	0xe19d,0xe439,0xe60f,0xe8b6,0xeb46,0xefcb,0xf573,0xfd0e,
+	0x05a6,0x0f39,0x18b8,0x20f6,0x27c3,0x2b9e,0x2dac,0x2c7f,
+	0x2a44,0x267a,0x228a,0x1eac,0x1b5c,0x18b8,0x1643,0x14b5,
+	0x12ce,0x11ac,0x0fbb,0x0e03,0x0b03,0x0749,0x0275,0xfc00,
+	0xf491,0xed20,0xe61c,0xdf73,0xdaac,0xd732,0xd642,0xd67f,
+	0xd860,0xdb02,0xde36,0xe1a1,0xe457,0xe6c9,0xe884,0xeacc,
+	0xeb8c,0xed10,0xee21,0xeffd,0xf297,0xf63f,0xfad0,0xffcd,
+	0x05c2,0x0b67,0x1165,0x1617,0x1a49,0x1c8f,0x1dda,0x1d7c,
+	0x1c78,0x1aaa,0x1819,0x15d2,0x1344,0x11bf,0x1056,0x0f9b,
+	0x0e8c,0x0df7,0x0cdd,0x0b53,0x0929,0x0600,0x025a,0xfd60,
+	0xf902,0xf426,0xf028,0xec23,0xe92b,0xe713,0xe633,0xe64f,
+	0xe6f5,0xe86d,0xe9ca,0xec02,0xed8f,0xef23,0xefce,0xf09f,
+	0xf13b,0xf229,0xf35c,0xf45a,0xf633,0xf85f,0xfb94,0xfe39,
+	0x012b,0x0244,0x0216
+};
+
+static const UINT16 THV3[] = {
+	0x019c,0x02bf,0x01c9,0x014c,0x0064,0x00bf,0x0023,0xfff3,
+	0xff7b,0xffe9,0x013f,0x01cd,0x02cc,0x0268,0x030d,0x0280,
+	0x025e,0x010c,0xff91,0xfe8f,0xfdf1,0xfe20,0xfdc6,0xfd7a,
+	0xfc8a,0xfd77,0xfd50,0xfd28,0xfc20,0xfaee,0xfa01,0xf908,
+	0xf8b6,0xf7e3,0xf85d,0xf7fe,0xf8f5,0xf915,0xfa61,0xfb45,
+	0xfb5a,0xfbab,0xfb1e,0xfab8,0xf955,0xf97c,0xf91d,0xfa03,
+	0xfa39,0xfb6e,0xfc58,0xfd16,0xfe6e,0xfe3c,0xfe6b,0xfd9e,
+	0xfde8,0xfd5b,0xfd98,0xfd6a,0xfdd0,0xff1a,0xff94,0x00b4,
+	0x0096,0x0161,0x00e2,0x015b,0x00c1,0x006b,0x0003,0xffb9,
+	0x000f,0xffc8,0x0085,0x002c,0x00d0,0x0084,0x0102,0x00a2,
+	0x0031,0xff8b,0xfedd,0xfeb0,0xfdc0,0xfdf0,0xfd41,0xfde5,
+	0xfe02,0xfe84,0xfe6b,0xfe08,0xfdc7,0xfcfa,0xfcdf,0xfbea,
+	0xfc54,0xfbb8,0xfc30,0xfbf8,0xfc1b,0xfc06,0xfbc8,0xfc81,
+	0xfcaa,0xfd9c,0xfd28,0xfdb6,0xfd2c,0xfcf6,0xfc6b,0xfc18,
+	0xfc9c,0xfd1a,0xfe32,0xfe25,0xfe97,0xfecc,0xff6f,0xfefc,
+	0xfefb,0xfe7f,0xfecb,0xffd9,0xffd1,0xff9c,0xff07,0xffa3,
+	0xff5e,0x0061,0x005e,0x00bf,0x00cd,0x0019,0xffb3,0xfedc,
+	0xff64,0xff1e,0xffff,0xff45,0xffe3,0xffb1,0xff38,0xfe99,
+	0xfe29,0xfe58,0xfda9,0xfe81,0xfe2a,0xfefc,0xfeac,0xfe31,
+	0xfd33,0xfc59,0xfc77,0xfce8,0xfdaf,0xfcef,0xfd84,0xfd59,
+	0xfe02,0xfd83,0xfc9b,0xfbe3,0xfc33,0xfd85,0xfdf4,0xfe76,
+	0xfd17,0xfd32,0xfd2a,0xfde2,0xfdd5,0xfdda,0xfe08,0xfe11,
+	0xfee1,0xfe94,0xff47,0xfe73,0xff16,0xfe8a,0xff4d,0xff70,
+	0xffa4,0x000f,0xff8a,0x003f,0xff6c,0xff43,0xfeae,0xff6c,
+	0xff9f,0xff94,0xff53,0xff2c,0xfffd,0xff92,0xff7e,0xfeb7,
+	0xff93,0xffae,0xffd9,0xfe79,0xfd79,0xfdef,0xfe68,0xff02,
+	0xfdf5,0xfde2,0xfd32,0xfe5f,0xfe80,0xfe4b,0xfdc4,0xfd16,
+	0xfdc0,0xfdbc,0xfe02,0xfcfa,0xfd02,0xfcdd,0xfd65,0xfddf,
+	0xfe0e,0xfe17,0xfdb7,0xfe48,0xfde4,0xfe27,0xfdc6,0xfe41,
+	0xfddf,0xfdf7,0xfdbf,0xfdc8,0xfeac,0xfe81,0xff10,0xfe0b,
+	0xfe79,0xfe47,0xfeee,0xfe5a,0xfdf8,0xfdaa,0xfdea,0xfe6f,
+	0xfd8d,0xfd7a,0xfc7e,0xfcc2,0xfc8a,0xfd7a,0xfe0e,0xfeec,
+	0x000f,0x00c6,0x0167,0x00a8,0x004c,0xff3d,0xffd3,0xffb0,
+	0x002d,0x0073,0x00bd,0x017c,0x01f0,0x0295,0x01cd,0x0205,
+	0x012c,0x0144,0x007f,0xfff0,0xff3b,0xfe9b,0xff03,0xfe9a,
+	0xff5a,0xfee8,0xff9d,0xff3a,0xfee7,0xfda9,0xfc6d,0xfbe4,
+	0xfb24,0xfb0d,0xfa6b,0xfad7,0xfa5a,0xfb3f,0xfb01,0xfb1f,
+	0xfaee,0xfadb,0xfb30,0xfa82,0xfab1,0xf9c3,0xf9ce,0xf99e,
+	0xfab9,0xfb5a,0xfc1d,0xfcbf,0xfd20,0xfdcb,0xfd47,0xfd6e,
+	0xfc87,0xfcde,0xfcb9,0xfdb2,0xfdfa,0xfea5,0xff88,0xffb9,
+	0x00a8,0x003a,0x00c5,0x004c,0x00aa,0x003e,0x0018,0xffec,
+	0xffc6,0x0020,0xfff3,0x00d0,0x008c,0x012c,0x008d,0x006b,
+	0xffbd,0xff36,0xfedd,0xfe5f,0xfe73,0xfde7,0xfe52,0xfdf0,
+	0xfe7f,0xfdda,0xfdb5,0xfd86,0xfd8b,0xfd7d,0xfc75,0xfc77,
+	0xfbca,0xfc2a,0xfb7d,0xfbee,0xfbcf,0xfc67,0xfcdc,0xfd1f,
+	0xfdc9,0xfd01,0xfce3,0xfbc2,0xfc00,0xfb96,0xfc6b,0xfd11,
+	0xfd8b,0xfe4c,0xfe95,0xff7c,0xff75,0xff9b,0xfe65,0xfe20,
+	0xfd8a,0xfdd8,0xfe2d,0xfe26,0xfe5d,0xfe79,0xffef,0xfffd,
+	0x00af,0xfff8,0x0012,0xff96,0xff56,0xff02,0xfe79,0xff02,
+	0xff4e,0xffec,0xff3d,0xffd6,0xff71,0xffb6,0xff47,0xfe66,
+	0xfd93,0xfced,0xfd7c,0xfd16,0xfd62,0xfcd4,0xfde3,0xfe91,
+	0xfe99,0xfdf3,0xfd2f,0xfd3d,0xfd0a,0xfd7d,0xfc17,0xfc33,
+	0xfbe5,0xfcd6,0xfccc,0xfccc,0xfce7,0xfcf4,0xfde2,0xfd7f,
+	0xfdd1,0xfd01,0xfd89,0xfd35,0xfd29,0xfd1f,0xfd15,0xfdd9,
+	0xfdf8,0xfec9,0xfea3,0xff5c,0xff19,0xff55,0xfeb6,0xfeec,
+	0xfea9,0xfe82,0xff49,0xff37,0xffaa,0xfeac,0xff7d,0xff6c,
+	0x00c5,0x00a3,0x0020,0xffca,0xff3c,0xff6f,0xfea7,0xfea1,
+	0xfe25,0xff52,0xffae,0x0058,0xff70,0xff14,0xff5e,0xfec5,
+	0xfeb0,0xfd81,0xfdcc,0xfe13,0xff2e,0xfec7,0xfd84,0xfc45,
+	0xfc2e,0xfdb4,0xfe9b,0xff4d,0xfe25,0xfe1e,0xfd5a,0xfdda,
+	0xfce7,0xfc29,0xfc1d,0xfca9,0xfe3d,0xfe62,0xfeca,0xfdbf,
+	0xfe60,0xfdfd,0xfdf9,0xfdbf,0xfd7f,0xfe30,0xfe2a,0xfef4,
+	0xfe41,0xfe75,0xfdc6,0xfe2e,0xfe3a,0xfea4,0xfebb,0xfe59,
+	0xfe78,0xfd9e,0xfd3e,0xfbfb,0xfc05,0xfc12,0xfd4a,0xfe63
+};
+
+static const UINT16 ER3[] = {
+	0xfb8c,0xf0cb,0xe6f1,0xdfc5,0xddb6,0xe1bf,0xecec,0xfe67,
+	0x139d,0x2a43,0x3e0d,0x4d5a,0x5440,0x52af,0x47fd,0x36a7,
+	0x20e8,0x0b17,0xf851,0xeb95,0xe6fa,0xea23,0xf49d,0x02b5,
+	0x121e,0x1e63,0x2527,0x23e7,0x1aa5,0x09d3,0xf3a8,0xdc13,
+	0xc595,0xb434,0xa902,0xa685,0xab61,0xb68a,0xc58d,0xd67f,
+	0xe631,0xf20c,0xf9c3,0xfbb5,0xf9c0,0xf404,0xed72,0xe6ea,
+	0xe2bc,0xe1c8,0xe4d0,0xebf5,0xf5d0,0x020b,0x0e76,0x1ae3,
+	0x24e9,0x2cdc,0x30dc,0x31df,0x2f81,0x2aab,0x237f,0x1b05,
+	0x1276,0x09d4,0x032b,0xfd9d,0xfa9a,0xf972,0xfa5d,0xfc9c,
+	0xff49,0x0187,0x0261,0x018d,0xfdf6,0xf83a,0xeff1,0xe6ec,
+	0xdd51,0xd54c,0xcf4f,0xcc9e,0xcd9e,0xd226,0xda36,0xe446,
+	0xef8c,0xf98b,0x0273,0x07fe,0x0aa3,0x09dc,0x06ce,0x0267,
+	0xfdc3,0xfada,0xf94f,0xfb1b,0xff36,0x0682,0x0e8c,0x1733,
+	0x1e95,0x2413,0x26eb,0x2644,0x228d,0x1b93,0x1399,0x0a6e,
+	0x025f,0xfaee,0xf618,0xf314,0xf297,0xf3f6,0xf66d,0xf953,
+	0xfb0d,0xfc61,0xfc1a,0xfa76,0xf68f,0xf20d,0xecc4,0xe80e,
+	0xe47d,0xe1fb,0xe176,0xe292,0xe62b,0xead9,0xf0f5,0xf6f2,
+	0xfce7,0x0212,0x0688,0x0925,0x0a30,0x0a43,0x08e6,0x07d2,
+	0x0610,0x04f1,0x041f,0x04f8,0x061d,0x0886,0x0b24,0x0d7d,
+	0x0f33,0x0e52,0x0afb,0x03c9,0xfa99
+};
+
+static const UINT16 EH3[] = {
+	0x00f4,0x01e5,0x0239,0x022b,0x0211,0x02e2,0x02e6,0x0277,
+	0xfdec,0xf68e,0xec99,0xe560,0xe4a4,0xee5c,0x0294,0x1bbb,
+	0x34cf,0x4673,0x4d4f,0x470b,0x3899,0x2680,0x18d8,0x1310,
+	0x16d1,0x20f9,0x2bd6,0x337a,0x3392,0x2c5a,0x1da1,0x0bea,
+	0xf91b,0xe90e,0xdbec,0xd262,0xcc1c,0xc8e2,0xc954,0xcc44,
+	0xd1cd,0xd651,0xd981,0xd839,0xd34a,0xcb77,0xc44e,0xc14f,
+	0xc5a2,0xd26f,0xe4fe,0xfab3,0x0db5,0x1b96,0x20a8,0x1f2b,
+	0x18ed,0x125b,0x0e64,0x0eeb,0x1427,0x1b42,0x236f,0x28c4,
+	0x2b4d,0x2896,0x2220,0x1868,0x0d2d,0x00e7,0xf4cc,0xeaad,
+	0xe30c,0xdff4,0xdff0,0xe36c,0xe70a,0xea32,0xe9fa,0xe630,
+	0xdf6c,0xd785,0xd1d2,0xcff6,0xd450,0xdd4c,0xea96,0xf80b,
+	0x0451,0x0c85,0x10ca,0x10ee,0x0ec8,0x0c85,0x0b7d,0x0d1b,
+	0x1027,0x1557,0x1a58,0x1f3e,0x21f1,0x2217,0x1f74,0x19e9,
+	0x1224,0x0825,0xfee5,0xf62d,0xf0cb,0xedd7,0xee8e,0xf068,
+	0xf2de,0xf3ee,0xf22e,0xede8,0xe76c,0xe178,0xdc9f,0xdb9c,
+	0xdd91,0xe3f8,0xec3b,0xf550,0xfd63,0x031f,0x06ab,0x077b,
+	0x077d,0x0663,0x06c9,0x0762,0x0a4f,0x0dbe,0x1218,0x1648,
+	0x19bb,0x1b65,0x1a31,0x1722,0x1104,0x0a65,0x02e3,0xfd5b,
+	0xf927,0xf788,0xf798,0xf89b,0xf9d2,0xf921,0xf734,0xf321,
+	0xeeac,0xe97d,0xe64d,0xe4a2,0xe5ec,0xe964,0xee3e,0xf3e7,
+	0xf8c6,0xfd35,0xff98
+};
+
+static const UINT16 AW3[] = {
+	0x015e,0x02bd,0x03f0,0x04db,0x04b6,0x02a7,0xfe7d,0xf798,
+	0xf121,0xeb6a,0xe9bc,0xeb7e,0xf299,0xfd49,0x0afa,0x19f8,
+	0x2892,0x3656,0x419e,0x4b6f,0x51cd,0x5515,0x52a0,0x4b28,
+	0x3d3d,0x29f8,0x128a,0xf8cd,0xdf74,0xc7ee,0xb555,0xa6dd,
+	0x9e33,0x99f6,0x9b7e,0xa175,0xac4f,0xbb5a,0xcd43,0xe1b4,
+	0xf651,0x09ae,0x1938,0x257f,0x2c7e,0x2ff5,0x2f51,0x2c1c,
+	0x2725,0x2107,0x1a48,0x12b3,0x0be6,0x0524,0x0074,0xfc7f,
+	0xfae3,0xfa1f,0xfab5,0xfb1d,0xfadf,0xf947,0xf5b8,0xf143,
+	0xeb2e,0xe543,0xde81,0xd940,0xd4e9,0xd279,0xd18d,0xd2cc,
+	0xd73a,0xddec,0xe817,0xf382,0x013a,0x0ec2,0x1c88,0x27e9,
+	0x30ee,0x3655,0x386e,0x376a,0x32a6,0x2b77,0x20ca,0x14c9,
+	0x0708,0xf9f1,0xec7e,0xe114,0xd7af,0xd186,0xce85,0xce73,
+	0xd175,0xd5e6,0xdd08,0xe469,0xecfa,0xf49e,0xfc20,0x0286,
+	0x07be,0x0bbb,0x0dc2,0x0f20,0x0ec4,0x0e58,0x0d15,0x0c70,
+	0x0b79,0x0b78,0x0baa,0x0c3a,0x0d12,0x0d86,0x0dc0,0x0cb3,
+	0x0bad,0x08ed,0x0591,0x00bd,0xfba7,0xf59b,0xef98,0xe9c3,
+	0xe41c,0xe01f,0xdd0c,0xdc9d,0xdd7e,0xe108,0xe59e,0xec88,
+	0xf41b,0xfc93,0x0523,0x0cf6,0x1438,0x199c,0x1e0b,0x1f9d,
+	0x1ffe,0x1d8d,0x19f7,0x149c,0x0ea0,0x080a,0x0109,0xfafd,
+	0xf549,0xf126,0xed54,0xeb68,0xea19,0xeaab,0xeba1,0xed9d,
+	0xeff0,0xf233,0xf4e3,0xf6db,0xf960,0xfa7d,0xfc2b,0xfcfb,
+	0xfe69,0xff2b,0x005e,0x013d
+};
+
+
+static const struct {
+  char  szName[5];
+  int   sameAs;
+  INT16 *lpStart[4];
+  int   iLength[4];
+  int   iLengthms;
+  int   iSecondStart;
+  int    iType;
+} PhonemeData[65] = {
+  {"EH3",  0x3b, {(INT16*) &EH0,  (INT16*) &EH1,  (INT16*) &EH2,  (INT16*) &EH3  }, {0x010d, 0x00e9, 0x00c7, 0x00a3},  59, 0x0000, 0x01},
+  {"EH2",  0x3b, {(INT16*) &EH0,  (INT16*) &EH1,  (INT16*) &EH2,  (INT16*) &EH3  }, {0x010d, 0x00e9, 0x00c7, 0x00a3},  71, 0x0000, 0x01},
+  {"EH1",  0x3b, {(INT16*) &EH0,  (INT16*) &EH1,  (INT16*) &EH2,  (INT16*) &EH3  }, {0x010d, 0x00e9, 0x00c7, 0x00a3}, 121, 0x0000, 0x01},
+  {"PA0",  0x3f, {(INT16*) &STOP, (INT16*) &STOP, (INT16*) &STOP, (INT16*) &STOP }, {0x0001, 0x0001, 0x0001, 0x0001},  47, 0x0000, 0x00},
+  {"DT",   0x04, {(INT16*) &DT,   (INT16*) &DT,   (INT16*) &DT,   (INT16*) &DT   }, {0x0312, 0x0312, 0x0312, 0x0312},  47, 0x0000, 0x03/*6*/},
+  {"A2",   0x20, {(INT16*) &A0,   (INT16*) &A1,   (INT16*) &A2,   (INT16*) &A3   }, {0x0109, 0x00e3, 0x00c1, 0x009c},  71, 0x0000, 0x01},
+  {"A1",   0x20, {(INT16*) &A0,   (INT16*) &A1,   (INT16*) &A2,   (INT16*) &A3   }, {0x0109, 0x00e3, 0x00c1, 0x009c}, 103, 0x0000, 0x01},
+  {"ZH",   0x07, {(INT16*) &ZH0,  (INT16*) &ZH1,  (INT16*) &ZH2,  (INT16*) &ZH3  }, {0x02fd, 0x02fd, 0x02fd, 0x02fd},  90, 0x0000, 0x02},
+  {"AH2",  0x24, {(INT16*) &AH0,  (INT16*) &AH1,  (INT16*) &AH2,  (INT16*) &AH3  }, {0x011c, 0x00f7, 0x00d5, 0x00b0},  71, 0x0000, 0x01},
+  {"I3",   0x27, {(INT16*) &I0,   (INT16*) &I1,   (INT16*) &I2,   (INT16*) &I3   }, {0x0103, 0x00e2, 0x00bf, 0x009b},  55, 0x0000, 0x01},
+  {"I2",   0x27, {(INT16*) &I0,   (INT16*) &I1,   (INT16*) &I2,   (INT16*) &I3   }, {0x0103, 0x00e2, 0x00bf, 0x009b},  80, 0x0000, 0x01},
+  {"I1",   0x27, {(INT16*) &I0,   (INT16*) &I1,   (INT16*) &I2,   (INT16*) &I3   }, {0x0103, 0x00e2, 0x00bf, 0x009b}, 121, 0x0000, 0x01},
+  {"M",    0x0c, {(INT16*) &M0,   (INT16*) &M1,   (INT16*) &M2,   (INT16*) &M3   }, {0x01fb, 0x01b2, 0x00b6, 0x0124}, 103, 0x0000, 0x04},
+  {"N",    0x0d, {(INT16*) &N0,   (INT16*) &N1,   (INT16*) &N2,   (INT16*) &N3   }, {0x01f7, 0x01b1, 0x00b6, 0x0124},  80, 0x0000, 0x04},
+  {"B",    0x0e, {(INT16*) &B,    (INT16*) &B,    (INT16*) &B,    (INT16*) &B    }, {0x087b, 0x087b, 0x087b, 0x087b},  71, 0x0544, 0x03/*5*/},
+  {"V",    0x0f, {(INT16*) &V0,   (INT16*) &V1,   (INT16*) &V2,   (INT16*) &V3   }, {0x05fa, 0x05fa, 0x05fa, 0x05fa},  71, 0x0000, 0x02},
+  {"CH",   0x10, {(INT16*) &CH,   (INT16*) &CH,   (INT16*) &CH,   (INT16*) &CH   }, {0x034b, 0x034b, 0x034b, 0x034b},  71, 0x0000, 0x03},
+  {"SH",   0x11, {(INT16*) &SH,   (INT16*) &SH,   (INT16*) &SH,   (INT16*) &SH   }, {0x0404, 0x0404, 0x0404, 0x0404}, 121, 0x0000, 0x03},
+  {"Z",    0x12, {(INT16*) &Z0,   (INT16*) &Z1,   (INT16*) &Z2,   (INT16*) &Z3   }, {0x0200, 0x0200, 0x0200, 0x0200},  71, 0x0000, 0x02},
+  {"AW1",  0x3d, {(INT16*) &AW0,  (INT16*) &AW1,  (INT16*) &AW2,  (INT16*) &AW3  }, {0x0117, 0x00f3, 0x00d1, 0x00ac}, 146, 0x0000, 0x01},
+  {"NG",   0x14, {(INT16*) &NG0,  (INT16*) &NG1,  (INT16*) &NG2,  (INT16*) &NG3  }, {0x01ff, 0x00db, 0x00b9, 0x0094}, 121, 0x0000, 0x04},
+  {"AH1",  0x24, {(INT16*) &AH0,  (INT16*) &AH1,  (INT16*) &AH2,  (INT16*) &AH3  }, {0x011c, 0x00f7, 0x00d5, 0x00b0}, 146, 0x0000, 0x01},
+  {"OO1",  0x17, {(INT16*) &OO0,  (INT16*) &OO1,  (INT16*) &OO2,  (INT16*) &OO3  }, {0x010d, 0x00e8, 0x00c5, 0x00a2}, 103, 0x0000, 0x01},
+  {"OO",   0x17, {(INT16*) &OO0,  (INT16*) &OO1,  (INT16*) &OO2,  (INT16*) &OO3  }, {0x010d, 0x00e8, 0x00c5, 0x00a2}, 185, 0x0000, 0x01},
+  {"L",    0x18, {(INT16*) &L0,   (INT16*) &L1,   (INT16*) &L2,   (INT16*) &L3   }, {0x0107, 0x00e4, 0x00c1, 0x009d}, 103, 0x0000, 0x01},
+  {"K",    0x19, {(INT16*) &K,    (INT16*) &K,    (INT16*) &K,    (INT16*) &K    }, {0x0187, 0x0187, 0x0187, 0x0187},  80, 0x0000, 0x03/*6*/},
+  {"J",    0x1a, {(INT16*) &J0,   (INT16*) &J1,   (INT16*) &J2,   (INT16*) &J3   }, {0x05e6, 0x05e6, 0x05e6, 0x05e6},  47, 0x0000, 0x02},
+  {"H",    0x1b, {(INT16*) &H,    (INT16*) &H,    (INT16*) &H,    (INT16*) &H    }, {0x021a, 0x021a, 0x021a, 0x021a},  71, 0x0000, 0x03},
+  {"G",    0x1c, {(INT16*) &G,    (INT16*) &G,    (INT16*) &G,    (INT16*) &G    }, {0x081b, 0x081b, 0x081b, 0x081b},  71, 0x04eb, 0x03/*5*/},
+  {"F",    0x1d, {(INT16*) &F,    (INT16*) &F,    (INT16*) &F,    (INT16*) &F    }, {0x029d, 0x029d, 0x029d, 0x029d}, 103, 0x0000, 0x03},
+  {"D",    0x1e, {(INT16*) &D,    (INT16*) &D,    (INT16*) &D,    (INT16*) &D    }, {0x0581, 0x0581, 0x0581, 0x0581},  55, 0x0281, 0x03/*5*/},
+  {"S",    0x1f, {(INT16*) &S,    (INT16*) &S,    (INT16*) &S,    (INT16*) &S    }, {0x0271, 0x0271, 0x0271, 0x0271},  90, 0x0000, 0x03},
+  {"A",    0x20, {(INT16*) &A0,   (INT16*) &A1,   (INT16*) &A2,   (INT16*) &A3   }, {0x0109, 0x00e3, 0x00c1, 0x009c}, 185, 0x0000, 0x01},
+  {"AY",   0x21, {(INT16*) &AY0,  (INT16*) &AY1,  (INT16*) &AY2,  (INT16*) &AY3  }, {0x0102, 0x00dd, 0x00bb, 0x0100},  65, 0x0000, 0x01},
+  {"Y1",   0x29, {(INT16*) &Y0,   (INT16*) &Y1,   (INT16*) &Y2,   (INT16*) &Y3   }, {0x0104, 0x00db, 0x00b8, 0x0094},  80, 0x0000, 0x01},
+  {"UH3",  0x33, {(INT16*) &UH0,  (INT16*) &UH1,  (INT16*) &UH2,  (INT16*) &UH3  }, {0x0111, 0x00f1, 0x00ce, 0x00aa},  47, 0x0000, 0x01},
+  {"AH",   0x24, {(INT16*) &AH0,  (INT16*) &AH1,  (INT16*) &AH2,  (INT16*) &AH3  }, {0x011c, 0x00f7, 0x00d5, 0x00b0}, 250, 0x0000, 0x01},
+  {"P",    0x25, {(INT16*) &P,    (INT16*) &P,    (INT16*) &P,    (INT16*) &P    }, {0x036d, 0x036d, 0x036d, 0x036d}, 103, 0x0000, 0x03/*6*/},
+  {"O",    0x26, {(INT16*) &O0,   (INT16*) &O1,   (INT16*) &O2,   (INT16*) &O3   }, {0x010a, 0x00e6, 0x00c3, 0x009f}, 185, 0x0000, 0x01},
+  {"I",    0x27, {(INT16*) &I0,   (INT16*) &I1,   (INT16*) &I2,   (INT16*) &I3   }, {0x0103, 0x00e2, 0x00bf, 0x009b}, 185, 0x0000, 0x01},
+  {"U",    0x28, {(INT16*) &U0,   (INT16*) &U1,   (INT16*) &U2,   (INT16*) &U3   }, {0x0101, 0x00dd, 0x00bb, 0x0097}, 185, 0x0000, 0x01},
+  {"Y",    0x29, {(INT16*) &Y0,   (INT16*) &Y1,   (INT16*) &Y2,   (INT16*) &Y3   }, {0x0104, 0x00db, 0x00b8, 0x0094}, 103, 0x0000, 0x01},
+  {"T",    0x2a, {(INT16*) &T,    (INT16*) &T,    (INT16*) &T,    (INT16*) &T    }, {0x0325, 0x0325, 0x0325, 0x0325},  71, 0x0000, 0x03/*6*/},
+  {"R",    0x2b, {(INT16*) &R0,   (INT16*) &R1,   (INT16*) &R2,   (INT16*) &R3   }, {0x0107, 0x00e4, 0x00c1, 0x009d},  90, 0x0000, 0x01},
+  {"E",    0x2c, {(INT16*) &E0,   (INT16*) &E1,   (INT16*) &E2,   (INT16*) &E3   }, {0x0101, 0x00db, 0x00b8, 0x0094}, 185, 0x0000, 0x01},
+  {"W",    0x2d, {(INT16*) &W0,   (INT16*) &W1,   (INT16*) &W2,   (INT16*) &W3   }, {0x0110, 0x00de, 0x00bb, 0x0097},  80, 0x0000, 0x01},
+  {"AE",   0x2e, {(INT16*) &AE0,  (INT16*) &AE1,  (INT16*) &AE2,  (INT16*) &AE3  }, {0x0123, 0x00f3, 0x00d0, 0x00ab}, 185, 0x0000, 0x01},
+  {"AE1",  0x2e, {(INT16*) &AE0,  (INT16*) &AE1,  (INT16*) &AE2,  (INT16*) &AE3  }, {0x0123, 0x00f3, 0x00d0, 0x00ab}, 103, 0x0000, 0x01},
+  {"AW2",  0x3d, {(INT16*) &AW0,  (INT16*) &AW1,  (INT16*) &AW2,  (INT16*) &AW3  }, {0x0117, 0x00f3, 0x00d1, 0x00ac},  90, 0x0000, 0x01},
+  {"UH2",  0x33, {(INT16*) &UH0,  (INT16*) &UH1,  (INT16*) &UH2,  (INT16*) &UH3  }, {0x0111, 0x00f1, 0x00ce, 0x00aa},  71, 0x0000, 0x01},
+  {"UH1",  0x33, {(INT16*) &UH0,  (INT16*) &UH1,  (INT16*) &UH2,  (INT16*) &UH3  }, {0x0111, 0x00f1, 0x00ce, 0x00aa}, 103, 0x0000, 0x01},
+  {"UH",   0x33, {(INT16*) &UH0,  (INT16*) &UH1,  (INT16*) &UH2,  (INT16*) &UH3  }, {0x0111, 0x00f1, 0x00ce, 0x00aa}, 185, 0x0000, 0x01},
+  {"O2",   0x26, {(INT16*) &O0,   (INT16*) &O1,   (INT16*) &O2,   (INT16*) &O3   }, {0x010a, 0x00e6, 0x00c3, 0x009f},  80, 0x0000, 0x01},
+  {"O1",   0x26, {(INT16*) &O0,   (INT16*) &O1,   (INT16*) &O2,   (INT16*) &O3   }, {0x010a, 0x00e6, 0x00c3, 0x009f}, 121, 0x0000, 0x01},
+  {"IU",   0x36, {(INT16*) &IU0,  (INT16*) &IU1,  (INT16*) &IU2,  (INT16*) &IU3  }, {0x0107, 0x00e2, 0x00bf, 0x009b},  59, 0x0000, 0x01},
+  {"U1",   0x28, {(INT16*) &U0,   (INT16*) &U1,   (INT16*) &U2,   (INT16*) &U3   }, {0x0101, 0x00dd, 0x00bb, 0x0097},  90, 0x0000, 0x01},
+  {"THV",  0x38, {(INT16*) &THV0, (INT16*) &THV1, (INT16*) &THV2, (INT16*) &THV3 }, {0x0200, 0x0200, 0x0200, 0x0200},  80, 0x0000, 0x02},
+  {"TH",   0x39, {(INT16*) &TH,   (INT16*) &TH,   (INT16*) &TH,   (INT16*) &TH   }, {0x02ec, 0x02ec, 0x02ec, 0x02ec},  71, 0x0000, 0x03},
+  {"ER",   0x3a, {(INT16*) &ER0,  (INT16*) &ER1,  (INT16*) &ER2,  (INT16*) &ER3  }, {0x0107, 0x00e4, 0x00c1, 0x009d}, 146, 0x0000, 0x01},
+  {"EH",   0x3b, {(INT16*) &EH0,  (INT16*) &EH1,  (INT16*) &EH2,  (INT16*) &EH3  }, {0x010d, 0x00e9, 0x00c7, 0x00a3}, 185, 0x0000, 0x01},
+  {"E1",   0x2c, {(INT16*) &E0,   (INT16*) &E1,   (INT16*) &E2,   (INT16*) &E3   }, {0x0101, 0x00db, 0x00b8, 0x0094}, 121, 0x0000, 0x01},
+  {"AW",   0x3d, {(INT16*) &AW0,  (INT16*) &AW1,  (INT16*) &AW2,  (INT16*) &AW3  }, {0x0117, 0x00f3, 0x00d1, 0x00ac}, 250, 0x0000, 0x01},
+  {"PA1",  0x3f, {(INT16*) &STOP, (INT16*) &STOP, (INT16*) &STOP, (INT16*) &STOP }, {0x0001, 0x0001, 0x0001, 0x0001}, 185, 0x0000, 0x00},
+  {"STOP", 0x3f, {(INT16*) &STOP, (INT16*) &STOP, (INT16*) &STOP, (INT16*) &STOP }, {0x0001, 0x0001, 0x0001, 0x0001},  47, 0x0000, 0x00}
+};
diff --git a/project/jni/application/atari800/src/xep80.c b/project/jni/application/atari800/src/xep80.c
new file mode 100755
index 000000000..c01fa3883
--- /dev/null
+++ b/project/jni/application/atari800/src/xep80.c
@@ -0,0 +1,2058 @@
+/*
+ * xep80.c - XEP80 emulation
+ *
+ * Copyright (C) 2007 Mark Grebe
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+*/
+
+#include "config.h"
+#ifdef XEP80_EMULATION
+#include "xep80.h"
+#include "xep80_fonts.h"
+#include "statesav.h"
+#include "atari.h"
+#include "antic.h"
+#include <string.h>
+#include "platform.h"
+#include "util.h"
+#include "log.h"
+
+#define IN_QUEUE_SIZE		10
+
+/* Definitions for command protocol between the XEP and the Atari */
+#define CMD_XX_MASK      0xC0
+#define CMD_00           0x00
+#define CMD_X_CUR_LOW    0x00
+#define CMD_01           0x40
+#define CMD_01_MASK      0x70
+#define CMD_X_CUR_UPPER  0x40
+#define CMD_X_CUR_HIGH   0x50
+#define CMD_LEFT_MAR_L   0x60
+#define CMD_LEFT_MAR_H   0x70
+#define CMD_10           0x80
+#define CMD_10_MASK      0xF0
+#define CMD_Y_CUR_LOW    0x80
+#define CMD_1001         0x90
+#define CMD_1001_MASK    0xF8
+#define CMD_Y_CUR_HIGH   0x90
+#define CMD_Y_CUR_STATUS 0x98
+#define CMD_GRAPH_50HZ   0x99
+#define CMD_GRAPH_60HZ   0x9A
+#define CMD_RIGHT_MAR_L  0xA0
+#define CMD_RIGHT_MAR_H  0xB0
+#define CMD_11           0xC0
+#define CMD_GET_CHAR     0xC0
+#define CMD_REQ_X_CUR    0xC1
+#define CMD_MRST         0xC2
+#define CMD_PRT_STAT     0xC3
+#define CMD_FILL_PREV    0xC4
+#define CMD_FILL_SPACE   0xC5
+#define CMD_FILL_EOL     0xC6
+#define CMD_CLR_LIST     0xD0
+#define CMD_SET_LIST     0xD1
+#define CMD_SCR_NORMAL   0xD2
+#define CMD_SCR_BURST    0xD3
+#define CMD_CHAR_SET_A   0xD4
+#define CMD_CHAR_SET_B   0xD5
+#define CMD_CHAR_SET_INT 0xD6
+#define CMD_TEXT_50HZ    0xD7
+#define CMD_CUR_OFF      0xD8
+#define CMD_CUR_ON       0xD9
+#define CMD_CUR_BLINK    0xDA
+#define CMD_CUR_ST_LINE  0xDB
+#define CMD_SET_SCRL_WIN 0xDC
+#define CMD_SET_PRINT    0xDD
+#define CMD_WHT_ON_BLK   0xDE
+#define CMD_BLK_ON_WHT   0xDF
+#define CMD_VIDEO_CTRL   0xED
+#define CMD_ATTRIB_A	 0xF4
+#define CMD_ATTRIB_B	 0xF5
+
+#define CHAR_SET_A			0
+#define CHAR_SET_B			1
+#define CHAR_SET_INTERNAL	2  
+
+/* These center the graphics screen inside of the XEP80 screen */
+#define XEP80_GRAPH_X_OFFSET ((XEP80_SCRN_WIDTH - XEP80_GRAPH_WIDTH) / 2)
+#define XEP80_GRAPH_Y_OFFSET ((XEP80_SCRN_HEIGHT - XEP80_GRAPH_HEIGHT) / 2)
+
+/* Used to determine if a charcter is double width */
+#define IS_DOUBLE(x,y) (((xep80_data[y][x] & 0x80) && font_b_double) || \
+						(((xep80_data[y][x] & 0x80) == 0) && font_a_double))
+
+/* Global variables */
+int XEP80_enabled = FALSE;
+int XEP80_port = 0;
+int XEP80_first_row = XEP80_SCRN_HEIGHT - 1;
+int XEP80_last_row = 0;
+
+/* Local procedures */
+static void XEP80_InputWord(int word);
+static void XEP80_OutputWord(int word);
+static void XEP80_ReceiveChar(UBYTE byte);
+static void	XEP80_SendCursorStatus(void);
+static void XEP80_SetXCur(UBYTE cursor);
+static void XEP80_SetXCurHigh(UBYTE cursor);
+static void XEP80_SetLeftMarginLow(UBYTE margin);
+static void XEP80_SetLeftMarginHigh(UBYTE margin);
+static void XEP80_SetYCur(UBYTE cursor);
+static void XEP80_SetScreenMode(int graphics, int pal);
+static void XEP80_SetRightMarginLow(UBYTE margin);
+static void XEP80_SetRightMarginHigh(UBYTE margin);
+static void XEP80_GetChar(void);
+static void XEP80_GetXCur(void);
+static void XEP80_MasterReset(void);
+static void XEP80_GetPrinterStatus(void);
+static void XEP80_FillMem(UBYTE c, int output);
+static void XEP80_SetList(int list);
+static void XEP80_SetOutputDevice(int screen, int burst);
+static void XEP80_SetCharSet(int set);
+static void XEP80_SetCursor(int on, int blink);
+static void XEP80_SetXCurStart(void);
+static void XEP80_SetScrollWindow(void);
+static void XEP80_SetInverse(int inverse);
+static void XEP80_SetVideoCtrl(UBYTE video_ctrl);
+static void XEP80_SetAttributeA(UBYTE attrib);
+static void XEP80_SetAttributeB(UBYTE attrib);
+static void XEP80_UpdateCursor(void);
+static void XEP80_AddCharAtCursor(UBYTE byte);
+static void XEP80_AddGraphCharAtCursor(UBYTE byte);
+static void XEP80_CursorUp(void);
+static void XEP80_CursorDown(void);
+static void XEP80_CursorLeft(void);
+static void XEP80_CursorRight(void);
+static void	XEP80_ClearScreen(void);
+static void XEP80_Backspace(void);
+static void XEP80_AddEOL(void);
+static void XEP80_DeleteChar(void);
+static void XEP80_InsertChar(void);
+static void XEP80_DeleteLogicalLine(void);
+static void XEP80_InsertLine(void);
+static void XEP80_GoToNextTab(void);
+static void XEP80_ScrollUpLast(void);
+static void XEP80_ScrollDown(int y);
+static void XEP80_ScrollUp(int y_start, int y_end);
+static void XEP80_FindEndLogicalLine(int *x, int *y);
+static void XEP80_FindStartLogicalLine(int *x, int *y);
+static void XEP80_BlitChar(int x, int y, int cur);
+static void XEP80_BlitScreen(void);
+static void XEP80_BlitRows(int y_start, int y_end);
+static void XEP80_BlitGraphChar(int x, int y);
+
+/* Local state variables */
+static int output_state = -1;
+static int output_word = 0;
+
+static UWORD input_queue[IN_QUEUE_SIZE];
+static int input_count = 0;
+static int input_bit = 0;
+static int input_first = TRUE;
+
+static int xcur = 0;
+static int xscroll = 0;
+static int ycur = 0;
+static int new_xcur = 0;
+static int new_ycur = 0;
+static int old_xcur = 0;
+static int old_ycur = 0;
+static int lmargin = 0;
+static int rmargin = 0x4f;
+static UBYTE attrib_a = 0;
+static UBYTE attrib_b = 0;
+static int list_mode = FALSE;
+static int char_set = CHAR_SET_A;
+static int cursor_on = TRUE;
+static int cursor_blink = FALSE;
+static int cursor_overwrite = FALSE;
+static int blink_reverse = FALSE;
+static int inverse_mode = FALSE;
+static int screen_output = TRUE;
+static int burst_mode = FALSE;
+static int graphics_mode = FALSE;
+static int pal_mode = FALSE;
+static int escape_mode = FALSE;
+static int font_a_index = 0;
+static int font_a_double = FALSE;
+static int font_a_blank = FALSE;
+static int font_a_blink = FALSE;
+static int font_b_index = 0;
+static int font_b_double = FALSE;
+static int font_b_blank = FALSE;
+static int font_b_blink = FALSE;
+static UBYTE input_mask[2] = {0x02,0x20};
+static UBYTE output_mask[2] = {0x01,0x10};
+
+static UBYTE xep80_data[XEP80_HEIGHT][XEP80_WIDTH];
+static UBYTE xep80_graph_data[XEP80_GRAPH_HEIGHT][XEP80_GRAPH_WIDTH/8];
+UBYTE XEP80_screen_1[XEP80_SCRN_WIDTH*XEP80_SCRN_HEIGHT];
+UBYTE XEP80_screen_2[XEP80_SCRN_WIDTH*XEP80_SCRN_HEIGHT];
+
+UBYTE (*font)[XEP80_FONTS_CHAR_COUNT][XEP80_CHAR_HEIGHT][XEP80_CHAR_WIDTH];
+
+static int tab_stops[256] = 
+{0,0,1,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,
+ 0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,
+ 0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,
+ 0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,
+ 0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,
+ 0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,
+ 0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,
+ 0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,
+ 0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,
+ 0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,
+ 0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,
+ 0,0,0,1,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,
+ 0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1};
+ 
+static int eol_at_margin[XEP80_HEIGHT] = 
+{0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
+
+int XEP80_Initialise(int *argc, char *argv[])
+{
+	int i, j;
+	for (i = j = 1; i < *argc; i++) {
+		int i_a = (i + 1 < *argc);		/* is argument available? */
+		int a_m = FALSE;			/* error, argument missing! */
+		
+		if (strcmp(argv[i], "-xep80") == 0) {
+			XEP80_enabled = TRUE;
+		}
+		else if (strcmp(argv[i], "-xep80port") == 0) {
+			if (i_a) {
+				XEP80_port = Util_sscandec(argv[++i]);
+				if (XEP80_port != 0 && XEP80_port != 1) {
+					Log_print("Invalid XEP80 port - should be 0 or 1");
+					return FALSE;
+				}
+			}
+			else a_m = TRUE;
+		}
+		else {
+		 	if (strcmp(argv[i], "-help") == 0) {
+				Log_print("\t-xep80           Emulate the XEP80");
+				Log_print("\t-xep80port <n>   Use XEP80 on joystick port <n>");
+			}
+			argv[j++] = argv[i];
+		}
+
+		if (a_m) {
+			Log_print("Missing argument for '%s'", argv[i]);
+			return FALSE;
+		}
+	}
+	*argc = j;
+
+	return TRUE;
+}
+
+static void XEP80_InputWord(int word)
+{
+	input_queue[input_count] = word;
+	input_count++;
+	input_bit = 0;
+	input_first = TRUE;
+    }
+
+static float XEP80_DeltaXYPos(float a, float b)
+{
+	if (b > a)
+		return (b-a);
+	else
+		return(((float) Atari800_tv_mode) - a + b);
+}
+
+UBYTE XEP80_GetBit(void) 
+{
+	UBYTE ret = 0xFF;
+	int word_bit_num;
+	int input_word;
+	int input_word_num;
+	static float last_xypos;
+	/* This calculates the number of scan lines between bit
+	 *	reads.  A scan line is the same time duration as a
+	 *	XEP80 Bit period */
+	float xypos = ANTIC_ypos + 
+                        ((float) ANTIC_xpos)/
+                        ((float) ANTIC_xpos_limit);
+	
+	/* If there is not input to be sent, just return */
+	if (input_count == 0)
+		return(ret);
+	
+	/* If this is the first time, do nothing, start with bit 0 */
+	if (input_first)
+	{
+		input_first = FALSE;
+	}
+	else
+	{
+		/* If we are more than half a bit period since the last
+		 * read, assume it should be the next bit.  If it's less
+		 *  do nothing, as SpartaDos driver does multiple reads at
+		 *  times */
+		if (XEP80_DeltaXYPos(last_xypos, xypos) > 0.5)
+			input_bit++;
+		/* If it is the stop bit on the first or second character
+		 * to be sent, and we have taken more than a scan line to
+		 * read it, then skip it and go to the next start bit.
+		 * This is required to not confuse the stock AtariDOS 
+		 * driver. */
+		if ((XEP80_DeltaXYPos(last_xypos, xypos) > 1.1) &&
+			(input_bit == 10 || input_bit == 20))
+			input_bit++;
+	}
+	
+	/* Figure out which word of the queue it is in based on bit */
+	input_word_num = (input_bit / 11) + 1;
+
+    /* If it is greater than we have, then clear queue and return */
+	if (input_word_num > (input_count))
+		{
+		input_count = 0;
+		return(ret);
+		}
+	
+	/* Get the word from the queue, and calculate which bit of the
+	 * word we are sending */
+	input_word = input_queue[input_word_num - 1];
+	word_bit_num = input_bit % 11;
+
+    /* Send the return value based on the bit */
+	switch(word_bit_num) {
+    case 0: /* Start Bit - 0 */
+		ret = 0xFF & ~input_mask[XEP80_port];
+		break;
+    case 1: /* 9 Data Bits */
+    case 2:
+    case 3:
+    case 4:
+    case 5:
+    case 6:
+    case 7:
+    case 8:
+	case 9:
+        if (input_word & (1 << (word_bit_num-1))) {
+            ret = 0xFF;
+        }
+        else {
+            ret = 0xFF & ~input_mask[XEP80_port];
+        }
+		break;
+	case 10: /* Stop Bit - 1 */
+		ret = 0xFF;
+		break;
+    }
+	
+	last_xypos = xypos;
+	/* If we are done with all bits, clear the queue */
+	if (input_bit >= ((input_count * 11) - 2))
+		input_count = 0;
+	return(ret);
+}
+
+void XEP80_PutBit(UBYTE byte)
+{
+    byte &= output_mask[XEP80_port];
+
+    /* Shift output words from the Atari for each write */
+	switch(output_state) {
+    case -1:
+        if (!byte) {
+            output_state = 0;
+            output_word = 0;
+        }
+        break;
+    case 0:
+    case 1:
+    case 2:
+    case 3:
+    case 4:
+    case 5:
+    case 6:
+    case 7:
+    case 8:
+        if (byte) {
+            output_word |= 1 << (output_state);
+        }
+        output_state ++;
+        break;
+    case 9:
+        output_state = -1;
+		/* Clear any unread input from last command */
+		input_count = 0;
+        if (byte) {
+			/* Handle the new word */
+            XEP80_OutputWord(output_word);
+        }
+        break;
+    }
+}
+
+static void XEP80_OutputWord(int word)
+{
+    UBYTE byte = word & 0xFF;
+    int cmd_flag = word & 0x100;
+    static UBYTE lastChar = 0;
+
+    /* Is it a command or data word? */
+	if (cmd_flag) {
+        switch(byte & CMD_XX_MASK) {
+        case CMD_00:
+            XEP80_SetXCur(byte & 0x3F);
+            break;
+        case CMD_01:
+            switch(byte & CMD_01_MASK) {
+            case CMD_X_CUR_UPPER:
+                XEP80_SetXCur(0x40 + (byte & 0x0F));
+                break;
+            case CMD_X_CUR_HIGH:
+                XEP80_SetXCurHigh(byte & 0x0F);
+                break;
+            case CMD_LEFT_MAR_L:
+                XEP80_SetLeftMarginLow(byte & 0x0f);
+                break;
+            case CMD_LEFT_MAR_H:
+                XEP80_SetLeftMarginHigh(byte & 0x0f);
+                break;
+            }
+            break;
+        case CMD_10:
+            switch(byte & CMD_10_MASK) {
+            case CMD_Y_CUR_LOW:
+                XEP80_SetYCur(byte & 0x0F);
+                break;
+            case CMD_1001:
+				if ((byte & CMD_1001_MASK) == CMD_Y_CUR_HIGH) {
+                    XEP80_SetYCur(0x10 + (byte & 0x07));
+				}
+				else {
+					switch(byte) {
+					case CMD_Y_CUR_STATUS:
+						XEP80_SetYCur(24);
+						break;
+					case CMD_GRAPH_50HZ:
+						XEP80_SetScreenMode(TRUE, TRUE);
+						break;
+					case CMD_GRAPH_60HZ:
+						XEP80_SetScreenMode(TRUE, FALSE);
+						break;
+					}
+                }
+                break;
+            case CMD_RIGHT_MAR_L:
+                XEP80_SetRightMarginLow(byte & 0x0f);
+                break;
+            case CMD_RIGHT_MAR_H:
+                XEP80_SetRightMarginHigh(byte & 0x0f);
+                break;
+            }
+            break;
+        case CMD_11:
+            switch (byte) {
+            case CMD_GET_CHAR:
+                XEP80_GetChar();
+                break;
+            case CMD_REQ_X_CUR:
+                XEP80_GetXCur();
+                break;
+            case CMD_MRST:
+                XEP80_MasterReset();
+                break;
+            case CMD_PRT_STAT:
+                XEP80_GetPrinterStatus();
+                break;
+            case CMD_FILL_PREV:
+                XEP80_FillMem(lastChar, TRUE);
+                break;
+            case CMD_FILL_SPACE:
+                XEP80_FillMem(0x20, TRUE);
+                break;
+            case CMD_FILL_EOL:
+                XEP80_FillMem(0x9B, TRUE);
+                break;
+            case CMD_CLR_LIST:
+                XEP80_SetList(FALSE);
+                break;
+            case CMD_SET_LIST:
+                XEP80_SetList(TRUE);
+                break;
+            case CMD_SCR_NORMAL:
+                XEP80_SetOutputDevice(TRUE, FALSE);
+                break;
+            case CMD_SCR_BURST:
+                XEP80_SetOutputDevice(TRUE, TRUE);
+                break;
+            case CMD_SET_PRINT:
+                XEP80_SetOutputDevice(FALSE, TRUE);
+                break;
+            case CMD_CHAR_SET_A:
+                XEP80_SetCharSet(CHAR_SET_A);
+				XEP80_BlitScreen();
+                break;
+            case CMD_CHAR_SET_B:
+                XEP80_SetCharSet(CHAR_SET_B);
+				XEP80_BlitScreen();
+                break;
+            case CMD_CHAR_SET_INT:
+                XEP80_SetCharSet(CHAR_SET_INTERNAL);
+				XEP80_BlitScreen();
+                break;
+            case CMD_TEXT_50HZ:
+                XEP80_SetScreenMode(FALSE, TRUE);
+                break;
+            case CMD_CUR_OFF:
+                XEP80_SetCursor(FALSE, FALSE);
+                break;
+            case CMD_CUR_ON:
+                XEP80_SetCursor(TRUE, FALSE);
+                break;
+            case CMD_CUR_BLINK:
+                XEP80_SetCursor(TRUE, TRUE);
+                break;
+            case CMD_CUR_ST_LINE:
+                XEP80_SetXCurStart();
+                break;
+            case CMD_SET_SCRL_WIN:
+                XEP80_SetScrollWindow();
+                break;
+            case CMD_WHT_ON_BLK:
+                XEP80_SetInverse(FALSE);
+                break;
+            case CMD_BLK_ON_WHT:
+                XEP80_SetInverse(TRUE);
+                break;
+            case CMD_VIDEO_CTRL:
+				XEP80_Backspace();
+                XEP80_SetVideoCtrl(lastChar);
+                break;
+            case CMD_ATTRIB_A:
+				XEP80_Backspace();
+                XEP80_SetAttributeA(lastChar);
+                break;
+            case CMD_ATTRIB_B:
+				XEP80_Backspace();
+                XEP80_SetAttributeB(lastChar);
+                break;
+            }
+            break;
+        }
+    }
+	/* If it's data, then handle it as a character */
+    else {
+		old_xcur = xcur;
+		old_ycur = ycur;
+		XEP80_ReceiveChar(byte);
+        lastChar = byte;
+		if (!burst_mode)
+			XEP80_SendCursorStatus();
+    }
+}
+
+static void XEP80_ReceiveChar(UBYTE byte)
+{
+	if (graphics_mode) {
+        XEP80_AddGraphCharAtCursor(byte);
+	}
+	else if (escape_mode) {
+        XEP80_AddCharAtCursor(byte);
+		escape_mode = FALSE;
+	}
+	/* List mode prints control chars like escape mode, except for EOL */
+	else if (list_mode) {
+		if (byte == XEP80_ATARI_EOL) {
+			XEP80_AddEOL();
+		}
+		else {
+			XEP80_AddCharAtCursor(byte);
+		}
+	}
+	else if (!screen_output) {
+		/* Printer characters are thrown away, handled elsewhere.  The
+		 * XEP80 driver needs to be set up to send printer characters
+		 * to the existing P: driver. */
+	}
+	else {
+		/* If we are on the status line, only allow Delete Line and char adds */
+        if (ycur == 24) {
+            if (byte == 0x9c) { /* Delete Line */
+				memset(xep80_data[ycur],XEP80_ATARI_EOL,XEP80_WIDTH);
+            }
+            else {
+                XEP80_AddCharAtCursor(byte);
+            }
+        }
+        else {
+		switch(byte) {
+			case 0x1b: /* Escape - Print next char even if a control char */
+				escape_mode = TRUE;
+				break;
+			case 0x1c: /* Cursor Up */
+				XEP80_CursorUp();
+				break;
+			case 0x1d: /* Cursor Down */
+				XEP80_CursorDown();
+				break;
+			case 0x1e: /* Cursor Left */
+				XEP80_CursorLeft();
+				break;
+			case 0x1f: /* Cursor Right */
+				XEP80_CursorRight();
+				break;
+			case 0x7d: /* Clear Screen */
+				XEP80_ClearScreen();
+				break;
+			case 0x7e: /* Backspace */
+				XEP80_Backspace();
+				break;
+			case 0x7f: /* Tab */
+				XEP80_GoToNextTab();
+				break;
+			case XEP80_ATARI_EOL: /* Atari EOL */
+				XEP80_AddEOL();
+				break;
+			case 0x9c: /* Delete Line */
+				XEP80_DeleteLogicalLine();
+				break;
+			case 0x9d: /* Insert Line */
+				XEP80_InsertLine();
+				break;
+			case 0x9e: /* Clear tab */
+				tab_stops[xcur] = FALSE;
+				break;
+			case 0x9f: /* Set Tab */
+				tab_stops[xcur] = TRUE;
+				break;
+			case 0xfd: /* Sound Bell */
+				/* Do nothing here */
+				break;
+			case 0xfe: /* Delete Char */
+				XEP80_DeleteChar();
+				break;
+			case 0xff: /* Insert Char */
+				XEP80_InsertChar();
+				break;
+			default:
+				XEP80_AddCharAtCursor(byte);
+				break;
+			}
+        }
+	}
+
+}
+
+static void	XEP80_SendCursorStatus()
+{
+	/* Send X cursor only */
+	if ((old_xcur == xcur && old_ycur == ycur) ||
+		(old_ycur == ycur)) {
+		if (xcur > 0x4f) {
+			XEP80_InputWord(0x150);
+		}
+		else {
+			XEP80_InputWord(0x100 | (xcur & 0x7F));
+		}
+		}
+	/* Send Y cursor only */
+	else if (old_xcur == xcur) {
+			XEP80_InputWord(0x1E0 | (ycur & 0x1F));
+		}
+	/* Send X followed by Y cursor */
+	else {
+		if (xcur > 0x4f) {
+			XEP80_InputWord(0x1D0);
+			}
+		else {
+			XEP80_InputWord(0x180 | (xcur & 0x7F));
+			}
+		XEP80_InputWord(0x1E0 | (ycur & 0x1F));
+		}
+}
+
+static void XEP80_SetXCur(UBYTE cursor)
+{
+	new_xcur = cursor;
+    new_ycur = ycur;
+    XEP80_UpdateCursor();
+	XEP80_SendCursorStatus();
+}
+
+static void XEP80_SetXCurHigh(UBYTE cursor)
+{
+	new_xcur = ((UBYTE)xcur & 0x3f) | (cursor << 4);
+    new_ycur = ycur;
+    XEP80_UpdateCursor();
+	XEP80_SendCursorStatus();
+}
+
+static void XEP80_SetLeftMarginLow(UBYTE margin)
+{
+	lmargin = margin;
+}
+
+static void XEP80_SetLeftMarginHigh(UBYTE margin)
+{
+	lmargin = ((UBYTE)lmargin & 0x3f) | (margin << 4);
+}
+
+static void XEP80_SetYCur(UBYTE cursor)
+{
+    new_xcur = xcur;
+	new_ycur = cursor;
+    XEP80_UpdateCursor();
+	XEP80_SendCursorStatus();
+}
+
+static void XEP80_SetScreenMode(int graphics, int pal)
+{
+	graphics_mode = graphics;
+	pal_mode = pal;
+	if (graphics_mode) {
+        xcur = 0;
+        ycur = 0;
+		burst_mode = TRUE;
+        /* Clear the old text screen */
+		XEP80_FillMem(0x20, FALSE);
+        XEP80_BlitScreen();
+        /* Clear the graphics memory */
+        memset(xep80_graph_data,0,
+               (XEP80_GRAPH_WIDTH/8)*XEP80_GRAPH_HEIGHT);
+		}
+	else {
+        xcur = 0;
+        ycur = 0;
+		burst_mode = FALSE;
+		XEP80_FillMem(0x9b, FALSE);
+        XEP80_BlitScreen();
+        new_xcur = xcur;
+        new_ycur = ycur;
+        XEP80_UpdateCursor();
+		}
+}
+
+static void XEP80_SetRightMarginLow(UBYTE margin)
+{
+	rmargin = margin;
+}
+
+static void XEP80_SetRightMarginHigh(UBYTE margin)
+{
+	rmargin = ((UBYTE)rmargin & 0x3f) | (margin << 4);
+}
+
+static void XEP80_GetChar(void)
+{
+    static int at_eol_at_margin = FALSE;
+
+    if (xcur == rmargin && at_eol_at_margin) {
+        XEP80_InputWord(XEP80_ATARI_EOL);
+        at_eol_at_margin = FALSE;
+    } else {
+        XEP80_InputWord(xep80_data[ycur][xcur]);
+    }
+	
+    old_xcur = xcur;
+	old_ycur = ycur;
+    new_xcur = xcur + 1;
+    new_ycur = ycur;
+    
+    if (new_xcur > rmargin) 
+        {
+        if (eol_at_margin[new_ycur]) {
+            new_ycur = ycur;
+            new_xcur -= 1;
+            at_eol_at_margin = TRUE;
+        }
+        else {
+            new_xcur = lmargin;
+            if (new_ycur < XEP80_HEIGHT-2)
+                new_ycur++;
+        }
+    }
+    XEP80_UpdateCursor();
+	XEP80_SendCursorStatus();
+}
+
+static void XEP80_GetXCur(void)
+{
+	XEP80_InputWord(xcur);
+}
+
+static void XEP80_MasterReset(void)
+{
+	int i;
+	
+	input_count = 0;
+
+	xcur = 0;
+	xscroll = 0;
+	ycur = 0;
+	new_xcur = 0;
+	new_ycur = 0;
+	old_xcur = 0;
+	old_ycur = 0;
+	lmargin = 0;
+	rmargin = 0x4f;
+	attrib_a = 0;
+	attrib_b = 0;
+	list_mode = FALSE;
+	char_set = CHAR_SET_A;
+	cursor_on = TRUE;
+	cursor_blink = FALSE;
+	cursor_overwrite = FALSE;
+	blink_reverse = FALSE;
+	inverse_mode = FALSE;
+	screen_output = TRUE;
+	burst_mode = FALSE;
+	graphics_mode = FALSE;
+	pal_mode = FALSE;
+	escape_mode = FALSE;
+
+    font_a_index = 0;
+    font_a_double = FALSE;
+    font_a_blank = FALSE;
+    font_a_blink = FALSE;
+    font_b_index = 0;
+    font_b_double = FALSE;
+    font_b_blank = FALSE;
+    font_b_blink = FALSE;
+	memset(xep80_data,XEP80_ATARI_EOL,XEP80_WIDTH*XEP80_HEIGHT);
+    if (!XEP80_FONTS_inited)
+        XEP80_FONTS_InitFonts();
+	for (i=0;i<XEP80_HEIGHT;i++)
+		eol_at_margin[i] = FALSE;
+    XEP80_BlitScreen();
+	XEP80_UpdateCursor();
+	XEP80_InputWord(0x01);
+}
+
+static void XEP80_GetPrinterStatus(void)
+{
+	XEP80_InputWord(0x01);
+}
+
+static void XEP80_FillMem(UBYTE c, int output)
+{
+	int i;
+	
+	for (i=0;i<XEP80_HEIGHT;i++)
+		eol_at_margin[i] = FALSE;
+
+	memset(xep80_data,c,XEP80_WIDTH*XEP80_HEIGHT);
+	if (output)
+	XEP80_InputWord(0x01);
+}
+
+static void XEP80_SetList(int list)
+{
+	list_mode = list;
+}
+
+static void XEP80_SetOutputDevice(int screen, int burst)
+{
+	screen_output = screen;
+	burst_mode = burst;
+}
+
+static void XEP80_SetCharSet(int set)
+{
+	char_set = set;
+}
+
+static void XEP80_SetCursor(int on, int blink)
+{
+	cursor_on = on;
+	cursor_blink = blink;
+    if (!cursor_on) {
+        XEP80_BlitChar(xcur, ycur, FALSE);
+    }
+    else {
+        new_xcur = xcur;
+        new_ycur = ycur;
+        XEP80_UpdateCursor();
+    }
+}
+
+static void XEP80_SetXCurStart(void)
+{
+    int x_start = xcur;
+    int y_start = ycur;
+
+    XEP80_FindStartLogicalLine(&x_start, &y_start);
+    new_xcur = x_start;
+    new_ycur = y_start;
+    XEP80_UpdateCursor();
+	XEP80_SendCursorStatus();
+}
+
+static void XEP80_SetScrollWindow(void)
+{
+	xscroll = xcur;
+	XEP80_BlitScreen();
+}
+
+static void XEP80_SetInverse(int inverse)
+{
+	inverse_mode = inverse;
+	XEP80_BlitScreen();
+}
+
+static void XEP80_SetVideoCtrl(UBYTE video_ctrl)
+{
+    if (video_ctrl & 0x08) {
+        inverse_mode = TRUE;
+    }
+    else {
+        inverse_mode = FALSE;
+    }
+    if (video_ctrl & 0x02) {
+        cursor_blink = FALSE;
+    }
+    else {
+        cursor_blink = TRUE;
+    }
+    if (video_ctrl & 0x04) {
+        cursor_overwrite = FALSE;
+    }
+    else {
+        cursor_overwrite = TRUE;
+    }
+    if (video_ctrl & 0x01) {
+        blink_reverse = TRUE;
+    }
+    else {
+        blink_reverse = FALSE;
+    }
+	XEP80_BlitScreen();
+    new_xcur = xcur;
+    new_ycur = ycur;
+	XEP80_UpdateCursor();
+}
+
+static void XEP80_SetAttributeA(UBYTE attrib)
+{
+	attrib_a = ~attrib;
+
+    font_a_index = 0;
+    if (attrib_a & 0x01) {
+        font_a_index |= XEP80_FONTS_REV_FONT_BIT;
+    }
+    if (attrib_a & 0x20) {
+        font_a_index |= XEP80_FONTS_UNDER_FONT_BIT;
+    }
+    if (attrib_a & 0x80) {
+        font_a_index |= XEP80_FONTS_BLK_FONT_BIT;
+    }
+    if (attrib_a & 0x10) {
+        font_a_double = TRUE;
+    }
+    else {
+        font_a_double = FALSE;
+    }
+    if (attrib_a & 0x40) {
+        font_a_blank = TRUE;
+    }
+    else {
+        font_a_blank = FALSE;
+    }
+    if (attrib_a & 0x04) {
+        font_a_blink = TRUE;
+    }
+    else {
+        font_a_blink = FALSE;
+    }
+	XEP80_BlitScreen();
+}
+
+static void XEP80_SetAttributeB(UBYTE attrib)
+{
+	attrib_b = ~attrib;
+
+    font_b_index = 0;
+    if (attrib_b & 0x01) {
+        font_b_index |= XEP80_FONTS_REV_FONT_BIT;
+    }
+    if (attrib_b & 0x20) {
+        font_b_index |= XEP80_FONTS_UNDER_FONT_BIT;
+    }
+    if (attrib_b & 0x80) {
+        font_b_index |= XEP80_FONTS_BLK_FONT_BIT;
+    }
+    if (attrib_b & 0x10) {
+        font_b_double = TRUE;
+    }
+    else {
+        font_b_double = FALSE;
+    }
+    if (attrib_b & 0x40) {
+        font_b_blank = TRUE;
+    }
+    else {
+        font_b_blank = FALSE;
+    }
+    if (attrib_b & 0x04) {
+        font_b_blink = TRUE;
+    }
+    else {
+        font_b_blink = FALSE;
+    }
+	XEP80_BlitScreen();
+}
+
+static void XEP80_UpdateCursor(void)
+{
+    if (cursor_on) {
+		/* Redraw character cursor was at */
+        XEP80_BlitChar(xcur, ycur, FALSE);
+        /* Handle reblitting double wide's which cursor may have overwritten */
+        if (xcur != 0) {
+            XEP80_BlitChar(xcur-1, ycur, FALSE);
+        }
+		/* Redraw cursor at new location */
+        XEP80_BlitChar(new_xcur, new_ycur, TRUE);
+    }
+    xcur = new_xcur;
+    ycur = new_ycur;
+}
+
+static void XEP80_AddCharAtCursor(UBYTE byte)
+{
+    xep80_data[ycur][xcur] = byte;
+    XEP80_BlitChar(xcur, ycur, FALSE);
+
+    new_xcur = xcur + 1;
+    new_ycur = ycur;
+    if (new_xcur > rmargin) 
+        {
+        new_xcur = lmargin;
+        if (new_ycur == XEP80_HEIGHT-2) {
+            XEP80_ScrollUpLast();
+        }
+        else if (new_ycur != XEP80_HEIGHT-1) {
+			new_ycur++;
+            XEP80_ScrollDown(new_ycur);
+        }
+    }
+	else {
+		XEP80_UpdateCursor();
+	}
+}
+
+static void XEP80_AddGraphCharAtCursor(UBYTE byte)
+{
+    xep80_graph_data[ycur][xcur] = byte;
+    XEP80_BlitGraphChar(xcur, ycur);
+    xcur++;
+    if (xcur >= 40) {
+        xcur = 0;
+        ycur++;
+        if (ycur >= 240) {
+            ycur = 0;
+        }
+    }
+}
+
+static void XEP80_CursorUp(void)
+{
+	new_ycur = ycur - 1;
+	new_xcur = xcur;
+	if (new_ycur < 0) 
+		{
+		new_ycur = XEP80_HEIGHT-2;
+		}
+	XEP80_UpdateCursor();
+}
+
+static void XEP80_CursorDown(void)
+{
+	new_ycur = ycur + 1;
+	new_xcur = xcur;
+	if (new_ycur > XEP80_HEIGHT-2) 
+		{
+		new_ycur = 0;
+		}
+	XEP80_UpdateCursor();
+}
+
+static void XEP80_CursorLeft(void)
+{
+	new_xcur = xcur - 1;
+	new_ycur = ycur;
+	if (new_xcur < lmargin) 
+		{
+		new_xcur = rmargin;
+		}
+	XEP80_UpdateCursor();
+}
+
+static void XEP80_CursorRight(void)
+{
+	if (xep80_data[ycur][xcur] == XEP80_ATARI_EOL) {
+		xep80_data[ycur][xcur] = 0x20;
+	}
+	new_xcur = xcur + 1;
+	new_ycur = ycur;
+	if (new_xcur > rmargin) 
+		{
+		new_xcur = lmargin;
+		}
+	XEP80_UpdateCursor();
+}
+
+static void	XEP80_ClearScreen(void)
+{
+	int y;
+
+	for (y=0;y<XEP80_HEIGHT-1;y++) {
+		memset(&xep80_data[y][xscroll],XEP80_ATARI_EOL,XEP80_LINE_LEN);
+		eol_at_margin[y] = FALSE;
+	}
+	XEP80_BlitScreen();
+	new_xcur = 0;
+	new_ycur = 0;
+	XEP80_UpdateCursor();
+}
+
+
+static void XEP80_Backspace(void)
+{
+    int x_start = xcur;
+    int y_start = ycur;
+
+    XEP80_FindStartLogicalLine(&x_start, &y_start);
+
+    if (xcur == lmargin && x_start == xcur && y_start == ycur) {
+        return;
+    }
+	
+    if (xcur == lmargin) {
+        new_ycur = ycur-1;
+        new_xcur = rmargin;
+    }
+    else {
+        new_xcur = xcur-1;
+        new_ycur = ycur;
+    }
+    xep80_data[new_ycur][new_xcur] = 0x20;
+    XEP80_UpdateCursor();
+}
+
+static void XEP80_DeleteChar(void)
+{
+    int x_end = xcur;
+    int y_end = ycur;
+    int x_del, y_del;
+
+    XEP80_FindEndLogicalLine(&x_end, &y_end);
+    
+    x_del = xcur;
+    y_del = ycur;
+	
+    while(x_del != x_end || y_del != y_end) {
+        if (x_del == rmargin) {
+            if (y_del == XEP80_HEIGHT-2) {
+                xep80_data[y_del][x_del] = XEP80_ATARI_EOL;
+                break;
+            }
+            xep80_data[y_del][x_del] = xep80_data[y_del+1][lmargin];
+            if (xep80_data[y_del+1][lmargin+1] == XEP80_ATARI_EOL) {
+                XEP80_ScrollUp(y_del+1, y_del+1);
+				eol_at_margin[y_del] = TRUE;
+               break;
+            }
+            y_del++;
+            x_del=lmargin;
+        }
+        else {
+            xep80_data[y_del][x_del] = xep80_data[y_del][x_del+1];
+			if (x_del == rmargin-1 && eol_at_margin[y_del]) {
+				xep80_data[y_del][x_del+1] = XEP80_ATARI_EOL;
+				eol_at_margin[y_del] = FALSE;
+			}
+			x_del++;
+        }
+    }
+    XEP80_BlitRows(ycur,y_end);
+    if (cursor_on) 
+        XEP80_BlitChar(xcur, ycur, TRUE);
+}
+
+
+static void XEP80_InsertChar(void)
+{
+    int x_end = xcur;
+    int y_end = ycur;
+    int x_ins, y_ins;
+
+    XEP80_FindEndLogicalLine(&x_end, &y_end);
+
+    x_ins = x_end;
+    y_ins = y_end;
+
+	if (x_ins == rmargin) {
+		if (eol_at_margin[y_end]) {
+            if (y_end == XEP80_HEIGHT-2) {
+                new_ycur = ycur-1;
+                new_xcur = xcur;
+                XEP80_ScrollUpLast();
+                y_ins--;
+                eol_at_margin[y_end-1] = FALSE;
+                xep80_data[y_end][lmargin] = XEP80_ATARI_EOL;
+            } else {
+                XEP80_ScrollDown(y_ins+1);
+                eol_at_margin[y_end] = FALSE;
+                y_end++;
+                xep80_data[y_end][lmargin] = XEP80_ATARI_EOL;
+            }
+			}
+		else if (xep80_data[y_end][x_end] == XEP80_ATARI_EOL) {
+			x_ins--;
+			eol_at_margin[y_end] = TRUE;
+		}
+	}
+
+    while(x_ins != xcur || y_ins != ycur) {
+		if (y_ins == ycur && x_ins < xcur)
+			break;
+        if (x_ins == rmargin) {
+			if (y_ins != XEP80_HEIGHT-2) {
+				xep80_data[y_ins+1][lmargin] = xep80_data[y_ins][x_ins];
+				}
+        }
+        else {
+            xep80_data[y_ins][x_ins+1] = xep80_data[y_ins][x_ins];
+        }
+        if (x_ins == lmargin) {
+			x_ins = rmargin;
+			y_ins--;
+        }
+        else {
+            x_ins--;
+        }
+    }
+
+	if (x_ins == rmargin) {
+		xep80_data[y_ins+1][lmargin] = xep80_data[y_ins][x_ins];
+	}
+	else {
+		xep80_data[y_ins][x_ins+1] = xep80_data[y_ins][x_ins];
+	}
+	xep80_data[y_ins][x_ins] = 0x20;
+    XEP80_BlitRows(ycur,y_end);
+    if (cursor_on) 
+        XEP80_BlitChar(xcur, ycur, TRUE);
+}
+
+static void XEP80_GoToNextTab(void)
+{
+	int x_search = xcur+1;
+	int y_search = ycur;
+	
+    while(1) {
+		while(x_search<=rmargin) {
+            if (tab_stops[x_search]) {
+				new_xcur = x_search;
+				new_ycur = y_search;
+                XEP80_UpdateCursor();
+				return;
+			}
+			x_search++;
+		}
+		y_search++;
+		x_search = lmargin;
+		if (y_search >= XEP80_HEIGHT-1) {
+            new_ycur = XEP80_HEIGHT-2;
+            new_xcur = lmargin;
+            XEP80_ScrollUpLast();
+            return;
+        }
+	}
+}
+
+static void XEP80_AddEOL(void)
+{
+	int x_end = xcur;
+	int y_end = ycur;
+
+	XEP80_FindEndLogicalLine(&x_end,&y_end);
+	xep80_data[y_end][x_end] = XEP80_ATARI_EOL;
+	new_xcur = lmargin;
+	if (y_end == XEP80_HEIGHT-2) {
+		new_ycur = y_end;
+		XEP80_ScrollUpLast();
+	}
+	else {
+		new_ycur = y_end+1;
+		XEP80_UpdateCursor();
+	}
+}
+
+static void XEP80_DeleteLogicalLine(void)
+{
+    int x_start = xcur;
+    int y_start = ycur;
+    int x_end = xcur;
+    int y_end = ycur;
+
+    XEP80_FindStartLogicalLine(&x_start, &y_start);
+    XEP80_FindEndLogicalLine(&x_end, &y_end);
+    new_ycur = y_start;
+    new_xcur = lmargin;
+    XEP80_ScrollUp(y_start, y_end);
+}
+
+static void XEP80_InsertLine(void)
+{
+    new_xcur = lmargin;
+    new_ycur = ycur;
+
+    XEP80_ScrollDown(ycur);;
+}
+
+static void XEP80_ScrollUpLast(void)
+{
+    int row;
+
+    if (cursor_on) {
+        XEP80_BlitChar(xcur, ycur, FALSE);
+        if (xcur != 0) {
+            XEP80_BlitChar(xcur-1, ycur, FALSE);
+        }
+    }
+
+    for (row=1;row<=XEP80_HEIGHT-2;row++) {
+        memcpy(xep80_data[row-1],
+               xep80_data[row],
+               XEP80_WIDTH);
+		eol_at_margin[row-1] = eol_at_margin[row] ;
+    }
+    
+    memset(xep80_data[23],XEP80_ATARI_EOL,XEP80_WIDTH);
+	eol_at_margin[23] = FALSE ;
+    
+    XEP80_BlitScreen();
+
+    if (cursor_on) {
+        XEP80_BlitChar(new_xcur, new_ycur, TRUE);
+    }
+    xcur = new_xcur;
+    ycur = new_ycur;
+}
+
+static void XEP80_ScrollDown(int y)
+{
+    int row;
+    
+    if (cursor_on) {
+        XEP80_BlitChar(xcur, ycur, FALSE);
+        if (xcur != 0) {
+            XEP80_BlitChar(xcur-1, ycur, FALSE);
+        }
+    }
+
+    for (row=XEP80_HEIGHT-3;row>=y;row--) {
+        memcpy(xep80_data[row+1],
+               xep80_data[row],
+               XEP80_WIDTH);
+		eol_at_margin[row+1] = eol_at_margin[row] ;
+    }
+    
+    memset(xep80_data[y],XEP80_ATARI_EOL,XEP80_WIDTH);
+	eol_at_margin[y] = FALSE ;
+    
+    XEP80_BlitRows(y,23);
+
+    if (cursor_on) {
+        XEP80_BlitChar(new_xcur, new_ycur, TRUE);
+    }
+    xcur = new_xcur;
+    ycur = new_ycur;
+}
+
+static void XEP80_ScrollUp(int y_start, int y_end)
+{
+    int row;
+	int num_rows = y_end - y_start + 1;
+
+    if (cursor_on) {
+        XEP80_BlitChar(xcur, ycur, FALSE);
+        if (xcur != 0) {
+            XEP80_BlitChar(xcur-1, ycur, FALSE);
+        }
+    }
+
+    for (row=y_start;row<XEP80_HEIGHT-2;row++) {
+        memcpy(xep80_data[row],
+               xep80_data[row+num_rows],
+               XEP80_WIDTH);
+		eol_at_margin[row] = eol_at_margin[row+num_rows] ;
+    }
+    
+	for (row=24-num_rows; row < 24; row++) {
+		memset(xep80_data[row],XEP80_ATARI_EOL,XEP80_WIDTH);
+		eol_at_margin[row] = FALSE;
+		}
+
+    XEP80_BlitRows(y_start,23);
+
+    if (cursor_on) {
+        XEP80_BlitChar(new_xcur, new_ycur, TRUE);
+    }
+    xcur = new_xcur;
+    ycur = new_ycur;
+}
+
+static void XEP80_FindEndLogicalLine(int *x, int *y)
+{
+	int x_search = *x;
+	int y_search = *y;
+	int found = FALSE;
+	
+	while(1) {
+		while(x_search<=rmargin) {
+			if (xep80_data[y_search][x_search] == XEP80_ATARI_EOL) {
+				found = TRUE;
+				break;
+			}
+			x_search++;
+		}
+		if (found)
+			break;
+		if (eol_at_margin[y_search]) {
+			x_search = rmargin;
+			found = TRUE;
+			break;
+		}
+		y_search++;
+		if (y_search >= XEP80_HEIGHT-1)
+			break;
+		x_search = lmargin;
+	}
+	
+	if (!found) {
+		*x = rmargin;
+		*y = XEP80_HEIGHT-2;
+	}
+	else {
+		if (x_search == 0 && y_search != ycur) {
+			*x = rmargin;
+			*y = y_search-1;
+		}
+		else {
+			*x = x_search;
+			*y = y_search;
+		}
+	}
+}
+
+static void XEP80_FindStartLogicalLine(int *x, int *y)
+{
+	int y_search = *y;
+	int x_search = rmargin;
+	int found = FALSE;
+	
+	if (y_search==0) {
+		*x = lmargin;
+		return;
+		}
+	
+	y_search--;
+	while(1) {
+		while(x_search>=lmargin) {
+			if (xep80_data[y_search][x_search] == XEP80_ATARI_EOL) {
+				found = TRUE;
+				break;
+			}
+            x_search--;
+		}
+		if (found)
+			break;
+		y_search--;
+		if (y_search < 0)
+			break;
+		x_search = rmargin;
+	}
+
+	*x = lmargin;
+	
+	if (!found) {
+		*y = 0;
+	}
+	else {
+		*y = y_search + 1;
+	}
+}
+
+static void XEP80_BlitChar(int x, int y, int cur)
+{
+    int screen_col;
+    int font_row, font_col;
+    UBYTE *from, *to;
+    UBYTE ch;
+    UBYTE on, off, blink;
+    int font_index, font_double, font_blank, font_blink;
+	int blink_rev;
+	int last_double_cur = FALSE;
+
+    /* Don't Blit characters that aren't on the screen at the moment. */
+    if (x < xscroll || x >= xscroll + XEP80_LINE_LEN) 
+        return;
+    
+    screen_col = x-xscroll;
+    ch = xep80_data[y][x];
+	
+	/* Dispaly Atari EOL's as spaces */
+	if (ch == XEP80_ATARI_EOL && ((font_a_index & XEP80_FONTS_BLK_FONT_BIT) == 0) 
+        && char_set != CHAR_SET_INTERNAL)
+		ch = 0x20;
+	
+    if (ch & 0x80) {
+        font_index = font_b_index;
+        font_double = font_b_double;
+        font_blank = font_b_blank;
+        font_blink = font_b_blink;
+    }
+    else {
+        font_index = font_a_index;
+        font_double = font_a_double;
+        font_blank = font_a_blank;
+        font_blink = font_a_blink;
+    }
+	
+	if (font_blink && blink_reverse && (font_index & XEP80_FONTS_REV_FONT_BIT)) {
+		blink_rev = TRUE;
+	}
+	else {
+		blink_rev = FALSE;
+	}
+	
+    if (inverse_mode) {
+		font_index ^= XEP80_FONTS_REV_FONT_BIT;
+    }
+	
+    if (ch==XEP80_ATARI_EOL) {
+        if (inverse_mode) {
+            font_index |= XEP80_FONTS_REV_FONT_BIT;
+        }
+        else {
+            font_index &= ~XEP80_FONTS_REV_FONT_BIT;
+        }
+    }
+
+	/* Skip the charcter if the last one was a displayed double */
+	if (screen_col != 0 && !cur) {
+		if (IS_DOUBLE(x-1,y)) {
+			int firstd;
+			
+			firstd = x-1;
+			while (firstd > xscroll) {
+				if (!IS_DOUBLE(firstd,y)) {
+					firstd++;
+					break;
+					}
+				firstd--;
+			}
+			if ((x-firstd) % 2)
+				return;
+		}
+	}
+	
+	/* Check if we are doing a cursor, and the charcter before is double */
+	if (cur) {
+		if (screen_col != 0) {
+			if (IS_DOUBLE(x-1,y))
+				last_double_cur = TRUE;
+		}
+	}
+
+	if (y*XEP80_CHAR_HEIGHT < XEP80_first_row)
+		XEP80_first_row = y*XEP80_CHAR_HEIGHT;
+	if (y*XEP80_CHAR_HEIGHT + XEP80_CHAR_HEIGHT - 1 > XEP80_last_row)
+		XEP80_last_row = y*XEP80_CHAR_HEIGHT + XEP80_CHAR_HEIGHT - 1;
+
+    if (inverse_mode) {
+        on = XEP80_FONTS_offcolor;
+        off = XEP80_FONTS_oncolor;
+    }
+    else {
+        on = XEP80_FONTS_oncolor;
+        off = XEP80_FONTS_offcolor;
+    }
+
+	if (font_index & XEP80_FONTS_REV_FONT_BIT) {
+		blink = on;
+		}
+	else {
+		blink = off;
+		}
+
+    if (font_blank) {
+		UBYTE color;
+		
+        to = &XEP80_screen_1[XEP80_SCRN_WIDTH * XEP80_CHAR_HEIGHT * y + 
+                             screen_col * XEP80_CHAR_WIDTH];
+        for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+            if (cur || (font_index & XEP80_FONTS_REV_FONT_BIT)) {
+				color = on;
+            }
+            else {
+				color = off;
+            }
+
+            for (font_col=0; font_col < XEP80_CHAR_WIDTH; font_col++) {
+				if (font_double)
+					*to++ = color;
+                *to++ = color;
+            }
+			if (font_double)
+				to += XEP80_SCRN_WIDTH - 2*XEP80_CHAR_WIDTH;
+			else
+				to += XEP80_SCRN_WIDTH - 1*XEP80_CHAR_WIDTH;
+        }
+
+        to = &XEP80_screen_2[XEP80_SCRN_WIDTH * XEP80_CHAR_HEIGHT * y + 
+                             screen_col * XEP80_CHAR_WIDTH];
+        for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+            if ((cur && !cursor_blink) || (font_index & XEP80_FONTS_REV_FONT_BIT)) {
+				color = on;
+            }
+            else {
+				color = off;
+            }
+
+            for (font_col=0; font_col < XEP80_CHAR_WIDTH; font_col++) {
+				if (font_double)
+					*to++ = color;
+                *to++ = color;
+            }
+			if (font_double)
+				to += XEP80_SCRN_WIDTH - 2*XEP80_CHAR_WIDTH;
+			else
+				to += XEP80_SCRN_WIDTH - 1*XEP80_CHAR_WIDTH;
+        }
+    }
+    else if (font_double && !cur) {
+		int width;
+		
+		if (screen_col == 79)
+			width = XEP80_CHAR_WIDTH/2;
+		else
+			width = XEP80_CHAR_WIDTH;
+		
+        to = &XEP80_screen_1[XEP80_SCRN_WIDTH * XEP80_CHAR_HEIGHT * y + 
+                             screen_col * XEP80_CHAR_WIDTH];
+        for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+            from = XEP80_FONTS_atari_fonts[char_set][font_index][ch][font_row];
+
+            for (font_col=0; font_col < width; font_col++) {
+                *to++ = *from;
+                *to++ = *from++;
+            }
+            to += XEP80_SCRN_WIDTH - 2*XEP80_CHAR_WIDTH;
+        }
+
+        to = &XEP80_screen_2[XEP80_SCRN_WIDTH * XEP80_CHAR_HEIGHT * y + 
+                             screen_col * XEP80_CHAR_WIDTH];
+        for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+			if (blink_rev)
+				from = XEP80_FONTS_atari_fonts[char_set][font_index ^ XEP80_FONTS_REV_FONT_BIT][ch][font_row];
+			else
+				from = XEP80_FONTS_atari_fonts[char_set][font_index][ch][font_row];
+
+            for (font_col=0; font_col < width; font_col++) {
+                if (font_blink && !cur && !blink_rev) {
+					if ((font_index & XEP80_FONTS_UNDER_FONT_BIT) && font_row == XEP80_FONTS_UNDER_ROW) {
+						*to++ = *from;
+						*to++ = *from++;
+					}
+					else {
+						*to++ = blink;
+						*to++ = blink;
+						from++;
+					}
+                }
+                else {
+                    *to++ = *from;
+                    *to++ = *from++;
+                }
+            }
+            to += XEP80_SCRN_WIDTH - 2*XEP80_CHAR_WIDTH;
+        }
+    }
+    else if ((font_double || last_double_cur) && cur && !cursor_overwrite) {
+		int first_half, start_col, end_col;
+		
+		/* Determine if this is a double first or second half */
+		if (screen_col == 0) {
+			first_half = TRUE;
+		} else {
+			if (IS_DOUBLE(x-1,y)) {
+				int firstd;
+			
+				firstd = x-1;
+				while (firstd > xscroll) {
+					if (!IS_DOUBLE(firstd,y)) {
+						firstd++;
+						break;
+						}
+					firstd--;
+				}
+				first_half = (((x-firstd) % 2) == 0);
+			}
+			else {
+				first_half = TRUE;
+			}
+		}
+		
+		if (first_half) {
+			start_col = 0;
+			end_col = 3;
+		}
+		else {
+			start_col = 3;
+			end_col = 6;
+			ch = xep80_data[y][x-1];
+		}
+		
+        to = &XEP80_screen_1[XEP80_SCRN_WIDTH * XEP80_CHAR_HEIGHT * y + 
+                             screen_col * XEP80_CHAR_WIDTH];
+		for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+			from = XEP80_FONTS_atari_fonts[char_set][font_index ^ XEP80_FONTS_REV_FONT_BIT][ch][font_row] + start_col;
+			if (first_half)
+				*to++ = *from++;
+			for (font_col=start_col; font_col < end_col; font_col++) {
+				*to++ = *from;
+				*to++ = *from++;
+			}
+			if (!first_half)
+				*to++ = *from;
+			to += XEP80_SCRN_WIDTH - XEP80_CHAR_WIDTH;
+		}
+        to = &XEP80_screen_2[XEP80_SCRN_WIDTH * XEP80_CHAR_HEIGHT * y + 
+                             screen_col * XEP80_CHAR_WIDTH];
+		for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+			if (!cursor_blink) {
+				from = XEP80_FONTS_atari_fonts[char_set][font_index ^ XEP80_FONTS_REV_FONT_BIT][ch][font_row] + start_col;
+			}
+			else {
+				from = XEP80_FONTS_atari_fonts[char_set][font_index][ch][font_row] + start_col;
+			}
+			if (first_half)
+				*to++ = *from++;
+			for (font_col=start_col; font_col < end_col; font_col++) {
+				*to++ = *from;
+				*to++ = *from++;
+			}
+			if (!first_half)
+				*to++ = *from;
+			to += XEP80_SCRN_WIDTH - XEP80_CHAR_WIDTH;
+		}
+	}
+    else {
+        to = &XEP80_screen_1[XEP80_SCRN_WIDTH * XEP80_CHAR_HEIGHT * y + 
+                             screen_col * XEP80_CHAR_WIDTH];
+		if (cur & cursor_overwrite) {
+			for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+				for (font_col=0; font_col < XEP80_CHAR_WIDTH; font_col++) {
+					*to++ = on;
+				}
+				to += XEP80_SCRN_WIDTH - XEP80_CHAR_WIDTH;
+			}
+		}
+		else {
+			for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+				if (cur) {
+					from = XEP80_FONTS_atari_fonts[char_set][font_index ^ XEP80_FONTS_REV_FONT_BIT][ch][font_row];
+				}
+				else {
+					from = XEP80_FONTS_atari_fonts[char_set][font_index][ch][font_row];
+				}
+
+				for (font_col=0; font_col < XEP80_CHAR_WIDTH; font_col++) {
+					*to++ = *from++;
+				}
+				to += XEP80_SCRN_WIDTH - XEP80_CHAR_WIDTH;
+			}
+		}
+
+        to = &XEP80_screen_2[XEP80_SCRN_WIDTH * XEP80_CHAR_HEIGHT * y + 
+                             screen_col * XEP80_CHAR_WIDTH];
+		if (cur & cursor_overwrite) {
+			if (cursor_blink) {
+				for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+					for (font_col=0; font_col < XEP80_CHAR_WIDTH; font_col++) {
+						*to++ = off;
+					}
+				to += XEP80_SCRN_WIDTH - XEP80_CHAR_WIDTH;
+				}
+			}
+			else {
+				for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+					for (font_col=0; font_col < XEP80_CHAR_WIDTH; font_col++) {
+						*to++ = on;
+					}
+				to += XEP80_SCRN_WIDTH - XEP80_CHAR_WIDTH;
+				}
+			}
+		}
+		else {
+			for (font_row=0;font_row < XEP80_CHAR_HEIGHT; font_row++) {
+				if (cur && !cursor_blink) {
+					from = XEP80_FONTS_atari_fonts[char_set][font_index ^ XEP80_FONTS_REV_FONT_BIT][ch][font_row];
+				}
+				else {
+					if (blink_rev)
+						from = XEP80_FONTS_atari_fonts[char_set][font_index ^ XEP80_FONTS_REV_FONT_BIT][ch][font_row];
+					else
+						from = XEP80_FONTS_atari_fonts[char_set][font_index][ch][font_row];
+				}
+				for (font_col=0; font_col < XEP80_CHAR_WIDTH; font_col++) {
+					if (font_blink && !cur) {
+						if ((font_index & XEP80_FONTS_UNDER_FONT_BIT) && font_row == XEP80_FONTS_UNDER_ROW) {
+							*to++ = *from++;
+						}
+						else {
+							*to++ = blink;
+							from++;
+						}
+					}
+					else {
+						*to++ = *from++;
+					}
+				}
+				to += XEP80_SCRN_WIDTH - XEP80_CHAR_WIDTH;
+			}
+		}
+    }
+}
+
+static void XEP80_BlitScreen(void)
+{
+    int screen_row, screen_col;
+
+    for (screen_row = 0; screen_row < XEP80_HEIGHT; screen_row++) {
+        for (screen_col = xscroll; screen_col < xscroll + XEP80_LINE_LEN;
+             screen_col++) {
+            XEP80_BlitChar(screen_col, screen_row, FALSE);
+        }
+    }
+}
+
+static void XEP80_BlitRows(int y_start, int y_end)
+{
+    int screen_row, screen_col;
+
+    for (screen_row = y_start; screen_row <= y_end; screen_row++) {
+        for (screen_col = xscroll; screen_col < xscroll + XEP80_LINE_LEN;
+             screen_col++) {
+            XEP80_BlitChar(screen_col, screen_row, FALSE);
+        }
+    }
+}
+
+static void XEP80_BlitGraphChar(int x, int y)
+{
+    int graph_col;
+    UBYTE *to1,*to2;
+    UBYTE ch;
+    UBYTE on, off;
+
+    if (inverse_mode) {
+        on = XEP80_FONTS_offcolor;
+        off = XEP80_FONTS_oncolor;
+    }
+    else {
+        on = XEP80_FONTS_oncolor;
+        off = XEP80_FONTS_offcolor;
+    }
+	
+	if (y + XEP80_GRAPH_Y_OFFSET < XEP80_first_row)
+		XEP80_first_row = y + XEP80_GRAPH_Y_OFFSET;
+	if (y + XEP80_GRAPH_Y_OFFSET > XEP80_last_row)
+		XEP80_last_row = y + XEP80_GRAPH_Y_OFFSET;
+
+    ch = xep80_graph_data[y][x];
+
+    to1 = &XEP80_screen_1[XEP80_SCRN_WIDTH * (y + XEP80_GRAPH_Y_OFFSET)
+                          + x * 8 + XEP80_GRAPH_X_OFFSET];
+    to2 = &XEP80_screen_2[XEP80_SCRN_WIDTH * (y + XEP80_GRAPH_Y_OFFSET)
+                          + x * 8 + XEP80_GRAPH_X_OFFSET];
+
+    for (graph_col=7; graph_col >= 0; graph_col--) {
+        if (ch & (1<<graph_col)) {
+            *to1++ = on;
+            *to2++ = on;
+        }
+        else {
+            *to1++ = off;
+            *to2++ = off;
+        }
+    }
+}
+
+static void XEP80_BlitGraphScreen(void)
+{
+	int x, y;
+	
+	for (x=0; x<XEP80_GRAPH_WIDTH/8; x++)
+		for (y=0; y<XEP80_GRAPH_HEIGHT; y++)
+			XEP80_BlitGraphChar(x,y);
+}
+
+void XEP80_ChangeColors(void)
+{
+	XEP80_FONTS_InitFonts();
+	if (graphics_mode)
+		XEP80_BlitGraphScreen();
+	else {
+		XEP80_BlitScreen();
+		XEP80_BlitChar(xcur, ycur, TRUE);
+		}
+}
+
+void XEP80_StateSave(void)
+{
+	StateSav_SaveINT(&XEP80_enabled, 1);
+	if (XEP80_enabled) {
+		StateSav_SaveINT(&XEP80_port, 1);
+		StateSav_SaveINT(&PLATFORM_xep80, 1);
+		StateSav_SaveINT(&output_state, 1);
+		StateSav_SaveINT(&output_word, 1);
+		StateSav_SaveINT(&input_count, 1);
+		StateSav_SaveINT(&input_bit, 1);
+		StateSav_SaveUWORD(input_queue, IN_QUEUE_SIZE);
+		StateSav_SaveINT(&input_first, 1);
+		StateSav_SaveINT(&input_first, 1);
+
+		StateSav_SaveINT(&xcur, 1);
+		StateSav_SaveINT(&xscroll, 1);
+		StateSav_SaveINT(&ycur, 1);
+		StateSav_SaveINT(&new_xcur, 1);
+		StateSav_SaveINT(&new_ycur, 1);
+		StateSav_SaveINT(&old_xcur, 1);
+		StateSav_SaveINT(&old_ycur, 1);
+		StateSav_SaveINT(&lmargin, 1);
+		StateSav_SaveINT(&rmargin, 1);
+		StateSav_SaveUBYTE(&attrib_a, 1);
+		StateSav_SaveUBYTE(&attrib_b, 1);
+		StateSav_SaveINT(&list_mode, 1);
+		StateSav_SaveINT(&char_set, 1);
+		StateSav_SaveINT(&cursor_on, 1);
+		StateSav_SaveINT(&cursor_blink, 1);
+		StateSav_SaveINT(&cursor_overwrite, 1);
+		StateSav_SaveINT(&blink_reverse, 1);
+		StateSav_SaveINT(&inverse_mode, 1);
+		StateSav_SaveINT(&screen_output, 1);
+		StateSav_SaveINT(&burst_mode, 1);
+		StateSav_SaveINT(&graphics_mode, 1);
+		StateSav_SaveINT(&pal_mode, 1);
+		StateSav_SaveINT(&font_a_index, 1);
+		StateSav_SaveINT(&font_a_double, 1);
+		StateSav_SaveINT(&font_a_blank, 1);
+		StateSav_SaveINT(&font_a_blink, 1);
+		StateSav_SaveINT(&font_b_index, 1);
+		StateSav_SaveINT(&font_b_double, 1);
+		StateSav_SaveINT(&font_b_blank, 1);
+		StateSav_SaveINT(&font_b_blink, 1);
+		StateSav_SaveUBYTE(&xep80_data[0][0], XEP80_HEIGHT * XEP80_WIDTH);
+		StateSav_SaveUBYTE(&xep80_graph_data[0][0], XEP80_GRAPH_HEIGHT*XEP80_GRAPH_WIDTH/8);
+	}
+}
+
+void XEP80_StateRead(void)
+{
+	int local_xep80_enabled = 0;
+	int local_xep80 = 0;
+	
+	/* test for end of file */
+	StateSav_ReadINT(&local_xep80_enabled, 1);
+	if (local_xep80_enabled) {
+		StateSav_ReadINT(&XEP80_port, 1);
+		StateSav_ReadINT(&local_xep80, 1);
+		StateSav_ReadINT(&output_state, 1);
+		StateSav_ReadINT(&output_word, 1);
+		StateSav_ReadINT(&input_count, 1);
+		StateSav_ReadINT(&input_bit, 1);
+		StateSav_ReadUWORD(input_queue, IN_QUEUE_SIZE);
+		StateSav_ReadINT(&input_first, 1);
+		StateSav_ReadINT(&input_first, 1);
+
+		StateSav_ReadINT(&xcur, 1);
+		StateSav_ReadINT(&xscroll, 1);
+		StateSav_ReadINT(&ycur, 1);
+		StateSav_ReadINT(&new_xcur, 1);
+		StateSav_ReadINT(&new_ycur, 1);
+		StateSav_ReadINT(&old_xcur, 1);
+		StateSav_ReadINT(&old_ycur, 1);
+		StateSav_ReadINT(&lmargin, 1);
+		StateSav_ReadINT(&rmargin, 1);
+		StateSav_ReadUBYTE(&attrib_a, 1);
+		StateSav_ReadUBYTE(&attrib_b, 1);
+		StateSav_ReadINT(&list_mode, 1);
+		StateSav_ReadINT(&char_set, 1);
+		StateSav_ReadINT(&cursor_on, 1);
+		StateSav_ReadINT(&cursor_blink, 1);
+		StateSav_ReadINT(&cursor_overwrite, 1);
+		StateSav_ReadINT(&blink_reverse, 1);
+		StateSav_ReadINT(&inverse_mode, 1);
+		StateSav_ReadINT(&screen_output, 1);
+		StateSav_ReadINT(&burst_mode, 1);
+		StateSav_ReadINT(&graphics_mode, 1);
+		StateSav_ReadINT(&pal_mode, 1);
+		StateSav_ReadINT(&font_a_index, 1);
+		StateSav_ReadINT(&font_a_double, 1);
+		StateSav_ReadINT(&font_a_blank, 1);
+		StateSav_ReadINT(&font_a_blink, 1);
+		StateSav_ReadINT(&font_b_index, 1);
+		StateSav_ReadINT(&font_b_double, 1);
+		StateSav_ReadINT(&font_b_blank, 1);
+		StateSav_ReadINT(&font_b_blink, 1);
+		StateSav_ReadUBYTE(&xep80_data[0][0], XEP80_HEIGHT * XEP80_WIDTH);
+		StateSav_ReadUBYTE(&xep80_graph_data[0][0], XEP80_GRAPH_HEIGHT*XEP80_GRAPH_WIDTH/8);
+		if (!XEP80_FONTS_inited)
+			XEP80_FONTS_InitFonts();
+		if (graphics_mode)
+			XEP80_BlitGraphScreen();
+		else {
+			XEP80_BlitScreen();
+			XEP80_BlitChar(xcur, ycur, TRUE);
+			}
+		XEP80_enabled = TRUE;
+		/* not correct for SDL version */
+#if 0
+		if (PLATFORM_xep80 != local_xep80)
+			PLATFORM_SwitchXep80();
+#endif
+		PLATFORM_xep80 = local_xep80;
+		}
+	else {
+		XEP80_enabled = FALSE;
+		/* not correct for SDL version */
+#if 0
+		if (PLATFORM_xep80)
+			PLATFORM_SwitchXep80();
+#endif
+		}
+}
+
+#endif /* XEP80 */
+
+/*
+vim:ts=4:sw=4:
+*/
+
diff --git a/project/jni/application/atari800/src/xep80.h b/project/jni/application/atari800/src/xep80.h
new file mode 100755
index 000000000..1d3a30d83
--- /dev/null
+++ b/project/jni/application/atari800/src/xep80.h
@@ -0,0 +1,35 @@
+#ifndef XEP80_H_
+#define XEP80_H_
+
+#include "config.h"
+#include "atari.h"
+
+#define XEP80_WIDTH			256
+#define XEP80_HEIGHT		25
+#define XEP80_CHAR_WIDTH	7
+#define XEP80_CHAR_HEIGHT	11
+#define XEP80_GRAPH_WIDTH   320
+#define XEP80_GRAPH_HEIGHT  240
+#define XEP80_LINE_LEN		80
+#define XEP80_SCRN_WIDTH	(XEP80_LINE_LEN * XEP80_CHAR_WIDTH)
+#define XEP80_SCRN_HEIGHT	(XEP80_HEIGHT * XEP80_CHAR_HEIGHT)
+
+#define XEP80_ATARI_EOL			0x9b
+
+extern int XEP80_enabled;
+extern int XEP80_port;
+
+extern UBYTE XEP80_screen_1[XEP80_SCRN_WIDTH*XEP80_SCRN_HEIGHT];
+extern UBYTE XEP80_screen_2[XEP80_SCRN_WIDTH*XEP80_SCRN_HEIGHT];
+
+extern int XEP80_first_row;
+extern int XEP80_last_row;
+
+UBYTE XEP80_GetBit(void);
+void XEP80_PutBit(UBYTE byte);
+void XEP80_ChangeColors(void);
+void XEP80_StateSave(void);
+void XEP80_StateRead(void);
+int XEP80_Initialise(int *argc, char *argv[]);
+
+#endif /* XEP80_H_ */
diff --git a/project/jni/application/atari800/src/xep80_fonts.c b/project/jni/application/atari800/src/xep80_fonts.c
new file mode 100755
index 000000000..a6e0067db
--- /dev/null
+++ b/project/jni/application/atari800/src/xep80_fonts.c
@@ -0,0 +1,10987 @@
+/*
+ * xep80_fonts.c - XEP80 Font emulation
+ *
+ * Copyright (C) 2007 Mark Grebe
+ *
+ * This file is part of the Atari800 emulator project which emulates
+ * the Atari 400, 800, 800XL, 130XE, and 5200 8-bit computers.
+ *
+ * Atari800 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * Atari800 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with Atari800; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+*/
+
+#include "config.h"
+#ifdef XEP80_EMULATION
+#include "atari.h"
+#include "xep80_fonts.h"
+#include <string.h>
+
+#define NORM_FONT			0
+#define REV_FONT            XEP80_FONTS_REV_FONT_BIT
+#define UNDER_FONT          XEP80_FONTS_UNDER_FONT_BIT
+#define REV_UNDER_FONT      (XEP80_FONTS_REV_FONT_BIT | XEP80_FONTS_UNDER_FONT_BIT)
+#define BLK_FONT            XEP80_FONTS_BLK_FONT_BIT
+#define REV_BLK_FONT        (XEP80_FONTS_REV_FONT_BIT | XEP80_FONTS_BLK_FONT_BIT)
+#define UNDER_BLK_FONT      (XEP80_FONTS_UNDER_FONT_BIT | XEP80_FONTS_BLK_FONT_BIT)
+#define REV_UNDER_BLK_FONT  (XEP80_FONTS_REV_FONT_BIT | XEP80_FONTS_UNDER_FONT_BIT | XEP80_FONTS_BLK_FONT_BIT)
+
+int XEP80_FONTS_inited = FALSE;
+
+UBYTE atari_font[XEP80_FONTS_NUM_FONT_SETS][XEP80_FONTS_CHAR_COUNT][XEP80_CHAR_HEIGHT][XEP80_CHAR_WIDTH] =
+
+{{
+{{0,0,0,0,0,0,0,}, /* Character 0 */
+ {0,0,0,0,0,0,0,},
+ {0,1,1,0,1,1,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,1,0,0,0,}, /* Character 1 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ },
+{{0,0,0,0,0,0,1,}, /* Character 2 */
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ },
+{{0,0,0,1,0,0,0,}, /* Character 3 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,1,0,0,0,}, /* Character 4 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 5 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ },
+{{0,0,0,0,0,0,1,}, /* Character 6 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ },
+{{1,0,0,0,0,0,0,}, /* Character 7 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ },
+{{0,0,0,0,0,0,1,}, /* Character 8 */
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 9 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ },
+{{1,0,0,0,0,0,0,}, /* Character 10 */
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,1,1,1,1,}, /* Character 11 */
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,0,0,0,}, /* Character 12 */
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 13 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 14 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 15 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 16 */
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 17 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 18 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,1,0,0,0,}, /* Character 19 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 20 */
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 21 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,0,0,0,0,0,0,}, /* Character 22 */
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 23 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ },
+{{0,0,0,1,0,0,0,}, /* Character 24 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,0,0,0,}, /* Character 25 */
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,1,0,0,0,},
+ },
+{{0,0,0,1,0,0,0,}, /* Character 26 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 27 */
+ {0,1,1,1,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 28 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 29 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 30 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 31 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 32 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 33 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 34 */
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 35 */
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 36 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 37 */
+ {0,1,1,0,0,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 38 */
+ {0,0,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 39 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 40 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 41 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 42 */
+ {0,0,0,1,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 43 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 44 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 45 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 46 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 47 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 48 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 49 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 50 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 51 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 52 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 53 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 54 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 55 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 56 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 57 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 58 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 59 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 60 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 61 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 62 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 63 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 64 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 65 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 66 */
+ {0,1,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 67 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 68 */
+ {0,1,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 69 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 70 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 71 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 72 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 73 */
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 74 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 75 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 76 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 77 */
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 78 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 79 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 80 */
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 81 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 82 */
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 83 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 84 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 85 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 86 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 87 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 88 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 89 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 90 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 91 */
+ {0,0,1,1,1,1,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 92 */
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 93 */
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 94 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 95 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 96 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 97 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 98 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 99 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 100 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 101 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 102 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 103 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 104 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 105 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 106 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 107 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 108 */
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 109 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 110 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 111 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 112 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 113 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 114 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 115 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 116 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 117 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 118 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 119 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 120 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 121 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 122 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 123 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,1,0,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,1,0,0,0,}, /* Character 124 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 125 */
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 126 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 127 */
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 128 */
+ {1,1,1,1,1,1,1,},
+ {1,0,0,1,0,0,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,0,1,1,1,}, /* Character 129 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ },
+{{1,1,1,1,1,1,0,}, /* Character 130 */
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ },
+{{1,1,1,0,1,1,1,}, /* Character 131 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,0,1,1,1,}, /* Character 132 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 133 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ },
+{{1,1,1,1,1,1,0,}, /* Character 134 */
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ },
+{{0,1,1,1,1,1,1,}, /* Character 135 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,1,0,},
+ {1,1,1,1,1,1,0,},
+ },
+{{1,1,1,1,1,1,0,}, /* Character 136 */
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {1,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 137 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ },
+{{0,1,1,1,1,1,1,}, /* Character 138 */
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,0,1,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,0,0,0,0,}, /* Character 139 */
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,1,1,1,}, /* Character 140 */
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 141 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 142 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 143 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 144 */
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 145 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 146 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,0,1,1,1,}, /* Character 147 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 148 */
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 149 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,1,1,1,1,1,1,}, /* Character 150 */
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ {0,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 151 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ },
+{{1,1,1,0,1,1,1,}, /* Character 152 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,1,1,1,}, /* Character 153 */
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ {0,0,0,0,1,1,1,},
+ },
+{{1,1,1,0,1,1,1,}, /* Character 154 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 155 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 156 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 157 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 158 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 159 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 160 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 161 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 162 */
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 163 */
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 164 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 165 */
+ {1,0,0,1,1,1,1,},
+ {1,0,0,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,1,1,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 166 */
+ {1,1,0,1,1,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 167 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 168 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 169 */
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 170 */
+ {1,1,1,0,1,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 171 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 172 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 173 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 174 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 175 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 176 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 177 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 178 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 179 */
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 180 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 181 */
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 182 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 183 */
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 184 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 185 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 186 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 187 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 188 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 189 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 190 */
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 191 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 192 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,0,0,1,},
+ {1,0,1,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 193 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 194 */
+ {1,0,0,0,0,1,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 195 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 196 */
+ {1,0,0,0,0,1,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 197 */
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 198 */
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 199 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 200 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 201 */
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 202 */
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 203 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,0,1,1,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 204 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 205 */
+ {1,0,1,1,1,0,1,},
+ {1,0,0,1,0,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 206 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 207 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 208 */
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 209 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 210 */
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 211 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 212 */
+ {1,0,0,0,0,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 213 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 214 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 215 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 216 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 217 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 218 */
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 219 */
+ {1,1,0,0,0,0,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 220 */
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 221 */
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 222 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 223 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 224 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 225 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 226 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 227 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 228 */
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 229 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 230 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 231 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 232 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 233 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 234 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 235 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,0,1,1,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 236 */
+ {1,1,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 237 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,1,0,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 238 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,0,0,1,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 239 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 240 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 241 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 242 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,0,0,1,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 243 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 244 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 245 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 246 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 247 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 248 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 249 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 250 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 251 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,0,1,0,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,0,1,1,1,}, /* Character 252 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 253 */
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 254 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 255 */
+ {1,1,0,1,1,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+},
+/* Atari Internation Character Set */
+{
+{{0,0,0,0,0,0,0,}, /* Character 0 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 1 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 2 */
+ {0,0,1,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 3 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 4 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 5 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 6 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 7 */
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 8 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 9 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 10 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 11 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 12 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 13 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 14 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 15 */
+ {0,0,0,0,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 16 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 17 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 18 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 19 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 20 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 21 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 22 */
+ {0,0,1,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 23 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 24 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 25 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 26 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 27 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 28 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 29 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 30 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 31 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 32 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 33 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 34 */
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 35 */
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 36 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 37 */
+ {0,1,1,0,0,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 38 */
+ {0,0,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 39 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 40 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 41 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 42 */
+ {0,0,0,1,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 43 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 44 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 45 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 46 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 47 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 48 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 49 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 50 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 51 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 52 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 53 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 54 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 55 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 56 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 57 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 58 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 59 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 60 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 61 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 62 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 63 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 64 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 65 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 66 */
+ {0,1,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 67 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 68 */
+ {0,1,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 69 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 70 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 71 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 72 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 73 */
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 74 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 75 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 76 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 77 */
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 78 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 79 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 80 */
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 81 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 82 */
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 83 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 84 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 85 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 86 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 87 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 88 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 89 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 90 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 91 */
+ {0,0,1,1,1,1,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 92 */
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 93 */
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 94 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 95 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 96 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 97 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 98 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 99 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 100 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 101 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 102 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 103 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 104 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 105 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 106 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 107 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 108 */
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 109 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 110 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 111 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 112 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 113 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 114 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 115 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 116 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 117 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 118 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 119 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 120 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 121 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 122 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 123 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,1,0,0,0,}, /* Character 124 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 125 */
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 126 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 127 */
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 128 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 129 */
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 130 */
+ {1,1,0,0,1,0,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 131 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 132 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 133 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 134 */
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 135 */
+ {1,1,0,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 136 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,0,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 137 */
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 138 */
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 139 */
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 140 */
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 141 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 142 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 143 */
+ {1,1,1,1,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 144 */
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 145 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 146 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 147 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 148 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 149 */
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 150 */
+ {1,1,0,0,1,0,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,0,0,1,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 151 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 152 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 153 */
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 154 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 155 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 156 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 157 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 158 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 159 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 160 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 161 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 162 */
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 163 */
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 164 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 165 */
+ {1,0,0,1,1,1,1,},
+ {1,0,0,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,1,1,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 166 */
+ {1,1,0,1,1,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 167 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 168 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 169 */
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 170 */
+ {1,1,1,0,1,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 171 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 172 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 173 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 174 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 175 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 176 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 177 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 178 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 179 */
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 180 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 181 */
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 182 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 183 */
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 184 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 185 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 186 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 187 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 188 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 189 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 190 */
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 191 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 192 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,0,0,1,},
+ {1,0,1,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 193 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 194 */
+ {1,0,0,0,0,1,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 195 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 196 */
+ {1,0,0,0,0,1,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,0,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 197 */
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 198 */
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 199 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 200 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 201 */
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 202 */
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 203 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,0,1,1,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 204 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 205 */
+ {1,0,1,1,1,0,1,},
+ {1,0,0,1,0,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 206 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 207 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 208 */
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 209 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 210 */
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 211 */
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 212 */
+ {1,0,0,0,0,0,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 213 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 214 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 215 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 216 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 217 */
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 218 */
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 219 */
+ {1,1,0,0,0,0,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 220 */
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 221 */
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 222 */
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 223 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 224 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 225 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 226 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 227 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 228 */
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 229 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 230 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 231 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 232 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 233 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 234 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 235 */
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,0,1,1,1,1,},
+ {1,0,1,0,1,1,1,},
+ {1,0,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 236 */
+ {1,1,0,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 237 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,1,0,1,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 238 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,0,0,1,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 239 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 240 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 241 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 242 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,0,0,1,1,},
+ {1,0,0,1,1,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 243 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 244 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 245 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,0,0,1,},
+ {1,1,0,0,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 246 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 247 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,0,1,0,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 248 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 249 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 250 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 251 */
+ {1,1,0,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,0,0,0,0,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,0,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,0,1,1,1,}, /* Character 252 */
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ {1,1,1,0,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 253 */
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,0,1,0,1,1,},
+ {1,1,0,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,0,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 254 */
+ {1,1,1,1,0,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,0,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,0,0,1,1,},
+ {1,1,1,1,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 255 */
+ {1,1,0,1,1,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,0,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,1,1,1,},
+ {1,1,0,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+},
+
+/* Internal Character Set */
+{
+{{0,0,0,0,0,0,0,}, /* Character 0 */
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 1 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 2 */
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 3 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 4 */
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 5 */
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 6 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 7 */
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 8 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 9 */
+ {0,0,1,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 10 */
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,1,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 11 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 12 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 13 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 14 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 15 */
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 16 */
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,1,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 17 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 18 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 19 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 20 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 21 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 22 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 23 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 24 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 25 */
+ {0,0,1,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 26 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 27 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 28 */
+ {0,0,0,0,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 29 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 10 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 31 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 32 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 33 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 34 */
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 35 */
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 36 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 37 */
+ {0,1,1,0,0,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 38 */
+ {0,0,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 39 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 40 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 41 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 42 */
+ {0,0,0,1,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 43 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 44 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 45 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 46 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 47 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 48 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 49 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 50 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 51 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 52 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 53 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 54 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 55 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 56 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 57 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 58 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 59 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 60 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 61 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 62 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 63 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 64 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 65 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 66 */
+ {0,1,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 67 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 68 */
+ {0,1,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 69 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 70 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 71 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 72 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 73 */
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 74 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 75 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 76 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 77 */
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 78 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 79 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 80 */
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 81 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 82 */
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 83 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 84 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 85 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 86 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 87 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 88 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 89 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 90 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 91 */
+ {0,0,1,1,1,1,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 92 */
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 93 */
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 94 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 95 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 96 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 97 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 98 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 99 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 100 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 101 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 102 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 103 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 104 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 105 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 106 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 107 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 108 */
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 109 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 110 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 111 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 112 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 113 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 114 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 115 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 116 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 117 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 118 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 119 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 120 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 121 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 122 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 123 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 124 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 125 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 126 */
+ {0,0,1,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 127 */
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 0 */
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 1 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 2 */
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 3 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 4 */
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 5 */
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 6 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 7 */
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 8 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 9 */
+ {0,0,1,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 10 */
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,1,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 11 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 12 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 13 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 14 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 15 */
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 16 */
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,1,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 17 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 18 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 19 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 20 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 21 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 22 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 23 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 24 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 25 */
+ {0,0,1,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 26 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 27 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 28 */
+ {0,0,0,0,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 29 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 10 */
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 31 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 32 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 33 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 34 */
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 35 */
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 36 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 37 */
+ {0,1,1,0,0,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 38 */
+ {0,0,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 39 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 40 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 41 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 42 */
+ {0,0,0,1,0,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 43 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 44 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 45 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 46 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 47 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 48 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 49 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 50 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 51 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 52 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 53 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 54 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 55 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 56 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 57 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 58 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 59 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 60 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 61 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 62 */
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 63 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 64 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,1,1,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 65 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 66 */
+ {0,1,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 67 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 68 */
+ {0,1,1,1,1,0,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,0,1,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 69 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 70 */
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 71 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 72 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 73 */
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 74 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 75 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 76 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 77 */
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,1,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 78 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 79 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 80 */
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 81 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 82 */
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 83 */
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 84 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 85 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 86 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 87 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 88 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 89 */
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 90 */
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 91 */
+ {0,0,1,1,1,1,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 92 */
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 93 */
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 94 */
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 95 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 96 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 97 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 98 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 99 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 100 */
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 101 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 102 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 103 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 104 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 105 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 106 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,1,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 107 */
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,1,0,0,0,0,},
+ {0,1,0,1,0,0,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 108 */
+ {0,0,1,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 109 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 110 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 111 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 112 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 113 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 114 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,1,1,0,0,},
+ {0,1,1,0,0,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 115 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,0,},
+ {0,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 116 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 117 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,1,1,0,},
+ {0,0,1,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 118 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 119 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 120 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 121 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,1,0,0,0,1,0,},
+ {0,0,1,1,1,1,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 122 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,1,1,1,1,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 123 */
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,1,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 124 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 125 */
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,0,1,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,0,1,0,0,},
+ {0,0,0,1,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 126 */
+ {0,0,1,1,0,1,0,},
+ {0,1,0,0,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 127 */
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,1,0,1,0,0,},
+ {0,1,0,1,0,1,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+}
+};
+
+UBYTE block_font[XEP80_FONTS_CHAR_COUNT/2][XEP80_CHAR_HEIGHT][XEP80_CHAR_WIDTH] =
+{
+{{0,0,0,0,0,0,0,}, /* Character 0 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 1 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 2 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 3 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 4 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 5 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 6 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 7 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 8 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 9 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 10 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 11 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 12 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 13 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 14 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 15 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 16 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 17 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 18 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 19 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 20 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 21 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 22 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 23 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 24 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 25 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 26 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 27 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 28 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 29 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 30 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 31 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 32 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 33 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 34 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 35 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 36 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 37 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 38 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 39 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 40 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 41 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 42 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 43 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 44 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 45 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 46 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 47 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 48 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 49 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 50 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 51 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 52 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 53 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 54 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 55 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 56 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 57 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 58 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 59 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 60 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 61 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 62 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 63 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 64 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 65 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 66 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 67 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 68 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 69 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 70 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 71 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 72 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 73 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 74 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 75 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 76 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 77 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 78 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 79 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 80 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 81 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 82 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 83 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 84 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 85 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 86 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 87 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 88 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 89 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 90 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 91 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 92 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 93 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 94 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 95 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 96 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 97 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 98 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 99 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 100 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 101 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 102 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 103 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 104 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 105 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 106 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 107 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 108 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 109 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 110 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 111 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 112 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 113 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 114 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 115 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {0,0,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 116 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 117 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 118 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 119 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 120 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 121 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 122 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 123 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {0,0,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,0,0,0,0,0,}, /* Character 124 */
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {0,0,0,0,0,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,0,0,0,1,1,}, /* Character 125 */
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,0,0,0,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{0,0,1,1,1,0,0,}, /* Character 126 */
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {0,0,1,1,1,0,0,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ },
+{{1,1,1,1,1,1,1,}, /* Character 127 */
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ {1,1,1,1,1,1,1,},
+ }
+};
+
+
+UBYTE XEP80_FONTS_atari_fonts[XEP80_FONTS_NUM_FONT_SETS][XEP80_FONTS_NUM_FONTS][XEP80_FONTS_CHAR_COUNT][XEP80_CHAR_HEIGHT][XEP80_CHAR_WIDTH];
+
+UBYTE XEP80_FONTS_oncolor = 15;
+UBYTE XEP80_FONTS_offcolor = 0;
+
+void XEP80_FONTS_InitFonts(void)
+{
+	int char_no, char_row, char_col, font_set;
+
+    /* Normal Fonts */
+    for (font_set=0;font_set<XEP80_FONTS_NUM_FONT_SETS;font_set++) {
+        for (char_no = 0;char_no<XEP80_FONTS_CHAR_COUNT;char_no++) {
+            for (char_row=0;char_row<XEP80_CHAR_HEIGHT;char_row++) {
+                for (char_col=0;char_col<XEP80_CHAR_WIDTH;char_col++) {
+                    if (atari_font[font_set][char_no][char_row][char_col]) {
+                        XEP80_FONTS_atari_fonts[font_set][NORM_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                    }
+                    else {
+                        XEP80_FONTS_atari_fonts[font_set][NORM_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                    }
+                }
+            }
+        }
+    }
+    /* Inverse Fonts */
+    for (font_set=0;font_set<XEP80_FONTS_NUM_FONT_SETS;font_set++) {
+        for (char_no = 0;char_no<XEP80_FONTS_CHAR_COUNT;char_no++) {
+            for (char_row=0;char_row<XEP80_CHAR_HEIGHT;char_row++) {
+                for (char_col=0;char_col<XEP80_CHAR_WIDTH;char_col++) {
+                    if (atari_font[font_set][char_no][char_row][char_col]) {
+                        XEP80_FONTS_atari_fonts[font_set][REV_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                    }
+                    else {
+                        XEP80_FONTS_atari_fonts[font_set][REV_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                    }
+                }
+            }
+        }
+    }
+    /* Normal Underline Fonts */
+    for (font_set=0;font_set<XEP80_FONTS_NUM_FONT_SETS;font_set++) {
+        for (char_no = 0;char_no<XEP80_FONTS_CHAR_COUNT;char_no++) {
+            for (char_row=0;char_row<XEP80_CHAR_HEIGHT;char_row++) {
+                for (char_col=0;char_col<XEP80_CHAR_WIDTH;char_col++) {
+                    if (char_row != XEP80_FONTS_UNDER_ROW) {
+                        if (atari_font[font_set][char_no][char_row][char_col]) {
+                            XEP80_FONTS_atari_fonts[font_set][UNDER_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                        }
+                        else {
+                            XEP80_FONTS_atari_fonts[font_set][UNDER_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                        }
+                    }
+                    else {
+                        if (char_no<128) {
+                            XEP80_FONTS_atari_fonts[font_set][UNDER_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                        }
+                        else {
+                            XEP80_FONTS_atari_fonts[font_set][UNDER_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                        }
+                    }
+                }
+            }
+        }
+    }
+    /* Rev Underline Fonts */
+    for (font_set=0;font_set<XEP80_FONTS_NUM_FONT_SETS;font_set++) {
+        for (char_no = 0;char_no<XEP80_FONTS_CHAR_COUNT;char_no++) {
+            for (char_row=0;char_row<XEP80_CHAR_HEIGHT;char_row++) {
+                for (char_col=0;char_col<XEP80_CHAR_WIDTH;char_col++) {
+                    if (char_row != XEP80_FONTS_UNDER_ROW) {
+                        if (atari_font[font_set][char_no][char_row][char_col]) {
+                            XEP80_FONTS_atari_fonts[font_set][REV_UNDER_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                        }
+                        else {
+                            XEP80_FONTS_atari_fonts[font_set][REV_UNDER_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                        }
+                    }
+                    else {
+                        if (char_no<128) {
+                            XEP80_FONTS_atari_fonts[font_set][REV_UNDER_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                        }
+                        else {
+                            XEP80_FONTS_atari_fonts[font_set][REV_UNDER_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                        }
+                    }
+                }
+            }
+        }
+    }
+    /* Block Fonts */
+    for (char_no = 0;char_no<XEP80_FONTS_CHAR_COUNT/2;char_no++) {
+        for (char_row=0;char_row<XEP80_CHAR_HEIGHT;char_row++) {
+            for (char_col=0;char_col<XEP80_CHAR_WIDTH;char_col++) {
+                if (block_font[char_no][char_row][char_col]) {
+                    XEP80_FONTS_atari_fonts[0][BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                }
+                else {
+                    XEP80_FONTS_atari_fonts[0][BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                }
+            }
+        }
+    }
+    memcpy(XEP80_FONTS_atari_fonts[0][BLK_FONT][XEP80_FONTS_CHAR_COUNT/2], XEP80_FONTS_atari_fonts[0][BLK_FONT][0],
+           XEP80_FONTS_CHAR_COUNT/2*XEP80_CHAR_HEIGHT*XEP80_CHAR_WIDTH); 
+    /* Inverse Block Fonts */
+    for (char_no = 0;char_no<XEP80_FONTS_CHAR_COUNT/2;char_no++) {
+        for (char_row=0;char_row<XEP80_CHAR_HEIGHT;char_row++) {
+            for (char_col=0;char_col<XEP80_CHAR_WIDTH;char_col++) {
+                if (block_font[char_no][char_row][char_col]) {
+                    XEP80_FONTS_atari_fonts[0][REV_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                }
+                else {
+                    XEP80_FONTS_atari_fonts[0][REV_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                }
+            }
+        }
+    }
+    memcpy(XEP80_FONTS_atari_fonts[0][REV_BLK_FONT][XEP80_FONTS_CHAR_COUNT/2], XEP80_FONTS_atari_fonts[0][REV_BLK_FONT][0],
+          XEP80_FONTS_CHAR_COUNT/2*XEP80_CHAR_HEIGHT*XEP80_CHAR_WIDTH); 
+    /* Normal Underline Block Fonts */
+    for (char_no = 0;char_no<XEP80_FONTS_CHAR_COUNT/2;char_no++) {
+        for (char_row=0;char_row<XEP80_CHAR_HEIGHT;char_row++) {
+            for (char_col=0;char_col<XEP80_CHAR_WIDTH;char_col++) {
+                if (char_row != XEP80_FONTS_UNDER_ROW) {
+                    if (block_font[char_no][char_row][char_col]) {
+                        XEP80_FONTS_atari_fonts[0][UNDER_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                    }
+                    else {
+                        XEP80_FONTS_atari_fonts[0][UNDER_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                    }
+                }
+                else {
+                    if (char_no<128) {
+                        XEP80_FONTS_atari_fonts[0][UNDER_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                    }
+                    else {
+                        XEP80_FONTS_atari_fonts[0][UNDER_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                    }
+                }
+            }
+        }
+    }
+    memcpy(XEP80_FONTS_atari_fonts[0][UNDER_BLK_FONT][XEP80_FONTS_CHAR_COUNT/2], XEP80_FONTS_atari_fonts[0][UNDER_BLK_FONT][0],
+          XEP80_FONTS_CHAR_COUNT/2*XEP80_CHAR_HEIGHT*XEP80_CHAR_WIDTH); 
+    /* Rev Underline Block Fonts */
+    for (char_no = 0;char_no<XEP80_FONTS_CHAR_COUNT/2;char_no++) {
+        for (char_row=0;char_row<XEP80_CHAR_HEIGHT;char_row++) {
+            for (char_col=0;char_col<XEP80_CHAR_WIDTH;char_col++) {
+                if (char_row != XEP80_FONTS_UNDER_ROW) {
+                    if (block_font[char_no][char_row][char_col]) {
+                        XEP80_FONTS_atari_fonts[0][REV_UNDER_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                    }
+                    else {
+                        XEP80_FONTS_atari_fonts[0][REV_UNDER_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                    }
+                }
+                else {
+                    if (char_no<128) {
+                        XEP80_FONTS_atari_fonts[0][REV_UNDER_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_offcolor;
+                    }
+                    else {
+                        XEP80_FONTS_atari_fonts[0][REV_UNDER_BLK_FONT][char_no][char_row][char_col] = XEP80_FONTS_oncolor;
+                    }
+                }
+            }
+        }
+    }
+    memcpy(XEP80_FONTS_atari_fonts[0][REV_UNDER_BLK_FONT][XEP80_FONTS_CHAR_COUNT/2], XEP80_FONTS_atari_fonts[0][REV_UNDER_BLK_FONT][0],
+          XEP80_FONTS_CHAR_COUNT/2*XEP80_CHAR_HEIGHT*XEP80_CHAR_WIDTH); 
+    /* Copy Block fonts to international fonts */
+    memcpy(XEP80_FONTS_atari_fonts[1][4], XEP80_FONTS_atari_fonts[0][4],
+           4*XEP80_FONTS_CHAR_COUNT*XEP80_CHAR_HEIGHT*XEP80_CHAR_WIDTH); 
+
+    XEP80_FONTS_inited = TRUE;
+}
+#endif /* XEP80 */
+
diff --git a/project/jni/application/atari800/src/xep80_fonts.h b/project/jni/application/atari800/src/xep80_fonts.h
new file mode 100755
index 000000000..5f79206f0
--- /dev/null
+++ b/project/jni/application/atari800/src/xep80_fonts.h
@@ -0,0 +1,26 @@
+#ifndef XEP80_FONTS_H_
+#define XEP80_FONTS_H_
+
+#include "config.h"
+#include "atari.h"
+#include "xep80.h"
+
+#define XEP80_FONTS_NUM_FONT_SETS   3
+#define XEP80_FONTS_NUM_FONTS       8
+#define XEP80_FONTS_CHAR_COUNT    256
+
+#define XEP80_FONTS_REV_FONT_BIT        0x1
+#define XEP80_FONTS_UNDER_FONT_BIT      0x2
+#define XEP80_FONTS_BLK_FONT_BIT        0x4
+
+#define XEP80_FONTS_UNDER_ROW     10
+
+extern UBYTE XEP80_FONTS_atari_fonts[XEP80_FONTS_NUM_FONT_SETS][XEP80_FONTS_NUM_FONTS][XEP80_FONTS_CHAR_COUNT][XEP80_CHAR_HEIGHT][XEP80_CHAR_WIDTH];
+extern UBYTE XEP80_FONTS_oncolor;
+extern UBYTE XEP80_FONTS_offcolor;
+
+extern int XEP80_FONTS_inited;
+
+void XEP80_FONTS_InitFonts(void);
+
+#endif /* XEP80_FONTS_H_ */