#include "exec/types.h"
#include "intuition/intuition.h"

#include "Graphics/Text.h"


  /*  Text Data */

UWORD CharData[] = {
0x0018, 0x666c, 0x1800, 0x7818, 0x0c30, 0x0000, 0x0000, 0x0003, 
0x7c18, 0x7c7c, 0x0cfe, 0x3cfe, 0x7c7c, 0x0000, 0x0c00, 0x307c, 
0x7c7c, 0xfc7c, 0xfcfe, 0xfe7c, 0xc67e, 0x06c6, 0xc082, 0xc67c, 
0xfc7c, 0xfc7c, 0x7ec6, 0xc6c6, 0xc6c3, 0xfe3c, 0xc03c, 0x1000, 
0x1800, 0xc000, 0x0600, 0x1c00, 0xc018, 0x06c0, 0x1800, 0x0000, 
0x0000, 0x0000, 0x1800, 0x0000, 0x0000, 0x000e, 0x7072, 0xcc7e, 
0x0c1c, 0x4266, 0x183c, 0xc63c, 0x3e00, 0x3e3c, 0x7e3c, 0x0038, 
0x780c, 0x007e, 0x0000, 0x183c, 0x0040, 0x40c0, 0x1830, 0x1838, 
0x72c6, 0x7c7f, 0x7c30, 0x1838, 0xc630, 0x0c3c, 0x66fc, 0x7230, 
0x1838, 0x72c6, 0x0030, 0x1838, 0xc60c, 0xc0fc, 0x3018, 0x3872, 
0xc63c, 0x0000, 0x3018, 0x38c6, 0x300c, 0x3c66, 0x6072, 0x0000, 
0x18c0, 0xc600, 0x0018, 0x666c, 0x3ec6, 0xcc18, 0x1818, 0x6600, 
0x0000, 0x0006, 0xc638, 0xc6c6, 0x0cc0, 0x60c6, 0xc6c6, 0x1818, 
0x1800, 0x18c6, 0xc6c6, 0xc6c6, 0xc6c0, 0xc0c6, 0xc618, 0x06c6, 
0xc0c6, 0xe6c6, 0xc6c6, 0xc6c6, 0x18c6, 0xc6c6, 0xc6c3, 0x0c30, 
0x600c, 0x3800, 0x1800, 0xc000, 0x0600, 0x3600, 0xc000, 0x00c0, 
0x1800, 0x0000, 0x0000, 0x0000, 0x1800, 0x0000, 0x0000, 0x0018, 
0x189c, 0x3366, 0x3e36, 0x3c66, 0x1840, 0x0042, 0x6633, 0x0642, 
0x0066, 0x184c, 0xcc18, 0x00ca, 0x0000, 0x3866, 0xccc6, 0xc663, 
0x0018, 0x306c, 0x9c00, 0xc6cc, 0xc618, 0x306c, 0x0018, 0x1866, 
0x00c6, 0x9c18, 0x306c, 0x9c00, 0xc618, 0x306c, 0x0018, 0xc0c6, 
0x1830, 0x6c9c, 0x0066, 0x0000, 0x1830, 0x6c00, 0x1818, 0x6600, 
0xfc9c, 0x1800, 0x30c0, 0x0000, 0x0018, 0x00fe, 0x60cc, 0xc830, 
0x300c, 0x3c18, 0x0000, 0x000c, 0xce18, 0x0606, 0xccfc, 0xc006, 
0xc6c6, 0x1818, 0x307e, 0x0c06, 0xdec6, 0xc6c0, 0xc6c0, 0xc0c0, 
0xc618, 0x06cc, 0xc0ee, 0xf6c6, 0xc6c6, 0xc6c0, 0x18c6, 0xc6c6, 
0x6cc3, 0x1830, 0x300c, 0x6c00, 0x0c7c, 0xfc7c, 0x7e7c, 0x307e, 
0xfc18, 0x06cc, 0x18ec, 0xfc7c, 0xfc7e, 0xfc7e, 0x7ec6, 0xc6c6, 
0xc6c6, 0xfe18, 0x1800, 0xcc66, 0x6c30, 0x663c, 0x183c, 0x0099, 
0x6666, 0x00b9, 0x003c, 0x7e18, 0x1800, 0xc6ca, 0x1800, 0x1866, 
0x664c, 0x4cc6, 0x187c, 0x7c7c, 0x7c7c, 0x7ccc, 0xc0fe, 0xfefe, 
0xfe7e, 0x7e7e, 0x7ec6, 0xc67c, 0x7c7c, 0x7c7c, 0x6cc6, 0xc6c6, 
0xc6c3, 0xfec6, 0x7c7c, 0x7c7c, 0x7c7c, 0x7e7c, 0x7c7c, 0x7c7c, 
0x0000, 0x0000, 0x187c, 0x007c, 0xc6fc, 0xc600, 0x0018, 0x006c, 
0x3c18, 0x7600, 0x300c, 0xff7e, 0x007e, 0x0018, 0xde18, 0x1c1c, 
0xcc06, 0xfc0c, 0x7c7e, 0x0000, 0x6000, 0x060c, 0xd6fe, 0xfcc0, 
0xc6f8, 0xf8ce, 0xfe18, 0x06f8, 0xc0fe, 0xdec6, 0xfcc6, 0xfc7c, 
0x18c6, 0xc6d6, 0x387e, 0x3030, 0x180c, 0xc600, 0x0006, 0xc6c6, 
0xc6c6, 0xfcc6, 0xc618, 0x06d8, 0x18fe, 0xc6c6, 0xc6c6, 0xc6c0, 
0x18c6, 0xc6d6, 0x6cc6, 0x0c70, 0x0e00, 0x3366, 0x6c78, 0x3c18, 
0x0066, 0x00a1, 0x3ecc, 0x00a5, 0x0000, 0x1830, 0xcc00, 0xc67a, 
0x1800, 0x183c, 0x3358, 0x586c, 0x30c6, 0xc6c6, 0xc6c6, 0xc6ce, 
0xc0c0, 0xc0c0, 0xc018, 0x1818, 0x18f6, 0xe6c6, 0xc6c6, 0xc6c6, 
0x38c6, 0xc6c6, 0xc6c3, 0xc3dc, 0x0606, 0x0606, 0x0606, 0x1bc6, 
0xc6c6, 0xc6c6, 0x1818, 0x1818, 0x7c66, 0x7ece, 0xc6c6, 0xc600, 
0x0018, 0x00fe, 0x0630, 0xdc00, 0x300c, 0x3c18, 0x0000, 0x0030, 
0xf618, 0x3006, 0xfe06, 0xc618, 0xc606, 0x0000, 0x3000, 0x0c18, 
0xdec6, 0xc6c0, 0xc6c0, 0xc0c6, 0xc618, 0xc6cc, 0xc0d6, 0xcec6, 
0xc0c6, 0xc606, 0x18c6, 0x6cfe, 0x6c18, 0x6030, 0x0c0c, 0x0000, 
0x007e, 0xc6c0, 0xc6fe, 0x30c6, 0xc618, 0x06f8, 0x18d6, 0xc6c6, 
0xc6c6, 0xc07c, 0x18c6, 0x6cd6, 0x38c6, 0x3818, 0x1800, 0xcc66, 
0x3e30, 0x423c, 0x183c, 0x00a1, 0x0066, 0x00b9, 0x0000, 0x007c, 
0x7800, 0xc60a, 0x0000, 0x1800, 0x6632, 0x3ed9, 0x60fe, 0xfefe, 
0xfefe, 0xfefc, 0xc0f8, 0xf8f8, 0xf818, 0x1818, 0x18c6, 0xd6c6, 
0xc6c6, 0xc6c6, 0x6cc6, 0xc6c6, 0xc67e, 0xc3c6, 0x7e7e, 0x7e7e, 
0x7e7e, 0x7fc0, 0xfefe, 0xfefe, 0x1818, 0x1818, 0xc666, 0x00d6, 
0xc6c6, 0xc600, 0x0000, 0x006c, 0x7c66, 0xcc00, 0x1818, 0x6600, 
0x1800, 0x1860, 0xe618, 0x60c6, 0x0cc6, 0xc618, 0xc60c, 0x1818, 
0x187e, 0x1800, 0xc0c6, 0xc6c6, 0xc6c0, 0xc0c6, 0xc618, 0xc6c6, 
0xc0c6, 0xc6c6, 0xc0de, 0xc6c6, 0x18c6, 0x38ee, 0xc618, 0xc030, 
0x060c, 0x0000, 0x00c6, 0xc6c6, 0xc6c0, 0x307e, 0xc618, 0x06cc, 
0x18d6, 0xc6c6, 0xfc7e, 0xc006, 0x18c6, 0x386c, 0x6c7e, 0x6018, 
0x1800, 0x3366, 0x0c30, 0x0018, 0x1802, 0x0099, 0x7e33, 0x00a5, 
0x0000, 0x7e00, 0x0000, 0xc60a, 0x0000, 0x007e, 0xcc6a, 0x7235, 
0x66c6, 0xc6c6, 0xc6c6, 0xc6cc, 0xc6c0, 0xc0c0, 0xc018, 0x1818, 
0x18c6, 0xcec6, 0xc6c6, 0xc6c6, 0xc6c6, 0xc6c6, 0xc618, 0xfec6, 
0xc6c6, 0xc6c6, 0xc6c6, 0xd8c6, 0xc0c0, 0xc0c0, 0x1818, 0x1818, 
0xc666, 0x18e6, 0x7efc, 0x7e00, 0x0018, 0x006c, 0x18c6, 0x7600, 
0x0c30, 0x0000, 0x1800, 0x18c0, 0x7c18, 0xfe7c, 0x0c7c, 0x7c18, 
0x7c78, 0x1818, 0x0c00, 0x3018, 0x7cc6, 0xfc7c, 0xfcfe, 0xc07c, 
0xc67e, 0x7cc6, 0xfec6, 0xc67c, 0xc07c, 0xc67c, 0x187e, 0x10c6, 
0xc618, 0xfe3c, 0x033c, 0x0000, 0x007e, 0xfc7c, 0x7e7c, 0x3006, 
0xc618, 0xc6c6, 0x18c6, 0xc67c, 0xc006, 0xc0fc, 0x0c7e, 0x106c, 
0xc606, 0xfe0e, 0x7000, 0xcc7e, 0x007e, 0x0018, 0x183c, 0x0042, 
0x0000, 0x0042, 0x0000, 0x0000, 0x0000, 0xfe0a, 0x0018, 0x0000, 
0x00ce, 0xc467, 0x3cc6, 0xc6c6, 0xc6c6, 0xc6cf, 0x7cfe, 0xfefe, 
0xfe7e, 0x7e7e, 0x7efc, 0xc67c, 0x7c7c, 0x7c7c, 0x007e, 0x7e7e, 
0x7e18, 0xc0dc, 0x7e7e, 0x7e7e, 0x7e7e, 0x777c, 0x7c7c, 0x7c7c, 
0x1818, 0x1818, 0x7c66, 0x007c, 0x06c0, 0x0600, 0x0000, 0x0000, 
0x0000, 0x0000, 0x0000, 0x0000, 0x3000, 0x0000, 0x0000, 0x0000, 
0x0000, 0x0000, 0x0000, 0x0030, 0x0000, 0x0000, 0x0000, 0x0000, 
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0006, 0x0000, 
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x00ff, 0x0000, 0x0000, 
0x0000, 0x007c, 0x0000, 0x7c00, 0x0000, 0x0000, 0xc006, 0x0000, 
0x0000, 0x0000, 0x007c, 0x0000, 0x0000, 0x3300, 0x0000, 0x0000, 
0x0000, 0x003c, 0x0000, 0x003c, 0x0000, 0x0000, 0x0000, 0xc000, 
0x0030, 0x0000, 0x0002, 0x0e01, 0x0000, 0x0000, 0x0000, 0x0000, 
0x3000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 
0x0000, 0x0000, 0x0000, 0xc0c0, 0x0000, 0x0000, 0x0000, 0x0030, 
0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x7cc0, 0x7c00, 
};

  /*  CharLoc Data */

