/* Demonstration using file created by to IFF ILBM to includable C converter

    This program opens a screen and displays as many copies of the picture
    as will fit.  The picture was draw by my father, Floyd Kemp.
    
    As you will see if you compile this, the arrays should be put into a
    separate file and compiled only once.  I left it in this file to make
    sure that the parts stayed together.
*/

#include <exec/types.h>
#include <exec/nodes.h>
#include <exec/lists.h>
#include <exec/ports.h>
#include <exec/devices.h>
#include <devices/keymap.h>
#include <graphics/regions.h>
#include <graphics/copper.h>
#include <graphics/gels.h>
#include <graphics/gfxbase.h>
#include <graphics/gfx.h>
#include <graphics/clip.h>
#include <graphics/view.h>
#include <graphics/rastport.h>
#include <graphics/layers.h>
#include <intuition/intuition.h>
#include <hardware/blit.h>
#include <stdio.h>

#define test_width 283
#define test_height 58
#define test_num_planes 5
#define test_words_per_plane 1044

UWORD test_colortable[] = {
    0xf00,
    0xeca,
    0xe00,
    0xb00,
    0xa50,
    0x990,
    0x490,
    0x080,
    0x043,
    0x052,
    0x051,
    0x160,
    0x261,
    0x471,
    0x671,
    0x871,
    0x862,
    0x952,
    0xa52,
    0xfca,
    0x333,
    0x444,
    0x555,
    0x666,
    0x777,
    0x888,
    0x999,
    0xaaa,
    0xccc,
    0xddd,
    0xeee,
    0xfff
};

