static int
TestGUI(void *obj, AG_Window *win)
{
M_Plotter *plt;
AG_Pane *pane;
AG_Numerical *num;
AG_Box *box;
int i;
pane = AG_PaneNew(win, AG_PANE_HORIZ, AG_PANE_EXPAND);
{
/* Create our plotter widget */
plt = M_PlotterNew(pane->div[1], M_PLOTTER_EXPAND);
/*
* Create the velocity plot item. This is what our algorithm
* computes.
*/
plVel = M_PlotNew(plt, M_PLOT_LINEAR);
M_PlotSetLabel(plVel, "m/s");
M_PlotSetYoffs(plVel, -45);
M_PlotSetScale(plVel, 0.0, 50.0);
/* Create a label we will use to show the "case". */
plblCase = M_PlotLabelNew(plVel, M_LABEL_OVERLAY, 0, 16, "-");
/* Plot the derivative of the velocity (the acceleration). */
plAcc = M_PlotFromDerivative(plt, M_PLOT_LINEAR, plVel);
M_PlotSetLabel(plAcc, "m/s^2");
M_PlotSetScale(plAcc, 0.0, 3000.0);
/* Plot the derivative of the acceleration (the jerk). */
plJerk = M_PlotFromDerivative(plt, M_PLOT_LINEAR, plAcc);
M_PlotSetLabel(plJerk, "m/s^3");
M_PlotSetScale(plJerk, 0.0, 100.0);
M_PlotSetScale(plJerk, 0.0, 150000.0);
M_PlotSetYoffs(plJerk, 70);
}
/* Allow the user to play with the parameters. */
box = AG_BoxNew(pane->div[0], AG_BOX_VERT, AG_BOX_EXPAND);
{
struct {
const char *name;
M_Real *f;
double incr;
} param[7] = {
{ "Jmax: ", &Jmax, 0.00001 },
{ "Amax: ", &Amax, 0.0005 },
{ "F: ", &F, 0.01 },
{ "L: ", &L, 10.0 },
{ "Ts tweak: ", &uTs, 1.0 },
{ "Ta tweak: ", &uTa, 1.0 },
{ "To tweak: ", &uTo, 1.0 },
};
for (i = 0; i < 7; i++) {
num = AG_NumericalNewS(box, AG_NUMERICAL_HFILL, NULL,
param[i].name);
AG_BindDouble(num, "value", param[i].f);
AG_SetDouble(num, "inc", param[i].incr);
AG_SetEvent(num, "numerical-changed",
GeneratePlot, "%p", plt);
}
AG_SeparatorNewHoriz(box);
AG_LabelNewPolled(box, AG_LABEL_HFILL, "Aref: %lf", &Aref);
AG_LabelNewPolled(box, AG_LABEL_HFILL, "v1: %lf", &v1);
AG_LabelNewPolled(box, AG_LABEL_HFILL, "v2: %lf", &v2);
AG_LabelNewPolled(box, AG_LABEL_HFILL, "v3: %lf", &v3);
AG_LabelNewPolled(box, AG_LABEL_HFILL, "Ts: %lf", &Ts);
AG_LabelNewPolled(box, AG_LABEL_HFILL, "Ta: %lf", &Ta);
AG_LabelNewPolled(box, AG_LABEL_HFILL, "To: %lf", &To);
AG_ButtonNewFn(box, AG_BUTTON_HFILL, "Generate",
GeneratePlot, "%p", plt);
}
AG_SetEvent(win, "window-shown", GeneratePlot, "%p", plt);
AG_WindowSetGeometryAlignedPct(win, AG_WINDOW_MC, 50, 30);
return (0);
}
static AG_Window *
DEV_ConfigWindow(AG_Config *cfg)
{
char path[AG_PATHNAME_MAX];
AG_Window *win;
AG_Box *hb;
AG_Textbox *tbox;
/* AG_Checkbox *cb; */
AG_Notebook *nb;
AG_NotebookTab *tab;
if ((win = AG_WindowNewNamedS(0, "DEV_Config")) == NULL) {
return (NULL);
}
AG_WindowSetCaptionS(win, _("Agar settings"));
AG_WindowSetCloseAction(win, AG_WINDOW_DETACH);
nb = AG_NotebookNew(win, AG_NOTEBOOK_HFILL|AG_NOTEBOOK_VFILL);
tab = AG_NotebookAdd(nb, _("Video"), AG_BOX_VERT);
{
AG_NumericalNewIntR(tab, 0, "%", _("Screenshot quality: "),
&agScreenshotQuality, 1, 100);
}
tab = AG_NotebookAdd(nb, _("GUI"), AG_BOX_VERT);
{
AG_CheckboxNewInt(tab, 0, _("Built-in key composition"),
&agTextComposition);
AG_CheckboxNewInt(tab, 0, _("Bidirectional"),
&agTextBidi);
AG_SeparatorNewHoriz(tab);
AG_LabelNewS(tab, 0, _("Timer settings (milliseconds):"));
AG_NumericalNewIntR(tab, 0, NULL, _("Double click delay: "),
&agMouseDblclickDelay, 1, 10000);
AG_NumericalNewIntR(tab, 0, NULL, _("Cursor spin delay: "),
&agMouseSpinDelay, 1, 10000);
AG_NumericalNewIntR(tab, 0, NULL, _("Cursor spin interval: "),
&agMouseSpinIval, 1, 10000);
AG_NumericalNewIntR(tab, 0, NULL, _("Key repeat delay: "),
&agKbdDelay, 1, 1000);
AG_NumericalNewIntR(tab, 0, NULL, _("Key repeat interval: "),
&agKbdRepeat, 1, 500);
}
tab = AG_NotebookAdd(nb, _("Directories"), AG_BOX_VERT);
{
hb = AG_BoxNewHoriz(tab, AG_BOX_HFILL);
tbox = AG_TextboxNewS(hb, AG_TEXTBOX_HFILL, _("Temporary file directory: "));
AG_GetString(agConfig, "tmp-path", path, sizeof(path));
AG_TextboxSetString(tbox, path);
AG_SetEvent(tbox, "textbox-return", SetPath, "%s", "tmp-path");
AG_TextboxSizeHint(tbox, "XXXXXXXXXXXXXXXXXXXX");
AG_ButtonNewFn(hb, 0, "...", SelectPath, "%s,%p", "tmp-path", tbox);
hb = AG_BoxNewHoriz(tab, AG_BOX_HFILL);
tbox = AG_TextboxNewS(hb, AG_TEXTBOX_HFILL, _("Dataset save directory: "));
AG_GetString(agConfig, "save-path", path, sizeof(path));
AG_TextboxSetString(tbox, path);
AG_SetEvent(tbox, "textbox-return", SetPath, "%s", "save-path");
AG_ButtonNewFn(hb, 0, "...", SelectPath, "%s,%p", "save-path", tbox);
hb = AG_BoxNewHoriz(tab, AG_BOX_HFILL);
tbox = AG_TextboxNewS(hb, AG_TEXTBOX_HFILL, _("Dataset search path: "));
AG_GetString(agConfig, "load-path", path, sizeof(path));
AG_TextboxSetString(tbox, path);
AG_SetEvent(tbox, "textbox-return", SetPath, "%s", "load-path");
hb = AG_BoxNewHoriz(tab, AG_BOX_HFILL);
tbox = AG_TextboxNewS(hb, AG_TEXTBOX_HFILL, _("Font search path: "));
AG_GetString(agConfig, "font-path", path, sizeof(path));
AG_TextboxSetString(tbox, path);
AG_SetEvent(tbox, "textbox-return", SetPath, "%s", "font-path");
}
#if 0
tab = AG_NotebookAdd(nb, _("Colors"), AG_BOX_VERT);
{
AG_Pane *hPane;
AG_HSVPal *hsv;
AG_Tlist *tl;
AG_TlistItem *it;
AG_Label *lbl;
int i;
hPane = AG_PaneNew(tab, AG_PANE_HORIZ, AG_PANE_EXPAND);
{
tl = AG_TlistNew(hPane->div[0], AG_TLIST_EXPAND);
AG_TlistSizeHint(tl, "Tileview text background", 10);
for (i = 0; i < LAST_COLOR; i++) {
it = AG_TlistAdd(tl, NULL, _(agColorNames[i]));
it->p1 = &agColors[i];
}
hsv = AG_HSVPalNew(hPane->div[1], AG_HSVPAL_EXPAND);
AG_SetEvent(hsv, "h-changed", SetColor, "%p", tl);
AG_SetEvent(hsv, "sv-changed", SetColor, "%p", tl);
AG_SetEvent(tl, "tlist-selected", BindSelectedColor,
"%p", hsv);
}
lbl = AG_LabelNew(tab, 0,
_("Warning: Some color changes will not "
"take effect until %s is restarted."), agProgName);
AG_LabelSetPaddingLeft(lbl, 10);
AG_LabelSetPaddingRight(lbl, 10);
hb = AG_BoxNewHoriz(tab, AG_BOX_HOMOGENOUS|AG_BOX_HFILL);
{
AG_ButtonNewFn(hb, 0, _("Load scheme"),
LoadColorSchemeDlg, NULL);
AG_ButtonNewFn(hb, 0, _("Save scheme"),
SaveColorSchemeDlg, NULL);
}
}
#endif
#ifdef AG_DEBUG
tab = AG_NotebookAdd(nb, _("Debug"), AG_BOX_VERT);
{
AG_NumericalNewIntR(tab, 0, NULL, _("Debug level: "),
&agDebugLvl, 0, 255);
}
#endif
hb = AG_BoxNewHoriz(win, AG_BOX_HOMOGENOUS|AG_BOX_HFILL);
{
AG_ButtonNewFn(hb, 0, _("Close"), AGWINDETACH(win));
AG_ButtonNewFn(hb, 0, _("Save"), SaveConfig, NULL);
}
return (win);
}