sys/amiga/colorwin.c

   1 SHORT Col_BorderVectors1[] = { 0, 0, 59, 0, 59, 12, 0, 12, 0, 0 };
   2 struct Border Col_Border1 = {
   3     -1, -1,             /* XY origin relative to container TopLeft */
   4     3, 0, JAM1,         /* front pen, back pen and drawmode */
   5     5,                  /* number of XY vectors */
   6     Col_BorderVectors1, /* pointer to XY vectors */
   7     NULL                /* next border in list */
   8 };
   9
  10 struct IntuiText Col_IText1 = {
  11     7,      0, JAM1, /* front and back text pens, drawmode and fill byte */
  12     13,     1,       /* XY origin relative to container TopLeft */
  13     NULL,            /* font pointer or NULL for default */
  14     "Save",          /* pointer to text */
  15     NULL             /* next IntuiText structure */
  16 };
  17
  18 struct Gadget Col_Save = {
  19     NULL,                /* next gadget */
  20     9, 77,               /* origin XY of hit box relative to window TopLeft */
  21     58, 11,              /* hit box width and height */
  22     NULL,                /* gadget flags */
  23     RELVERIFY,           /* activation flags */
  24     BOOLGADGET,          /* gadget type flags */
  25     (APTR) &Col_Border1, /* gadget border or image to be rendered */
  26     NULL,                /* alternate imagery for selection */
  27     &Col_IText1,         /* first IntuiText structure */
  28     NULL,                /* gadget mutual-exclude long word */
  29     NULL,                /* SpecialInfo structure */
  30     GADCOLSAVE,          /* user-definable data */
  31     NULL                 /* pointer to user-definable data */
  32 };
  33
  34 SHORT Col_BorderVectors2[] = { 0, 0, 59, 0, 59, 12, 0, 12, 0, 0 };
  35 struct Border Col_Border2 = {
  36     -1, -1,             /* XY origin relative to container TopLeft */
  37     3, 0, JAM1,         /* front pen, back pen and drawmode */
  38     5,                  /* number of XY vectors */
  39     Col_BorderVectors2, /* pointer to XY vectors */
  40     NULL                /* next border in list */
  41 };
  42
  43 struct IntuiText Col_IText2 = {
  44     7,     0, JAM1, /* front and back text pens, drawmode and fill byte */
  45     17,    1,       /* XY origin relative to container TopLeft */
  46     NULL,           /* font pointer or NULL for default */
  47     "Use",          /* pointer to text */
  48     NULL            /* next IntuiText structure */
  49 };
  50
  51 struct Gadget Col_Okay = {
  52     &Col_Save,           /* next gadget */
  53     128, 77,             /* origin XY of hit box relative to window TopLeft */
  54     58, 11,              /* hit box width and height */
  55     NULL,                /* gadget flags */
  56     RELVERIFY,           /* activation flags */
  57     BOOLGADGET,          /* gadget type flags */
  58     (APTR) &Col_Border2, /* gadget border or image to be rendered */
  59     NULL,                /* alternate imagery for selection */
  60     &Col_IText2,         /* first IntuiText structure */
  61     NULL,                /* gadget mutual-exclude long word */
  62     NULL,                /* SpecialInfo structure */
  63     GADCOLOKAY,          /* user-definable data */
  64     NULL                 /* pointer to user-definable data */
  65 };
  66
  67 SHORT Col_BorderVectors3[] = { 0, 0, 59, 0, 59, 12, 0, 12, 0, 0 };
  68 struct Border Col_Border3 = {
  69     -1, -1,             /* XY origin relative to container TopLeft */
  70     3, 0, JAM1,         /* front pen, back pen and drawmode */
  71     5,                  /* number of XY vectors */
  72     Col_BorderVectors3, /* pointer to XY vectors */
  73     NULL                /* next border in list */
  74 };
  75
  76 struct IntuiText Col_IText3 = {
  77     7,        0, JAM1, /* front and back text pens, drawmode and fill byte */
  78     6,        1,       /* XY origin relative to container TopLeft */
  79     NULL,              /* font pointer or NULL for default */
  80     "Cancel",          /* pointer to text */
  81     NULL               /* next IntuiText structure */
  82 };
  83
  84 struct Gadget Col_Cancel = {
  85     &Col_Okay,           /* next gadget */
  86     244, 77,             /* origin XY of hit box relative to window TopLeft */
  87     58, 11,              /* hit box width and height */
  88     NULL,                /* gadget flags */
  89     RELVERIFY,           /* activation flags */
  90     BOOLGADGET,          /* gadget type flags */
  91     (APTR) &Col_Border3, /* gadget border or image to be rendered */
  92     NULL,                /* alternate imagery for selection */
  93     &Col_IText3,         /* first IntuiText structure */
  94     NULL,                /* gadget mutual-exclude long word */
  95     NULL,                /* SpecialInfo structure */
  96     GADCOLCANCEL,        /* user-definable data */
  97     NULL                 /* pointer to user-definable data */
  98 };
  99
 100 struct PropInfo Col_Col_RedPenSInfo = {
 101     AUTOKNOB + FREEHORIZ, /* PropInfo flags */
 102     0, 0,                 /* horizontal and vertical pot values */
 103     -1, -1,               /* horizontal and vertical body values */
 104 };
 105
 106 struct Image Col_Image1 = {
 107     0,      0,      /* XY origin relative to container TopLeft */
 108     263,    7,      /* Image width and height in pixels */
 109     0,              /* number of bitplanes in Image */
 110     NULL,           /* pointer to ImageData */
 111     0x0000, 0x0000, /* PlanePick and PlaneOnOff */
 112     NULL            /* next Image structure */
 113 };
 114
 115 struct Gadget Col_RedPen = {
 116     &Col_Cancel, /* next gadget */
 117     32, 12,      /* origin XY of hit box relative to window TopLeft */
 118     271, 11,     /* hit box width and height */
 119     NULL,        /* gadget flags */
 120     RELVERIFY + GADGIMMEDIATE + FOLLOWMOUSE, /* activation flags */
 121     PROPGADGET,                              /* gadget type flags */
 122     (APTR) &Col_Image1,          /* gadget border or image to be rendered */
 123     NULL,                        /* alternate imagery for selection */
 124     NULL,                        /* first IntuiText structure */
 125     NULL,                        /* gadget mutual-exclude long word */
 126     (APTR) &Col_Col_RedPenSInfo, /* SpecialInfo structure */
 127     GADREDPEN,                   /* user-definable data */
 128     NULL                         /* pointer to user-definable data */
 129 };
 130
 131 struct PropInfo Col_Col_GreenPenSInfo = {
 132     AUTOKNOB + FREEHORIZ, /* PropInfo flags */
 133     0, 0,                 /* horizontal and vertical pot values */
 134     -1, -1,               /* horizontal and vertical body values */
 135 };
 136
 137 struct Image Col_Image2 = {
 138     0,      0,      /* XY origin relative to container TopLeft */
 139     263,    7,      /* Image width and height in pixels */
 140     0,              /* number of bitplanes in Image */
 141     NULL,           /* pointer to ImageData */
 142     0x0000, 0x0000, /* PlanePick and PlaneOnOff */
 143     NULL            /* next Image structure */
 144 };
 145
 146 struct Gadget Col_GreenPen = {
 147     &Col_RedPen, /* next gadget */
 148     32, 24,      /* origin XY of hit box relative to window TopLeft */
 149     271, 11,     /* hit box width and height */
 150     NULL,        /* gadget flags */
 151     RELVERIFY + GADGIMMEDIATE + FOLLOWMOUSE, /* activation flags */
 152     PROPGADGET,                              /* gadget type flags */
 153     (APTR) &Col_Image2,            /* gadget border or image to be rendered */
 154     NULL,                          /* alternate imagery for selection */
 155     NULL,                          /* first IntuiText structure */
 156     NULL,                          /* gadget mutual-exclude long word */
 157     (APTR) &Col_Col_GreenPenSInfo, /* SpecialInfo structure */
 158     GADGREENPEN,                   /* user-definable data */
 159     NULL                           /* pointer to user-definable data */
 160 };
 161
 162 struct PropInfo Col_Col_BluePenSInfo = {
 163     AUTOKNOB + FREEHORIZ, /* PropInfo flags */
 164     0, 0,                 /* horizontal and vertical pot values */
 165     -1, -1,               /* horizontal and vertical body values */
 166 };
 167
 168 struct Image Col_Image3 = {
 169     0,      0,      /* XY origin relative to container TopLeft */
 170     263,    7,      /* Image width and height in pixels */
 171     0,              /* number of bitplanes in Image */
 172     NULL,           /* pointer to ImageData */
 173     0x0000, 0x0000, /* PlanePick and PlaneOnOff */
 174     NULL            /* next Image structure */
 175 };
 176
 177 struct Gadget Col_BluePen = {
 178     &Col_GreenPen, /* next gadget */
 179     32, 36,        /* origin XY of hit box relative to window TopLeft */
 180     271, 11,       /* hit box width and height */
 181     NULL,          /* gadget flags */
 182     RELVERIFY + GADGIMMEDIATE + FOLLOWMOUSE, /* activation flags */
 183     PROPGADGET,                              /* gadget type flags */
 184     (APTR) &Col_Image3,           /* gadget border or image to be rendered */
 185     NULL,                         /* alternate imagery for selection */
 186     NULL,                         /* first IntuiText structure */
 187     NULL,                         /* gadget mutual-exclude long word */
 188     (APTR) &Col_Col_BluePenSInfo, /* SpecialInfo structure */
 189     GADBLUEPEN,                   /* user-definable data */
 190     NULL                          /* pointer to user-definable data */
 191 };
 192
 193 #define Col_GadgetList1 Col_BluePen
 194
 195 struct IntuiText Col_IText6 = {
 196     3,    0,  JAM1, /* front and back text pens, drawmode and fill byte */
 197     17,   38,       /* XY origin relative to container TopLeft */
 198     NULL,           /* font pointer or NULL for default */
 199     "B",            /* pointer to text */
 200     NULL            /* next IntuiText structure */
 201 };
 202
 203 struct IntuiText Col_IText5 = {
 204     4,          0,
 205     JAM1,           /* front and back text pens, drawmode and fill byte */
 206     16,         26, /* XY origin relative to container TopLeft */
 207     NULL,           /* font pointer or NULL for default */
 208     "G",            /* pointer to text */
 209     &Col_IText6     /* next IntuiText structure */
 210 };
 211
 212 struct IntuiText Col_IText4 = {
 213     7,          0,
 214     JAM1,           /* front and back text pens, drawmode and fill byte */
 215     16,         14, /* XY origin relative to container TopLeft */
 216     NULL,           /* font pointer or NULL for default */
 217     "R",            /* pointer to text */
 218     &Col_IText5     /* next IntuiText structure */
 219 };
 220
 221 #define Col_IntuiTextList1 Col_IText4
 222
 223 struct NewWindow Col_NewWindowStructure1 = {
 224     175, 45, /* window XY origin relative to TopLeft of screen */
 225     312, 93, /* window width and height */
 226     0, 1,    /* detail and block pens */
 227     MOUSEBUTTONS + MOUSEMOVE + GADGETDOWN + GADGETUP + CLOSEWINDOW
 228         + VANILLAKEY + INTUITICKS, /* IDCMP flags */
 229     WINDOWDRAG + WINDOWDEPTH + WINDOWCLOSE + ACTIVATE
 230         + NOCAREREFRESH,  /* other window flags */
 231     &Col_BluePen,         /* first gadget in gadget list */
 232     NULL,                 /* custom CHECKMARK imagery */
 233     "Edit Screen Colors", /* window title */
 234     NULL,                 /* custom screen pointer */
 235     NULL,                 /* custom bitmap */
 236     5,
 237     5,           /* minimum width and height */
 238     -1, -1,      /* maximum width and height */
 239     CUSTOMSCREEN /* destination screen type */
 240 };
 241
 242 /* end of PowerWindows source generation */