UWORD test_data[5][58][18] = {
    {
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0fff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffc0,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0040,0x6000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0040,
        0x67ff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xfc40,0x6400,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x07f0,0x0000,0x0000,0x0003,0x4030,0x0240,0xd803,
        0xfdc0,0x0000,0x0c00,0x0c40,0x6400,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0ff8,0x0000,0x0000,0x00c3,0x8030,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0c40,0x6600,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x1ffc,0x0000,0x0800,
        0x0001,0x0078,0x0000,0x0000,0x0000,0x0030,0x0003,0x8c40,
        0x6600,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x1ffc,
        0x0000,0x0000,0x0000,0x2800,0x001f,0x0000,0x0020,0x0006,
        0x0800,0x0c40,0x6700,0x01c0,0x1ffc,0x0000,0x3000,0x0000,
        0x0000,0x1ffc,0x0000,0x0000,0x1000,0x3000,0x3c00,0x0c00,
        0x0170,0x0001,0x0000,0x6c40,0x6700,0x01e3,0xffe0,0x0000,
        0x0000,0x0000,0x0000,0x1ffc,0x0000,0x0000,0x1000,0x0010,
        0x0000,0x3f00,0x1e00,0x6000,0xa000,0x0c40,0x6600,0x00ff,
        0xf800,0x7800,0x0000,0x0000,0x0000,0x1ffc,0x0000,0x0000,
        0x0000,0x003f,0x0000,0xeff0,0x0000,0x00ce,0xb006,0x0c40,
        0x6600,0x007f,0x0000,0x1800,0xfffc,0x0000,0x07c0,0x0ffb,
        0x0001,0x9c00,0x003f,0x01e0,0x0000,0x03ff,0xc000,0x0000,
        0x003e,0x0e40,0x6408,0x0420,0x0000,0x1fff,0xfffc,0x6000,
        0x3ff8,0x0ff3,0xff01,0x8037,0xffff,0xffff,0x0002,0x3c3f,
        0xc00f,0x0000,0x00fe,0x0e40,0x6400,0x0227,0xffff,0x9fff,
        0x8000,0x7000,0x77ff,0xffe3,0xff00,0x0037,0xfe0f,0xff00,
        0x0011,0x0103,0xc80e,0x0000,0x103c,0x0e40,0x6400,0x1041,
        0xffff,0xf000,0x0000,0x7001,0xf7ff,0xfcc0,0x0000,0x0000,
        0x007f,0xfc03,0xe2c2,0x80c0,0xc11d,0x707e,0x0000,0x3c40,
        0x6400,0x083e,0x7fff,0xff80,0x0000,0x0007,0xe7ff,0xf000,
        0x0000,0x0000,0x0003,0xffff,0xf88a,0x8000,0x83f8,0x3c10,
        0x0000,0x7c40,0x6400,0x001b,0xcfff,0xffe0,0x0000,0x001f,
        0xffff,0xfc00,0x0000,0x0000,0x6001,0xfffe,0x0210,0x8002,
        0x47f8,0x0000,0xe000,0x0c40,0x6400,0x0004,0x0dff,0xfffc,
        0x0000,0x007f,0xfc01,0xff80,0x0000,0x0000,0x17c0,0x7c00,
        0x1411,0x0000,0x8fff,0xfe00,0x0000,0x0c40,0x6700,0x0002,
        0x0b3f,0xffff,0xc000,0x03ff,0xc000,0x7ffe,0x0000,0x0000,
        0x66fe,0x3ac0,0x7832,0x0000,0x0fff,0xfff8,0x0000,0x0c40,
        0x6720,0x0002,0x06cf,0xffff,0xff00,0x00fe,0x0000,0x1fff,
        0xff80,0x0000,0x06ff,0x00ef,0xc010,0x0000,0x1fff,0xfff8,
        0x0000,0x0c40,0x6730,0x0000,0x8321,0xffff,0xfffc,0x0000,
        0x0000,0x1ff7,0xfc00,0x0000,0x016f,0xc016,0x0040,0x0000,
        0x0bff,0xffe0,0x0000,0x0c40,0x6738,0x0000,0x000f,0x0fff,
        0xfffd,0xb200,0x0000,0x0fff,0xf800,0x0000,0x01af,0xc000,
        0x30c0,0x0000,0x0bff,0xffc0,0x0000,0x0c40,0x673e,0x0000,
        0x1001,0x0000,0xfffa,0x1700,0x0002,0x27ff,0xe060,0x0000,
        0x00cf,0xe000,0x4380,0x0000,0x07ff,0xffc0,0x0000,0x0c40,
        0x673f,0x0000,0x0800,0x0000,0x0006,0x0000,0x0002,0x2bff,
        0x8020,0x0000,0x0063,0xf801,0x9400,0x0000,0x01ff,0xff80,
        0x0000,0x0c40,0x673f,0xc000,0x0000,0x0000,0x0000,0x0000,
        0x0001,0x00fe,0x0010,0x0000,0x0038,0xfffc,0x0400,0x0000,
        0x01ff,0xff80,0x0000,0x0c40,0x673f,0xe000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x3038,0x0059,0x8000,0x0008,0xfffa,
        0x0000,0x0000,0x1883,0xfe00,0x0000,0x0c40,0x673f,0xf000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x1d11,0x8020,0x0000,
        0x0000,0x7fe6,0x0022,0x0001,0x1073,0xfe00,0x0000,0x0c40,
        0x673f,0xf800,0x0000,0x0000,0x0000,0x0000,0x0000,0x010c,
        0x0012,0x0000,0x0000,0x3e04,0x0002,0x6003,0x001c,0x2000,
        0x0040,0x0c40,0x673f,0xfc00,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0040,0x0013,0x1000,0x0100,0x3b24,0x001f,0xf002,
        0x0000,0x0000,0x0340,0x0c40,0x673f,0xfe00,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0034,0x0004,0x1a00,0x0380,0x01b8,
        0x007f,0xfc00,0x0000,0x0000,0x0004,0x0c40,0x673f,0xff80,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0002,0x01e0,
        0x07c0,0x0000,0x03ff,0xff00,0x0000,0x0000,0x0042,0x0c40,
        0x677f,0xffc0,0x0000,0x0000,0x0000,0x0000,0x0000,0x0003,
        0xf800,0x0318,0x0f70,0x0000,0x0fff,0xffc0,0x0000,0x0000,
        0x0048,0x0c40,0x67ff,0xfff0,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x001f,0xfe00,0x0014,0x1f30,0x0000,0x0fff,0xff60,
        0x0000,0x0000,0x0010,0x4c40,0x67ff,0xfffe,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x001f,0xff00,0x000c,0x000d,0x0000,
        0x007f,0xfe10,0x0000,0x0000,0x0030,0x4c40,0x677f,0xffff,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x007a,0xff00,0x0000,
        0x00fc,0x8000,0xe08f,0xfc38,0x0000,0x0002,0x3038,0x4c40,
        0x671f,0xffff,0xa000,0x0000,0x0000,0x0000,0x0000,0x01ff,
        0xffe0,0x0000,0xfffe,0xc001,0xff91,0x007e,0x0000,0x0000,
        0x1878,0x0c40,0x673f,0xffff,0xe440,0x0000,0x0000,0x0000,
        0x0000,0x03f7,0xfbf0,0x0003,0xbfff,0x4003,0xfff7,0x00ff,
        0xc400,0x0000,0x5efe,0x3c40,0x67ff,0xfbff,0xf5c0,0x0000,
        0x0000,0x0000,0x0000,0x0fff,0xfff0,0x0007,0xffff,0xa007,
        0xffff,0xffff,0xdc00,0x001c,0x0fff,0xfc40,0x67ff,0xffff,
        0xfd80,0x0000,0x0000,0x0000,0x0000,0x3fff,0xff9a,0x001f,
        0xffff,0xf80f,0xffff,0xffff,0xf800,0x0384,0x1fff,0xfc40,
        0x673f,0xfbff,0xfd10,0x0000,0x0000,0x0000,0x0000,0xffff,
        0xffde,0x00ff,0xffff,0xffff,0xffff,0xffff,0xfd00,0x4b4f,
        0x3fff,0xfc40,0x673f,0xf3ff,0xff20,0x0000,0x0000,0x0000,
        0x001f,0xffff,0xffff,0xffff,0xffff,0xffff,0xfe7f,0xfffd,
        0xff03,0xa7df,0xdfff,0xfc40,0x673f,0xffff,0xffe0,0x0000,
        0x0000,0x0000,0x007f,0xffff,0xfdff,0xdfff,0xffff,0xffff,
        0xfefd,0xffff,0xffcf,0xefff,0xffff,0xfc40,0x673f,0xffff,
        0xffe0,0x0000,0x0000,0x0000,0x001f,0xffff,0xfe5f,0xcfff,
        0xffff,0xfff7,0xffff,0xffff,0xff8f,0xffff,0xffff,0xfc40,
        0x673f,0xffef,0xc7f8,0x0000,0x0000,0x0000,0x001f,0xffff,
        0xffff,0xbfff,0xffff,0xffff,0xfff9,0x7fff,0xff1f,0xffff,
        0xffff,0xfc40,0x673f,0xffff,0xfffe,0x0000,0x0000,0x0000,
        0x0007,0xffff,0xffff,0xfbff,0xffff,0xffff,0xffff,0x7fff,
        0xffbf,0xffff,0xffff,0xfc40,0x673f,0xffff,0xffff,0xc000,
        0x0000,0x0000,0x0003,0xffff,0xffff,0xffdf,0xffff,0xfffe,
        0xfbf6,0xffff,0xfc7f,0xffff,0xffff,0xfc40,0x673f,0xffff,
        0xffff,0xe000,0x0000,0x0000,0x0001,0xfdff,0xffff,0xffff,
        0xffff,0xffff,0xfffe,0xffff,0xfcff,0xffff,0xffff,0xfc40,
        0x673f,0xffff,0xffff,0xf800,0x0000,0x0000,0x0000,0xfdff,
        0xffff,0xffff,0xffff,0xffff,0xf031,0xffff,0xfeff,0xffff,
        0xffff,0xfc40,0x673f,0xffff,0xffff,0xff00,0x0000,0x0000,
        0x0000,0x3fff,0xffff,0xffff,0xffff,0x803f,0x9821,0x0fff,
        0xf1ff,0xffff,0xffff,0xfc40,0x673f,0xffff,0xffff,0xffe0,
        0x0000,0x0000,0x0000,0x07ff,0x81ff,0xffff,0xff00,0x0001,
        0x0c21,0xfcdf,0x83ff,0xffff,0xffff,0xfc40,0x67ff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xfc40,
        0x67ff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xfc40,0x6000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0040,0x6000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0040,0x4000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x00c0,
        0x7fff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffc0,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000
    },
    {
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0fff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffc0,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0040,0x6000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0040,
        0x67ff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xfc40,0x673f,0xe01f,0xfffc,0x0fff,0xffff,0xffff,
        0xf007,0x87f0,0xc00f,0xffff,0xf004,0x80ff,0xfdbf,0xe000,
        0x0220,0x0f00,0x03f0,0x0c40,0x653f,0xc00f,0x03e0,0x01ff,
        0xffff,0xffff,0x807f,0xcfff,0xfc03,0xffff,0x8000,0x00ff,
        0xffc0,0x0000,0x0000,0x0000,0x0380,0x8c40,0x653f,0x8780,
        0x0000,0x003e,0x0000,0x0000,0x03fe,0x7fff,0xffc0,0xf7f0,
        0x0001,0x0000,0x0000,0x0000,0x0000,0xe00f,0xe000,0x4c40,
        0x653f,0x8fc0,0x3800,0x3800,0x0000,0x0000,0x020e,0x3fff,
        0xfff0,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x07f9,
        0xf03f,0xcc40,0x6407,0x8fe1,0xfffc,0x0000,0xffff,0xffff,
        0xf200,0x1ffd,0xc000,0x0000,0x0000,0x3000,0xf000,0x0f00,
        0x0080,0x03fe,0xffe0,0x0c40,0x643f,0x9ffb,0xfffe,0x0000,
        0x007f,0xffff,0xcfc0,0x1ffc,0x0000,0x0004,0x0000,0x0010,
        0x03c0,0x3f80,0x0000,0x81ff,0x5f80,0x2c40,0x653f,0xffff,
        0xf87f,0xff80,0x007f,0xffff,0x7fcf,0xfffc,0x19f0,0x00ff,
        0x9000,0x0000,0x0040,0xfff8,0x0000,0x1131,0x4008,0x0c40,
        0x6500,0x0fff,0xffff,0xffe7,0xffff,0xffff,0xfff9,0x1fff,
        0xffff,0x9cff,0xf0fc,0x00ff,0xfc41,0xffff,0xc000,0x011f,
        0x0046,0x0c40,0x6400,0x03df,0xffff,0xffff,0xffff,0xffff,
        0xfff9,0x1fff,0xffff,0xff37,0xf803,0xff00,0xffcd,0xc3ff,
        0xc00f,0x0700,0x00fe,0x0c40,0x6400,0x005f,0xfff7,0xffff,
        0xffff,0xffff,0xf7ff,0xffff,0xfffe,0xffff,0xffff,0xffff,
        0xff8e,0xfeff,0xc00a,0x01c0,0xf01c,0x1c40,0x6400,0x003f,
        0xfffc,0x1fff,0xe1ff,0xffff,0xf7f8,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xfd3d,0x7f3f,0xff1c,0x505a,0x0000,0x3e40,
        0x6400,0x0001,0xbfff,0xe3ff,0xfff8,0xf0ff,0xe7ff,0x7fff,
        0xffff,0xffff,0xffff,0xff98,0xa775,0x7fff,0x7fff,0xfc10,
        0x0200,0xfe40,0x6400,0x0000,0x3fff,0xfc5f,0xfff0,0xe7ff,
        0xffff,0xffff,0xff1f,0xffff,0x9fff,0xf547,0xf9ef,0x7ffd,
        0xbfff,0xff00,0xe000,0xfc40,0x6400,0x0000,0x73ff,0xfe67,
        0xffff,0xffff,0xfff7,0xffff,0xff3f,0xffff,0xe9ff,0xffff,
        0xebee,0xffff,0x7fff,0xff87,0xc000,0x3c40,0x6400,0x0000,
        0x14ff,0xff5d,0xffff,0xffff,0xffff,0xffff,0xff7f,0xfff7,
        0x99ff,0xc53f,0x87cc,0xffff,0xffff,0xffff,0x8000,0x1c40,
        0x6400,0x0000,0x013f,0xffc6,0x7fff,0xffff,0xff03,0xfff1,
        0xff7f,0xffff,0xf97f,0xff10,0x3f6f,0xffff,0xe7ff,0xfffe,
        0x0000,0x1c40,0x6400,0x0000,0x00df,0xfff1,0x0fff,0xffff,
        0xe001,0xfff4,0x27ff,0xfdff,0xfe8f,0xffe9,0xffbf,0xffff,
        0xf7ff,0xfffe,0x0000,0x1c40,0x6400,0x0000,0x0010,0xffff,
        0xf3ff,0xfbfb,0x0000,0x77ff,0xf77f,0xfdff,0xfe4f,0xffe7,
        0xce3f,0xffff,0xf7ff,0xfffc,0x0060,0x1c40,0x6400,0x0000,
        0x0002,0xffff,0xffbf,0x9ff8,0x0000,0x19ff,0xff1f,0xfdff,
        0xff3f,0xffff,0xbc7f,0xffff,0xf9ff,0xfff0,0x0060,0x1c40,
        0x6400,0x0000,0x0000,0x1fff,0xfff9,0x7fe0,0x0000,0x047f,
        0xf81f,0xfdff,0xff9e,0xfffe,0x69ff,0xffff,0xfeff,0xfff0,
        0x0060,0x1c40,0x6400,0x0000,0x0000,0x0007,0xffff,0x7f80,
        0x0000,0x073f,0xf80f,0xffff,0xffc7,0xffff,0xf9ff,0xffff,
        0xfe7f,0xffe0,0x40f0,0x1c40,0x6400,0x0800,0x0000,0x000f,
        0x9f96,0x7880,0x0000,0x83df,0xc006,0x77ff,0xfff7,0x7ffd,
        0xfdff,0xffff,0xe77f,0xffe0,0x40e0,0x1c40,0x6400,0x0800,
        0x01ff,0xfe3e,0x8a95,0xfec0,0x0000,0x00ee,0x0003,0xffff,
        0xf84f,0x9ff9,0xf9c0,0x07fe,0xef8f,0xffcc,0x46fa,0x1c40,
        0x6418,0x0000,0x07ff,0xfffc,0x8edd,0xfc84,0x0080,0x0070,
        0x0000,0xffff,0xf01f,0xcbfb,0xff00,0x01fc,0xc063,0xdf8c,
        0x67a3,0x9c40,0x641b,0x3000,0x0100,0x0ff4,0xcb95,0xefa4,
        0x0080,0x0000,0x0000,0x2fff,0xe00f,0xc4db,0xf000,0x007d,
        0x003f,0xffcc,0x44bf,0x9c40,0x641e,0x7000,0x0000,0x0e44,
        0x9bbf,0xfe84,0x00a0,0x0000,0x0010,0x05ff,0xc007,0xfe47,
        0xc000,0x003c,0x0000,0x084f,0xd7fb,0x9c40,0x640d,0x2000,
        0x0000,0x0e47,0xaedf,0xfed6,0x50e0,0x0000,0x0000,0x061f,
        0x8003,0xffff,0x8000,0x000c,0x0000,0x084f,0xc7b9,0xcc40,
        0x6460,0xcc00,0x0000,0x0f46,0x8fdf,0xffe4,0x53a0,0x0000,
        0x0000,0x00e7,0x0083,0xffff,0x0000,0x0000,0x0000,0x087f,
        0xefb7,0x9c40,0x64f2,0xd900,0x0000,0x0e6d,0xdfef,0xdfdd,
        0x53b0,0x0000,0x0000,0x002b,0x00c0,0x00fe,0x3000,0x0080,
        0x0000,0x2c7d,0xbfef,0xac40,0x64fe,0x1920,0x0000,0x1fd5,
        0x6fcf,0xff54,0x7ba0,0x0000,0x0000,0x0000,0x3ff0,0x0000,
        0x3f80,0x01e0,0x0000,0x28df,0xefcf,0x8c40,0x647b,0x31ac,
        0x0000,0x3ed6,0xcf9f,0xdf76,0xd3f8,0x0005,0x0000,0x0800,
        0x7f00,0x0000,0x1ff0,0x03c0,0x0000,0x3b7d,0x4fc7,0xbc40,
        0x643a,0x006c,0x2000,0x0fcb,0x0fff,0xefff,0xffe0,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x00ff,0xff82,0x0000,0x386f,
        0xe787,0xec40,0x644f,0xee40,0xa440,0x1fea,0x1fcf,0xefd7,
        0x7ff4,0x0000,0x0400,0x0000,0x4000,0x0000,0x00df,0xff00,
        0x4400,0x2df7,0xa101,0xcc40,0x64c0,0xe749,0x35c0,0x07b0,
        0x3fff,0xc3f6,0x7f58,0x0000,0x0000,0x0000,0x0000,0x0004,
        0x0074,0x0003,0x5c00,0x7f63,0xf000,0x0c40,0x64fe,0x7813,
        0x1d80,0x0030,0x0fb7,0xe17e,0xfff0,0x0000,0x0060,0x0000,
        0x0000,0x0004,0x8a24,0x6001,0xd800,0xa47b,0xe000,0x0c40,
        0x6406,0x1e70,0x8910,0x0030,0x1ff0,0x60ff,0x7fc0,0x0000,
        0x0020,0x0000,0x0000,0x0006,0xbf2c,0x2448,0x1100,0x34b0,
        0xc000,0x0c40,0x6406,0x2d54,0x4b20,0x0000,0x07f8,0x603d,
        0xff80,0x0000,0x0000,0x0000,0x0000,0x0003,0xb669,0xa5dc,
        0xb200,0x5820,0x2000,0x0c40,0x6407,0x2c9f,0x7a60,0x0000,
        0x0178,0x701f,0xfe00,0x0000,0x0200,0x2000,0x0000,0x0011,
        0x227b,0x059f,0x8600,0x1000,0x0000,0x0c40,0x6407,0xe9cc,
        0xdec0,0x0000,0x007c,0x600f,0xff00,0x0000,0x01a0,0x3000,
        0x0000,0x0039,0x65aa,0x891d,0xec00,0x0000,0x0000,0x0c40,
        0x6403,0x7ff6,0x7880,0x0000,0x00f4,0xf80b,0xff00,0x0000,
        0x0000,0x4000,0x0000,0x003f,0x4c6f,0xe126,0xa800,0x0000,
        0x0000,0x0c40,0x6401,0xaa43,0x1bf8,0x0000,0x007f,0xe002,
        0x3f00,0x0000,0x0000,0x0400,0x0000,0x001b,0xd43f,0xf861,
        0xbf80,0x0000,0x0000,0x0c40,0x6400,0x6fe1,0x0c80,0x0000,
        0x007e,0x7c00,0x1f00,0x0000,0x0000,0x0020,0x0000,0x000c,
        0x53fb,0xded0,0xf800,0x0000,0x0000,0x0c40,0x6404,0x3e41,
        0xfcc0,0x0000,0x003c,0xf800,0x1600,0x0000,0x0000,0x0000,
        0x0000,0x0002,0x7b21,0xea9f,0xcc00,0x0000,0x0000,0x0c40,
        0x6407,0xf300,0x0860,0x0000,0x0c08,0x3000,0x0400,0x0000,
        0x0000,0x0000,0x0000,0x0021,0xffee,0x19f8,0x8600,0x0000,
        0x0000,0x0c40,0x6400,0x2180,0x0800,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x7fff,0xffdf,0xfd80,
        0x8000,0x0000,0x0000,0x0c40,0x6400,0x2000,0x0800,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x00ff,0xffff,
        0x8c03,0xfce0,0x8000,0x0000,0x0000,0x0c40,0x67ff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xfc40,
        0x67ff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xfc40,0x6000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0040,0x6000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0040,0x401f,0xffff,
        0xffff,0x0007,0xffff,0xffff,0xfff8,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x003f,0xffff,0xe000,0x00c0,
        0x7fff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffc0,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000
    },
    {
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffe0,0xf000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0020,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffa0,0x9fff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffa0,
        0x9800,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0x980e,0x1fe3,0xffff,0xfe3f,0xffff,0xfff0,
        0x7fff,0xf80f,0x3ff0,0x01ff,0xffff,0xffcf,0xffff,0x3ffc,
        0x03ff,0xffff,0xfc0f,0xf1a0,0x980c,0x7ff0,0xfdff,0xfe1f,
        0xffff,0x807f,0xffff,0xf006,0x03fc,0x07ff,0xff3c,0x7fcf,
        0xffff,0xffff,0xffff,0xffff,0xfc7f,0x71a0,0x980e,0x7fff,
        0xffff,0xffff,0xffff,0xffff,0xfc0f,0xe000,0x3fff,0xc7ff,
        0xfffe,0xf787,0xffff,0xffff,0xffff,0xffcf,0xffff,0xb1a0,
        0x980f,0xffff,0xffff,0xc7ff,0xffff,0xffff,0xfff1,0xe003,
        0xffff,0xffff,0xffff,0xefff,0xffe0,0xffff,0xffdf,0xfff9,
        0xfffc,0x31a0,0x9807,0xffde,0xffff,0xffff,0xcf71,0xffff,
        0xffff,0xe003,0xffff,0xffff,0xefff,0xcfff,0x73ff,0xfcff,
        0xfe8f,0xfffe,0xffff,0x91a0,0x9800,0xfde3,0xffef,0xffff,
        0xffff,0xfff9,0xc3ff,0xe003,0xffff,0xffff,0xefff,0xffef,
        0xffff,0xff7f,0xe1ff,0x9fff,0x5fff,0xf1a0,0x9800,0x00ff,
        0xf80f,0xffff,0xffff,0xffc0,0x01ff,0xe003,0xffff,0xff01,
        0xffff,0xffc0,0xffff,0xefff,0xffff,0xefb5,0x4ff1,0xf1a0,
        0x9800,0x007f,0x0000,0x3f83,0xfffe,0x003e,0x07de,0xf007,
        0xfff7,0x9c00,0x3fdc,0xfe1f,0xfffe,0x03ff,0xffff,0xfff7,
        0xff87,0xf3a0,0x9800,0x0400,0x0000,0x1fff,0xfffc,0x6ffe,
        0x3ffe,0xf80f,0xffff,0x8037,0xf803,0x0000,0xffc2,0x3c3f,
        0xffff,0xfbff,0xffff,0xf3a0,0x9800,0x0207,0xffff,0x9fff,
        0xe00f,0xeff0,0x77ff,0xfc1f,0xffee,0x0037,0xfe07,0xc0ff,
        0xff91,0xff83,0xfffe,0xfe3f,0x1fff,0xe3a0,0x9800,0x0041,
        0xffff,0xf000,0x61ff,0x8801,0xf7ff,0xffff,0xfdfc,0x1c00,
        0x0001,0xfbff,0xeec7,0xfff0,0xc1fd,0x7fff,0xffff,0xf1a0,
        0x9800,0x003e,0x7fff,0xff80,0x7ff8,0x0007,0xe7ff,0xf1ff,
        0xfff8,0x7f80,0x0000,0x7fff,0xfc8f,0xfffc,0x83f8,0x3fff,
        0xfc7f,0x71a0,0x9b00,0x0019,0xcfff,0xffe0,0x7ff0,0x001f,
        0xffff,0xfc01,0xff00,0xfff8,0x6000,0x1fff,0xba3f,0xfffe,
        0x47f8,0x00ff,0xe000,0x01a0,0x9b30,0x0004,0x0dff,0xfffc,
        0x03ff,0xc07f,0xfc01,0xff80,0x0003,0xffff,0x97c0,0x03fd,
        0xfcff,0xffff,0x8fff,0xfe78,0x0000,0x01a0,0x9838,0x0002,
        0x0b3f,0xffff,0xc03f,0xc3ff,0xc000,0x7ffe,0x000f,0xfff7,
        0xf6fe,0x3ffd,0xf9fe,0xffff,0x0fff,0xfff8,0x0000,0x01a0,
        0x981c,0x0002,0x06cf,0xffff,0xff00,0x00fe,0x0000,0x1fff,
        0xff8f,0xffff,0xfeff,0x0fff,0xc77f,0xffff,0x1fff,0xfff8,
        0x0000,0x01a0,0x980f,0x0000,0x8321,0xffff,0xfffc,0x0000,
        0x0000,0x1ff7,0xfc3f,0xfdff,0xff6f,0xdff6,0x0fff,0xffff,
        0xebff,0xffe0,0x0000,0x01a0,0x9807,0x8000,0x000f,0x0fff,
        0xfffd,0xfa00,0x0000,0x0fff,0xf80f,0xfdff,0x7faf,0xdfe0,
        0x3eff,0xffff,0xfbff,0xffc0,0x0060,0x01a0,0x9801,0xe000,
        0x1001,0x0000,0xfffe,0x1f00,0x0002,0x27ff,0xe063,0xfdff,
        0xffcf,0xfe00,0x7fff,0xffff,0xf7ff,0xffc0,0x0060,0x01a0,
        0x9800,0xf000,0x0800,0x0000,0x0006,0x6880,0x0002,0x2bff,
        0x8021,0xfdff,0xffe3,0xf801,0xfdff,0xffff,0xf9ff,0xff80,
        0x0060,0x01a0,0x9800,0x3c00,0x0000,0x0000,0x0894,0x6c80,
        0x0001,0x00fe,0x0010,0xffff,0xfff8,0xfffc,0x7dff,0xffff,
        0xfdff,0xff80,0x40f0,0x01a0,0x9800,0x1600,0x0000,0x0000,
        0x8a96,0x7880,0x0000,0x3038,0x0059,0xf7ff,0xffe8,0xfffa,
        0xfdff,0xffff,0x9883,0xfe00,0x40e0,0x01a0,0x9800,0x0600,
        0x0000,0x0000,0x8a95,0xfec0,0x0000,0x1d11,0x8020,0x1fff,
        0xffc0,0x7fe7,0xf9ff,0xfffd,0x1073,0xfe0c,0x46fa,0x01a0,
        0x9800,0x0780,0x0000,0x0004,0x8edd,0xfc84,0x0080,0x010c,
        0x0012,0x0fff,0xffde,0x3e07,0xffff,0xfffb,0x001c,0x200c,
        0x67e3,0x81a0,0x9800,0x03c0,0x0000,0x0e04,0xcb95,0xefa4,
        0x0080,0x0040,0x0013,0x13ff,0xfefe,0x3b2f,0xffe0,0x0ff2,
        0x0000,0x004c,0x47ff,0x81a0,0x9801,0x81f1,0xfe00,0x0e44,
        0x9bbf,0xfe84,0x00a0,0x0037,0xf804,0x0a7f,0xfc7f,0xc1ff,
        0xff80,0x03e0,0x0000,0x084f,0xd7ff,0x81a0,0x9802,0xc07f,
        0xffe0,0x0e47,0xaedf,0xffd6,0x50e0,0x001f,0xfe02,0x01ff,
        0xf83e,0x007f,0xfc00,0x03f0,0x0000,0x084f,0xc7ff,0xc1a0,
        0x990e,0x003f,0x03f8,0x0f46,0x8fdf,0xffe4,0x53a0,0x003c,
        0x6f00,0x001b,0xf07c,0x0001,0xf000,0x00f8,0x0000,0x087f,
        0xfff7,0xe1a0,0x9905,0x200f,0x803f,0x0e6d,0xdfef,0xdffd,
        0x53b0,0x00f8,0x6780,0x0004,0xe03f,0x0001,0xc000,0x007e,
        0x0000,0x2c7d,0xffef,0xf1a0,0x9800,0xe007,0xc00f,0xffd5,
        0x6fdf,0xff7c,0x3ba0,0x03f0,0x63e0,0x0003,0xc007,0x0003,
        0xc000,0x001f,0x0000,0x28df,0xffcf,0xf1a0,0x9804,0x4002,
        0xe003,0xffff,0xbfff,0xdf76,0xd3f8,0x0790,0x00f0,0x0007,
        0x8087,0x8007,0x0000,0x000f,0xc000,0x3b7f,0x4f47,0xf1a0,
        0x9801,0xe000,0x5000,0x3fff,0xffff,0xefff,0xffe0,0x1f10,
        0x0478,0x001f,0x0067,0xe00e,0x0000,0x0001,0xe000,0x387f,
        0xe787,0xf1a0,0x9800,0x1008,0x1800,0x1bfa,0x1fcf,0xefd7,
        0xfff4,0x7d30,0x023c,0x007c,0x0005,0xf83c,0x0000,0x000e,
        0x3800,0x2fff,0xa101,0xc1a0,0x9804,0x1810,0x0a00,0x07b0,
        0x3bff,0xc3f7,0xff59,0xf340,0x030f,0x01f8,0x0003,0x7ff8,
        0x0402,0x0000,0x2200,0xffe3,0xf000,0x01a0,0x9801,0x0700,
        0x4200,0x0020,0x0fb7,0xe17f,0xffff,0xc380,0x0087,0xffe0,
        0x0001,0x5ff0,0x0001,0x0000,0x079f,0xfc6b,0xe000,0x01a0,
        0x9800,0x2000,0x02c0,0x0000,0x1ff0,0x60ff,0x7fff,0x8600,
        0x0041,0xff00,0x0000,0x2200,0x0000,0x8000,0xa2ff,0xb4a0,
        0xc000,0x01a0,0x9800,0x0000,0x30d0,0x0000,0x07f8,0x603d,
        0xffe0,0x8000,0x0021,0x4000,0x0000,0x0300,0x0000,0x5000,
        0x40fc,0x5820,0x0000,0x01a0,0x9800,0x0000,0x001c,0x0000,
        0x0178,0x701f,0xff80,0x0000,0x0020,0xc000,0x0000,0x0000,
        0x0800,0x1800,0x2030,0x1000,0x0000,0x01a0,0x9800,0x0000,
        0x001f,0x0000,0x007c,0x600f,0xffe0,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0800,0x0400,0x1070,0x0000,0x0000,0x01a0,
        0x9800,0x0000,0x0307,0xe000,0x00f4,0xf80b,0xffe0,0x0000,
        0x000c,0x0000,0x0000,0x0000,0x0000,0x0e00,0x00e0,0x0000,
        0x0000,0x01a0,0x9800,0x0000,0x0001,0xf000,0x007f,0xe002,
        0x3f78,0x0000,0x0006,0x0000,0x0000,0x0000,0x2800,0x0300,
        0x0040,0x0000,0x0000,0x01a0,0x9800,0x0000,0x0000,0x3c00,
        0x007e,0x7c00,0x1f3c,0x0000,0x0003,0x0000,0x0000,0x0000,
        0xa800,0x0100,0x0380,0x0000,0x0000,0x01a0,0x9800,0x0000,
        0x0000,0x1f80,0x003c,0xf800,0x160e,0x0000,0x0000,0x0000,
        0x0000,0x0041,0x8400,0x0000,0x0300,0x0000,0x0000,0x01a0,
        0x9800,0x0000,0x0000,0x07f0,0x0008,0x3000,0x040f,0x0000,
        0x0000,0x0000,0x0000,0x0040,0x0010,0x0600,0x0100,0x0000,
        0x0000,0x01a0,0x9800,0x0000,0x0000,0x00fc,0x0000,0x0000,
        0x0007,0xc000,0x0000,0x0000,0x0000,0x0000,0x0020,0x0200,
        0x1e00,0x0000,0x0000,0x01a0,0x9800,0x0000,0x0000,0x001f,
        0x0000,0x0000,0x0001,0xf800,0x0000,0x0000,0x0000,0x0000,
        0x0020,0x0300,0x7c00,0x0000,0x0000,0x01a0,0x9800,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0x9800,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0x9fff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffa0,0x9fff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffa0,0x8000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0020,
        0x8000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0020,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffe0
    },
    {
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x033f,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xf80f,0xffff,0xffff,0xfffc,0xbfcf,0xfdbf,0x27ff,
        0xfe3f,0xffff,0xf3ff,0xf000,0x013f,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xf007,0xffff,0xffff,0xffff,0xffcf,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,0x013f,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xe003,0xffff,0xffff,
        0xfffe,0xf7ff,0xffff,0xffff,0xffff,0xffff,0xfffc,0x7000,
        0x013f,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xe003,
        0xffff,0xffff,0xffff,0xc7ff,0xffff,0xffff,0xffff,0xffff,
        0xf7ff,0xf000,0x0007,0xffff,0xffff,0xffff,0xcfff,0xffff,
        0xffff,0xe003,0xffff,0xffff,0xffff,0xcfff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xf000,0x003f,0xfffb,0xffff,0xffff,
        0xffff,0xffff,0xcfff,0xe003,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,0x013f,0xffff,
        0xf87f,0xffff,0xffff,0xffff,0x7fff,0xe003,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xff7b,0xffff,0xf000,
        0x013f,0xffff,0xffff,0xffe7,0xffff,0xffff,0xffff,0xf007,
        0xffff,0x9cff,0xffdf,0xff3f,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xf000,0x0337,0xffdf,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xf80f,0xffff,0xff37,0xffff,0x00ff,0xffcd,0xffff,
        0xffff,0xffff,0xffff,0xf000,0x033f,0xffdf,0xffff,0xffff,
        0xffff,0xefff,0xffff,0xfc1f,0xfffe,0xffff,0xfff7,0xc0ff,
        0xff8e,0xffff,0xf7fa,0xffff,0xffdf,0xf000,0x033f,0xefff,
        0xffff,0xffff,0xe1ff,0x8fff,0xffff,0xffff,0xffff,0xffff,
        0xff85,0xfbff,0xfd3f,0xffff,0xfffc,0x5fdb,0xffff,0xf000,
        0x033f,0xf7ff,0xffff,0xffff,0xfff8,0xf0ff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xff98,0xa77f,0xffff,0xffff,0xffff,
        0xffff,0xf000,0x033f,0xfffd,0xffff,0xffff,0xfff0,0xe7ff,
        0xffff,0xffff,0xff1f,0xffff,0xffff,0xf547,0xf9ff,0xffff,
        0xffff,0xffff,0xffff,0xf000,0x033f,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xff3f,0xffff,0xffff,0xffff,
        0xebff,0xffff,0xffff,0xffff,0xffff,0xf000,0x033f,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xff7f,0xffff,
        0xffff,0xc53f,0x87ff,0xffff,0xffff,0xffff,0xffff,0xf000,
        0x033f,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xff10,0x3fff,0xffff,0xffff,0xffff,
        0xffff,0xf000,0x033f,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffe9,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xf000,0x033f,0xffff,0xffff,0xffff,
        0xfffd,0xffff,0xffff,0xffff,0xffff,0xffff,0x7fff,0xffe7,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,0x033f,0xffff,
        0xffff,0xf7ff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,
        0x033f,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xf000,0x033f,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xfff9,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xf000,0x033f,0xf7ff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0x7fff,0xffff,0xffff,0xfff9,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,0x033f,0xf7ff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,
        0x0327,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xf000,0x0324,0xcfff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xf000,0x0321,0x8fff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xefff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,0x0332,0xdfff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,
        0x031f,0x33ff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xfcff,0xff7f,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xf000,0x030d,0x26ff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffef,0xff7f,0xffff,0xefff,0xffff,
        0xffff,0xffff,0xffff,0xf000,0x0300,0xe6df,0xffff,0xffff,
        0xffff,0xffff,0xbfff,0xffff,0xffff,0xfff3,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xf000,0x0304,0x4e53,
        0xffff,0xffff,0xbfff,0xffff,0xffff,0xfffa,0xffff,0xffff,
        0xffff,0xffff,0xff7f,0xffff,0xffff,0xffff,0xff7f,0xf000,
        0x0321,0xef13,0xdfff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xff6e,0xfffd,0xffff,0xffff,
        0xffff,0xf000,0x0370,0x11bf,0x5bbf,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xbfff,0xffff,0xff28,0xffff,
        0xbbff,0xffff,0xffff,0xf000,0x033c,0x1cb6,0xca3f,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xfffb,
        0xff8b,0xfffc,0xa3ff,0xffff,0xffff,0xf000,0x0301,0x0728,
        0xe27f,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xfffb,0x75db,0x9ffe,0x27ff,0xffef,0xffff,0xf000,
        0x0339,0x2509,0x76ef,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xfff9,0x40d3,0xdbb7,0xeeff,0xffef,
        0xffff,0xf000,0x0339,0xdcaa,0x34df,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xfffc,0x4996,0x5a23,
        0x4dff,0xffff,0xdfff,0xf000,0x0338,0xd120,0x059f,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffee,
        0xdd86,0xfa60,0x79ff,0xffff,0xffff,0xf000,0x0338,0x1603,
        0x213f,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffc6,0x9a55,0x76e2,0x13ff,0xffff,0xffff,0xf000,
        0x033c,0x8019,0xbf7f,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffc0,0xb396,0x9ed9,0x57ff,0xffff,
        0xffff,0xf000,0x033e,0x55bc,0xe407,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffe4,0x2bc0,0x879e,
        0x407f,0xffff,0xffff,0xf000,0x033f,0x901e,0xf07f,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffdf,0xffff,0xfff3,
        0xac0d,0x212f,0x07ff,0xffff,0xffff,0xf000,0x033b,0xc1be,
        0x033f,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xfffd,0x84df,0x1560,0x33ff,0xffff,0xffff,0xf000,
        0x0338,0x0cff,0xf79f,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffde,0x0fdf,0xe607,0x79ff,0xffff,
        0xffff,0xf000,0x033f,0xde7f,0xf7ff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffc0,0x67fe,0xf27f,
        0x7fff,0xffff,0xffff,0xf000,0x033f,0xdfff,0xf7ff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xfffe,
        0x8022,0x033f,0x7fff,0xffff,0xffff,0xf000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x001f,0xffff,
        0xffff,0x0007,0xffff,0xffff,0xfff8,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x003f,0xffff,0xe000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000
    },
    {
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffe0,0xf000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0020,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffa0,0xbfff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffa0,
        0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xbb3f,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0x3fff,
        0xffff,0xffff,0xffff,0xf1a0,0xb93f,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xf1a0,0xb93f,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xf7ff,0xffff,0xffff,0xffff,0xffff,0xffff,0xf1a0,
        0xb93f,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xefff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xf1a0,0xb807,0xffff,0xffff,0xffff,0xcfff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xf1a0,0xb800,0xfffb,0xffff,0xffff,
        0xffff,0xffff,0xc3ff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xf1a0,0xb800,0x01ff,
        0xf87f,0xffff,0xffff,0xffff,0x01ff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xefff,0xffff,0xffff,0xffff,0xf1a0,
        0xb800,0x007f,0x0000,0x3fe7,0xffff,0xfffe,0x001e,0xffff,
        0xffff,0x9cff,0xffff,0xffff,0xfffe,0x03ff,0xffff,0xfff7,
        0xffbf,0xf3a0,0xb808,0x0020,0x0000,0x1fff,0xffff,0xfffe,
        0x0006,0xffff,0xffff,0x8037,0xffff,0xffff,0xffc2,0x003f,
        0xffff,0xffff,0xffff,0xf3a0,0xb800,0x0020,0x0000,0x1fff,
        0xffff,0xeff0,0x0803,0xffff,0xfffe,0x0037,0xffff,0xffff,
        0xff91,0x0003,0xfffe,0xffff,0xffff,0xe3a0,0xb800,0x1000,
        0x0000,0x001f,0xe1ff,0x8fc0,0x0800,0xffff,0xfffc,0x0000,
        0x1fff,0xffff,0xffc0,0x0001,0xe0fd,0x7fff,0xffff,0xf1a0,
        0xb800,0x0800,0x0000,0x0003,0xfff8,0xf000,0x1800,0x01ff,
        0xfff8,0x0000,0x0003,0xffff,0xfe80,0x0000,0x0078,0x3fff,
        0xfe7f,0xf1a0,0xb800,0x0002,0x0000,0x0000,0xfff0,0xe000,
        0x0000,0x0001,0xff00,0x0000,0x0001,0xffff,0xfa00,0x0000,
        0x0000,0x00ff,0xe000,0xf1a0,0xb800,0x0000,0x0000,0x0000,
        0x3fff,0xc000,0x0008,0x0000,0x0000,0x0000,0x0000,0x7fff,
        0xfc00,0x0000,0x0000,0x0078,0x0000,0x01a0,0xb800,0x0000,
        0x0000,0x0000,0x0fff,0xc000,0x0000,0x0000,0x0000,0x0008,
        0x0000,0x3fff,0xf801,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0xb800,0x0000,0x0000,0x0000,0x001f,0x8000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0fff,0xc080,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0008,0x0000,0x0200,0x0010,0x1ff6,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,
        0x0000,0x0404,0x0000,0x0000,0x0080,0x0200,0x0010,0x1fe0,
        0x0100,0x0000,0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,
        0x0000,0x0000,0x0000,0x6004,0x0000,0x0000,0x0080,0x0200,
        0x0000,0x1e00,0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0xb800,0x0000,0x0000,0x0000,0x0000,0x8000,0x0000,0x0000,
        0x0000,0x0200,0x0000,0x0000,0x0200,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0200,0x0000,
        0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0800,0x0000,0x0000,
        0x0200,0x0000,0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0030,0x0000,0x0600,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0020,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x1000,0x01a0,0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x1000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0300,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0010,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x01a0,0xb801,0x0000,0x0000,0x0000,
        0x0000,0x0080,0x0000,0x0000,0x0000,0x000c,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,0xb800,0x8000,
        0x0000,0x0000,0x0000,0x2088,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x8000,0x01a0,
        0xb804,0x1080,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0008,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x01a0,0xb803,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,0xb800,0x80c4,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0xb800,0xc086,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xb800,0x0201,0x8000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0180,0x0002,
        0x0000,0x0000,0x0000,0x01a0,0xb800,0x0240,0x8000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0100,0x0000,0x0000,0x0000,0x0000,0x01a0,0xb800,0x0030,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0xb800,0x0000,0x0000,0x0010,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xb800,0x0000,0x0000,0x0010,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,0x0300,0x0007,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0001,
        0x0400,0x0000,0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,
        0x0000,0x0002,0xe000,0x0000,0x0000,0x0200,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0xb800,0x0000,0x0000,0x0000,0xf000,0x0000,0x0000,0x0200,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x7e00,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,0xb800,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x01a0,
        0xb800,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x01a0,0xbfff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffa0,0xbfff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffa0,0x8000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0020,
        0x8000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,
        0x0000,0x0020,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,
        0xffff,0xffff,0xffff,0xffe0
    },
};


