/************************************************************************* /* * /* C-Beispielprogramm für die Get-It ( Diskettenmagazin der AIT-UG ) * /* geschrieben von Peter Fischer, RP.-Ebert-Str. 6, D-3257 Springe 1 * /* Telefon : 05041/63563 * /* * /* Kurs 9 : Systemroutinen * /* Datum : 9.10.89 * /* * /* Copyrights (c)'89 by PeeF. * /* Der ausführbare Code ist Public Domain in bester Manier. * /* Der Quellcode darf von jedem/r GetiT-Leser/in benutzt werden, wie es * /* in seinem/ihrem Interesse liegt. * /* * /*************************************************************************/ /* * /* Dieser File muß mit dem File c9_2.o gelinkt werden. * /* Kompilieren mit * /* cc +p image * /* Linken mit * /* ln -cl32 -a32 c9_2 image * /* * /*************************************************************************/ /* Images zu c9_2.c */ /* Diese Bilder sind mit ImageEd von Jonathan Potter erstellt. Das */ /* Programm befindet sich in der neusten Version auf der Diskette */ /* FISH 242. */ /* Image Palette */ USHORT Palette[16]= { 0x000, 0xeca, 0xc00, 0xf60, 0x090, 0x4f1, 0x00f, 0x2cd, 0xf0c, 0xa0f, 0x950, 0xfca, 0xfe0, 0xbbb, 0x888, 0x444 }; /* Start of Image data */ USHORT IData1[]= { /* Plane 0 */ 0xffff, 0xffff, 0xff00, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8003, 0xffc0, 0x0100, 0x800f, 0xfff0, 0x0100, 0x801f, 0xfff8, 0x0100, 0x803f, 0xfff8, 0x0100, 0x807f, 0xfffe, 0x0100, 0x80ff, 0xffff, 0x0100, 0x80f7, 0xbdef, 0x8100, 0x81f8, 0x7e1f, 0x8100, 0x81ff, 0xffff, 0xc100, 0x83fc, 0xff3f, 0xc100, 0x83fc, 0xff3f, 0xc100, 0x83ff, 0xffff, 0xc100, 0x83ff, 0xffff, 0xc100, 0x83ff, 0xffff, 0xc100, 0x83ff, 0xffff, 0xc100, 0x83ff, 0xffff, 0xc100, 0x83ff, 0xffff, 0xc100, 0x83ff, 0xffff, 0xc100, 0x83ff, 0xffff, 0xc100, 0x81ff, 0x80ff, 0xc100, 0x81fe, 0x3e3f, 0x8100, 0x81fc, 0xff9f, 0x8100, 0x80fb, 0xffcf, 0x0100, 0x8077, 0xffe6, 0x0100, 0x807f, 0xfffc, 0x0100, 0x803f, 0xfff8, 0x0100, 0x800f, 0xfff0, 0x0100, 0x8007, 0xffc0, 0x0100, 0x8000, 0x3c00, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0xffff, 0xffff, 0xff00, 0x0000, 0x0000, 0x0000, /* Plane 1 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0003, 0xffc0, 0x0000, 0x000f, 0xffe0, 0x0000, 0x001f, 0xfff8, 0x0000, 0x003f, 0xfffc, 0x0000, 0x007f, 0xfffc, 0x0000, 0x00ff, 0xffff, 0x0000, 0x01ff, 0xffff, 0x8000, 0x01ff, 0xffff, 0xc000, 0x03ff, 0xffff, 0xc000, 0x03ff, 0xffff, 0xe000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x0fff, 0xffff, 0xf000, 0x01ff, 0xffff, 0xc000, 0x01ff, 0xffff, 0x8000, 0x01ff, 0xffff, 0x8000, 0x00ff, 0xffff, 0x0000, 0x007f, 0xfffe, 0x0000, 0x007f, 0xfffc, 0x0000, 0x003f, 0xfff8, 0x0000, 0x000f, 0xfff0, 0x0000, 0x0007, 0xffc0, 0x0000, 0x0000, 0x3c00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 2 */ 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, 0x0003, 0x00c0, 0x0000, 0x0003, 0x00c0, 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, /* Plane 3 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0003, 0xffc0, 0x0000, 0x000f, 0xffe0, 0x0000, 0x001c, 0x0038, 0x0000, 0x0030, 0x000c, 0x0000, 0x0060, 0x0004, 0x0000, 0x00c0, 0x0007, 0x0000, 0x0180, 0x0001, 0x8000, 0x0100, 0x0000, 0xc000, 0x0308, 0x4210, 0x4000, 0x0207, 0x81e0, 0x6000, 0x0e00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 0x0c00, 0x0000, 0x3000, 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 }, IData2[]= { /* Plane 0 */ 0x7fff, 0xffff, 0xff80, 0x4000, 0x0000, 0x0080, 0x4000, 0x0000, 0x0080, 0x4000, 0x0000, 0x0080, 0x4000, 0x0000, 0x0080, 0x4000, 0x0000, 0x0080, 0x4001, 0xffe0, 0x0080, 0x4007, 0xfff8, 0x0080, 0x400f, 0xfffc, 0x0080, 0x401f, 0xfffc, 0x0080, 0x403f, 0xffff, 0x0080, 0x407f, 0xffff, 0x8080, 0x407f, 0xffff, 0xc080, 0x40fc, 0x3f0f, 0xc080, 0x40fb, 0xdef7, 0xe080, 0x41fe, 0x7f9f, 0xe080, 0x41fe, 0x7f9f, 0xe080, 0x41ff, 0xffff, 0xe080, 0x41ff, 0xffff, 0xe080, 0x41ff, 0xffff, 0xe080, 0x41ff, 0xffff, 0xe080, 0x41ff, 0xffff, 0xe080, 0x41df, 0xffff, 0x6080, 0x41cf, 0xfffe, 0xe080, 0x41e7, 0xfffc, 0xe080, 0x40f7, 0xfff9, 0xe080, 0x40fb, 0xfff3, 0xc080, 0x40fc, 0xffe7, 0xc080, 0x407e, 0x7fcf, 0x8080, 0x403f, 0x1f1f, 0x0080, 0x403f, 0xc07e, 0x0080, 0x401f, 0xfffc, 0x0080, 0x4007, 0xfff8, 0x0080, 0x4003, 0xffe0, 0x0080, 0x4000, 0x1e00, 0x0080, 0x4000, 0x0000, 0x0080, 0x4000, 0x0000, 0x0080, 0x4000, 0x0000, 0x0080, 0x7fff, 0xffff, 0xff80, 0x0000, 0x0000, 0x0000, /* Plane 1 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0001, 0xffe0, 0x0000, 0x0007, 0xfff0, 0x0000, 0x000f, 0xfffc, 0x0000, 0x001f, 0xfffe, 0x0000, 0x003f, 0xfffe, 0x0000, 0x007f, 0xffff, 0x8000, 0x00ff, 0xffff, 0xc000, 0x00ff, 0xffff, 0xe000, 0x01ff, 0xffff, 0xe000, 0x01ff, 0xffff, 0xf000, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x07ff, 0xffff, 0xf800, 0x00ff, 0xffff, 0xe000, 0x00ff, 0xffff, 0xc000, 0x00ff, 0xffff, 0xc000, 0x007f, 0xffff, 0x8000, 0x003f, 0xffff, 0x0000, 0x003f, 0xfffe, 0x0000, 0x001f, 0xfffc, 0x0000, 0x0007, 0xfff8, 0x0000, 0x0003, 0xffe0, 0x0000, 0x0000, 0x1e00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 2 */ 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, 0x0001, 0x8060, 0x0000, 0x0001, 0x8060, 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, /* Plane 3 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0001, 0xffe0, 0x0000, 0x0007, 0xfff0, 0x0000, 0x000e, 0x001c, 0x0000, 0x0018, 0x0006, 0x0000, 0x0030, 0x0002, 0x0000, 0x0060, 0x0003, 0x8000, 0x00c0, 0x0000, 0xc000, 0x0080, 0x0000, 0x6000, 0x0180, 0x0000, 0x2000, 0x0103, 0xc0f0, 0x3000, 0x0704, 0x2108, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 0x0600, 0x0000, 0x1800, 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 }, IData3[]= { /* Plane 0 */ 0xffff, 0xffff, 0xff00, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0xe000, 0x0100, 0x8001, 0x5000, 0x0100, 0x8001, 0xf000, 0x0100, 0x8001, 0x1000, 0x0100, 0x8000, 0xe000, 0x0100, 0x8000, 0x4000, 0x0100, 0x8007, 0xfc00, 0x0100, 0x800f, 0xf600, 0x0100, 0x800d, 0xf600, 0x0100, 0x800d, 0xf600, 0x0100, 0x800d, 0xf600, 0x0100, 0x800d, 0xf600, 0x0100, 0x800d, 0xf600, 0x0100, 0x800d, 0xf600, 0x0100, 0x800d, 0xf600, 0x0100, 0x800d, 0xf600, 0x0100, 0x800c, 0x0600, 0x0100, 0x800c, 0x0600, 0x0100, 0x800c, 0x0600, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8001, 0xb000, 0x0100, 0x800f, 0xbe00, 0x0100, 0x800f, 0xbe00, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0xffff, 0xffff, 0xff00, 0x0000, 0x0000, 0x0000, /* Plane 1 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0xe000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0003, 0xf800, 0x0000, 0x0003, 0xf800, 0x0000, 0x0001, 0xf000, 0x0000, 0x0000, 0xe000, 0x0000, 0x0000, 0x4000, 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, 0x000c, 0x0600, 0x0000, 0x000c, 0x0600, 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, 0x0001, 0xb000, 0x0000, 0x000f, 0xbe00, 0x0000, 0x000f, 0xbe00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 2 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0xa000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0007, 0xfc00, 0x0000, 0x000f, 0xf600, 0x0000, 0x000d, 0xf600, 0x0000, 0x000d, 0xf600, 0x0000, 0x000d, 0xf600, 0x0000, 0x000d, 0xf600, 0x0000, 0x000d, 0xf600, 0x0000, 0x000d, 0xf600, 0x0000, 0x000d, 0xf600, 0x0000, 0x000d, 0xf600, 0x0000, 0x000c, 0x0600, 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, 0x0001, 0xb000, 0x0000, 0x000f, 0xbe00, 0x0000, 0x000f, 0xbe00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 3 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0xe000, 0x0000, 0x0001, 0x1000, 0x0000, 0x0002, 0x0800, 0x0000, 0x0002, 0x0800, 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, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x000f, 0xbe00, 0x0000, 0x000f, 0xbe00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 }, IData4[]= { /* Plane 0 */ 0xffff, 0xffff, 0xff00, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0xe000, 0x0100, 0x8061, 0x5000, 0x0100, 0x8061, 0xf000, 0x0100, 0x8061, 0x1000, 0x0100, 0x8060, 0xe000, 0x0100, 0x8060, 0x4000, 0x0100, 0x8061, 0xf000, 0x0100, 0x807f, 0xff00, 0x0100, 0x807f, 0xfffe, 0x0100, 0x8001, 0xf3fe, 0x0100, 0x8001, 0xf000, 0x0100, 0x8001, 0xf000, 0x0100, 0x8001, 0xf000, 0x0100, 0x8001, 0xf000, 0x0100, 0x8001, 0xf000, 0x0100, 0x8001, 0xf000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8001, 0xb000, 0x0100, 0x800f, 0xbe00, 0x0100, 0x800f, 0xbe00, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0xffff, 0xffff, 0xff00, 0x0000, 0x0000, 0x0000, /* Plane 1 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0xe000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0063, 0xf800, 0x0000, 0x0063, 0xf800, 0x0000, 0x0001, 0xf000, 0x0000, 0x0000, 0xe000, 0x0000, 0x0000, 0x4000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0006, 0x0000, 0x0000, 0x0006, 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, 0x0001, 0xb000, 0x0000, 0x000f, 0xbe00, 0x0000, 0x000f, 0xbe00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 2 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0xa000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0060, 0x0000, 0x0000, 0x0060, 0x0000, 0x0000, 0x0060, 0x0000, 0x0000, 0x0061, 0xf000, 0x0000, 0x007f, 0xff00, 0x0000, 0x007f, 0xfff8, 0x0000, 0x0001, 0xf3f8, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 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, 0x0001, 0xb000, 0x0000, 0x000f, 0xbe00, 0x0000, 0x000f, 0xbe00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 3 */ 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0xe000, 0x0000, 0x0001, 0x1000, 0x0000, 0x0002, 0x0800, 0x0000, 0x0002, 0x0800, 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, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xf000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x0001, 0xb000, 0x0000, 0x000f, 0xbe00, 0x0000, 0x000f, 0xbe00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 }, IData5[]= { /* Plane 0 */ 0xffff, 0xffff, 0xff00, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0x8000, 0x0000, 0x0100, 0xffff, 0xffff, 0xff00, 0x0000, 0x0000, 0x0000, /* Plane 1 */ 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, 0x000f, 0xffff, 0x0000, 0x001f, 0xffff, 0x0000, 0x001f, 0xffff, 0x8000, 0x003f, 0xffff, 0x8000, 0x007f, 0xffff, 0xc000, 0x007f, 0xffff, 0xc000, 0x00ff, 0xffff, 0xe000, 0x00ff, 0xffff, 0xe000, 0x01ff, 0xffff, 0xd000, 0x03c3, 0x8300, 0x5000, 0x02c3, 0x8300, 0x4800, 0x00c3, 0x8300, 0x4000, 0x00c3, 0x8300, 0x4000, 0x00ff, 0xffff, 0xc000, 0x00ff, 0xffff, 0xc000, 0x00ff, 0xffff, 0xc000, 0x00ff, 0xffff, 0xc000, 0x00c1, 0xc180, 0x4000, 0x00c1, 0xc180, 0x4000, 0x00c1, 0xc180, 0x4000, 0x00c1, 0xc180, 0x4000, 0x00c1, 0xffff, 0xc000, 0x00c1, 0xffff, 0xc000, 0x00c1, 0xffff, 0xc000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 2 */ 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, 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, /* Plane 3 */ 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, 0x007f, 0xffff, 0xc000, 0x00ff, 0xffff, 0xc000, 0x00c3, 0x8300, 0x4000, 0x00c3, 0x8300, 0x4000, 0x00c3, 0x8300, 0x4000, 0x00c3, 0x8300, 0x4000, 0x00ff, 0xffff, 0xc000, 0x00ff, 0xffff, 0xc000, 0x00ff, 0xffff, 0xc000, 0x00ff, 0xffff, 0xc000, 0x00c1, 0xc180, 0x4000, 0x00c1, 0xc180, 0x4000, 0x00c1, 0xc180, 0x4000, 0x00c1, 0xc180, 0x4000, 0x00c1, 0xffff, 0xc000, 0x00c1, 0xffff, 0xc000, 0x00c1, 0xffff, 0xc000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 }, IData6[]= { /* Plane 0 */ 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffc0, 0x0003, 0xff00, 0xff80, 0x0003, 0xff00, 0xff80, 0x0001, 0xff00, 0xff00, 0x0001, 0xff00, 0xfe00, 0x0000, 0xff00, 0xfe00, 0x0000, 0xff00, 0xfc00, 0x0000, 0x7f00, 0xfc00, 0x0000, 0x7f00, 0xf800, 0x0000, 0xbf00, 0xf000, 0x0000, 0xbf00, 0xf400, 0x0000, 0xdf00, 0xfc00, 0x0000, 0xff00, 0xfc00, 0x0000, 0xff00, 0xfc00, 0x0000, 0xff00, 0xfc00, 0x0000, 0xff00, 0xfc00, 0x0000, 0xff00, 0xfc00, 0x0000, 0xff00, 0xfcf8, 0xf800, 0xff00, 0xfcf8, 0xd800, 0xff00, 0xfcf8, 0x8800, 0xff00, 0xfcf8, 0x8800, 0xff00, 0xfcf8, 0x0000, 0xff00, 0xfcf8, 0x0000, 0xff00, 0xfcf8, 0x0000, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0xffff, 0xffff, 0xff00, 0x0000, 0x0000, 0x0000, /* Plane 1 */ 0x0000, 0x0000, 0x0000, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7ffe, 0x0c01, 0xfe00, 0x7ffe, 0x0c01, 0xfe00, 0x7f9e, 0x0c01, 0xfe00, 0x7f9e, 0x0c01, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0x0601, 0xfe00, 0x1fff, 0x0601, 0x1e00, 0x03ff, 0x0601, 0x0e00, 0x03ff, 0x0601, 0x0600, 0x03ff, 0xffff, 0x0000, 0x03ff, 0xffff, 0x0000, 0x03ff, 0xffff, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 2 */ 0x0000, 0x0000, 0x0000, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fc0, 0x0003, 0xfe00, 0x7f80, 0x0003, 0xfe00, 0x7f80, 0x0001, 0xfe00, 0x7f00, 0x0001, 0xfe00, 0x7e00, 0x0000, 0xfe00, 0x7e00, 0x0000, 0xfe00, 0x7c00, 0x0000, 0x7e00, 0x7c00, 0x0000, 0x7e00, 0x7800, 0x0000, 0xbe00, 0x70f1, 0xf000, 0xbe00, 0x74f1, 0xb000, 0xde00, 0x7c91, 0x1000, 0xfe00, 0x7c91, 0x1000, 0xfe00, 0x7c00, 0x0000, 0xfe00, 0x7c00, 0x0000, 0xfe00, 0x7c00, 0x0000, 0xfe00, 0x7c00, 0x0000, 0xfe00, 0x7cf8, 0x01fe, 0xfe00, 0x7cf8, 0x01ce, 0xfe00, 0x7cf8, 0x0186, 0xfe00, 0x7cf8, 0x0102, 0xfe00, 0x7cf8, 0x0000, 0xfe00, 0x7cf8, 0x0000, 0xfe00, 0x7cf8, 0x0000, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x7fff, 0xffff, 0xfe00, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, /* Plane 3 */ 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, 0x01ff, 0xffff, 0x0000, 0x03ff, 0xffff, 0x0000, 0x030f, 0xffff, 0x0000, 0x030f, 0xbf8f, 0x0000, 0x030f, 0x1f07, 0x0000, 0x030f, 0x1e03, 0x0000, 0x03ff, 0xffff, 0x0000, 0x03ff, 0xffff, 0x0000, 0x03ff, 0xffff, 0x0000, 0x03ff, 0xffff, 0x0000, 0x03ff, 0xfe01, 0x0000, 0x03ff, 0xde01, 0x0000, 0x03ff, 0x8e01, 0x0000, 0x03ff, 0x8e01, 0x0000, 0x03ff, 0xffff, 0x0000, 0x03ff, 0xffff, 0x0000, 0x03ff, 0xffff, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000 }; /* End of Image data */ USHORT *IChip1 = NULL, *IChip2 = NULL, *IChip3 = NULL, *IChip4 = NULL, *IChip5 = NULL, *IChip6 = NULL; struct Image Image1= { 0,0, /* LeftEdge, TopEdge */ 41,40,4, /* Width, Height, Depth */ &IData1[0], /* ImageData */ 0xf,0x0, /* PlanePick, PlaneOnOff */ NULL /* Next Image */ }, Image2= { 0,0, /* LeftEdge, TopEdge */ 41,40,4, /* Width, Height, Depth */ &IData2[0], /* ImageData */ 0xf,0x0, /* PlanePick, PlaneOnOff */ NULL /* Next Image */ }, Image3= { 0,0, /* LeftEdge, TopEdge */ 41,40,4, /* Width, Height, Depth */ &IData3[0], /* ImageData */ 0xf,0x0, /* PlanePick, PlaneOnOff */ NULL /* Next Image */ }, Image4= { 0,0, /* LeftEdge, TopEdge */ 41,40,4, /* Width, Height, Depth */ &IData4[0], /* ImageData */ 0xf,0x0, /* PlanePick, PlaneOnOff */ NULL /* Next Image */ }, Image5= { 0,0, /* LeftEdge, TopEdge */ 41,40,4, /* Width, Height, Depth */ &IData5[0], /* ImageData */ 0xf,0x0, /* PlanePick, PlaneOnOff */ NULL /* Next Image */ }, Image6= { 0,0, /* LeftEdge, TopEdge */ 41,40,4, /* Width, Height, Depth */ &IData6[0], /* ImageData */ 0xf,0x0, /* PlanePick, PlaneOnOff */ NULL /* Next Image */ }; CopyIDataToChip(source,image) /* Kopiert die Daten für Images aus dem FastMem ins ChipMem. Dabei wird */ /* abgefragt, ob nicht bereits Daten im ChipMem waren. Ist dies der */ /* Fall, so wird der Wert von source zurückgegeben. Geht irgendetwas */ /* schief, so wird NULL geliefert. Ansonsten immer die Adresse des */ /* Speicher-Bereichs. */ USHORT *source; struct Image *image; { if ( TypeOfMem( source ) == MEMF_CHIP ) return ( image->ImageData = source ); image->ImageData = AllocMem ( image->Width * image->Height * image->Depth * sizeof ( USHORT ), MEMF_CHIP | MEMF_CLEAR ); if ( image->ImageData == NULL ) return ( NULL ); CopyMem ( source,image->ImageData, image->Width * image->Height * image->Depth * sizeof ( USHORT ) ); return ( image->ImageData ); } FreeChipData(image, prev) /* Gibt den Speicher der Image-Daten frei. Dies sollte allerdings nur dann */ /* geschehen, wenn dieser Bereich mit CopyIDataToChip() geholt wurde. Als */ /* zweites Argument wird dann die Adresse des ursprünglichen Datenbereichs */ /* übergeben. ( Also des Bereichs, mit dem die Image-Daten im Programm */ /* definiert werden. ) */ /* Hintergrund : Waren die Image-Daten bereits im ChipMem, etwa bei einem */ /* Ausbau des Speichers bis 512 KB oder einem Ausbau mit 1 MB und der */ /* FatAgnus, so brauchen die Daten nicht mehr ins ChipMem kopiert zu */ /* werden. Es wird dann mit CopyIDataToChip() auch kein Speicher reserviert,*/ /* also DARF auch kein Speicher freigegeben werden. */ /* Zusatz : Wird eine NULL übergeben an Stelle der Adresse des */ /* ursprünglichen Datenbereiches, so wird der Speicher auf jeden Fall */ /* freigegeben. */ struct Image *image; USHORT *prev; { if ( image->ImageData != NULL && ( prev != image->ImageData || prev == NULL ) ) FreeMem ( image->ImageData, image->Width * image->Height * image->Depth * sizeof ( USHORT ) ); }