/*************************************************************************** *Rolf Schneider | Am Birkenwaeldchen 16/18 | 58 Hagen 7 | Tel.: 02331/45569* * * * First Amiga Artists Program: * * * * -- Artist's Copy I -- * *AC5 * ***************************************************************************/ /***** Includes ***********************************************************/ #include "exec/types.h" #include "exec/memory.h" #include "intuition/intuition.h" /***** Gadgets + Window Liste *********************************************/ UBYTE Buffer [35] = "\000"; USHORT *p1,*p2,*p3,*p4,*p5,*p6,*p7,*p8,*p9,*p10; USHORT DataHIup []= { 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xfff9,0xffff,0xfff0,0xffff, 0xffe6,0x7fff,0xffcf,0x3fff,0xff9f,0x9fff,0xff3f,0xcfff,0xfe7f,0xe7ff, 0xfcff,0xf3ff,0xf9ff,0xf9ff,0xf3ff,0xfcff,0xe00f,0x007f,0xffcf,0x3fff, 0xffcf,0x3fff,0xffcf,0x3fff,0xffcf,0x3fff,0xffcf,0x3fff,0xffcf,0x3fff, 0xffc0,0x3fff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff, 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0006,0x0000,0x000f,0x0000, 0x0019,0x8000,0x0030,0xc000,0x0060,0x6000,0x00c0,0x3000,0x0180,0x1800, 0x0300,0x0c00,0x0600,0x0600,0x0c00,0x0300,0x1ff0,0xff80,0x0030,0xc000, 0x0030,0xc000,0x0030,0xc000,0x0030,0xc000,0x0030,0xc000,0x0030,0xc000, 0x003f,0xc000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000 }; USHORT DataIup [] = { 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff, 0xfff9,0xffff,0xfff0,0xffff,0xffe0,0x7fff,0xffc0,0x3fff,0xff80,0x1fff, 0xff00,0x0fff,0xfe00,0x07ff,0xfc00,0x03ff,0xfff0,0xffff,0xfff0,0xffff, 0xfff0,0xffff,0xfff0,0xffff,0xfff0,0xffff,0xfff0,0xffff,0xfff0,0xffff, 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff, 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000, 0x0006,0x0000,0x000f,0x0000,0x001f,0x8000,0x003f,0xc000,0x007f,0xe000, 0x00ff,0xf000,0x01ff,0xf800,0x03ff,0xfc00,0x000f,0x0000,0x000f,0x0000, 0x000f,0x0000,0x000f,0x0000,0x000f,0x0000,0x000f,0x0000,0x000f,0x0000, 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000 }; USHORT DataHIdup []= { 0xffcf,0xffff,0xffff,0xffff,0xffcf,0xffff,0xffff,0xffff,0xffcf,0xffff, 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xff33,0xffff,0xfff9,0xffff, 0xfcfc,0xffff,0xfffe,0x7fff,0xf3ff,0x3fff,0xffff,0x9fff,0xcfff,0xcfff, 0xfffc,0x00ff,0xfffc,0x00ff,0xfffc,0x00ff,0xffff,0x33ff,0xffff,0xffff, 0xfffc,0xfcff,0xffff,0xffff,0xfff3,0xff3f,0xffff,0xffff, 0x0030,0x0000,0x0000,0x0000,0x0030,0x0000,0x0000,0x0000,0x0030,0x0000, 0x03ff,0x0000,0x03ff,0x0000,0x03ff,0x0000,0x00cc,0x0000,0x0006,0x0000, 0x0303,0x0000,0x0001,0x8000,0x0c00,0xc000,0x0000,0x6000,0x3000,0x3000, 0x0003,0xff00,0x0003,0xff00,0x0003,0xff00,0x0000,0xcc00,0x0000,0x0000, 0x0003,0x0300,0x0000,0x0000,0x000c,0x00c0,0x0000,0x0000 }; USHORT DataIdup []= { 0xffcf,0xffff,0xffff,0xffff,0xffcf,0xffff,0xffff,0xffff,0xffcf,0xffff, 0xfc00,0xffff,0xfc00,0xffff,0xfc00,0xffff,0xff33,0xffff,0xfff9,0xffff, 0xfcfc,0xffff,0xfffe,0x7fff,0xf3ff,0x3fff,0xffff,0x9fff,0xcfff,0xcfff, 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0x33ff,0xffff,0xffff, 0xfffc,0xfcff,0xffff,0xffff,0xfff3,0xff3f,0xffff,0xffff, 0x0030,0x0000,0x0000,0x0000,0x0030,0x0000,0x0000,0x0000,0x0030,0x0000, 0x03ff,0x0000,0x03ff,0x0000,0x03ff,0x0000,0x00cc,0x0000,0x0006,0x0000, 0x0303,0x0000,0x0001,0x8000,0x0c00,0xc000,0x0000,0x6000,0x3000,0x3000, 0x0003,0xff00,0x0003,0xff00,0x0003,0xff00,0x0000,0xcc00,0x0000,0x0000, 0x0003,0x0300,0x0000,0x0000,0x000c,0x00c0,0x0000,0x0000 }; USHORT DataHIdisk []= { 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff, 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xfdfb,0xf7ff,0xfbfb,0xfbff, 0xf7fb,0xfdff,0x80fb,0xe03f,0x80c0,0x603f,0xf7c0,0x7aff,0xf7ff,0xf77f, 0xf7ff,0xefbf,0x80ff,0xd80f,0x80ff,0xb80f,0xffff,0x7fff,0xfff8,0x0fff, 0xfff8,0x0fff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff, 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x3fff,0xffc0,0x3fff,0xffc0, 0x3fff,0xffc0,0x3fff,0xffc0,0x3fff,0xffc0,0x0204,0x0800,0x0404,0x0400, 0x0804,0x0200,0x7f04,0x1fc0,0x7f3f,0x9fc0,0x083f,0x8500,0x0800,0x0880, 0x0800,0x1040,0x7f00,0x27f0,0x7f00,0x47f0,0x0000,0x8000,0x0007,0xf000, 0x0007,0xf000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000 }; USHORT DataIdisk []= { 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xc000,0x003f,0xc000,0x003f, 0xc000,0x003f,0xc000,0x003f,0xc000,0x003f,0xfdfb,0xf7ff,0xfbfb,0xfbff, 0xf7fb,0xfdff,0x80fb,0xe03f,0x80c0,0x603f,0xf7c0,0x7aff,0xf7ff,0xf77f, 0xf7ff,0xefbf,0x80ff,0xd80f,0x80ff,0xb80f,0xffff,0x7fff,0xfff8,0x0fff, 0xfff8,0x0fff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff, 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x3fff,0xffc0,0x3fff,0xffc0, 0x3fff,0xffc0,0x3fff,0xffc0,0x3fff,0xffc0,0x0204,0x0800,0x0404,0x0400, 0x0804,0x0200,0x7f04,0x1fc0,0x7f3f,0x9fc0,0x083f,0x8500,0x0800,0x0880, 0x0800,0x1040,0x7f00,0x27f0,0x7f00,0x47f0,0x0000,0x8000,0x0007,0xf000, 0x0007,0xf000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000 }; USHORT DataHIundo []= { 0xffff,0xffff,0xf3cf,0xffff,0xf3cf,0xffff,0xf3cf,0xffff,0xf3cf,0xffff, 0xf81f,0xffff,0xffff,0xffff,0xff1c,0xffff,0xff0c,0xffff,0xff24,0xffff, 0xff30,0xffff,0xff38,0xffff,0xffff,0xffff,0xfff0,0xffff,0xfff3,0x3fff, 0xfff3,0x9fff,0xfff3,0x3fff,0xfff0,0xffff,0xffff,0xffff,0xffff,0x81ff, 0xffff,0x3cff,0xffff,0x3cff,0xffff,0x3cff,0xffff,0x81ff, 0x0000,0x0000,0x0c30,0x0000,0x0c30,0x0000,0x0c30,0x0000,0x0c30,0x0000, 0x07e0,0x0000,0x0000,0x0000,0x00e3,0x0000,0x00f3,0x0000,0x00db,0x0000, 0x00cf,0x0000,0x00c7,0x0000,0x0000,0x0000,0x000f,0x0000,0x000c,0xc000, 0x000c,0x6000,0x000c,0xc000,0x000f,0x0000,0x0000,0x0000,0x0000,0x7e00, 0x0000,0xc300,0x0000,0xc300,0x0000,0xc300,0x0000,0x7e00 }; USHORT DataIundo []= { 0xffff,0xffff,0xf3cf,0xffff,0xf3cf,0xffff,0xf3cf,0xffff,0xf3cf,0xffff, 0xf81f,0xffff,0xffff,0xffff,0x00e3,0x0000,0x00f3,0x0000,0x00db,0x0000, 0x00cf,0x0000,0x00c7,0x0000,0x0000,0x0000,0xfff0,0xffff,0xfff3,0x3fff, 0xfff3,0x9fff,0xfff3,0x3fff,0xfff0,0xffff,0xffff,0xffff,0xffff,0x81ff, 0xffff,0x3cff,0xffff,0x3cff,0xffff,0x3cff,0xffff,0x81ff, 0x0000,0x0000,0x0c30,0x0000,0x0c30,0x0000,0x0c30,0x0000,0x0c30,0x0000, 0x07e0,0x0000,0x0000,0x0000,0xff1c,0xffff,0xff0c,0xffff,0xff24,0xffff, 0xff30,0xffff,0xff38,0xffff,0xffff,0xffff,0x000f,0x0000,0x000c,0xc000, 0x000c,0x6000,0x000c,0xc000,0x000f,0x0000,0x0000,0x0000,0x0000,0x7e00, 0x0000,0xc300,0x0000,0xc300,0x0000,0xc300,0x0000,0x7e00 }; USHORT DataHIdown []= { 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffc0,0x3fff,0xffcf,0x3fff, 0xffcf,0x3fff,0xffcf,0x3fff,0xffcf,0x3fff,0xffcf,0x3fff,0xffcf,0x3fff, 0xe00f,0x007f,0xf3ff,0xfcff,0xf9ff,0xf9ff,0xfcff,0xf3ff,0xfe7f,0xe7ff, 0xff3f,0xcfff,0xff9f,0x9fff,0xffcf,0x3fff,0xffe6,0x7fff,0xfff0,0xffff, 0xfff9,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff, 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x003f,0xc000,0x0030,0xc000, 0x0030,0xc000,0x0030,0xc000,0x0030,0xc000,0x0030,0xc000,0x0030,0xc000, 0x1ff0,0xff80,0x0c00,0x0300,0x0600,0x0600,0x0300,0x0c00,0x0180,0x1800, 0x00c0,0x3000,0x0060,0x6000,0x0030,0xc000,0x0019,0x8000,0x000f,0x0000, 0x0006,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000 }; USHORT DataIdown [] = { 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xfff0,0xffff, 0xfff0,0xffff,0xfff0,0xffff,0xfff0,0xffff,0xfff0,0xffff,0xfff0,0xffff, 0xfff0,0xffff,0xfc00,0x03ff,0xfe00,0x07ff,0xff00,0x0fff,0xff80,0x1fff, 0xffc0,0x3fff,0xffe0,0x7fff,0xfff0,0xffff,0xfff9,0xffff,0xffff,0xffff, 0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff,0xffff, 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x000f,0x0000, 0x000f,0x0000,0x000f,0x0000,0x000f,0x0000,0x000f,0x0000,0x000f,0x0000, 0x000f,0x0000,0x03ff,0xfc00,0x01ff,0xf800,0x00ff,0xf000,0x007f,0xe000, 0x003f,0xc000,0x001f,0x8000,0x000f,0x0000,0x0006,0x0000,0x0000,0x0000, 0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000,0x0000 }; struct Image up = { -1,0,28,24,2, &DataIup[0], 0x3,0x0,NULL }; struct Image Hup = { -1,0,28,24,2, &DataHIup[0], 0x3,0x0,NULL }; struct Image dup = { 1,1,28,24,1, &DataIdup[0], 0x3,0x0,NULL }; struct Image Hdup = { 1,1,28,24,1, &DataHIdup[0], 0x3,0x0,NULL }; struct Image disk = { 1,1,28,24,1, &DataIdisk[0], 0x3,0x0,NULL }; struct Image Hdisk = { 1,1,28,24,1, &DataHIdisk[0], 0x3,0x0,NULL }; struct Image undo = { 1,1,28,24,1, &DataIundo[0], 0x3,0x0,NULL }; struct Image Hundo = { 1,1,28,24,1, &DataHIundo[0], 0x3,0x0,NULL }; struct Image down = { -1,0,28,24,2, &DataIdown[0], 0x3,0x0,NULL }; struct Image Hdown = { -1,0,28,24,2, &DataHIdown[0], 0x3,0x0,NULL }; struct StringInfo InputInfo = { Buffer, NULL, 0, 35, 0,0, 0, 0,0,0, NULL, 0, NULL }; struct Gadget GDdown = { NULL, 601,146,26,22, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&down, (APTR)&Hdown, NULL, 0, NULL, 0, NULL }; struct Gadget GDundo = { &GDdown, 599,114,30,26, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&undo, (APTR)&Hundo, NULL, 0, NULL, 0, NULL }; struct Gadget GDdisk = { &GDundo, 599,84,30,26, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&disk, (APTR)&Hdisk, NULL, 0, NULL, 0, NULL }; struct Gadget GDdup = { &GDdisk, 599,54,30,26, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&dup, (APTR)&Hdup, NULL, 0, NULL, 0, NULL }; struct Gadget GDup = { &GDdup, 601,26,26,22, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&up, (APTR)&Hup, NULL, 0, NULL, 0, NULL }; struct Gadget GSdown = { &GDup, 285,146,26,22, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&down, (APTR)&Hdown, NULL, 0, NULL, 0, NULL }; struct Gadget GSundo = { &GSdown, 283,114,30,26, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&undo, (APTR)&Hundo, NULL, 0, NULL, 0, NULL }; struct Gadget GSdisk = { &GSundo, 283,84,30,26, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&disk, (APTR)&Hdisk, NULL, 0, NULL, 0, NULL }; struct Gadget GSdup = { &GSdisk, 283,54,30,26, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&dup, (APTR)&Hdup, NULL, 0, NULL, 0, NULL }; struct Gadget GSup = { &GSdup, 285,26,26,22, GADGIMAGE|GADGHIMAGE, GADGIMMEDIATE|RELVERIFY, BOOLGADGET, (APTR)&up, (APTR)&Hup, NULL, 0, NULL, 0, NULL }; struct TextAttr Font = { (STRPTR)"topaz.font", TOPAZ_EIGHTY,0,0 }; struct IntuiText InputText = { 1,0, JAM2, -48,0, &Font, "Input:", NULL }; struct Gadget GInput= { &GSup, 192,178,280,10, GADGHCOMP, RELVERIFY, STRGADGET, NULL, NULL, &InputText, 0, (APTR)&InputInfo, 0, NULL }; /**** Menus... *******************************************************/ struct IntuiText ID1Text = { 1,2, JAM2, 0,0, NULL, "About AC1", NULL }; struct MenuItem ID1 = { NULL, 0,0,80,8, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, (APTR)&ID1Text, NULL, 0, NULL, 0 }; /***** Menu C (MenuPunkte)... ****************************************/ struct IntuiText I5Text = { 1,2, JAM2, 19,0, NULL, "RAM:", NULL }; struct IntuiText I4Text = { 1,2, JAM2, 19,0, NULL, "DF3:", NULL }; struct IntuiText I3Text = { 1,2, JAM2, 19,0, NULL, "DF2:", NULL }; struct IntuiText I2Text = { 1,2, JAM2, 19,0, NULL, "DF1:", NULL }; struct IntuiText I1Text = { 1,2, JAM2, 19,0, NULL, "DF0:", NULL }; /* ---- */ struct MenuItem IC5 = { NULL, 0,32,19+48,8, CHECKED|CHECKIT|ITEMTEXT|ITEMENABLED|HIGHCOMP, 15, (APTR)&I5Text, NULL, 0, NULL, 0 }; struct MenuItem IC4 = { &IC5, 0,24,19+48,8, CHECKIT|ITEMTEXT|ITEMENABLED|HIGHCOMP, 23, (APTR)&I4Text, NULL, 0, NULL, 0 }; struct MenuItem IC3 = { &IC4, 0,16,19+48,8, CHECKIT|ITEMTEXT|ITEMENABLED|HIGHCOMP, 27, (APTR)&I3Text, NULL, 0, NULL, 0 }; struct MenuItem IC2 = { &IC3, 0,8,19+48,8, CHECKIT|ITEMTEXT|ITEMENABLED|HIGHCOMP, 29, (APTR)&I2Text, NULL, 0, NULL, 0 }; struct MenuItem IC1 = { &IC2, 0,0,19+48,8, ITEMENABLED|CHECKIT|ITEMTEXT|HIGHCOMP, 30, (APTR)&I1Text, NULL, 0, NULL, 0 }; /***** Menu B (MenuPunkte)... ****************************************/ struct MenuItem IB5 = { NULL, 0,32,19+48,8, CHECKIT|ITEMTEXT|ITEMENABLED|HIGHCOMP, 15, (APTR)&I5Text, NULL, 0, NULL, 0 }; struct MenuItem IB4 = { &IB5, 0,24,19+48,8, CHECKIT|ITEMTEXT|ITEMENABLED|HIGHCOMP, 23, (APTR)&I4Text, NULL, 0, NULL, 0 }; struct MenuItem IB3 = { &IB4, 0,16,19+48,8, CHECKIT|ITEMTEXT|ITEMENABLED|HIGHCOMP, 27, (APTR)&I3Text, NULL, 0, NULL, 0 }; struct MenuItem IB2 = { &IB3, 0,8,19+48,8, ITEMENABLED|CHECKIT|ITEMTEXT|HIGHCOMP, 29, (APTR)&I2Text, NULL, 0, NULL, 0 }; struct MenuItem IB1 = { &IB2, 0,0,19+48,8, CHECKED|CHECKIT|ITEMTEXT|ITEMENABLED|HIGHCOMP, 30, (APTR)&I1Text, NULL, 0, NULL, 0 }; /***** Menu A (MenuPunkte)... ****************************************/ struct IntuiText IA7Text = { 1,2, JAM2, 0,0, NULL, "Quit", NULL }; struct MenuItem IA7 = { NULL, 0,48,72,8, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, (APTR)&IA7Text, NULL, 0, NULL, 0 }; struct IntuiText IA6Text = { 1,2, JAM2, 0,0, NULL, "KillDir", NULL }; struct MenuItem IA6 = { &IA7, 0,40,72,8, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, (APTR)&IA6Text, NULL, 0, NULL, 0 }; struct IntuiText IA5Text = { 1,2, JAM2, 0,0, NULL, "DiskCopy", NULL }; struct MenuItem IA5 = { &IA6, 0,32,72,8, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, (APTR)&IA5Text, NULL, 0, NULL, 0 }; struct IntuiText IA4Text = { 1,2, JAM2, 0,0, NULL, "Rename", NULL }; struct MenuItem IA4 = { &IA5, 0,24,72,8, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, (APTR)&IA4Text, NULL, 0, NULL, 0 }; struct IntuiText IA3Text = { 1,2, JAM2, 0,0, NULL, "Makedir", NULL }; struct MenuItem IA3 = { &IA4, 0,16,72,8, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, (APTR)&IA3Text, NULL, 0, NULL, 0 }; struct IntuiText IA2Text = { 1,2, JAM2, 0,0, NULL, "Delete", NULL }; struct MenuItem IA2 = { &IA3, 0,8,72,8, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, (APTR)&IA2Text, NULL, 0, NULL, 0 }; struct IntuiText IA1Text = { 1,2, JAM2, 0,0, NULL, "Copy", NULL }; struct MenuItem IA1 = { &IA2, 0,0,72,8, ITEMTEXT|ITEMENABLED|HIGHCOMP, 0, (APTR)&IA1Text, NULL, 0, NULL, 0 }; /****** Menu Linked Liste... ***************************************/ struct Menu MD = { NULL, 272,0,40,9, MENUENABLED|MIDRAWN, "TAA", &ID1 }; struct Menu MC = { &MD, 192,0,72,9, MENUENABLED|MIDRAWN, "Desti.", &IC1 }; struct Menu MB = { &MC, 112,0,72,9, MENUENABLED|MIDRAWN, "Source", &IB1 }; struct Menu MA = { &MB, 16,0,64,9, MENUENABLED|MIDRAWN, "Project", &IA1 }; AllImage () { p1 = (USHORT *) AllocMem (sizeof(DataHIup),MEMF_CHIP); p2 = (USHORT *) AllocMem (sizeof(DataIup),MEMF_CHIP); p3 = (USHORT *) AllocMem (sizeof(DataHIdup),MEMF_CHIP); p4 = (USHORT *) AllocMem (sizeof(DataIdup),MEMF_CHIP); p5 = (USHORT *) AllocMem (sizeof(DataHIdisk),MEMF_CHIP); p6 = (USHORT *) AllocMem (sizeof(DataIdisk),MEMF_CHIP); p7 = (USHORT *) AllocMem (sizeof(DataHIundo),MEMF_CHIP); p8 = (USHORT *) AllocMem (sizeof(DataIundo),MEMF_CHIP); p9 = (USHORT *) AllocMem (sizeof(DataHIdown),MEMF_CHIP); p10= (USHORT *) AllocMem (sizeof(DataIdown),MEMF_CHIP); } FreeImage () { FreeMem (p1,sizeof(DataHIup),MEMF_CHIP); FreeMem (p2,sizeof(DataIup),MEMF_CHIP); FreeMem (p3,sizeof(DataHIdup),MEMF_CHIP); FreeMem (p4,sizeof(DataIdup),MEMF_CHIP); FreeMem (p5,sizeof(DataHIdisk),MEMF_CHIP); FreeMem (p6,sizeof(DataIdisk),MEMF_CHIP); FreeMem (p7,sizeof(DataHIundo),MEMF_CHIP); FreeMem (p8,sizeof(DataIundo),MEMF_CHIP); FreeMem (p9,sizeof(DataHIdown),MEMF_CHIP); FreeMem (p10,sizeof(DataIdown),MEMF_CHIP); }