struct IntuitionBase *IntuitionBase;
struct GfxBase *GfxBase;
struct RastPort *rp;
struct Window *w;
struct Screen *s;
UBYTE *sd;
int endit =0,chg;
long msgbit;
struct IntuiMessage *GetMsg();
void *OpenLibrary();
struct Window *OpenWindow();
struct Screen *OpenScreen();
struct ColorMap *GetColorMap();

UBYTE *AllocRaster();

struct TextAttr tf = {
   (UBYTE *)"topaz.font",TOPAZ_EIGHTY,0,0
};

struct BitMap test_bit;
struct BitMap *wbm;

struct NewScreen ns = {
   0,0,320,200,
   test_num_planes,0,0,0,
   CUSTOMSCREEN,
   &tf,
   (UBYTE *)"",
   NULL,
   NULL
};

struct NewWindow nw = {
   0,0,320,200,
   0,0,
   MOUSEBUTTONS,
   ACTIVATE | BORDERLESS | RMBTRAP | BACKDROP,
   NULL,
   NULL,
   (UBYTE *)"",
   NULL,NULL,0,0,0,0,
   CUSTOMSCREEN
};

main()
{
    int i;
    long num_cols;
    
/* open everything
*/
    for (i=0; i<test_num_planes; i++) test_bit.Planes[i]=0;
    if (!(GfxBase = OpenLibrary("graphics.library",0L)))
       doexit("No Graphics\n");
    if (!(IntuitionBase = 
       OpenLibrary("intuition.library",0L)))
       doexit("No Intuition\n");
    if (!(s = OpenScreen(&ns)))
       doexit("No Screen\n");

    nw.Screen = s;
    if (!(w = OpenWindow(&nw)))
       doexit("No Window\n");
    rp = w->RPort;
    wbm = rp->BitMap;

/* set up our picture's BitMap and allocate memory for it
*/

    InitBitMap(&test_bit,(long)test_num_planes,(long)test_width,
                (long)test_height);
    for (i=0; i<test_num_planes; i++)
    {
        if (!(test_bit.Planes[i] = AllocRaster((long)test_width,
                                                (long)test_height)))
            doexit("No raster\n");
        movewords(&test_data[i][0][0],test_bit.Planes[i],
            (long)test_words_per_plane);
    }

/* set up colors
*/

    num_cols = 1L << (test_num_planes-1);
    s->ViewPort.ColorMap = GetColorMap(num_cols);
    LoadRGB4(&s->ViewPort,test_colortable,num_cols);

/* clear the screen's title line and print out a message
*/

    ShowTitle(s,0L);
    SetDrMd(rp,JAM1);
    msgbit = 1L << w->UserPort->mp_SigBit;
    SetAPen(rp,1L);
    SetBPen(rp,0L);
    Move(rp,10L,10L);
    Text(rp,"Press mouse button to exit",26L);

/* print out as many copies of our test picture as we can
*/

    for (i=15; i<(200-test_height); i+=test_height+5)
    {
        BltBitMap(&test_bit,0L,0L,wbm,20L,(long)i,(long)test_width,
            (long)test_height,204L,255L,0L);
    }

/* wait for a mouse click
*/

    Wait(msgbit);
    ReplyMsg(GetMsg(w->UserPort));
    doexit("Thank's for trying my program,\n    Tim\n\n");
}

doexit (a)
char *a;
{
    int i;
    for (i=0; i<test_num_planes; i++)
        if (test_bit.Planes[i])
            FreeRaster(test_bit.Planes[i],(long)test_width,(long)test_height);
    if (w) CloseWindow(w);
    if (s) CloseScreen(s);
    if (IntuitionBase) CloseLibrary(IntuitionBase);
    if (GfxBase) CloseLibrary(GfxBase);
    fprintf(stderr,a);
    exit(0);
}


#asm
            xdef    _movewords

* moves n words from a to b
* usage: movewords(a,b,n)
* where: a and b are pointers and n is an unsigned long word

_movewords  move.l  4(a7),a0
            move.l  8(a7),a1
            move.l  12(a7),d0
            bra.s   mwend
mwtop       swap    d0
mwmid       move    (a0)+,(a1)+
mwend       dbra    d0,mwmid
            swap    d0
            dbra    d0,mwtop
            rts
#endasm