home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fish 'n' More 2
/
fishmore-publicdomainlibraryvol.ii1991xetec.iso
/
dirs
/
gadgeted_438.lzh
/
GadgetED
/
Source
/
pref.c
< prev
next >
Wrap
C/C++ Source or Header
|
1991-01-17
|
11KB
|
372 lines
/*----------------------------------------------------------------------*
pref.c Version 2.0 - © Copyright 1990 Jaba Development
Author : Jan van den Baard
Purpose : the preferences requester
*----------------------------------------------------------------------*/
static UBYTE UNDOBUFFER[80];
static SHORT MainPairs2[] =
{ 0,0,296,0,296,85,0,85,0,0
};
static struct Border MainBorder2 =
{ 2,1,0,0,JAM1,5,MainPairs2,NULL
};
static SHORT MainPairs1[] =
{ 0,0,296,0
};
static struct Border MainBorder1 =
{ 2,12,0,0,JAM1,2,MainPairs1,&MainBorder2
};
static SHORT SUPairs[] =
{ 0,0,87,0,87,13,0,13,0,0
};
static struct Border SUBorder =
{ -1,-1,0,0,JAM1,5,SUPairs,NULL
};
static struct IntuiText SUText =
{ 0,0,JAM1,3,2,NULL,(UBYTE *)"Save & Use",NULL
};
static struct Gadget SU =
{ NULL,203,71,86,12,NULL,RELVERIFY,BOOLGADGET,
(APTR)&SUBorder,NULL,&SUText,NULL,NULL,9,NULL
};
static struct IntuiText USText =
{ 0,0,JAM1,33,2,NULL,(UBYTE *)"Use",NULL
};
static struct Gadget US =
{ &SU,107,71,86,12,NULL,RELVERIFY,BOOLGADGET,
(APTR)&SUBorder,NULL,&USText,NULL,NULL,8,NULL
};
static struct IntuiText SAText =
{ 0,0,JAM1,27,2,NULL,(UBYTE *)"Save",NULL
};
static struct Gadget SA =
{ &US,12,71,86,12,NULL,RELVERIFY,BOOLGADGET,
(APTR)&SUBorder,NULL,&SAText,NULL,NULL,7,NULL
};
static SHORT RWPairs[] =
{ 0,0,136,0,136,10,0,10,0,0
};
static struct Border RWBorder =
{ -1,-1,0,0,JAM1,5,RWPairs,NULL
};
static struct IntuiText REText =
{ 0,0,JAM1,30,1,NULL,(UBYTE *)"REQUESTER",NULL
};
static struct Gadget RE =
{ &SA,155,57,135,9,NULL,GADGIMMEDIATE+TOGGLESELECT,BOOLGADGET,
(APTR)&RWBorder,NULL,&REText,1L,NULL,3,NULL
};
static struct IntuiText WDText =
{ 0,0,JAM1,43,1,NULL,(UBYTE *)"WINDOW",NULL
};
static struct Gadget WD =
{ &RE,12,57,135,9,NULL,GADGIMMEDIATE+TOGGLESELECT,BOOLGADGET,
(APTR)&RWBorder,NULL,&WDText,2L,NULL,2,NULL
};
static SHORT OPPairs[] =
{ 0,0,279,0,279,11,0,11,0,0
};
static struct Border OPBorder =
{ -1,-1,0,0,JAM1,5,OPPairs,NULL
};
static struct IntuiText ICText =
{ 0,0,JAM1,99,1,NULL,(UBYTE *)"Image Copy",NULL
};
static struct Gadget IC =
{ &WD,12,43,278,10,NULL,GADGIMMEDIATE+TOGGLESELECT,BOOLGADGET,
(APTR)&OPBorder,NULL,&ICText,NULL,NULL,1,NULL
};
static struct IntuiText AUSText =
{ 0,0,JAM1,40,1,NULL,(UBYTE *)"Auto Gadget -> Image size",NULL
};
static struct Gadget AUS =
{ &IC,12,29,278,10,NULL,GADGIMMEDIATE+TOGGLESELECT,BOOLGADGET,
(APTR)&OPBorder,NULL,&AUSText,1,NULL,0,NULL
};
static struct IntuiText SZPText =
{ 0,0,JAM1,58,1,NULL,(UBYTE *)"Skip zero bit-planes",NULL
};
static struct Gadget SZP =
{ &AUS,12,15,278,10,NULL,GADGIMMEDIATE+TOGGLESELECT,BOOLGADGET,
(APTR)&OPBorder,NULL,&SZPText,NULL,NULL,0,NULL
};
static struct IntuiText MainText =
{ 0,0,JAM1,107,3,NULL,(UBYTE *)"Preferences",NULL
};
static struct NewWindow pr_req =
{ 10,15,301,88,0,1,GADGETUP+GADGETDOWN,
NOCAREREFRESH+SMART_REFRESH+ACTIVATE+RMBTRAP,
NULL,NULL,NULL,NULL,NULL,0,0,0,0,CUSTOMSCREEN
};
extern struct Window *MainWindow;
extern struct Screen *MainScreen;
extern BOOL REQUESTER;
extern struct ge_prefs prefs;
extern ULONG Class;
extern USHORT GadgetCount, BackFill, BackPen, FrontPen;
extern struct Gadget *Gadget;
extern struct RastPort *MainRP;
extern struct NewWindow nw_main;
extern struct GadgetList Gadgets;
extern UBYTE wdt[80],wlb[MAXLABEL];
extern ULONG WindowFlags;
extern struct Gadget TextGadget;
static struct Window *pw;
/*
* write the preferences to "DEVS:GadgetEd.PREFS"
*/
static BOOL save_prefs()
{
BPTR file;
BOOL ret = TRUE;
if(NOT(file = Open("DEVS:GadgetEd.PREFS",MODE_NEWFILE))) return(FALSE);
if(Write(file,(char *)&prefs,sizeof(struct ge_prefs)) == -1) ret = FALSE;
Close(file);
return(ret);
}
/*
* set the preferences
*/
static VOID set_prefs()
{
if(SelectTest(&SZP)) prefs.skip_zero_planes = TRUE;
else prefs.skip_zero_planes = FALSE;
if(SelectTest(&AUS)) prefs.auto_size = TRUE;
else prefs.auto_size = FALSE;
if(SelectTest(&IC)) prefs.image_copy = TRUE;
else prefs.image_copy = FALSE;
if(SelectTest(&RE)) { REQUESTER = TRUE; BackFill = BackPen; }
else REQUESTER = FALSE;
refresh();
}
#define REQ WINDOWDRAG+WINDOWSIZING+SIZEBRIGHT+SIZEBBOTTOM+GIMMEZEROZERO+BORDERLESS;
/*
* re arrange the gadget list
*/
struct Gadget *re_arrange()
{
register struct MyGadget *g;
register struct Gadget *gd;
if(Gadgets.TailPred == (struct MyGadget *)&Gadgets) return(NULL);
for(g = Gadgets.TailPred; g != (struct MyGadget *)&Gadgets; g = g->Pred)
{ gd = &g->Gadget;
if(g->Pred == (struct MyGadget *)&Gadgets) gd->NextGadget = NULL;
else gd->NextGadget = &g->Pred->Gadget;
}
return(&Gadgets.TailPred->Gadget);
}
/*
* change the window to requester or viceversa
*/
BOOL change_window()
{
register struct Gadget *g, *g1, *gl;
register struct IntuiText *t;
struct Window *w;
nw_main.LeftEdge = MainWindow->LeftEdge;
nw_main.TopEdge = MainWindow->TopEdge;
nw_main.Width = MainWindow->Width;
nw_main.Height = MainWindow->Height;
nw_main.Flags = NULL;
nw_main.FirstGadget = NULL;
nw_main.Screen = MainScreen;
nw_main.MinWidth = MainWindow->MinWidth;
nw_main.MinHeight = MainWindow->MinHeight;
nw_main.MaxWidth = MainScreen->Width;
nw_main.MaxHeight = MainScreen->Height;
add_bo();
g = gl = re_arrange();
if(REQUESTER)
{ nw_main.DetailPen = 0;
nw_main.BlockPen = 1;
BackFill = 1;
FrontPen = 0;
BackPen = 1;
nw_main.Flags = REQ;
strcpy((char *)&wlb,"requester");
strcpy((char *)&wdt,"Requester");
nw_main.Title = (UBYTE *)"Work Requester";
if((nw_main.LeftEdge + nw_main.Width + 17) < MainScreen->Width)
nw_main.Width += 17;
if((nw_main.TopEdge + nw_main.Height + 8) < MainScreen->Height)
nw_main.Height += 8;
}
else
{ nw_main.DetailPen = MainWindow->DetailPen;
nw_main.BlockPen = MainWindow->BlockPen;
strcpy((char *)&wdt,"Work Window");
nw_main.Title = (UBYTE *)&wdt;
strcpy((char *)&wlb,"new_window");
FrontPen = 1;
BackPen = 0;
nw_main.Width -= 17;
nw_main.Height -= 8;
if(TestBits(WindowFlags,WINDOWCLOSE)) nw_main.Flags |= WINDOWCLOSE;
if(TestBits(WindowFlags,WINDOWDRAG)) nw_main.Flags |= WINDOWDRAG;
if(TestBits(WindowFlags,WINDOWDEPTH)) nw_main.Flags |= WINDOWDEPTH;
if(TestBits(WindowFlags,WINDOWSIZING)) nw_main.Flags |= WINDOWSIZING;
if(TestBits(WindowFlags,SIZEBRIGHT)) nw_main.Flags |= SIZEBRIGHT;
if(TestBits(WindowFlags,SIZEBBOTTOM)) nw_main.Flags |= SIZEBBOTTOM;
}
nw_main.Flags |= NOCAREREFRESH+SMART_REFRESH+ACTIVATE;
if(NOT(w = OpenWindow(&nw_main)))
{ Error("Can't change window !");
if(g) AddGList(MainWindow,g,-1L,GadgetCount,NULL);
return;
}
if(REQUESTER)
{ if(g)
{ while(1)
{ g1 = g->NextGadget;
un_grel(MainWindow,g);
if(TestBits((ULONG)g->Flags,GRELWIDTH)) g->Flags ^= GRELWIDTH;
if(TestBits((ULONG)g->Flags,GRELHEIGHT)) g->Flags ^= GRELHEIGHT;
if(TestBits((ULONG)g->Flags,GRELRIGHT)) g->Flags ^= GRELRIGHT;
if(TestBits((ULONG)g->Flags,GRELBOTTOM)) g->Flags ^= GRELBOTTOM;
if(TestBits((ULONG)g->Activation,RIGHTBORDER))
g->Activation ^= RIGHTBORDER;
if(TestBits((ULONG)g->Activation,LEFTBORDER))
g->Activation ^= LEFTBORDER;
if(TestBits((ULONG)g->Activation,TOPBORDER))
g->Activation ^= TOPBORDER;
if(TestBits((ULONG)g->Activation,BOTTOMBORDER))
g->Activation ^= BOTTOMBORDER;
g->TopEdge -= MainWindow->BorderTop - 1;
if(NOT g1) break;
g = g1;
}
}
if((t = TextGadget.GadgetText))
{ while(1)
{ t->TopEdge -= MainWindow->BorderTop - 1;
if(NOT(t = t->NextText)) break;
}
}
}
else
{ if(g)
{ while(1)
{ g1 = g->NextGadget;
if(TestBits((ULONG)g->Activation,ENDGADGET))
g->Activation ^= ENDGADGET;
g->TopEdge += MainWindow->BorderTop + 1;
if(NOT g1) break;
g = g1;
}
}
if((t = TextGadget.GadgetText))
{ while(1)
{ t->TopEdge += MainWindow->BorderTop + 1;
if(NOT(t = t->NextText)) break;
}
}
}
ClearMenuStrip(MainWindow);
CloseWindow(MainWindow);
MainWindow = w;
MainRP = MainWindow->RPort;
SetMenu(MainWindow);
if(gl) AddGList(MainWindow,gl,-1L,GadgetCount,NULL);
rem_bo();
refresh();
}
/*
* open the preferences window
*/
VOID preferences()
{
struct RastPort *rp;
BOOL running = TRUE, req;
USHORT g_id;
pr_req.Screen = MainScreen;
if(NOT(pw = OpenWindow(&pr_req))) return;
disable_window();
rp = pw->RPort;
draw(pw,&SZP,&MainBorder1,&MainText);
DeSelectGList(pw,&SZP,NULL,5);
if(prefs.skip_zero_planes) SelectGadget(pw,&SZP,NULL);
if(prefs.auto_size) SelectGadget(pw,&AUS,NULL);
if(prefs.image_copy) SelectGadget(pw,&IC,NULL);
if(REQUESTER) SelectGadget(pw,&RE,NULL);
else SelectGadget(pw,&WD,NULL);
req = REQUESTER;
do
{ Wait(1 << pw->UserPort->mp_SigBit);
while(read_msg(pw))
{ g_id = Gadget->GadgetID;
switch(g_id)
{ case 2:
case 3: MutualExclude(pw,Gadget,&WD,NULL);
SelectGadget(pw,Gadget,NULL);
break;
case 7:
case 8:
case 9: running = FALSE;
break;
}
}
} while(running == TRUE);
CloseWindow(pw);
enable_window();
if(g_id == 7)
{ if(NOT save_prefs())
{ Error("Error writing preferences !");
return;
}
}
else if(g_id == 8)
{ set_prefs();
if(REQUESTER != req) change_window();
set_extra_items(MainWindow);
}
else
{ set_prefs();
if(REQUESTER != req) change_window();
set_extra_items(MainWindow);
if(NOT save_prefs())
{ Error("Error writing preferences !");
return;
}
}
}