static Option matchOptions[] = {
{ 0, 0, 0, NULL, (void*) &tfName, ".trn", NULL, FileName, N_("Tournament file:") },
-{ 0, 0, 0, NULL, (void*) &appData.roundSync, "", NULL, CheckBox, N_("Sync after round (for concurrent playing of a single") },
-{ 0, 0, 0, NULL, (void*) &appData.cycleSync, "", NULL, CheckBox, N_("Sync after cycle tourney with multiple XBoards)") },
+{ 0, 0, 0, NULL, (void*) &appData.roundSync, "", NULL, CheckBox, N_("Sync after round") },
+{ 0, SAME_ROW|LL, 0, NULL, NULL, "", NULL, Label, N_(" (for concurrent playing of a single") },
+{ 0, 0, 0, NULL, (void*) &appData.cycleSync, "", NULL, CheckBox, N_("Sync after cycle") },
+{ 0, SAME_ROW|LL, 0, NULL, NULL, "", NULL, Label, N_(" tourney with multiple XBoards)") },
{ 150, T_VSCRL | T_FILL | T_WRAP,
0, NULL, (void*) &engineName, "", NULL, TextBox, N_("Tourney participants:") },
{ 0, COMBO_CALLBACK | NO_GETTEXT,
static void
ReplaceParticipant ()
{
- GenericReadout(matchOptions, 3);
+ GenericReadout(matchOptions, 5);
Substitute(strdup(engineName), True);
}
static void
UpgradeParticipant ()
{
- GenericReadout(matchOptions, 3);
+ GenericReadout(matchOptions, 5);
Substitute(strdup(engineName), False);
}
static void
AddToTourney (int n)
{
- AddLine(&matchOptions[3], engineMnemonic[values[4]+1]);
+ AddLine(&matchOptions[5], engineMnemonic[values[6]+1]);
}
void
MatchOptionsProc ()
{
NamesToList(firstChessProgramNames, engineList, engineMnemonic, "all");
- matchOptions[5].min = -(appData.pairingEngine[0] != NULLCHAR); // with pairing engine, allow Swiss
+ matchOptions[7].min = -(appData.pairingEngine[0] != NULLCHAR); // with pairing engine, allow Swiss
ASSIGN(tfName, appData.tourneyFile[0] ? appData.tourneyFile : MakeName(appData.defName));
ASSIGN(engineName, appData.participants);
- GenericPopUp(matchOptions, _("Match Options"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(matchOptions, _("Match Options"), TransientDlg, BoardWindow, MODAL, 0);
}
// ------------------------------------------- General Options --------------------------------------------------
{ 0, 0, 0, NULL, (void*) &appData.markers, "", NULL, CheckBox, N_("Show Target Squares") },
{ 0, 0, 0, NULL, (void*) &appData.useStickyWindows, "", NULL, CheckBox, N_("Sticky Windows") },
{ 0, 0, 0, NULL, (void*) &appData.testLegality, "", NULL, CheckBox, N_("Test Legality") },
+{ 0, 0, 0, NULL, (void*) &appData.topLevel, "", NULL, CheckBox, N_("Top-Level Dialogs") },
{ 0, 0,10, NULL, (void*) &appData.flashCount, "", NULL, Spin, N_("Flash Moves (0 = no flashing):") },
{ 0, 1,10, NULL, (void*) &appData.flashRate, "", NULL, Spin, N_("Flash Rate (high = fast):") },
{ 0, 5,100, NULL, (void*) &appData.animSpeed, "", NULL, Spin, N_("Animation Speed (high = slow):") },
{
oldPonder = appData.ponderNextMove;
oldShow = appData.showCoords; oldBlind = appData.blindfold;
- GenericPopUp(generalOptions, _("General Options"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(generalOptions, _("General Options"), TransientDlg, BoardWindow, MODAL, 0);
}
//---------------------------------------------- New Variant ------------------------------------------------
void
NewVariantProc ()
{
- GenericPopUp(variantDescriptors, _("New Variant"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(variantDescriptors, _("New Variant"), TransientDlg, BoardWindow, MODAL, 0);
}
//------------------------------------------- Common Engine Options -------------------------------------
{
oldCores = appData.smpCores;
oldPonder = appData.ponderNextMove;
- GenericPopUp(commonEngineOptions, _("Common Engine Settings"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(commonEngineOptions, _("Common Engine Settings"), TransientDlg, BoardWindow, MODAL, 0);
}
//------------------------------------------ Adjudication Options --------------------------------------
void
EngineMenuProc ()
{
- GenericPopUp(adjudicationOptions, _("Adjudicate non-ICS Games"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(adjudicationOptions, _("Adjudicate non-ICS Games"), TransientDlg, BoardWindow, MODAL, 0);
}
//--------------------------------------------- ICS Options ---------------------------------------------
void
IcsOptionsProc ()
{
- GenericPopUp(icsOptions, _("ICS Options"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(icsOptions, _("ICS Options"), TransientDlg, BoardWindow, MODAL, 0);
}
//-------------------------------------------- Load Game Options ---------------------------------
};
void
-LoadOptionsProc ()
+LoadOptionsPopUp (DialogClass parent)
{
ASSIGN(searchMode, modeValues[appData.searchMode-1]);
- GenericPopUp(loadOptions, _("Load Game Options"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(loadOptions, _("Load Game Options"), TransientDlg, parent, MODAL, 0);
+}
+
+void
+LoadOptionsProc ()
+{ // called from menu
+ LoadOptionsPopUp(BoardWindow);
}
//------------------------------------------- Save Game Options --------------------------------------------
void
SaveOptionsProc ()
{
- GenericPopUp(saveOptions, _("Save Game Options"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(saveOptions, _("Save Game Options"), TransientDlg, BoardWindow, MODAL, 0);
}
//----------------------------------------------- Sound Options ---------------------------------------------
{
free(soundFiles[2]);
soundFiles[2] = strdup("*");
- GenericPopUp(soundOptions, _("Sound Options"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(soundOptions, _("Sound Options"), TransientDlg, BoardWindow, MODAL, 0);
}
//--------------------------------------------- Board Options --------------------------------------
void
BoardOptionsProc ()
{
- GenericPopUp(boardOptions, _("Board Options"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(boardOptions, _("Board Options"), TransientDlg, BoardWindow, MODAL, 0);
}
//-------------------------------------------- ICS Text Menu Options ------------------------------
textOptions[i].type = EndMark;
textOptions[i].target = NULL;
textOptions[i].min = 2;
- MarkMenu("ICStex", TextMenuDlg);
- GenericPopUp(textOptions, _("ICS text menu"), TextMenuDlg, BoardWindow, NONMODAL);
+ MarkMenu("View.ICStextmenu", TextMenuDlg);
+ GenericPopUp(textOptions, _("ICS text menu"), TextMenuDlg, BoardWindow, NONMODAL, 1);
}
//---------------------------------------------------- Edit Comment -----------------------------------
}
if(commentText) free(commentText); commentText = strdup(text);
commentIndex = index;
- MarkMenu("Show Comments", CommentDlg);
- if(GenericPopUp(commentOptions, title, CommentDlg, BoardWindow, NONMODAL))
+ MarkMenu("View.Comments", CommentDlg);
+ if(GenericPopUp(commentOptions, title, CommentDlg, BoardWindow, NONMODAL, 1))
AddHandler(&commentOptions[0], 1);
}
{
int j;
if (PopDown(CommentDlg)) { // popdown succesful
- MarkMenuItem("Edit Comment", False);
- MarkMenuItem("Show Comments", False);
+// MarkMenuItem("Edit.EditComment", False);
+// MarkMenuItem("View.Comments", False);
} else // was not up
EditCommentEvent();
}
}
if(tagsText) free(tagsText); tagsText = strdup(text);
tagsOptions[0].name = msg;
- MarkMenu("Show Tags", TagsDlg);
- GenericPopUp(tagsOptions, title, TagsDlg, BoardWindow, NONMODAL);
+ MarkMenu("View.Tags", TagsDlg);
+ GenericPopUp(tagsOptions, title, TagsDlg, BoardWindow, NONMODAL, 1);
}
//---------------------------------------------- ICS Input Box ----------------------------------
void
ICSInputBoxPopUp ()
{
- MarkMenu("ICS Input Box", InputBoxDlg);
- if(GenericPopUp(boxOptions, _("ICS input box"), InputBoxDlg, BoardWindow, NONMODAL))
+ MarkMenu("View.ICSInputBox", InputBoxDlg);
+ if(GenericPopUp(boxOptions, _("ICS input box"), InputBoxDlg, BoardWindow, NONMODAL, 0))
AddHandler(&boxOptions[0], 3);
}
{
static char buf[2];
buf[0] = firstchar; ASSIGN(icsText, buf);
- if(GenericPopUp(typeOptions, _("Type a move"), TransientDlg, BoardWindow, MODAL))
+ if(GenericPopUp(typeOptions, _("Type a move"), TransientDlg, BoardWindow, MODAL, 0))
AddHandler(&typeOptions[0], 2);
}
SettingsPopUp (ChessProgramState *cps)
{
currentCps = cps;
- GenericPopUp(cps->option, _("Engine Settings"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(cps->option, _("Engine Settings"), TransientDlg, BoardWindow, MODAL, 0);
}
void
if(nickName) free(nickName); nickName = strdup("");
if(params) free(params); params = strdup("");
NamesToList(firstChessProgramNames, engineList, engineMnemonic, "all");
- GenericPopUp(installOptions, _("Load engine"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(installOptions, _("Load engine"), TransientDlg, BoardWindow, MODAL, 0);
}
//----------------------------------------------------- Edit Book -----------------------------------------
void
ShuffleMenuProc ()
{
- GenericPopUp(shuffleOptions, _("New Shuffle Game"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(shuffleOptions, _("New Shuffle Game"), TransientDlg, BoardWindow, MODAL, 0);
}
//------------------------------------------------------ Time Control -----------------------------------
tmpInc = appData.timeIncrement; if(tmpInc < 0) tmpInc = 0;
tmpOdds1 = tmpOdds2 = 1; tcType = 0;
tmpTc = atoi(appData.timeControl);
- GenericPopUp(tcOptions, _("Time Control"), TransientDlg, BoardWindow, MODAL);
+ GenericPopUp(tcOptions, _("Time Control"), TransientDlg, BoardWindow, MODAL, 0);
+}
+
+//------------------------------- Ask Question -----------------------------------------
+
+int SendReply P((int n));
+char pendingReplyPrefix[MSG_SIZ];
+ProcRef pendingReplyPR;
+char *answer;
+
+Option askOptions[] = {
+{ 0, 0, 0, NULL, NULL, NULL, NULL, Label, NULL },
+{ 0, 0, 0, NULL, (void*) &answer, "", NULL, TextBox, "" },
+{ 0, 0, 0, NULL, (void*) &SendReply, "", NULL, EndMark , "" }
+};
+
+int
+SendReply (int n)
+{
+ char buf[MSG_SIZ];
+ int err;
+ char *reply=answer;
+// GetWidgetText(&askOptions[1], &reply);
+ safeStrCpy(buf, pendingReplyPrefix, sizeof(buf)/sizeof(buf[0]) );
+ if (*buf) strncat(buf, " ", MSG_SIZ - strlen(buf) - 1);
+ strncat(buf, reply, MSG_SIZ - strlen(buf) - 1);
+ strncat(buf, "\n", MSG_SIZ - strlen(buf) - 1);
+ OutputToProcess(pendingReplyPR, buf, strlen(buf), &err); // does not go into debug file??? => bug
+ if (err) DisplayFatalError(_("Error writing to chess program"), err, 0);
+ return TRUE;
+}
+
+void
+AskQuestion (char *title, char *question, char *replyPrefix, ProcRef pr)
+{
+ safeStrCpy(pendingReplyPrefix, replyPrefix, sizeof(pendingReplyPrefix)/sizeof(pendingReplyPrefix[0]) );
+ pendingReplyPR = pr;
+ ASSIGN(answer, "");
+ askOptions[0].name = question;
+ if(GenericPopUp(askOptions, title, AskDlg, BoardWindow, MODAL, 0))
+ AddHandler(&askOptions[1], 2);
+}
+
+//---------------------------- Promotion Popup --------------------------------------
+
+static int count;
+
+static void PromoPick P((int n));
+
+static Option promoOptions[] = {
+{ 0, 0, 0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
+{ 0, SAME_ROW, 0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
+{ 0, SAME_ROW, 0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
+{ 0, SAME_ROW, 0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
+{ 0, SAME_ROW, 0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
+{ 0, SAME_ROW, 0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
+{ 0, SAME_ROW, 0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
+{ 0, SAME_ROW | NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
+};
+
+static void
+PromoPick (int n)
+{
+ int promoChar = promoOptions[n+count].value;
+
+ PopDown(PromoDlg);
+
+ if (promoChar == 0) fromX = -1;
+ if (fromX == -1) return;
+
+ if (! promoChar) {
+ fromX = fromY = -1;
+ ClearHighlights();
+ return;
+ }
+ UserMoveEvent(fromX, fromY, toX, toY, promoChar);
+
+ if (!appData.highlightLastMove || gotPremove) ClearHighlights();
+ if (gotPremove) SetPremoveHighlights(fromX, fromY, toX, toY);
+ fromX = fromY = -1;
+}
+
+static void
+SetPromo (char *name, int nr, char promoChar)
+{
+ safeStrCpy(promoOptions[nr].name, name, MSG_SIZ);
+ promoOptions[nr].value = promoChar;
+}
+
+void
+PromotionPopUp ()
+{ // choice depends on variant: prepare dialog acordingly
+ count = 7;
+ SetPromo(_("Cancel"), --count, 0); // Beware: GenericPopUp cannot handle user buttons named "cancel" (lowe case)!
+ if(gameInfo.variant != VariantShogi) {
+ if (!appData.testLegality || gameInfo.variant == VariantSuicide ||
+ gameInfo.variant == VariantSpartan && !WhiteOnMove(currentMove) ||
+ gameInfo.variant == VariantGiveaway) {
+ SetPromo(_("King"), --count, 'k');
+ }
+ if(gameInfo.variant == VariantSpartan && !WhiteOnMove(currentMove)) {
+ SetPromo(_("Captain"), --count, 'c');
+ SetPromo(_("Lieutenant"), --count, 'l');
+ SetPromo(_("General"), --count, 'g');
+ SetPromo(_("Warlord"), --count, 'w');
+ } else {
+ SetPromo(_("Knight"), --count, 'n');
+ SetPromo(_("Bishop"), --count, 'b');
+ SetPromo(_("Rook"), --count, 'r');
+ if(gameInfo.variant == VariantCapablanca ||
+ gameInfo.variant == VariantGothic ||
+ gameInfo.variant == VariantCapaRandom) {
+ SetPromo(_("Archbishop"), --count, 'a');
+ SetPromo(_("Chancellor"), --count, 'c');
+ }
+ SetPromo(_("Queen"), --count, 'q');
+ }
+ } else // [HGM] shogi
+ {
+ SetPromo(_("Defer"), --count, '=');
+ SetPromo(_("Promote"), --count, '+');
+ }
+ GenericPopUp(promoOptions + count, "Promotion", PromoDlg, BoardWindow, NONMODAL, 0);
}
//---------------------------- Chat Windows ----------------------------------------------
return; // dummy
}
-//----------------------------- Various display boxes -----------------------------
+//--------------------------------- Game-List options dialog ------------------------------------------
+
+char *strings[LPUSERGLT_SIZE];
+int stringPtr;
+
+void
+GLT_ClearList ()
+{
+ strings[0] = NULL;
+ stringPtr = 0;
+}
+
+void
+GLT_AddToList (char *name)
+{
+ strings[stringPtr++] = name;
+ strings[stringPtr] = NULL;
+}
+
+Boolean
+GLT_GetFromList (int index, char *name)
+{
+ safeStrCpy(name, strings[index], MSG_SIZ);
+ return TRUE;
+}
+
+void
+GLT_DeSelectList ()
+{
+}
+
+static void GLT_Button P((int n));
+static int GLT_OK P((int n));
+
+static Option listOptions[] = {
+{ 0, LR|TB, 200, NULL, (void*) strings, "", NULL, ListBox, "" },
+{ 0, 0, 0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("factory") },
+{ 0, SAME_ROW, 0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("up") },
+{ 0, SAME_ROW, 0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("down") },
+{ 0, SAME_ROW, 0, NULL, (void*) &GLT_OK, "", NULL, EndMark , "" }
+};
+
+static int
+GLT_OK (int n)
+{
+ GLT_ParseList();
+ appData.gameListTags = strdup(lpUserGLT);
+ return 1;
+}
+
+static void
+GLT_Button (int n)
+{
+ int index = SelectedListBoxItem (&listOptions[0]);
+ char *p;
+ if (index < 0) {
+ DisplayError(_("No tag selected"), 0);
+ return;
+ }
+ p = strings[index];
+ if (n == 3) {
+ if(index >= strlen(GLT_ALL_TAGS)) return;
+ strings[index] = strings[index+1];
+ strings[++index] = p;
+ } else
+ if (n == 2) {
+ if(index == 0) return;
+ strings[index] = strings[index-1];
+ strings[--index] = p;
+ } else
+ if (n == 1) {
+ safeStrCpy(lpUserGLT, GLT_DEFAULT_TAGS, LPUSERGLT_SIZE);
+ GLT_TagsToList(lpUserGLT);
+ index = 0;
+ LoadListBox(&listOptions[0], "?"); // Note: the others don't need this, as the highlight switching redraws the change items
+ }
+ HighlightListBoxItem(&listOptions[0], index);
+}
+
+void
+GameListOptionsPopUp (DialogClass parent)
+{
+ safeStrCpy(lpUserGLT, appData.gameListTags, LPUSERGLT_SIZE);
+ GLT_TagsToList(lpUserGLT);
+
+ GenericPopUp(listOptions, _("Game-list options"), TransientDlg, parent, MODAL, 0);
+}
+
+void
+GameListOptionsProc ()
+{
+ GameListOptionsPopUp(BoardWindow);
+}
+
+//----------------------------- Error popup in various uses -----------------------------
+
+/*
+ * [HGM] Note:
+ * XBoard has always had some pathologic behavior with multiple simultaneous error popups,
+ * (which can occur even for modal popups when asynchrounous events, e.g. caused by engine, request a popup),
+ * and this new implementation reproduces that as well:
+ * Only the shell of the last instance is remembered in shells[ErrorDlg] (which replaces errorShell),
+ * so that PopDowns ordered from the code always refer to that instance, and once that is down,
+ * have no clue as to how to reach the others. For the Delete Window button calling PopDown this
+ * has now been repaired, as the action routine assigned to it gets the shell passed as argument.
+ */
+
+int errorUp = False;
+
+void
+ErrorPopDown ()
+{
+ if (!errorUp) return;
+ dialogError = errorUp = False;
+ PopDown(ErrorDlg); PopDown(FatalDlg); // on explicit request we pop down any error dialog
+ if (errorExitStatus != -1) ExitEvent(errorExitStatus);
+}
+
+static int
+ErrorOK (int n)
+{
+ dialogError = errorUp = False;
+ PopDown(n == 1 ? FatalDlg : ErrorDlg); // kludge: non-modal dialogs have one less (dummy) option
+ if (errorExitStatus != -1) ExitEvent(errorExitStatus);
+ return FALSE; // prevent second Popdown !
+}
+
+static Option errorOptions[] = {
+{ 0, 0, 0, NULL, NULL, NULL, NULL, Label, NULL }, // dummy option: will never be displayed
+{ 0, 0, 0, NULL, NULL, NULL, NULL, Label, NULL }, // textValue field will be set before popup
+{ 0,NO_CANCEL,0, NULL, (void*) &ErrorOK, "", NULL, EndMark , "" }
+};
+
+void
+ErrorPopUp (char *title, char *label, int modal)
+{
+ errorUp = True;
+ errorOptions[1].name = label;
+ if(dialogError = shellUp[TransientDlg])
+ GenericPopUp(errorOptions+1, title, FatalDlg, TransientDlg, MODAL, 0); // pop up as daughter of the transient dialog
+ else
+ GenericPopUp(errorOptions+modal, title, modal ? FatalDlg: ErrorDlg, BoardWindow, modal, 0); // kludge: option start address indicates modality
+}
void
DisplayError (String message, int error)
SetWindowTitle(text, title, icon);
}
+void
+DisplayWhiteClock (long timeRemaining, int highlight)
+{
+ if(appData.noGUI) return;
+ DisplayTimerLabel(11, _("White"), timeRemaining, highlight);
+ if(highlight) SetClockIcon(0);
+}
+
+void
+DisplayBlackClock (long timeRemaining, int highlight)
+{
+ if(appData.noGUI) return;
+ DisplayTimerLabel(12, _("Black"), timeRemaining, highlight);
+ if(highlight) SetClockIcon(1);
+}
+
+#define PAUSE_BUTTON "P"
+#define PIECE_MENU_SIZE 18
+static String pieceMenuStrings[2][PIECE_MENU_SIZE+1] = {
+ { N_("White"), "----", N_("Pawn"), N_("Knight"), N_("Bishop"), N_("Rook"),
+ N_("Queen"), N_("King"), "----", N_("Elephant"), N_("Cannon"),
+ N_("Archbishop"), N_("Chancellor"), "----", N_("Promote"), N_("Demote"),
+ N_("Empty square"), N_("Clear board"), NULL },
+ { N_("Black"), "----", N_("Pawn"), N_("Knight"), N_("Bishop"), N_("Rook"),
+ N_("Queen"), N_("King"), "----", N_("Elephant"), N_("Cannon"),
+ N_("Archbishop"), N_("Chancellor"), "----", N_("Promote"), N_("Demote"),
+ N_("Empty square"), N_("Clear board"), NULL }
+};
+/* must be in same order as pieceMenuStrings! */
+static ChessSquare pieceMenuTranslation[2][PIECE_MENU_SIZE] = {
+ { WhitePlay, (ChessSquare) 0, WhitePawn, WhiteKnight, WhiteBishop,
+ WhiteRook, WhiteQueen, WhiteKing, (ChessSquare) 0, WhiteAlfil,
+ WhiteCannon, WhiteAngel, WhiteMarshall, (ChessSquare) 0,
+ PromotePiece, DemotePiece, EmptySquare, ClearBoard },
+ { BlackPlay, (ChessSquare) 0, BlackPawn, BlackKnight, BlackBishop,
+ BlackRook, BlackQueen, BlackKing, (ChessSquare) 0, BlackAlfil,
+ BlackCannon, BlackAngel, BlackMarshall, (ChessSquare) 0,
+ PromotePiece, DemotePiece, EmptySquare, ClearBoard },
+};
+
+#define DROP_MENU_SIZE 6
+static String dropMenuStrings[DROP_MENU_SIZE+1] = {
+ "----", N_("Pawn"), N_("Knight"), N_("Bishop"), N_("Rook"), N_("Queen"), NULL
+ };
+/* must be in same order as dropMenuStrings! */
+static ChessSquare dropMenuTranslation[DROP_MENU_SIZE] = {
+ (ChessSquare) 0, WhitePawn, WhiteKnight, WhiteBishop,
+ WhiteRook, WhiteQueen
+};
+
+// [HGM] experimental code to pop up window just like the main window, using GenercicPopUp
+
+static Option *Exp P((int n, int x, int y));
+void MenuCallback P((int n));
+void SizeKludge P((int n));
+
+static int pmFromX = -1, pmFromY = -1;
+
+static void
+PMSelect (int n)
+{ // user callback for board context menus
+ if (pmFromX < 0 || pmFromY < 0) return;
+ if(n == 25) DropMenuEvent(dropMenuTranslation[values[n]], pmFromX, pmFromY);
+ else EditPositionMenuEvent(pieceMenuTranslation[n-23][values[n]], pmFromX, pmFromY);
+}
+
+int
+CCB (int n)
+{
+ shiftKey = (ShiftKeys() & 3) != 0;
+ ClockClick(n == 12);
+}
+
+Option mainOptions[] = { // description of main window in terms of generic dialog creator
+{ 0, 0xCA, 0, NULL, NULL, "", NULL, BoxBegin, "" }, // menu bar
+ { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("File") },
+ { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Edit") },
+ { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("View") },
+ { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Mode") },
+ { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Action") },
+ { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Engine") },
+ { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Options") },
+ { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Help") },
+{ 0, 0, 0, NULL, (void*)&SizeKludge, "", NULL, BoxEnd, "" },
+{ 0, LR|T2T|BORDER|SAME_ROW, 0, NULL, NULL, "", NULL, Label, "1" }, // optional title in window
+{ 0, L2L|T2T, 200, NULL, (void*) &CCB, NULL, NULL, Label, "White" }, // white clock
+{ 0, R2R|T2T|SAME_ROW, 200, NULL, (void*) &CCB, NULL, NULL, Label, "Black" }, // black clock
+{ 0, LR|T2T|BORDER, 401, NULL, NULL, "", NULL, -1, "2" }, // backup for title in window (if no room for other)
+{ 0, LR|T2T|BORDER, 270, NULL, NULL, "", NULL, Label, "message" }, // message field
+{ 0, RR|TT|SAME_ROW, 125, NULL, NULL, "", NULL, BoxBegin, "" }, // (optional) button bar
+ { 0, 0, 0, NULL, (void*) &ToStartEvent, NULL, NULL, Button, N_("<<") },
+ { 0, SAME_ROW, 0, NULL, (void*) &BackwardEvent, NULL, NULL, Button, N_("<") },
+ { 0, SAME_ROW, 0, NULL, (void*) &PauseEvent, NULL, NULL, Button, N_(PAUSE_BUTTON) },
+ { 0, SAME_ROW, 0, NULL, (void*) &ForwardEvent, NULL, NULL, Button, N_(">") },
+ { 0, SAME_ROW, 0, NULL, (void*) &ToEndEvent, NULL, NULL, Button, N_(">>") },
+{ 0, 0, 0, NULL, NULL, "", NULL, BoxEnd, "" },
+{ 401, LR|TT, 401, NULL, (char*) &Exp, NULL, NULL, Graph, "shadow board" }, // board
+ { 2, COMBO_CALLBACK, 0, NULL, (void*) &PMSelect, NULL, pieceMenuStrings[0], PopUp, "menuW" },
+ { 2, COMBO_CALLBACK, 0, NULL, (void*) &PMSelect, NULL, pieceMenuStrings[1], PopUp, "menuB" },
+ { -1, COMBO_CALLBACK, 0, NULL, (void*) &PMSelect, NULL, dropMenuStrings, PopUp, "menuD" },
+{ 0, NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
+};
+
+void
+SizeKludge (int n)
+{ // callback called by GenericPopUp immediately after sizing the menu bar
+ int width = BOARD_WIDTH*(squareSize + lineGap) + lineGap;
+ int w = width - 44 - mainOptions[n].min;
+ mainOptions[10].max = w; // width left behind menu bar
+ if(w < 0.4*width) // if no reasonable amount of space for title, force small layout
+ mainOptions[13].type = mainOptions[10].type, mainOptions[10].type = -1;
+}
+
+void
+MenuCallback (int n)
+{
+ MenuProc *proc = (MenuProc *) (((MenuItem*)(mainOptions[n].choice))[values[n]].proc);
+
+ (proc)();
+}
+
+static Option *
+Exp (int n, int x, int y)
+{
+ static int but1, but3;
+ int menuNr = -3;
+
+ if(n == 0) { // motion
+ if(SeekGraphClick(Press, x, y, 1)) return NULL;
+ if(but1 && !PromoScroll(x, y)) DragPieceMove(x, y);
+ if(but3) MovePV(x, y, lineGap + BOARD_HEIGHT * (squareSize + lineGap));
+ return NULL;
+ }
+ shiftKey = (ShiftKeys() & 3) != 0;
+ switch(n) {
+ case 1: LeftClick(Press, x, y), but1 = 1; break;
+ case -1: LeftClick(Release, x, y), but1 = 0; break;
+ case 2: shiftKey = !shiftKey;
+ case 3: menuNr = RightClick(Press, x, y, &pmFromX, &pmFromY), but3 = 1; break;
+ case -2: shiftKey = !shiftKey;
+ case -3: menuNr = RightClick(Release, x, y, &pmFromX, &pmFromY), but3 = 0; break;
+ case 10:
+ DrawPosition(True, NULL);
+ if(twoBoards) { // [HGM] dual: draw other board in other orientation
+ flipView = !flipView; partnerUp = !partnerUp;
+ DrawPosition(True, NULL);
+ flipView = !flipView; partnerUp = !partnerUp;
+ }
+ default:
+ return NULL;
+ }
+
+ switch(menuNr) {
+ case 0: return &mainOptions[shiftKey ? 23: 24];
+ case 1: SetupDropMenu(); return &mainOptions[25];
+ case 2:
+ case -1: ErrorPopDown();
+ case -2:
+ default: break; // -3, so no clicks caught
+ }
+ return NULL;
+}
+
+Option *
+BoardPopUp (int squareSize, int lineGap, void *clockFontThingy)
+{
+ extern Option *dialogOptions[];
+ int i, size = BOARD_WIDTH*(squareSize + lineGap) + lineGap;
+ mainOptions[11].choice = (char**) clockFontThingy;
+ mainOptions[12].choice = (char**) clockFontThingy;
+ mainOptions[22].value = BOARD_HEIGHT*(squareSize + lineGap) + lineGap;
+ mainOptions[22].max = mainOptions[13].max = size; // board size
+ mainOptions[13].max = size - 2; // board title (subtract border!)
+ mainOptions[12].max = mainOptions[11].max = size/2-3; // clock width
+ mainOptions[14].max = appData.showButtonBar ? size-130 : size-2; // message
+ mainOptions[0].max = size-40; // menu bar
+ mainOptions[10].type = appData.titleInWindow ? Label : -1 ;
+ if(!appData.showButtonBar) for(i=15; i<22; i++) mainOptions[i].type = -1;
+ for(i=0; i<8; i++) mainOptions[i+1].choice = (char**) menuBar[i].mi;
+ GenericPopUp(mainOptions, "XBoard", BoardWindow, BoardWindow, NONMODAL, 1);
+ return mainOptions;
+}
+