UWORD CharLoc[] = {
0x0000, 0x0008, 0x0008, 0x0008, 0x0010, 0x0008, 0x0018, 0x0008, 
0x0020, 0x0008, 0x0028, 0x0008, 0x0030, 0x0008, 0x0038, 0x0008, 
0x0040, 0x0008, 0x0048, 0x0008, 0x0050, 0x0008, 0x0058, 0x0008, 
0x0060, 0x0008, 0x0068, 0x0008, 0x0070, 0x0008, 0x0078, 0x0008, 
0x0080, 0x0008, 0x0088, 0x0008, 0x0090, 0x0008, 0x0098, 0x0008, 
0x00a0, 0x0008, 0x00a8, 0x0008, 0x00b0, 0x0008, 0x00b8, 0x0008, 
0x00c0, 0x0008, 0x00c8, 0x0008, 0x00d0, 0x0008, 0x00d8, 0x0008, 
0x00e0, 0x0008, 0x00e8, 0x0008, 0x00f0, 0x0008, 0x00f8, 0x0008, 
0x0100, 0x0008, 0x0108, 0x0008, 0x0110, 0x0008, 0x0118, 0x0008, 
0x0120, 0x0008, 0x0128, 0x0008, 0x0130, 0x0008, 0x0138, 0x0008, 
0x0140, 0x0008, 0x0148, 0x0008, 0x0150, 0x0008, 0x0158, 0x0008, 
0x0160, 0x0008, 0x0168, 0x0008, 0x0170, 0x0008, 0x0178, 0x0008, 
0x0180, 0x0008, 0x0188, 0x0008, 0x0190, 0x0008, 0x0198, 0x0008, 
0x01a0, 0x0008, 0x01a8, 0x0008, 0x01b0, 0x0008, 0x01b8, 0x0008, 
0x01c0, 0x0008, 0x01c8, 0x0008, 0x01d0, 0x0008, 0x01d8, 0x0008, 
0x01e0, 0x0008, 0x01e8, 0x0008, 0x01f0, 0x0008, 0x01f8, 0x0008, 
0x0200, 0x0008, 0x0208, 0x0008, 0x0210, 0x0008, 0x0218, 0x0008, 
0x0220, 0x0008, 0x0228, 0x0008, 0x0230, 0x0008, 0x0238, 0x0008, 
0x0240, 0x0008, 0x0248, 0x0008, 0x0250, 0x0008, 0x0258, 0x0008, 
0x0260, 0x0008, 0x0268, 0x0008, 0x0270, 0x0008, 0x0278, 0x0008, 
0x0280, 0x0008, 0x0288, 0x0008, 0x0290, 0x0008, 0x0298, 0x0008, 
0x02a0, 0x0008, 0x02a8, 0x0008, 0x02b0, 0x0008, 0x02b8, 0x0008, 
0x02c0, 0x0008, 0x02c8, 0x0008, 0x02d0, 0x0008, 0x02d8, 0x0008, 
0x0260, 0x0008, 0x02e0, 0x0008, 0x02e8, 0x0008, 0x02f0, 0x0008, 
0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 
0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 
0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 
0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 
0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 
0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 
0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 
0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 0x02f8, 0x0008, 
0x0000, 0x0008, 0x0248, 0x0008, 0x0300, 0x0008, 0x0308, 0x0008, 
0x0310, 0x0008, 0x0318, 0x0008, 0x0320, 0x0008, 0x0328, 0x0008, 
0x0330, 0x0008, 0x0338, 0x0008, 0x0340, 0x0008, 0x0348, 0x0008, 
0x0350, 0x0008, 0x0068, 0x0008, 0x0358, 0x0008, 0x0360, 0x0008, 
0x0368, 0x0008, 0x0370, 0x0008, 0x0378, 0x0008, 0x0380, 0x0008, 
0x0388, 0x0008, 0x0390, 0x0008, 0x0398, 0x0008, 0x03a0, 0x0008, 
0x03a8, 0x0008, 0x03b0, 0x0008, 0x03b8, 0x0008, 0x03c0, 0x0008, 
0x03c8, 0x0008, 0x03d0, 0x0008, 0x03d8, 0x0008, 0x03e0, 0x0008, 
0x03e8, 0x0008, 0x03f0, 0x0008, 0x03f8, 0x0008, 0x0400, 0x0008, 
0x0408, 0x0008, 0x0410, 0x0008, 0x0418, 0x0008, 0x0420, 0x0008, 
0x0428, 0x0008, 0x0430, 0x0008, 0x0438, 0x0008, 0x0440, 0x0008, 
0x0448, 0x0008, 0x0450, 0x0008, 0x0458, 0x0008, 0x0460, 0x0008, 
0x0468, 0x0008, 0x0470, 0x0008, 0x0478, 0x0008, 0x0480, 0x0008, 
0x0488, 0x0008, 0x0490, 0x0008, 0x0498, 0x0008, 0x04a0, 0x0008, 
0x0080, 0x0008, 0x04a8, 0x0008, 0x04b0, 0x0008, 0x04b8, 0x0008, 
0x04c0, 0x0008, 0x04c8, 0x0008, 0x04d0, 0x0008, 0x04d8, 0x0008, 
0x04e0, 0x0008, 0x04e8, 0x0008, 0x04f0, 0x0008, 0x04f8, 0x0008, 
0x0500, 0x0008, 0x0508, 0x0008, 0x0510, 0x0008, 0x0518, 0x0008, 
0x0520, 0x0008, 0x0528, 0x0008, 0x0530, 0x0008, 0x0538, 0x0008, 
0x0540, 0x0008, 0x0548, 0x0008, 0x0550, 0x0008, 0x0558, 0x0008, 
0x0560, 0x0008, 0x0568, 0x0008, 0x0478, 0x0008, 0x0480, 0x0008, 
0x0488, 0x0008, 0x0490, 0x0008, 0x0498, 0x0008, 0x0570, 0x0008, 
0x0578, 0x0008, 0x04a8, 0x0008, 0x04b0, 0x0008, 0x04b8, 0x0008, 
0x04c0, 0x0008, 0x0580, 0x0008, 0x0588, 0x0008, 0x0590, 0x0008, 
};

         /***  Text Font Structure   ***/
