mrr@amanpt1.Newport.RI.US (Mark Rinfret) (10/12/89)
#! /bin/sh
# This is a shell archive. Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file". To overwrite existing
# files, type "sh file -c". You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g.. If this archive is complete, you
# will see the following message at the end:
# "End of archive 5 (of 5)."
# Contents: MRDateReq.pw.c
# Wrapped by mrr@mrramiga on Wed Oct 11 18:11:33 1989
# This shar was created for Amiga and may have pathnames which
# are incompatible with Unix. Replace colon (:) with slash (/)
# in offending pathnames.
if test -f MRDateReq.pw.c -a "${1}" != "-c" ; then
echo shar: Will not over-write existing file \"MRDateReq.pw.c\"
else
echo shar: Extracting \"MRDateReq.pw.c\" \(36821 characters\)
sed "s/^X//" >MRDateReq.pw.c <<'END_OF_MRDateReq.pw.c'
X
Xstatic UBYTE UNDOBUFFER[5];
X
Xstatic SHORT BorderVectors1[] = {
X 0,0,
X 311,0,
X 311,123,
X 0,123,
X 0,0
X};
Xstatic struct Border Border1 = {
X 0,0, /* XY origin relative to container TopLeft */
X 1,0,JAM1, /* front pen, back pen and drawmode */
X 5, /* number of XY vectors */
X BorderVectors1, /* pointer to XY vectors */
X NULL /* next border in list */
X};
X
Xstatic struct Gadget Gadget30 = {
X NULL, /* next gadget */
X 0,0, /* origin XY of hit box relative to window TopLeft */
X 1,1, /* hit box width and height */
X GADGHBOX+GADGHIMAGE, /* gadget flags */
X NULL, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Border1, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X NULL, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE promptGadgetSIBuff[41] =
X "Select the date and date format:";
Xstatic struct StringInfo promptGadgetSInfo = {
X promptGadgetSIBuff, /* buffer where text will be edited */
X NULL, /* optional undo buffer */
X 0, /* character position in buffer */
X 41, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic SHORT BorderVectors2[] = {
X 0,0,
X 292,0,
X 292,10,
X 0,10,
X 0,0
X};
Xstatic struct Border Border2 = {
X -1,-1, /* XY origin relative to container TopLeft */
X 0,0,JAM1, /* front pen, back pen and drawmode */
X 5, /* number of XY vectors */
X BorderVectors2, /* pointer to XY vectors */
X NULL /* next border in list */
X};
X
Xstatic struct Gadget promptGadget = {
X &Gadget30, /* next gadget */
X 11,45, /* origin XY of hit box relative to window TopLeft */
X 291,9, /* hit box width and height */
X NULL, /* gadget flags */
X NULL, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Border2, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&promptGadgetSInfo, /* SpecialInfo structure */
X PROMPT_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic SHORT BorderVectors3[] = {
X 0,0,
X 65,0,
X 65,9,
X 0,9,
X 0,0
X};
Xstatic struct Border Border3 = {
X -1,-1, /* XY origin relative to container TopLeft */
X 3,0,JAM1, /* front pen, back pen and drawmode */
X 5, /* number of XY vectors */
X BorderVectors3, /* pointer to XY vectors */
X NULL /* next border in list */
X};
X
Xstatic struct IntuiText IText1 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X 0,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" + WEEK ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget weekPlusGadget = {
X &promptGadget, /* next gadget */
X 113,56, /* origin XY of hit box relative to window TopLeft */
X 64,8, /* hit box width and height */
X GADGHBOX, /* gadget flags */
X RELVERIFY+GADGIMMEDIATE, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Border3, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText1, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X WEEK_PLUS_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic SHORT BorderVectors4[] = {
X 0,0,
X 65,0,
X 65,9,
X 0,9,
X 0,0
X};
Xstatic struct Border Border4 = {
X -1,-1, /* XY origin relative to container TopLeft */
X 3,0,JAM1, /* front pen, back pen and drawmode */
X 5, /* number of XY vectors */
X BorderVectors4, /* pointer to XY vectors */
X NULL /* next border in list */
X};
X
Xstatic struct IntuiText IText2 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X 0,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" - WEEK ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget weekMinusGadget = {
X &weekPlusGadget, /* next gadget */
X 25,56, /* origin XY of hit box relative to window TopLeft */
X 64,8, /* hit box width and height */
X GADGHBOX, /* gadget flags */
X RELVERIFY+GADGIMMEDIATE, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Border4, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText2, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X WEEK_MINUS_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE dayNameGadgetSIBuff[11];
Xstatic struct StringInfo dayNameGadgetSInfo = {
X dayNameGadgetSIBuff, /* buffer where text will be edited */
X NULL, /* optional undo buffer */
X 0, /* character position in buffer */
X 11, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct IntuiText IText3 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X -42,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" Day ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget dayNameGadget = {
X &weekMinusGadget, /* next gadget */
X 130,96, /* origin XY of hit box relative to window TopLeft */
X 80,8, /* hit box width and height */
X GADGHBOX+GADGHIMAGE, /* gadget flags */
X NULL, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText3, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&dayNameGadgetSInfo, /* SpecialInfo structure */
X DAYNAME_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic SHORT BorderVectors5[] = {
X 0,0,
X 65,0,
X 65,9,
X 0,9,
X 0,0
X};
Xstatic struct Border Border5 = {
X -1,-1, /* XY origin relative to container TopLeft */
X 3,0,JAM1, /* front pen, back pen and drawmode */
X 5, /* number of XY vectors */
X BorderVectors5, /* pointer to XY vectors */
X NULL /* next border in list */
X};
X
Xstatic struct IntuiText IText4 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X 0,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" CANCEL ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget cancelGadget = {
X &dayNameGadget, /* next gadget */
X 10,108, /* origin XY of hit box relative to window TopLeft */
X 64,8, /* hit box width and height */
X GADGHBOX, /* gadget flags */
X RELVERIFY+GADGIMMEDIATE+ENDGADGET, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Border5, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText4, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X CANCEL_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE timeGadgetSIBuff[11];
Xstatic struct StringInfo timeGadgetSInfo = {
X timeGadgetSIBuff, /* buffer where text will be edited */
X NULL, /* optional undo buffer */
X 0, /* character position in buffer */
X 11, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct IntuiText IText5 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X -50,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" Time ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget timeGadget = {
X &cancelGadget, /* next gadget */
X 130,86, /* origin XY of hit box relative to window TopLeft */
X 120,8, /* hit box width and height */
X GADGHBOX+GADGHIMAGE, /* gadget flags */
X NULL, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText5, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&timeGadgetSInfo, /* SpecialInfo structure */
X TIME_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE dateGadgetSIBuff[12];
Xstatic struct StringInfo dateGadgetSInfo = {
X dateGadgetSIBuff, /* buffer where text will be edited */
X NULL, /* optional undo buffer */
X 0, /* character position in buffer */
X 12, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct IntuiText IText6 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X -50,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" Date ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget dateGadget = {
X &timeGadget, /* next gadget */
X 130,76, /* origin XY of hit box relative to window TopLeft */
X 170,8, /* hit box width and height */
X GADGHBOX+GADGHIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText6, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&dateGadgetSInfo, /* SpecialInfo structure */
X DATE_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic SHORT BorderVectors6[] = {
X 0,0,
X 33,0,
X 33,9,
X 0,9,
X 0,0
X};
Xstatic struct Border Border6 = {
X -1,-1, /* XY origin relative to container TopLeft */
X 3,0,JAM1, /* front pen, back pen and drawmode */
X 5, /* number of XY vectors */
X BorderVectors6, /* pointer to XY vectors */
X NULL /* next border in list */
X};
X
Xstatic struct IntuiText IText7 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X 0,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" OK ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget okGadget = {
X &dateGadget, /* next gadget */
X 261,108, /* origin XY of hit box relative to window TopLeft */
X 32,8, /* hit box width and height */
X GADGHBOX, /* gadget flags */
X RELVERIFY+GADGIMMEDIATE+ENDGADGET, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Border6, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText7, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X OK_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic struct IntuiText IText9 = {
X 1,0,JAM2, /* front and back text pens, drawmode and fill byte */
X 2,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)"MM/DD/YY", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct IntuiText IText8 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X -106,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" Date Format ", /* pointer to text */
X &IText9 /* next IntuiText structure */
X};
X
Xstatic struct Gadget dateFormatGadget = {
X &okGadget, /* next gadget */
X 130,66, /* origin XY of hit box relative to window TopLeft */
X 80,8, /* hit box width and height */
X GADGHBOX, /* gadget flags */
X RELVERIFY+GADGIMMEDIATE, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText8, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X DATE_FORMAT_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic SHORT BorderVectors7[] = {
X 0,0,
X 49,0,
X 49,9,
X 0,9,
X 0,0
X};
Xstatic struct Border Border7 = {
X -1,-1, /* XY origin relative to container TopLeft */
X 3,0,JAM1, /* front pen, back pen and drawmode */
X 5, /* number of XY vectors */
X BorderVectors7, /* pointer to XY vectors */
X NULL /* next border in list */
X};
X
Xstatic struct IntuiText IText10 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X 0,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" ZERO ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget zeroGadget = {
X &dateFormatGadget, /* next gadget */
X 254,56, /* origin XY of hit box relative to window TopLeft */
X 48,8, /* hit box width and height */
X GADGHBOX, /* gadget flags */
X RELVERIFY+GADGIMMEDIATE, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Border7, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText10, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X ZERO_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic SHORT BorderVectors8[] = {
X 0,0,
X 41,0,
X 41,9,
X 0,9,
X 0,0
X};
Xstatic struct Border Border8 = {
X -1,-1, /* XY origin relative to container TopLeft */
X 3,0,JAM1, /* front pen, back pen and drawmode */
X 5, /* number of XY vectors */
X BorderVectors8, /* pointer to XY vectors */
X NULL /* next border in list */
X};
X
Xstatic struct IntuiText IText11 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X 0,0, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" NOW ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget nowGadget = {
X &zeroGadget, /* next gadget */
X 208,56, /* origin XY of hit box relative to window TopLeft */
X 40,8, /* hit box width and height */
X GADGHBOX, /* gadget flags */
X RELVERIFY+GADGIMMEDIATE, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Border8, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText11, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X NOW_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData1[] = {
X 0x001F,0x00DF,0x03DF,0x0FDF,0x3FDF,0x7FDF,0x3FDF,0x0FDF,
X 0x03DF,0x00DF,0x001F
X};
X
Xstatic struct Image Image1 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData1, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget downSecondGadget = {
X &nowGadget, /* next gadget */
X 261,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image1, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X DOWN_SECOND_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData2[] = {
X 0x001F,0x00DF,0x03DF,0x0FDF,0x3FDF,0x7FDF,0x3FDF,0x0FDF,
X 0x03DF,0x00DF,0x001F
X};
X
Xstatic struct Image Image2 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData2, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget downMinuteGadget = {
X &downSecondGadget, /* next gadget */
X 206,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image2, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X DOWN_MINUTE_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData3[] = {
X 0x001F,0x00DF,0x03DF,0x0FDF,0x3FDF,0x7FDF,0x3FDF,0x0FDF,
X 0x03DF,0x00DF,0x001F
X};
X
Xstatic struct Image Image3 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData3, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget downHourGadget = {
X &downMinuteGadget, /* next gadget */
X 157,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image3, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X DOWN_HOUR_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData4[] = {
X 0x001F,0x00DF,0x03DF,0x0FDF,0x3FDF,0x7FDF,0x3FDF,0x0FDF,
X 0x03DF,0x00DF,0x001F
X};
X
Xstatic struct Image Image4 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData4, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget downDayGadget = {
X &downHourGadget, /* next gadget */
X 107,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image4, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X DOWN_DAY_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData5[] = {
X 0x001F,0x601F,0x781F,0x7E1F,0x7F9F,0x7FDF,0x7F9F,0x7E1F,
X 0x781F,0x601F,0x001F
X};
X
Xstatic struct Image Image5 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData5, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget upSecondGadget = {
X &downDayGadget, /* next gadget */
X 273,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image5, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X UP_SECOND_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData6[] = {
X 0x001F,0x601F,0x781F,0x7E1F,0x7F9F,0x7FDF,0x7F9F,0x7E1F,
X 0x781F,0x601F,0x001F
X};
X
Xstatic struct Image Image6 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData6, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget upMinuteGadget = {
X &upSecondGadget, /* next gadget */
X 218,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image6, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X UP_MINUTE_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData7[] = {
X 0x001F,0x601F,0x781F,0x7E1F,0x7F9F,0x7FDF,0x7F9F,0x7E1F,
X 0x781F,0x601F,0x001F
X};
X
Xstatic struct Image Image7 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData7, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget upHourGadget = {
X &upMinuteGadget, /* next gadget */
X 169,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image7, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X UP_HOUR_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData8[] = {
X 0x001F,0x601F,0x781F,0x7E1F,0x7F9F,0x7FDF,0x7F9F,0x7E1F,
X 0x781F,0x601F,0x001F
X};
X
Xstatic struct Image Image8 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData8, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget upDayGadget = {
X &upHourGadget, /* next gadget */
X 119,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image8, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X UP_DAY_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData9[] = {
X 0x001F,0x00DF,0x03DF,0x0FDF,0x3FDF,0x7FDF,0x3FDF,0x0FDF,
X 0x03DF,0x00DF,0x001F
X};
X
Xstatic struct Image Image9 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData9, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget downMonthGadget = {
X &upDayGadget, /* next gadget */
X 66,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image9, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X DOWN_MONTH_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData10[] = {
X 0x001F,0x601F,0x781F,0x7E1F,0x7F9F,0x7FDF,0x7F9F,0x7E1F,
X 0x781F,0x601F,0x001F
X};
X
Xstatic struct Image Image10 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData10, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget upMonthGadget = {
X &downMonthGadget, /* next gadget */
X 78,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image10, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X UP_MONTH_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData11[] = {
X 0x001F,0x00DF,0x03DF,0x0FDF,0x3FDF,0x7FDF,0x3FDF,0x0FDF,
X 0x03DF,0x00DF,0x001F
X};
X
Xstatic struct Image Image11 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData11, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget downYearGadget = {
X &upMonthGadget, /* next gadget */
X 25,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image11, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X DOWN_YEAR_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic USHORT ImageData12[] = {
X 0x001F,0x601F,0x781F,0x7E1F,0x7F9F,0x7FDF,0x7F9F,0x7E1F,
X 0x781F,0x601F,0x001F
X};
X
Xstatic struct Image Image12 = {
X 0,0, /* XY origin relative to container TopLeft */
X 11,11, /* Image width and height in pixels */
X 2, /* number of bitplanes in Image */
X ImageData12, /* pointer to ImageData */
X 0x0002,0x0000, /* PlanePick and PlaneOnOff */
X NULL /* next Image structure */
X};
X
Xstatic struct Gadget upYearGadget = {
X &downYearGadget, /* next gadget */
X 36,31, /* origin XY of hit box relative to window TopLeft */
X 11,11, /* hit box width and height */
X GADGHBOX+GADGIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X BOOLGADGET+REQGADGET, /* gadget type flags */
X (APTR)&Image12, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X NULL, /* SpecialInfo structure */
X UP_YEAR_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE secondGadgetSIBuff[5] =
X "00";
Xstatic struct StringInfo secondGadgetSInfo = {
X secondGadgetSIBuff, /* buffer where text will be edited */
X UNDOBUFFER, /* optional undo buffer */
X 0, /* character position in buffer */
X 5, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct Gadget secondGadget = {
X &upYearGadget, /* next gadget */
X 264,23, /* origin XY of hit box relative to window TopLeft */
X 27,8, /* hit box width and height */
X NULL, /* gadget flags */
X RELVERIFY+LONGINT, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&secondGadgetSInfo, /* SpecialInfo structure */
X SECOND_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE minuteGadgetSIBuff[5] =
X "00";
Xstatic struct StringInfo minuteGadgetSInfo = {
X minuteGadgetSIBuff, /* buffer where text will be edited */
X UNDOBUFFER, /* optional undo buffer */
X 0, /* character position in buffer */
X 5, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct Gadget minuteGadget = {
X &secondGadget, /* next gadget */
X 209,23, /* origin XY of hit box relative to window TopLeft */
X 27,8, /* hit box width and height */
X NULL, /* gadget flags */
X RELVERIFY+LONGINT, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&minuteGadgetSInfo, /* SpecialInfo structure */
X MINUTE_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE hourGadgetSIBuff[5] =
X "00";
Xstatic struct StringInfo hourGadgetSInfo = {
X hourGadgetSIBuff, /* buffer where text will be edited */
X NULL, /* optional undo buffer */
X 0, /* character position in buffer */
X 5, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct IntuiText IText12 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X -17,-9, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" Hour Minute Second ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget hourGadget = {
X &minuteGadget, /* next gadget */
X 160,23, /* origin XY of hit box relative to window TopLeft */
X 27,8, /* hit box width and height */
X NULL, /* gadget flags */
X RELVERIFY+LONGINT, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText12, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&hourGadgetSInfo, /* SpecialInfo structure */
X HOUR_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE dayGadgetSIBuff[5] =
X "01";
Xstatic struct StringInfo dayGadgetSInfo = {
X dayGadgetSIBuff, /* buffer where text will be edited */
X UNDOBUFFER, /* optional undo buffer */
X 0, /* character position in buffer */
X 5, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct Gadget dayGadget = {
X &hourGadget, /* next gadget */
X 110,23, /* origin XY of hit box relative to window TopLeft */
X 27,8, /* hit box width and height */
X NULL, /* gadget flags */
X RELVERIFY+LONGINT, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&dayGadgetSInfo, /* SpecialInfo structure */
X DAY_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE monthGadgetSIBuff[5] =
X "Jan";
Xstatic struct StringInfo monthGadgetSInfo = {
X monthGadgetSIBuff, /* buffer where text will be edited */
X NULL, /* optional undo buffer */
X 0, /* character position in buffer */
X 5, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct Gadget monthGadget = {
X &dayGadget, /* next gadget */
X 66,23, /* origin XY of hit box relative to window TopLeft */
X 26,8, /* hit box width and height */
X GADGHBOX+GADGHIMAGE, /* gadget flags */
X RELVERIFY, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X NULL, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&monthGadgetSInfo, /* SpecialInfo structure */
X MONTH_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
Xstatic UBYTE yearGadgetSIBuff[5] =
X "1978";
Xstatic struct StringInfo yearGadgetSInfo = {
X yearGadgetSIBuff, /* buffer where text will be edited */
X UNDOBUFFER, /* optional undo buffer */
X 0, /* character position in buffer */
X 5, /* maximum number of characters to allow */
X 0, /* first displayed character buffer position */
X 0,0,0,0,0, /* Intuition initialized and maintained variables */
X 0, /* Rastport of gadget */
X 0, /* initial value for integer gadgets */
X NULL /* alternate keymap (fill in if you set the flag) */
X};
X
Xstatic struct IntuiText IText13 = {
X 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
X -10,-9, /* XY origin relative to container TopLeft */
X NULL, /* font pointer or NULL for default */
X (UBYTE *)" Year Month Day ", /* pointer to text */
X NULL /* next IntuiText structure */
X};
X
Xstatic struct Gadget yearGadget = {
X &monthGadget, /* next gadget */
X 19,23, /* origin XY of hit box relative to window TopLeft */
X 40,8, /* hit box width and height */
X NULL, /* gadget flags */
X RELVERIFY+LONGINT, /* activation flags */
X STRGADGET+REQGADGET, /* gadget type flags */
X NULL, /* gadget border or image to be rendered */
X NULL, /* alternate imagery for selection */
X &IText13, /* first IntuiText structure */
X NULL, /* gadget mutual-exclude long word */
X (APTR)&yearGadgetSInfo, /* SpecialInfo structure */
X YEAR_GADGET, /* user-definable data */
X NULL /* pointer to user-definable data */
X};
X
X#define GadgetList1 yearGadget
X
Xstatic struct Requester RequesterStructure1 = {
X NULL, /* previous requester (filled in by Intuition) */
X 4,11, /* requester XY origin relative to TopLeft of window */
X 312,124, /* requester width and height */
X 0,0, /* relative to these mouse offsets if POINTREL is set */
X &GadgetList1, /* gadget list */
X NULL, /* box's border */
X NULL, /* requester text */
X NULL, /* requester flags */
X 1, /* back-plane fill pen */
X NULL, /* leave these alone */
X NULL, /* custom bitmap if PREDRAWN is set */
X NULL /* leave this alone */
X};
END_OF_MRDateReq.pw.c
if test 36821 -ne `wc -c <MRDateReq.pw.c`; then
echo shar: \"MRDateReq.pw.c\" unpacked with wrong size!
fi
# end of overwriting check
fi
echo shar: End of archive 5 \(of 5\).
cp /dev/null ark5isdone
MISSING=""
for I in 1 2 3 4 5 ; do
if test ! -f ark${I}isdone ; then
MISSING="${MISSING} ${I}"
fi
done
if test "${MISSING}" = "" ; then
echo You have unpacked all 5 archives.
rm -f ark[1-9]isdone
else
echo You still need to unpack the following archives:
echo " " ${MISSING}
fi
## End of shell archive.
exit 0
--
# Mark R. Rinfret mrr@amanpt1.Newport.RI.US
# HyperView Systems Corp. Hypermedia Solutions for Documentation/Training
# 28 Jacome Way Work: 401-849-9390 x301
# Middletown, RI 02840 Home: 401-846-7639