310 lines
8.5 KiB
C
310 lines
8.5 KiB
C
/* prom color bitmap: instrtape */
|
|
#define instrtape_1_color MAGENTA2 /* 142 56 142 */
|
|
unsigned short instrtape_1_bits[] = {
|
|
0x0000, 0x0000, 0x0001, 0x5000,
|
|
0x0000, 0x0000, 0x0002, 0xaa00,
|
|
0x0000, 0x0000, 0x0015, 0x0500,
|
|
0x0000, 0x0000, 0x002a, 0x00a0,
|
|
0x0000, 0x0000, 0x0155, 0x5040,
|
|
0x0000, 0x0000, 0x02aa, 0x0820,
|
|
0x0000, 0x0000, 0x0555, 0x0110,
|
|
0x0000, 0x0000, 0x02aa, 0xa080,
|
|
0x0000, 0x0000, 0x0555, 0x5520,
|
|
0x0000, 0x0000, 0x02aa, 0xa900,
|
|
0x0000, 0x0000, 0x0555, 0x5500,
|
|
0x0000, 0x0000, 0x02aa, 0xa980,
|
|
0x0000, 0x0000, 0x0555, 0x5540,
|
|
0x0000, 0x0000, 0x02aa, 0xa9a0,
|
|
0x0000, 0x0000, 0x0555, 0x5550,
|
|
0x0000, 0x0000, 0x02aa, 0xa9a0,
|
|
0x0000, 0x0000, 0x0555, 0x5550,
|
|
0x0000, 0x0000, 0x02aa, 0xa9a0,
|
|
0x0000, 0x0000, 0x0555, 0x5550,
|
|
0x0000, 0x0000, 0x02aa, 0xaaa0,
|
|
0x0000, 0x0028, 0x0555, 0x5510,
|
|
0x0000, 0x0050, 0x02aa, 0xab80,
|
|
0x0000, 0x00a8, 0x0555, 0x1440,
|
|
0x0000, 0x0050, 0x02a8, 0xaa20,
|
|
0x0000, 0x0028, 0x0545, 0x5530,
|
|
0x0000, 0x0010, 0x022a, 0xaa80,
|
|
0x0000, 0x0028, 0x0155, 0x5560,
|
|
0x0000, 0x0010, 0x00aa, 0xaaa0,
|
|
0x0000, 0x00a8, 0x0055, 0x5540,
|
|
0x0000, 0x0150, 0x000a, 0xaa00,
|
|
0x0000, 0x0a80, 0x0005, 0x5000,
|
|
0x0000, 0x1500, 0x0000, 0x8000,
|
|
0x0000, 0xa800, 0x0000, 0x0000,
|
|
0x8001, 0x5000, 0x0000, 0x0000,
|
|
0xa00a, 0x8000, 0x0000, 0x0000,
|
|
0xc015, 0x0000, 0x0000, 0x0000,
|
|
0xa0a8, 0x0000, 0x0000, 0x0000,
|
|
0xc150, 0x0000, 0x0000, 0x0000,
|
|
0xaa80, 0x0000, 0x0000, 0x0000,
|
|
0xd500, 0x0000, 0x0000, 0x0000,
|
|
0xac00, 0x0000, 0x0000, 0x0000,
|
|
0xd000, 0x0000, 0x0000, 0x0000,
|
|
0x8000, 0x0000, 0x0000, 0x0000,
|
|
};
|
|
#define instrtape_2_color BLUE /* 0 0 255 */
|
|
unsigned short instrtape_2_bits[] = {
|
|
0xa000,
|
|
0x5400,
|
|
0x0080,
|
|
0x0140,
|
|
0xa0a0,
|
|
0x0610,
|
|
0x0000,
|
|
0x5040,
|
|
0xa800,
|
|
0x5410,
|
|
0xa880,
|
|
0x5440,
|
|
0xa8a0,
|
|
0x5450,
|
|
0xa8a0,
|
|
0x5450,
|
|
0xa8a0,
|
|
0x5450,
|
|
0xa8a0,
|
|
0x5450,
|
|
0xaa20,
|
|
0x5410,
|
|
0xa880,
|
|
0x1540,
|
|
0x0080,
|
|
0x0050,
|
|
0x0000,
|
|
0x0010,
|
|
};
|
|
#define instrtape_3_color BLUE2 /* 113 113 198 */
|
|
unsigned short instrtape_3_bits[] = {
|
|
0x00a0, 0x0000,
|
|
0x0140, 0x0000,
|
|
0x0aa0, 0x0000,
|
|
0x1540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa0, 0x0000,
|
|
0x5540, 0x0000,
|
|
0xaaa8, 0x0000,
|
|
0x5555, 0x4000,
|
|
0xaaaa, 0xa000,
|
|
0x9555, 0x5000,
|
|
0x2aaa, 0xa800,
|
|
0x0555, 0x5000,
|
|
0x02aa, 0x8000,
|
|
0x0054, 0x0000,
|
|
0x0020, 0x0000,
|
|
};
|
|
#define instrtape_4_color BLACK /* 0 0 0 */
|
|
unsigned short instrtape_4_bits[] = {
|
|
0x0000, 0x0000, 0x0007, 0xd000,
|
|
0x0000, 0x0000, 0x0007, 0xf000,
|
|
0x0000, 0x0000, 0x0000, 0x7800,
|
|
0x0000, 0x0000, 0x0007, 0x8e00,
|
|
0x0000, 0x0000, 0x0007, 0xf740,
|
|
0x0000, 0x0000, 0x0000, 0x79c0,
|
|
0x0000, 0x0000, 0x0000, 0x16c0,
|
|
0x0000, 0x0000, 0x0000, 0x1740,
|
|
0x0000, 0x0000, 0x0000, 0x13c0,
|
|
0x0000, 0x0000, 0x0000, 0x11c0,
|
|
0x0000, 0x0000, 0x0000, 0x10c0,
|
|
0x0000, 0x0000, 0x0000, 0x1040,
|
|
0x0000, 0x0000, 0x0000, 0x1040,
|
|
0x0000, 0x0000, 0x0000, 0x1040,
|
|
0x0000, 0x0000, 0x0000, 0x1040,
|
|
0x0000, 0x0000, 0x0000, 0x1040,
|
|
0x0000, 0x0060, 0x0000, 0x1040,
|
|
0x0000, 0x01a0, 0x0000, 0x0840,
|
|
0x0000, 0x0620, 0x0000, 0x0640,
|
|
0x0000, 0x1820, 0x0000, 0x0340,
|
|
0x0000, 0x0020, 0x0000, 0x19c0,
|
|
0x0000, 0x0020, 0x0000, 0x04c0,
|
|
0x0000, 0x0620, 0x0000, 0x0240,
|
|
0x0000, 0x0620, 0x0000, 0x0140,
|
|
0x0000, 0x0620, 0x0000, 0x00c0,
|
|
0x0000, 0x0e20, 0x0000, 0x0040,
|
|
0x0000, 0x3820, 0x0000, 0x0040,
|
|
0x0000, 0xe000, 0x0000, 0x0000,
|
|
0x0003, 0x8000, 0x0000, 0x0000,
|
|
0x000e, 0x0000, 0x0000, 0x0000,
|
|
0x0038, 0x0000, 0x0000, 0x0000,
|
|
0x00e0, 0x0000, 0x0000, 0x0000,
|
|
0x0380, 0x0000, 0x0000, 0x0000,
|
|
0x8e00, 0x0000, 0x0000, 0x0000,
|
|
0xf800, 0x0000, 0x0000, 0x0000,
|
|
0xe000, 0x0000, 0x0000, 0x0000,
|
|
0x8000, 0x0000, 0x0000, 0x0000,
|
|
};
|
|
#define instrtape_5_color VeryDarkGray /* 34 34 34 */
|
|
unsigned short instrtape_5_bits[] = {
|
|
0x0000, 0x6000,
|
|
0x0001, 0xb800,
|
|
0x0006, 0x2600,
|
|
0x0018, 0x0180,
|
|
0x0060, 0x0060,
|
|
0x0180, 0x0018,
|
|
0x0600, 0x0014,
|
|
0x1800, 0x0014,
|
|
0x6000, 0x200c,
|
|
0x8000, 0x0004,
|
|
0x0076, 0x0000,
|
|
0x00db, 0x0000,
|
|
0x01a7, 0x0000,
|
|
0x00ba, 0x0000,
|
|
0x00d4, 0x0000,
|
|
};
|
|
#define instrtape_6_color BLACK2 /* 85 85 85 */
|
|
unsigned short instrtape_6_bits[] = {
|
|
0x0000, 0x4000, 0x0000, 0x0000, 0x0000,
|
|
0x0001, 0x0800, 0x2000, 0x0000, 0x0000,
|
|
0x0004, 0x9200, 0x4000, 0x0000, 0x0000,
|
|
0x0012, 0x0482, 0xa000, 0x0000, 0x0000,
|
|
0x0048, 0x0125, 0x4000, 0x0100, 0x0000,
|
|
0x0120, 0x004a, 0xa000, 0x0000, 0x0000,
|
|
0x0480, 0x0008, 0x4000, 0x0000, 0x0000,
|
|
0x1200, 0x0030, 0xa000, 0x0000, 0x0000,
|
|
0x483e, 0x00c0, 0x4000, 0x0000, 0x0000,
|
|
0x2009, 0x0318, 0xa000, 0x0000, 0x0000,
|
|
0x8024, 0x0c61, 0x4000, 0x0000, 0xc000,
|
|
0x0040, 0x318a, 0x8001, 0x8007, 0x0000,
|
|
0x0145, 0xc615, 0x0001, 0x8038, 0x0000,
|
|
0x012b, 0x18a8, 0x0001, 0x81c0, 0x0000,
|
|
0x001c, 0x6150, 0x0001, 0x8000, 0x0000,
|
|
0x0031, 0x8a80, 0x0001, 0x8000, 0x0000,
|
|
0x0106, 0x1500, 0x0001, 0x8000, 0x0000,
|
|
0x00b8, 0xa800, 0x0001, 0x8000, 0x0000,
|
|
0x0101, 0x5300, 0x0001, 0x8000, 0x0000,
|
|
0x008a, 0x8300, 0x0001, 0x8000, 0x0000,
|
|
0x0115, 0x0300, 0x003f, 0xf000, 0x0000,
|
|
0x00a8, 0x0300, 0x01ff, 0xe040, 0x0000,
|
|
0x0140, 0x0300, 0x0fe0, 0x0070, 0x0000,
|
|
0x0080, 0x0300, 0x3e00, 0x007c, 0x0000,
|
|
0x0100, 0x0300, 0xf800, 0x001f, 0x0000,
|
|
0x0000, 0x0303, 0xe000, 0x0007, 0xc000,
|
|
0x0000, 0x030f, 0x8000, 0x0001, 0xe000,
|
|
0x0000, 0x033e, 0x0000, 0x0000, 0x6000,
|
|
0x0000, 0x03f8, 0x0000, 0x0000, 0x0000,
|
|
0x0000, 0x07e0, 0x0000, 0x0000, 0x0000,
|
|
0x0000, 0x0f80, 0x0000, 0x0000, 0x0000,
|
|
0x0000, 0x3e00, 0x0000, 0x0000, 0x0000,
|
|
0x0000, 0xf800, 0x0000, 0x0000, 0x0000,
|
|
0x4007, 0xe000, 0x0000, 0x0000, 0x0000,
|
|
0x783f, 0x8000, 0x0000, 0x0000, 0x0000,
|
|
0x7ffc, 0x0000, 0x0000, 0x0000, 0x0000,
|
|
0x0fe0, 0x0000, 0x0000, 0x0000, 0x0000,
|
|
};
|
|
#define instrtape_7_color MediumGray /* 136 136 136 */
|
|
unsigned short instrtape_7_bits[] = {
|
|
0x0000, 0xd000,
|
|
0x0003, 0x0c00,
|
|
0x000c, 0x0300,
|
|
0x0030, 0x00c0,
|
|
0x00c0, 0x3020,
|
|
0x0300, 0x3000,
|
|
0x0c00, 0x1000,
|
|
0x30c0, 0x0008,
|
|
0xc180, 0x8000,
|
|
0x0300, 0x8000,
|
|
0x0210, 0x8000,
|
|
0x0000, 0x0000,
|
|
0x0000, 0x0000,
|
|
0x0060, 0x0000,
|
|
};
|
|
#define instrtape_8_color VeryLightGray /* 221 221 221 */
|
|
unsigned short instrtape_8_bits[] = {
|
|
0x0000, 0xc000, 0x0000, 0x0000,
|
|
0x0003, 0xf000, 0x0000, 0x0000,
|
|
0x000f, 0xfc00, 0x0000, 0x0000,
|
|
0x0038, 0x9f00, 0x0000, 0x1000,
|
|
0x00ff, 0x9fc0, 0x0000, 0x8000,
|
|
0x03fe, 0x9f80, 0x0004, 0x0000,
|
|
0x0e03, 0xfe60, 0x0010, 0x0000,
|
|
0x3c00, 0xf9c0, 0x0000, 0x0000,
|
|
0xf800, 0xe700, 0x0000, 0x0000,
|
|
0xf810, 0x9c00, 0x0000, 0x0000,
|
|
0x3c00, 0x7000, 0x0000, 0x0000,
|
|
0x0c01, 0xc000, 0x0000, 0x0000,
|
|
0x0307, 0x0000, 0x0000, 0x0000,
|
|
0x009c, 0x0000, 0x0000, 0x0000,
|
|
0x00f0, 0x0000, 0x0000, 0x0000,
|
|
};
|
|
#define instrtape_9_color WHITE /* 255 255 255 */
|
|
unsigned short instrtape_9_bits[] = {
|
|
0x0003, 0x8000, 0x0000, 0x0000,
|
|
0x0000, 0x0000, 0x0000, 0x0000,
|
|
0x0000, 0x8000, 0x0000, 0x0000,
|
|
0x0000, 0x0000, 0x0000, 0x0000,
|
|
0x0000, 0x0000, 0x0000, 0x0000,
|
|
0x0000, 0x0000, 0x0000, 0x0000,
|
|
0x8000, 0x0000, 0x3000, 0x0000,
|
|
0x6000, 0x0000, 0xc000, 0x0000,
|
|
0x1800, 0x0003, 0x0000, 0x0000,
|
|
0x0600, 0x000c, 0x0000, 0x0000,
|
|
0x0180, 0x0030, 0x0000, 0x0000,
|
|
0x0000, 0x00c0, 0x0000, 0x0200,
|
|
0x0000, 0x03f0, 0x0000, 0x0200,
|
|
0x0000, 0x0cf0, 0x0000, 0x0700,
|
|
0x0000, 0x3cf0, 0x0000, 0x0700,
|
|
0x0000, 0xdcf0, 0x0000, 0x0f00,
|
|
0x0003, 0x1cf0, 0x0000, 0x1f80,
|
|
0x000c, 0x1cf0, 0x0000, 0x3f80,
|
|
0x0030, 0x1cf0, 0x0000, 0x7f80,
|
|
0x00c0, 0x1cf0, 0x0000, 0xffc0,
|
|
0x0300, 0x1cf0, 0x0001, 0xffc0,
|
|
0x0000, 0x1cf0, 0x0007, 0xffc0,
|
|
0x0000, 0x1cc0, 0x001f, 0xffe0,
|
|
0x0000, 0x1c00, 0x0007, 0xffe0,
|
|
0x0000, 0x1810, 0x0001, 0xffe0,
|
|
0x0000, 0x1070, 0x0000, 0x7ff0,
|
|
0x0000, 0x01f0, 0x0000, 0x7ff0,
|
|
0x0000, 0x07f0, 0x0000, 0xfff0,
|
|
0x0000, 0x0ff0, 0x0000, 0xfff8,
|
|
0x0000, 0x07f0, 0x0000, 0xff78,
|
|
0x0000, 0x07f0, 0x0001, 0xff18,
|
|
0x0000, 0x07f0, 0x0001, 0xfe0c,
|
|
0x0000, 0x03f8, 0x0003, 0xfe00,
|
|
0x0000, 0x03f8, 0x0003, 0xfc00,
|
|
0x0000, 0x01f8, 0x0007, 0xfc00,
|
|
0x0000, 0x00fc, 0x000f, 0xf800,
|
|
0x0000, 0x007c, 0x001f, 0xf000,
|
|
0x0000, 0x003e, 0x003f, 0xe000,
|
|
0x0000, 0x000f, 0x00ff, 0x8000,
|
|
0x0000, 0x0003, 0xfffe, 0x0000,
|
|
0x0000, 0x0000, 0x7ff0, 0x0000,
|
|
};
|
|
|
|
struct pcbm_node instrtape_nodes[] = {
|
|
{instrtape_1_color,6,0,60,43,instrtape_1_bits},
|
|
{instrtape_2_color,54,0,12,28,instrtape_2_bits},
|
|
{instrtape_3_color,43,1,21,31,instrtape_3_bits},
|
|
{instrtape_4_color,9,2,58,37,instrtape_4_bits},
|
|
{instrtape_5_color,0,17,30,15,instrtape_5_bits},
|
|
{instrtape_6_color,0,18,67,37,instrtape_6_bits},
|
|
{instrtape_7_color,0,19,29,14,instrtape_7_bits},
|
|
{instrtape_8_color,1,20,52,15,instrtape_8_bits},
|
|
{instrtape_9_color,0,23,62,41,instrtape_9_bits},
|
|
{0,0,0,0,0,0}
|
|
};
|
|
struct pcbm instrtape = {
|
|
67,
|
|
64,
|
|
0,
|
|
0,
|
|
instrtape_nodes
|
|
};
|