1 static USHORT Palette[] = {
10 #define PaletteColorCount 8
13 #define PALETTE Palette
15 static SHORT ClipBorderVectors1[] = {
22 static struct Border ClipBorder1 = {
23 -1,-1, /* XY origin relative to container TopLeft */
24 3,0,JAM1, /* front pen, back pen and drawmode */
25 5, /* number of XY vectors */
26 ClipBorderVectors1, /* pointer to XY vectors */
27 NULL /* next border in list */
30 static struct IntuiText ClipIText1 = {
31 4,0,JAM1, /* front and back text pens, drawmode and fill byte */
32 15,1, /* XY origin relative to container TopLeft */
33 NULL, /* font pointer or NULL for default */
34 "Cancel", /* pointer to text */
35 NULL /* next IntuiText structure */
38 static struct Gadget ClipCancel = {
39 NULL, /* next gadget */
40 240,59, /* origin XY of hit box relative to window TopLeft */
41 75,10, /* hit box width and height */
42 NULL, /* gadget flags */
43 RELVERIFY, /* activation flags */
44 BOOLGADGET, /* gadget type flags */
45 (APTR)&ClipBorder1, /* gadget border or image to be rendered */
46 NULL, /* alternate imagery for selection */
47 &ClipIText1, /* first IntuiText structure */
48 NULL, /* gadget mutual-exclude long word */
49 NULL, /* SpecialInfo structure */
50 GADCANCEL, /* user-definable data */
51 NULL /* pointer to user-definable data */
54 static SHORT ClipBorderVectors2[] = {
61 static struct Border ClipBorder2 = {
62 -1,-1, /* XY origin relative to container TopLeft */
63 3,0,JAM1, /* front pen, back pen and drawmode */
64 5, /* number of XY vectors */
65 ClipBorderVectors2, /* pointer to XY vectors */
66 NULL /* next border in list */
69 static struct IntuiText ClipIText2 = {
70 4,0,JAM1, /* front and back text pens, drawmode and fill byte */
71 24,1, /* XY origin relative to container TopLeft */
72 NULL, /* font pointer or NULL for default */
73 "Okay", /* pointer to text */
74 NULL /* next IntuiText structure */
77 static struct Gadget ClipOkay = {
78 &ClipCancel, /* next gadget */
79 17,60, /* origin XY of hit box relative to window TopLeft */
80 77,10, /* hit box width and height */
81 NULL, /* gadget flags */
82 RELVERIFY, /* activation flags */
83 BOOLGADGET, /* gadget type flags */
84 (APTR)&ClipBorder2, /* gadget border or image to be rendered */
85 NULL, /* alternate imagery for selection */
86 &ClipIText2, /* first IntuiText structure */
87 NULL, /* gadget mutual-exclude long word */
88 NULL, /* SpecialInfo structure */
89 GADOKAY, /* user-definable data */
90 NULL /* pointer to user-definable data */
93 static struct PropInfo ClipClipXCLIPSInfo = {
94 AUTOKNOB+FREEHORIZ, /* PropInfo flags */
95 24504,-1, /* horizontal and vertical pot values */
96 10922,-1, /* horizontal and vertical body values */
99 static struct Image ClipImage1 = {
100 43,0, /* XY origin relative to container TopLeft */
101 24,3, /* Image width and height in pixels */
102 0, /* number of bitplanes in Image */
103 NULL, /* pointer to ImageData */
104 0x0000,0x0000, /* PlanePick and PlaneOnOff */
105 NULL /* next Image structure */
108 static struct IntuiText ClipIText3 = {
109 3,0,JAM1, /* front and back text pens, drawmode and fill byte */
110 -116,-1, /* XY origin relative to container TopLeft */
111 NULL, /* font pointer or NULL for default */
112 "X Clip Border:", /* pointer to text */
113 NULL /* next IntuiText structure */
116 static struct Gadget ClipXCLIP = {
117 &ClipOkay, /* next gadget */
118 134,37, /* origin XY of hit box relative to window TopLeft */
119 -199,7, /* hit box width and height */
120 GRELWIDTH, /* gadget flags */
121 RELVERIFY+GADGIMMEDIATE, /* activation flags */
122 PROPGADGET, /* gadget type flags */
123 (APTR)&ClipImage1, /* gadget border or image to be rendered */
124 NULL, /* alternate imagery for selection */
125 &ClipIText3, /* first IntuiText structure */
126 NULL, /* gadget mutual-exclude long word */
127 (APTR)&ClipClipXCLIPSInfo, /* SpecialInfo structure */
128 XCLIP, /* user-definable data */
129 NULL /* pointer to user-definable data */
132 static struct PropInfo ClipClipYCLIPSInfo = {
133 AUTOKNOB+FREEHORIZ, /* PropInfo flags */
134 13106,-1, /* horizontal and vertical pot values */
135 10922,-1, /* horizontal and vertical body values */
138 static struct Image ClipImage2 = {
139 22,0, /* XY origin relative to container TopLeft */
140 24,3, /* Image width and height in pixels */
141 0, /* number of bitplanes in Image */
142 NULL, /* pointer to ImageData */
143 0x0000,0x0000, /* PlanePick and PlaneOnOff */
144 NULL /* next Image structure */
147 static struct IntuiText ClipIText4 = {
148 3,0,JAM1, /* front and back text pens, drawmode and fill byte */
149 -116,-1, /* XY origin relative to container TopLeft */
150 NULL, /* font pointer or NULL for default */
151 "Y Clip Border:", /* pointer to text */
152 NULL /* next IntuiText structure */
155 static struct Gadget ClipYCLIP = {
156 &ClipXCLIP, /* next gadget */
157 134,46, /* origin XY of hit box relative to window TopLeft */
158 -199,7, /* hit box width and height */
159 GRELWIDTH, /* gadget flags */
160 RELVERIFY+GADGIMMEDIATE, /* activation flags */
161 PROPGADGET, /* gadget type flags */
162 (APTR)&ClipImage2, /* gadget border or image to be rendered */
163 NULL, /* alternate imagery for selection */
164 &ClipIText4, /* first IntuiText structure */
165 NULL, /* gadget mutual-exclude long word */
166 (APTR)&ClipClipYCLIPSInfo, /* SpecialInfo structure */
167 YCLIP, /* user-definable data */
168 NULL /* pointer to user-definable data */
171 static struct PropInfo ClipClipXSIZESInfo = {
172 AUTOKNOB+FREEHORIZ, /* PropInfo flags */
173 26212,-1, /* horizontal and vertical pot values */
174 10922,-1, /* horizontal and vertical body values */
177 static struct Image ClipImage3 = {
178 45,0, /* XY origin relative to container TopLeft */
179 24,3, /* Image width and height in pixels */
180 0, /* number of bitplanes in Image */
181 NULL, /* pointer to ImageData */
182 0x0000,0x0000, /* PlanePick and PlaneOnOff */
183 NULL /* next Image structure */
186 static struct IntuiText ClipIText5 = {
187 3,0,JAM1, /* front and back text pens, drawmode and fill byte */
188 -124,-1, /* XY origin relative to container TopLeft */
189 NULL, /* font pointer or NULL for default */
190 "X Scale Factor:", /* pointer to text */
191 NULL /* next IntuiText structure */
194 static struct Gadget ClipXSIZE = {
195 &ClipYCLIP, /* next gadget */
196 134,15, /* origin XY of hit box relative to window TopLeft */
197 -199,7, /* hit box width and height */
198 GRELWIDTH, /* gadget flags */
199 RELVERIFY+GADGIMMEDIATE, /* activation flags */
200 PROPGADGET, /* gadget type flags */
201 (APTR)&ClipImage3, /* gadget border or image to be rendered */
202 NULL, /* alternate imagery for selection */
203 &ClipIText5, /* first IntuiText structure */
204 NULL, /* gadget mutual-exclude long word */
205 (APTR)&ClipClipXSIZESInfo, /* SpecialInfo structure */
206 XSIZE, /* user-definable data */
207 NULL /* pointer to user-definable data */
210 static struct PropInfo ClipClipYSIZESInfo = {
211 AUTOKNOB+FREEHORIZ, /* PropInfo flags */
212 -25937,-1, /* horizontal and vertical pot values */
213 10922,-1, /* horizontal and vertical body values */
216 static struct Image ClipImage4 = {
217 69,0, /* XY origin relative to container TopLeft */
218 24,3, /* Image width and height in pixels */
219 0, /* number of bitplanes in Image */
220 NULL, /* pointer to ImageData */
221 0x0000,0x0000, /* PlanePick and PlaneOnOff */
222 NULL /* next Image structure */
225 static struct IntuiText ClipIText6 = {
226 3,0,JAM1, /* front and back text pens, drawmode and fill byte */
227 -124,-1, /* XY origin relative to container TopLeft */
228 NULL, /* font pointer or NULL for default */
229 "Y Scale Factor:", /* pointer to text */
230 NULL /* next IntuiText structure */
233 static struct Gadget ClipYSIZE = {
234 &ClipXSIZE, /* next gadget */
235 134,24, /* origin XY of hit box relative to window TopLeft */
236 -199,7, /* hit box width and height */
237 GRELWIDTH, /* gadget flags */
238 RELVERIFY+GADGIMMEDIATE, /* activation flags */
239 PROPGADGET, /* gadget type flags */
240 (APTR)&ClipImage4, /* gadget border or image to be rendered */
241 NULL, /* alternate imagery for selection */
242 &ClipIText6, /* first IntuiText structure */
243 NULL, /* gadget mutual-exclude long word */
244 (APTR)&ClipClipYSIZESInfo, /* SpecialInfo structure */
245 YSIZE, /* user-definable data */
246 NULL /* pointer to user-definable data */
249 #define ClipGadgetList1 ClipYSIZE
251 static struct NewWindow ClipNewWindowStructure1 = {
252 114,16, /* window XY origin relative to TopLeft of screen */
253 346,76, /* window width and height */
254 0,1, /* detail and block pens */
255 NEWSIZE+MOUSEMOVE+GADGETDOWN+GADGETUP+CLOSEWINDOW+ACTIVEWINDOW+VANILLAKEY+INTUITICKS, /* IDCMP flags */
256 WINDOWSIZING+WINDOWDRAG+WINDOWDEPTH+WINDOWCLOSE+ACTIVATE+NOCAREREFRESH, /* other window flags */
257 &ClipYSIZE, /* first gadget in gadget list */
258 NULL, /* custom CHECKMARK imagery */
259 "Edit Clipping Parameters", /* window title */
260 NULL, /* custom screen pointer */
261 NULL, /* custom bitmap */
262 350,76, /* minimum width and height */
263 -1,-1, /* maximum width and height */
264 CUSTOMSCREEN /* destination screen type */
268 /* end of PowerWindows source generation */