static char FontName[] = "system.font";
struct TextFont WTextFont = {
    {   /* Message for Font Removel  */
			{
             NULL,
             NULL,
             NT_FONT,
             0,
             FontName,
             },
         NULL,
         sizeof(CharData)+sizeof(CharLoc)+sizeof(WTextFont) + 0,
    },
    8,    /* Font Height */
    NULL,    /* Font Style */
    FPF_DISKFONT+FPB_REVPATH+FPB_TALLDOT+FPB_DESIGNED+FPF_DESIGNED,    /* Font Flags & Preferences */
    8,    /* Nominal Font Width */
    6,    /* Top of Char to Baseline */
    1,    /* Smear to Affect a Bold Enhancement */
    0,    /* Access Count */
    32,    /* First Character */
    255,    /* Last Character */
    CharData,    /* Bit Character Data */
    180,    /* Row Modulo For Strike Font data */
    CharLoc,    /* Pointer to Location Data for Strike Font */
    NULL,    /* Pointer to Proportional Spacing Data */
    NULL    /* Pointer to Words of Kerning Data */
};
/************************************************************
*              'C' Source Code Generation                   *
*                                                           *
*                         by                                *
*                    Terry Bullard                          *
*                Produced & Distributed                     *
*                      only by                              *
*               European Import Software                    *
*                    (206)-943-2744                         *
************************************************************/
