Merge commit 'v4.3.16'
[xboard.git] / xoptions.c
index 5e4fac8..6dc6e6d 100644 (file)
-/*
- * xoptions.c -- Move list window, part of X front end for XBoard
- *
- * Copyright 2000 Free Software Foundation, Inc.
- *
- * The following terms apply to the enhanced version of XBoard distributed
- * by the Free Software Foundation:
- * ------------------------------------------------------------------------
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- * ------------------------------------------------------------------------
- *
- * See the file ChangeLog for a revision history.
- */
-
-// [HGM] this file is the counterpart of woptions.c, containing xboard popup menus
-// similar to those of WinBoard, to set the most common options interactively.
-
-#include "config.h"
-
-#include <stdio.h>
-#include <ctype.h>
-#include <errno.h>
-#include <sys/types.h>
-
-#if STDC_HEADERS
-# include <stdlib.h>
-# include <string.h>
-#else /* not STDC_HEADERS */
-extern char *getenv();
-# if HAVE_STRING_H
-#  include <string.h>
-# else /* not HAVE_STRING_H */
-#  include <strings.h>
-# endif /* not HAVE_STRING_H */
-#endif /* not STDC_HEADERS */
-
-#if HAVE_UNISTD_H
-# include <unistd.h>
-#endif
-
-#include <X11/Intrinsic.h>
-#include <X11/StringDefs.h>
-#include <X11/Shell.h>
-#include <X11/Xaw/Dialog.h>
-#include <X11/Xaw/Form.h>
-#include <X11/Xaw/List.h>
-#include <X11/Xaw/Label.h>
-#include <X11/Xaw/SimpleMenu.h>
-#include <X11/Xaw/SmeBSB.h>
-#include <X11/Xaw/SmeLine.h>
-#include <X11/Xaw/Box.h>
-#include <X11/Xaw/Paned.h>
-#include <X11/Xaw/MenuButton.h>
-#include <X11/cursorfont.h>
-#include <X11/Xaw/Text.h>
-#include <X11/Xaw/AsciiText.h>
-#include <X11/Xaw/Viewport.h>
-#include <X11/Xaw/Toggle.h>
-
-#include "common.h"
-#include "backend.h"
-#include "xboard.h"
-
-extern Widget formWidget, shellWidget, boardWidget, menuBarWidget;
-extern Display *xDisplay;
-extern int squareSize;
-extern Pixmap xMarkPixmap;
-extern char *layoutName;
-extern Window xBoardWindow;
-extern Arg layoutArgs[2], formArgs[2];
-Pixel timerForegroundPixel, timerBackgroundPixel;
-
-// [HGM] the following code for makng menu popups was cloned from the FileNamePopUp routines
-
-static Widget previous = NULL;
-
-void SetFocus(Widget w, XtPointer data, XEvent *event, Boolean *b)
-{
-    Arg args;
-
-    if(previous) {
-       XtSetArg(args, XtNdisplayCaret, False);
-       XtSetValues(previous, &args, 1);
-    }
-    XtSetArg(args, XtNdisplayCaret, True);
-    XtSetValues(w, &args, 1);
-    XtSetKeyboardFocus((Widget) data, w);
-    previous = w;
-}
-
-//--------------------------- New Shuffle Game --------------------------------------------
-extern int shuffleOpenings;
-extern int startedFromPositionFile;
-int shuffleUp;
-Widget shuffleShell;
-
-void ShufflePopDown()
-{
-    if (!shuffleUp) return;
-    XtPopdown(shuffleShell);
-    XtDestroyWidget(shuffleShell);
-    shuffleUp = False;
-    ModeHighlight();
-}
-
-void ShuffleCallback(w, client_data, call_data)
-     Widget w;
-     XtPointer client_data, call_data;
-{
-    String name;
-    Widget w2;
-    Arg args[16];
-    char buf[80];
-    
-    XtSetArg(args[0], XtNlabel, &name);
-    XtGetValues(w, args, 1);
-    
-    if (strcmp(name, "cancel") == 0) {
-        ShufflePopDown();
-        return;
-    }
-    if (strcmp(name, "off") == 0) {
-        ShufflePopDown();
-       shuffleOpenings = False; // [HGM] should be moved to New Variant menu, once we have it!
-       ResetGameEvent();
-       AnalysisPopDown();
-        return;
-    }
-    if (strcmp(name, "random") == 0) {
-       sprintf(buf, "%d", rand());
-       XtSetArg(args[0],XtNvalue, buf); // erase bad (non-numeric) value
-       XtSetValues(XtParent(w), args, 1);
-        return;
-    }
-    if (strcmp(name, "ok") == 0) {
-       int nr; String name;
-        name = XawDialogGetValueString(w2 = XtParent(w));
-       if(sscanf(name ,"%d",&nr) != 1) {
-           sprintf(buf, "%d", appData.defaultFrcPosition);
-           XtSetArg(args[0],XtNvalue, buf); // erase bad (non-numeric) value
-           XtSetValues(w2, args, 1);
-           return;
-       }
-       appData.defaultFrcPosition = nr;
-       shuffleOpenings = True;
-        ShufflePopDown();
-       ResetGameEvent();
-       AnalysisPopDown();
-        return;
-    }
-}
-
-void ShufflePopUp()
-{
-    Arg args[16];
-    Widget popup, layout, dialog, edit;
-    Window root, child;
-    int x, y, i;
-    int win_x, win_y;
-    unsigned int mask;
-    char def[80];
-    
-    i = 0;
-    XtSetArg(args[i], XtNresizable, True); i++;
-    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;
-    shuffleShell = popup =
-      XtCreatePopupShell("New Shuffle Game", transientShellWidgetClass,
-                        shellWidget, args, i);
-    
-    layout =
-      XtCreateManagedWidget(layoutName, formWidgetClass, popup,
-                           layoutArgs, XtNumber(layoutArgs));
-  
-    sprintf(def, "%d\n", appData.defaultFrcPosition);
-    i = 0;
-    XtSetArg(args[i], XtNlabel, "Start-position number:"); i++;
-    XtSetArg(args[i], XtNvalue, def); i++;
-    XtSetArg(args[i], XtNborderWidth, 0); i++;
-    dialog = XtCreateManagedWidget("Shuffle", dialogWidgetClass,
-                                  layout, args, i);
-    
-//    XtSetArg(args[0], XtNeditType, XawtextEdit);  // [HGM] can't get edit to work decently
-//    XtSetArg(args[1], XtNuseStringInPlace, False);
-//    XtSetValues(dialog, args, 2);
-
-    XawDialogAddButton(dialog, "ok", ShuffleCallback, (XtPointer) dialog);
-    XawDialogAddButton(dialog, "cancel", ShuffleCallback, (XtPointer) dialog);
-    XawDialogAddButton(dialog, "random", ShuffleCallback, (XtPointer) dialog);
-    XawDialogAddButton(dialog, "off", ShuffleCallback, (XtPointer) dialog);
-    
-    XtRealizeWidget(popup);
-    CatchDeleteWindow(popup, "ShufflePopDown");
-    
-    XQueryPointer(xDisplay, xBoardWindow, &root, &child,
-                 &x, &y, &win_x, &win_y, &mask);
-    
-    XtSetArg(args[0], XtNx, x - 10);
-    XtSetArg(args[1], XtNy, y - 30);
-    XtSetValues(popup, args, 2);
-    
-    XtPopup(popup, XtGrabExclusive);
-    shuffleUp = True;
-    
-    edit = XtNameToWidget(dialog, "*value");
-
-    XtSetKeyboardFocus(popup, edit);
-}
-
-void ShuffleMenuProc(w, event, prms, nprms)
-     Widget w;
-     XEvent *event;
-     String *prms;
-     Cardinal *nprms;
-{
-//    if (gameMode == AnalyzeMode || gameMode == AnalyzeFile) {
-//     Reset(FALSE, TRUE);
-//    }
-    ShufflePopUp();
-}
-
-//--------------------------- Time-Control Menu Popup ----------------------------------
-int TimeControlUp;
-Widget TimeControlShell;
-int tcInc;
-Widget tcMess1, tcMess2, tcData, tcTime, tcOdds1, tcOdds2;
-int tcIncrement, tcMoves;
-
-void TimeControlPopDown()
-{
-    if (!TimeControlUp) return;
-    XtPopdown(TimeControlShell);
-    XtDestroyWidget(TimeControlShell);
-    TimeControlUp = False;
-    ModeHighlight();
-}
-
-void TimeControlCallback(w, client_data, call_data)
-     Widget w;
-     XtPointer client_data, call_data;
-{
-    String name, txt;
-    Widget w2;
-    Arg args[16];
-    char buf[80];
-    int j;
-
-    XtSetArg(args[0], XtNlabel, &name);
-    XtGetValues(w, args, 1);
-    
-    if (strcmp(name, "classical") == 0) {
-       if(!tcInc) return;
-       j=0;
-       XtSetArg(args[j], XtNlabel, "minutes for each"); j++;
-       XtSetValues(tcMess1, args, j);
-       j=0;
-       XtSetArg(args[j], XtNlabel, "moves"); j++;
-       XtSetValues(tcMess2, args, j);
-       j=0;
-       XtSetArg(args[j], XtNstring, &name); j++;
-       XtGetValues(tcData, args, j);
-       tcIncrement = 0; sscanf(name, "%d", &tcIncrement);
-       sprintf(buf, "%d", tcMoves);
-       j=0;
-       XtSetArg(args[j], XtNstring, buf); j++;
-       XtSetValues(tcData, args, j);
-       tcInc = False;
-        return;
-    }
-    if (strcmp(name, "incremental") == 0) {
-       if(tcInc) return;
-       j=0;
-       XtSetArg(args[j], XtNlabel, "minutes, plus"); j++;
-       XtSetValues(tcMess1, args, j);
-       j=0;
-       XtSetArg(args[j], XtNlabel, "sec/move"); j++;
-       XtSetValues(tcMess2, args, j);
-       j=0;
-       XtSetArg(args[j], XtNstring, &name); j++;
-       XtGetValues(tcData, args, j);
-       tcMoves = appData.movesPerSession; sscanf(name, "%d", &tcMoves);
-       sprintf(buf, "%d", tcIncrement);
-       j=0;
-       XtSetArg(args[j], XtNstring, buf); j++;
-       XtSetValues(tcData, args, j);
-       tcInc = True;
-        return;
-    }
-    if (strcmp(name, " OK ") == 0) {
-       int inc, mps, tc, ok;
-       XtSetArg(args[0], XtNstring, &txt);
-       XtGetValues(tcData, args, 1);
-       if(tcInc) {
-           ok = sscanf(txt, "%d", &inc); mps = 0;
-           if(!ok && txt[0] == 0) { inc = 0; ok = 1; } // accept empty string as zero
-           ok &= (inc >= 0);
-       } else {
-           ok = sscanf(txt, "%d", &mps); inc = -1;
-           ok &= (mps > 0);
-       }
-       if(ok != 1) {
-           XtSetArg(args[0], XtNstring, ""); // erase any offending input
-           XtSetValues(tcData, args, 1);
-           return;
-       }
-       XtSetArg(args[0], XtNstring, &txt);
-       XtGetValues(tcTime, args, 1);
-       if(!ParseTimeControl(txt, inc, mps)) {
-           XtSetArg(args[0], XtNstring, ""); // erase any offending input
-           XtSetValues(tcTime, args, 1);
-           DisplayError("Bad Time-Control String", 0);
-           return;
-       }
-       appData.movesPerSession = mps;
-       appData.timeIncrement = inc;
-       appData.timeControl = strdup(txt);
-       XtSetArg(args[0], XtNstring, &txt);
-       XtGetValues(tcOdds1, args, 1);
-       appData.firstTimeOdds = first.timeOdds 
-               = (sscanf(txt, "%d", &j) == 1 && j > 0) ? j : 1;
-       XtGetValues(tcOdds2, args, 1);
-       appData.secondTimeOdds = second.timeOdds 
-               = (sscanf(txt, "%d", &j) == 1 && j > 0) ? j : 1;
-
-       Reset(True, True);
-        TimeControlPopDown();
-        return;
-    }
-}
-
-void TimeControlPopUp()
-{
-    Arg args[16];
-    Widget popup, layout, form, edit, b_ok, b_cancel, b_clas, b_inc, mess;
-    Window root, child;
-    int x, y, i, j;
-    int win_x, win_y;
-    unsigned int mask;
-    char def[80];
-    
-    tcInc = (appData.timeIncrement >= 0);
-    tcMoves = appData.movesPerSession; tcIncrement = appData.timeIncrement;
-    if(!tcInc) tcIncrement = 0;
-    sprintf(def, "%d", tcInc ? tcIncrement : tcMoves);
-
-    i = 0;
-    XtSetArg(args[i], XtNresizable, True); i++;
-//    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;
-    TimeControlShell = popup =
-      XtCreatePopupShell("TimeControl Menu", transientShellWidgetClass,
-                        shellWidget, args, i);
-    
-    layout =
-      XtCreateManagedWidget(layoutName, formWidgetClass, popup,
-                           layoutArgs, XtNumber(layoutArgs));
-  
-    form =
-      XtCreateManagedWidget(layoutName, formWidgetClass, layout,
-                           formArgs, XtNumber(formArgs));
-  
-    j = 0;
-//    XtSetArg(args[j], XtNwidth,     (XtArgVal) 300); j++;
-//    XtSetArg(args[j], XtNheight,    (XtArgVal) 85); j++;
-    XtSetValues(popup, args, j);
-
-    j= 0;
-    XtSetArg(args[j], XtNborderWidth, 1); j++;
-    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-    XtSetArg(args[j], XtNstring, appData.timeControl);  j++;
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    XtSetArg(args[j], XtNresizable, True);  j++;
-    XtSetArg(args[j], XtNwidth,  85);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcTime = XtCreateManagedWidget("TC", asciiTextWidgetClass, form, args, j);
-    XtAddEventHandler(tcTime, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-
-    j= 0;
-    XtSetArg(args[j], XtNlabel, tcInc ? "   minutes, plus   " : "minutes for each"); j++;
-    XtSetArg(args[j], XtNborderWidth, 0); j++;
-    XtSetArg(args[j], XtNfromHoriz, tcTime); j++;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-  //  XtSetArg(args[j], XtNwidth,  100);  j++;
-  //  XtSetArg(args[j], XtNheight, 20);  j++;
-    tcMess1 = XtCreateManagedWidget("TCtext", labelWidgetClass, form, args, j);
-
-    j= 0;
-    XtSetArg(args[j], XtNborderWidth, 1); j++;
-    XtSetArg(args[j], XtNfromHoriz, tcMess1); j++;
-    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-    XtSetArg(args[j], XtNstring, def);  j++;
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    XtSetArg(args[j], XtNresizable, True);  j++;
-    XtSetArg(args[j], XtNwidth,  40);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcData = XtCreateManagedWidget("MPS", asciiTextWidgetClass, form, args, j);
-    XtAddEventHandler(tcData, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-
-    j= 0;
-    XtSetArg(args[j], XtNlabel, tcInc ? "sec/move" : "moves     "); j++;
-    XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;
-    XtSetArg(args[j], XtNborderWidth, 0); j++;
-    XtSetArg(args[j], XtNfromHoriz, tcData); j++;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-//    XtSetArg(args[j], XtNwidth,  80);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcMess2 = XtCreateManagedWidget("MPStext", labelWidgetClass,
-                                  form, args, j);
-
-    j= 0;
-    XtSetArg(args[j], XtNborderWidth, 1); j++;
-    XtSetArg(args[j], XtNfromVert, tcTime); j++;
-    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-    XtSetArg(args[j], XtNstring, "1");  j++;
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNresizable, True);  j++;
-    XtSetArg(args[j], XtNwidth,  40);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcOdds1 = XtCreateManagedWidget("Odds1", asciiTextWidgetClass, form, args, j);
-    XtAddEventHandler(tcOdds1, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-
-    j= 0;
-    XtSetArg(args[j], XtNborderWidth, 1); j++;
-    XtSetArg(args[j], XtNfromVert, tcTime); j++;
-    XtSetArg(args[j], XtNfromHoriz, tcOdds1); j++;
-    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-    XtSetArg(args[j], XtNstring, "1");  j++;
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNresizable, True);  j++;
-    XtSetArg(args[j], XtNwidth,  40);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcOdds2 = XtCreateManagedWidget("Odds2", asciiTextWidgetClass, form, args, j);
-    XtAddEventHandler(tcOdds2, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-
-    j= 0;
-    XtSetArg(args[j], XtNlabel, "Engine #1 and #2 Time-Odds Factors"); j++;
-    XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;
-    XtSetArg(args[j], XtNborderWidth, 0); j++;
-    XtSetArg(args[j], XtNfromVert, tcTime); j++;
-    XtSetArg(args[j], XtNfromHoriz, tcOdds2); j++;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-//    XtSetArg(args[j], XtNwidth,  200);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    mess = XtCreateManagedWidget("Oddstext", labelWidgetClass,
-                                  form, args, j);
-    j=0;
-    XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    b_clas= XtCreateManagedWidget("classical", commandWidgetClass,
-                                  form, args, j);   
-    XtAddCallback(b_clas, XtNcallback, TimeControlCallback, (XtPointer) 0);
-
-    j=0;
-    XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
-    XtSetArg(args[j], XtNfromHoriz, b_clas);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    b_inc = XtCreateManagedWidget("incremental", commandWidgetClass,
-                                  form, args, j);   
-    XtAddCallback(b_inc, XtNcallback, TimeControlCallback, (XtPointer) 0);
-
-    j=0;
-    XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
-    XtSetArg(args[j], XtNfromHoriz, tcData);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    b_ok= XtCreateManagedWidget(" OK ", commandWidgetClass,
-                                  form, args, j);   
-    XtAddCallback(b_ok, XtNcallback, TimeControlCallback, (XtPointer) 0);
-
-    j=0;
-    XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
-    XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    b_cancel= XtCreateManagedWidget("cancel", commandWidgetClass,
-                                  form, args, j);   
-    XtAddCallback(b_cancel, XtNcallback, TimeControlPopDown, (XtPointer) 0);
-
-    XtRealizeWidget(popup);
-    CatchDeleteWindow(popup, "TimeControlPopDown");
-    
-    XQueryPointer(xDisplay, xBoardWindow, &root, &child,
-                 &x, &y, &win_x, &win_y, &mask);
-    
-    XtSetArg(args[0], XtNx, x - 10);
-    XtSetArg(args[1], XtNy, y - 30);
-    XtSetValues(popup, args, 2);
-    
-    XtPopup(popup, XtGrabExclusive);
-    TimeControlUp = True;
-    
-    previous = NULL;
-    SetFocus(tcTime, popup, (XEvent*) NULL, False);
-//    XtSetKeyboardFocus(popup, tcTime);
-}
-
-void TimeControlProc(w, event, prms, nprms)
-     Widget w;
-     XEvent *event;
-     String *prms;
-     Cardinal *nprms;
-{
-   TimeControlPopUp();
-}
-
-//--------------------------- Engine-Options Menu Popup ----------------------------------
-int EngineUp;
-Widget EngineShell;
-extern int adjudicateLossThreshold;
-
-Widget engDrawMoves, engThreshold, engRule, engRepeat;
-
-void EnginePopDown()
-{
-    if (!EngineUp) return;
-    XtPopdown(EngineShell);
-    XtDestroyWidget(EngineShell);
-    EngineUp = False;
-    ModeHighlight();
-}
-
-int ReadToggle(Widget w)
-{
-    Arg args; Boolean res;
-
-    XtSetArg(args, XtNstate, &res);
-    XtGetValues(w, &args, 1);
-
-    return res;
-}
-
-Widget w1, w2, w3, w4, w5, w6, w7, w8;
-
-void EngineCallback(w, client_data, call_data)
-     Widget w;
-     XtPointer client_data, call_data;
-{
-    String name;
-    Widget s2;
-    Arg args[16];
-    char buf[80];
-    int j;
-    
-    XtSetArg(args[0], XtNlabel, &name);
-    XtGetValues(w, args, 1);
-    
-    if (strcmp(name, "OK") == 0) {
-       // read all switches
-       appData.periodicUpdates = ReadToggle(w1);
-//     appData.hideThinkingFromHuman = ReadToggle(w2);
-       appData.firstScoreIsAbsolute  = ReadToggle(w3);
-       appData.secondScoreIsAbsolute = ReadToggle(w4);
-       appData.testClaims    = ReadToggle(w5);
-       appData.checkMates    = ReadToggle(w6);
-       appData.materialDraws = ReadToggle(w7);
-       appData.trivialDraws  = ReadToggle(w8);
-
-       // adjust setting in other menu for duplicates 
-       // (perhaps duplicates should be removed from general Option Menu?)
-//     XtSetArg(args[0], XtNleftBitmap, appData.showThinking ? xMarkPixmap : None);
-//     XtSetValues(XtNameToWidget(menuBarWidget,
-//                                "menuOptions.Show Thinking"), args, 1);
-
-       // read out numeric controls, simply ignore bad formats for now
-       XtSetArg(args[0], XtNstring, &name);
-       XtGetValues(engDrawMoves, args, 1);
-       if(sscanf(name, "%d", &j) == 1) appData.adjudicateDrawMoves = j;
-       XtGetValues(engThreshold, args, 1);
-       if(sscanf(name, "%d", &j) == 1) 
-               adjudicateLossThreshold = appData.adjudicateLossThreshold = -j; // inverted!
-       XtGetValues(engRule, args, 1);
-       if(sscanf(name, "%d", &j) == 1) appData.ruleMoves = j;
-       XtGetValues(engRepeat, args, 1);
-       if(sscanf(name, "%d", &j) == 1) appData.drawRepeats = j;
-
-        EnginePopDown();
-       ShowThinkingEvent(); // [HGM] thinking: score adjudication might need thinking output
-        return;
-    }
-}
-
-void EnginePopUp()
-{
-    Arg args[16];
-    Widget popup, layout, form, edit, b_ok, b_cancel, b_clas, b_inc, s1; 
-    Window root, child;
-    int x, y, i, j, width;
-    int win_x, win_y;
-    unsigned int mask;
-    char def[80];
-    
-    tcInc = (appData.timeIncrement >= 0);
-    tcMoves = appData.movesPerSession; tcIncrement = appData.timeIncrement;
-    if(!tcInc) tcIncrement = 0;
-    sprintf(def, "%d", tcInc ? tcIncrement : tcMoves);
-
-    i = 0;
-    XtSetArg(args[i], XtNresizable, True); i++;
-//    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;
-    EngineShell = popup =
-      XtCreatePopupShell("Adjudications", transientShellWidgetClass,
-                        shellWidget, args, i);
-    
-    layout =
-      XtCreateManagedWidget(layoutName, formWidgetClass, popup,
-                           layoutArgs, XtNumber(layoutArgs));
-  
-    form =
-      XtCreateManagedWidget(layoutName, formWidgetClass, layout,
-                           formArgs, XtNumber(formArgs));
-  
-    j = 0;
-//    XtSetArg(args[j], XtNwidth,     (XtArgVal) 250); j++;
-//    XtSetArg(args[j], XtNheight,    (XtArgVal) 400); j++;
-//    XtSetValues(popup, args, j);
-
-    j = 0;
-//    XtSetArg(args[j], XtNwidth,       (XtArgVal) 250); j++;
-//    XtSetArg(args[j], XtNheight,      (XtArgVal) 20); j++;
-    XtSetArg(args[j], XtNleft,        (XtArgVal) XtChainLeft); j++;
-    XtSetArg(args[j], XtNright,       (XtArgVal) XtChainRight); j++;
-    XtSetArg(args[j], XtNstate,       appData.periodicUpdates); j++;
-//    XtSetArg(args[j], XtNjustify,     (XtArgVal) XtJustifyLeft); j++;
-    w1 = XtCreateManagedWidget("Periodic Updates (Analysis Mode)", toggleWidgetClass, form, args, j);
-
-    XtSetArg(args[j], XtNwidth,       (XtArgVal) &width);
-    XtGetValues(w1, &args[j], 1);
-
-//    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w1);
-//    XtSetArg(args[j-3], XtNstate,       appData.hideThinkingFromHuman);
-//    w2 = XtCreateManagedWidget("Hide Thinking from Human", toggleWidgetClass, form, args, j);
-
-    XtSetArg(args[j], XtNwidth,       (XtArgVal) width); j++;
-    XtSetArg(args[j-2], XtNstate,     appData.firstScoreIsAbsolute);
-    XtSetArg(args[j], XtNfromVert,    (XtArgVal) w1); j++;
-    w3 = XtCreateManagedWidget("Engine #1 Score is Absolute", toggleWidgetClass, form, args, j);
-
-    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w3);
-    XtSetArg(args[j-3], XtNstate,       appData.secondScoreIsAbsolute);
-    w4 = XtCreateManagedWidget("Engine #2 Score is Absolute", toggleWidgetClass, form, args, j);
-
-    s1 = XtCreateManagedWidget("\nEngine-Engine Adjudications:", labelWidgetClass, form, args, 3);
-
-    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) s1);
-    XtSetArg(args[j-3], XtNstate,       appData.testClaims);
-    w5 = XtCreateManagedWidget("Verify Engine Result Claims", toggleWidgetClass, form, args, j);
-
-    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w5);
-    XtSetArg(args[j-3], XtNstate,       appData.checkMates);
-    w6 = XtCreateManagedWidget("Detect All Mates", toggleWidgetClass, form, args, j);
-
-    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w6);
-    XtSetArg(args[j-3], XtNstate,       appData.materialDraws);
-    w7 = XtCreateManagedWidget("Draw when Insuff. Mating Material", toggleWidgetClass, form, args, j);
-
-    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w7);
-    XtSetArg(args[j-3], XtNstate,       appData.trivialDraws);
-    w8 = XtCreateManagedWidget("Adjudicate Trivial Draws", toggleWidgetClass, form, args, j);
-
-    XtSetArg(args[0], XtNfromVert,  (XtArgVal) w4);
-    XtSetArg(args[1], XtNborderWidth, (XtArgVal) 0);
-    XtSetValues(s1, args, 2);
-
-    sprintf(def, "%d", appData.adjudicateDrawMoves);
-    j= 0;
-    XtSetArg(args[j], XtNborderWidth, 1); j++;
-    XtSetArg(args[j], XtNfromVert, w8); j++;
-    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-    XtSetArg(args[j], XtNstring, def);  j++;
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNresizable, True);  j++;
-    XtSetArg(args[j], XtNwidth,  60);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    engDrawMoves = XtCreateManagedWidget("Length", asciiTextWidgetClass, form, args, j);
-    XtAddEventHandler(engDrawMoves, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-
-    j= 0;
-    XtSetArg(args[j], XtNlabel, " moves maximum, then draw"); j++;
-    XtSetArg(args[j], XtNjustify,     (XtArgVal) XtJustifyLeft); j++;
-    XtSetArg(args[j], XtNborderWidth, 0); j++;
-    XtSetArg(args[j], XtNfromVert, w8); j++;
-    XtSetArg(args[j], XtNfromHoriz, engDrawMoves); j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-//    XtSetArg(args[j], XtNwidth,  170);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcMess1 = XtCreateManagedWidget("TCtext", labelWidgetClass, form, args, j);
-
-    sprintf(def, "%d", -appData.adjudicateLossThreshold); // inverted!
-    j= 0;
-    XtSetArg(args[j], XtNborderWidth, 1); j++;
-    XtSetArg(args[j], XtNfromVert, engDrawMoves); j++;
-    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-    XtSetArg(args[j], XtNstring, def);  j++;
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNresizable, True);  j++;
-    XtSetArg(args[j], XtNwidth,  60);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    engThreshold = XtCreateManagedWidget("Threshold", asciiTextWidgetClass, form, args, j);
-    XtAddEventHandler(engThreshold, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-
-    j= 0;
-    XtSetArg(args[j], XtNlabel, "-centiPawn lead is win"); j++;
-    XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;
-    XtSetArg(args[j], XtNborderWidth, 0); j++;
-    XtSetArg(args[j], XtNfromVert, engDrawMoves); j++;
-    XtSetArg(args[j], XtNfromHoriz, engThreshold); j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-//    XtSetArg(args[j], XtNwidth,  150);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcMess2 = XtCreateManagedWidget("MPStext", labelWidgetClass, form, args, j);
-
-    sprintf(def, "%d", appData.ruleMoves);
-    j= 0;
-    XtSetArg(args[j], XtNborderWidth, 1); j++;
-    XtSetArg(args[j], XtNfromVert, engThreshold); j++;
-    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-    XtSetArg(args[j], XtNstring, def);  j++;
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNresizable, True);  j++;
-    XtSetArg(args[j], XtNwidth,  30);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    engRule = XtCreateManagedWidget("Rule", asciiTextWidgetClass, form, args, j);
-    XtAddEventHandler(engRule, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-
-    j= 0;
-    XtSetArg(args[j], XtNlabel, "-move rule applied"); j++;
-    XtSetArg(args[j], XtNjustify,     (XtArgVal) XtJustifyLeft); j++;
-    XtSetArg(args[j], XtNborderWidth, 0); j++;
-    XtSetArg(args[j], XtNfromVert, engThreshold); j++;
-    XtSetArg(args[j], XtNfromHoriz, engRule); j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-//    XtSetArg(args[j], XtNwidth,  130);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcMess1 = XtCreateManagedWidget("TCtext", labelWidgetClass, form, args, j);
-
-    sprintf(def, "%d", appData.drawRepeats);
-    j= 0;
-    XtSetArg(args[j], XtNborderWidth, 1); j++;
-    XtSetArg(args[j], XtNfromVert, engRule); j++;
-    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-    XtSetArg(args[j], XtNstring, def);  j++;
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNresizable, True);  j++;
-    XtSetArg(args[j], XtNwidth,  30);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    engRepeat = XtCreateManagedWidget("Repeats", asciiTextWidgetClass, form, args, j);
-    XtAddEventHandler(engRepeat, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-
-    j= 0;
-    XtSetArg(args[j], XtNlabel, "-fold repeat is draw"); j++;
-    XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;
-    XtSetArg(args[j], XtNborderWidth, 0); j++;
-    XtSetArg(args[j], XtNfromVert, engRule); j++;
-    XtSetArg(args[j], XtNfromHoriz, engRepeat); j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-//    XtSetArg(args[j], XtNwidth,  130);  j++;
-//    XtSetArg(args[j], XtNheight, 20);  j++;
-    tcMess2 = XtCreateManagedWidget("MPStext", labelWidgetClass, form, args, j);
-
-    j=0;
-    XtSetArg(args[j], XtNfromVert, engRepeat);  j++;
-    XtSetArg(args[j], XtNfromHoriz, tcMess2);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    b_ok= XtCreateManagedWidget("OK", commandWidgetClass, form, args, j);   
-    XtAddCallback(b_ok, XtNcallback, EngineCallback, (XtPointer) 0);
-
-    j=0;
-    XtSetArg(args[j], XtNfromVert, engRepeat);  j++;
-    XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    b_cancel= XtCreateManagedWidget("cancel", commandWidgetClass,
-                                  form, args, j);   
-    XtAddCallback(b_cancel, XtNcallback, EnginePopDown, (XtPointer) 0);
-
-    XtRealizeWidget(popup);
-    CatchDeleteWindow(popup, "EnginePopDown");
-    
-    XQueryPointer(xDisplay, xBoardWindow, &root, &child,
-                 &x, &y, &win_x, &win_y, &mask);
-    
-    XtSetArg(args[0], XtNx, x - 10);
-    XtSetArg(args[1], XtNy, y - 30);
-    XtSetValues(popup, args, 2);
-    
-    XtPopup(popup, XtGrabExclusive);
-    EngineUp = True;
-    
-    previous = NULL;
-    SetFocus(engThreshold, popup, (XEvent*) NULL, False);
-}
-
-void EngineMenuProc(w, event, prms, nprms)
-     Widget w;
-     XEvent *event;
-     String *prms;
-     Cardinal *nprms;
-{
-   EnginePopUp();
-}
-
-//--------------------------- New-Variant Menu PopUp -----------------------------------
-struct NewVarButton {
-  char   *name;
-  char *color;
-  Widget handle;
-  VariantClass variant;
-};
-
-struct NewVarButton buttonDesc[] = {
-    {"normal",            "#FFFFFF", 0, VariantNormal},
-    {"FRC",               "#FFFFFF", 0, VariantFischeRandom},
-    {"wild castle",       "#FFFFFF", 0, VariantWildCastle},
-    {"no castle",         "#FFFFFF", 0, VariantNoCastle},
-    {"knightmate",        "#FFFFFF", 0, VariantKnightmate},
-    {"berolina",          "#FFFFFF", 0, VariantBerolina},
-    {"cylinder",          "#FFFFFF", 0, VariantCylinder},
-    {"shatranj",          "#FFFFFF", 0, VariantShatranj},
-    {"atomic",            "#FFFFFF", 0, VariantAtomic},
-    {"two kings",         "#FFFFFF", 0, VariantTwoKings},
-    {"3-checks",          "#FFFFFF", 0, Variant3Check},
-    {"suicide",           "#FFFFBF", 0, VariantSuicide},
-    {"give-away",         "#FFFFBF", 0, VariantGiveaway},
-    {"losers",            "#FFFFBF", 0, VariantLosers},
-    {"fairy",             "#BFBFBF", 0, VariantFairy},
-    {"Superchess",        "#FFBFBF", 0, VariantSuper},
-    {"crazyhouse",        "#FFBFBF", 0, VariantCrazyhouse},
-    {"bughouse",          "#FFBFBF", 0, VariantBughouse},
-    {"shogi (9x9)",       "#BFFFFF", 0, VariantShogi},
-    {"xiangqi (9x10)",    "#BFFFFF", 0, VariantXiangqi},
-    {"courier (12x8)",    "#BFFFBF", 0, VariantCourier},
-    {"janus (10x8)",      "#BFBFFF", 0, VariantJanus},
-    {"Capablanca (10x8)", "#BFBFFF", 0, VariantCapablanca},
-    {"CRC (10x8)",        "#BFBFFF", 0, VariantCapaRandom},
-#ifdef GOTHIC
-    {"Gothic (10x8)",     "#BFBFFF", 0, VariantGothic},
-#endif
-#ifdef FALCON
-    {"Falcon (10x8)",     "#BFBFFF", 0, VariantFalcon},
-#endif
-    {NULL,                0, 0, (VariantClass) 0}
-};
-
-int NewVariantUp;
-Widget NewVariantShell;
-
-void NewVariantPopDown()
-{
-    if (!NewVariantUp) return;
-    XtPopdown(NewVariantShell);
-    XtDestroyWidget(NewVariantShell);
-    NewVariantUp = False;
-    ModeHighlight();
-}
-
-void NewVariantCallback(w, client_data, call_data)
-     Widget w;
-     XtPointer client_data, call_data;
-{
-    String name;
-    Widget w2;
-    Arg args[16];
-    char buf[80];
-    VariantClass v;
-    
-    XtSetArg(args[0], XtNlabel, &name);
-    XtGetValues(w, args, 1);
-    
-    if (strcmp(name, "  OK  ") == 0) {
-       int nr = (int) XawToggleGetCurrent(buttonDesc[0].handle) - 1;
-       if(nr < 0) return;
-       v = buttonDesc[nr].variant;
-       if(!appData.noChessProgram) { 
-           char *name = VariantName(v), buf[MSG_SIZ];
-           if (first.protocolVersion > 1 && StrStr(first.variants, name) == NULL) {
-               /* [HGM] in protocol 2 we check if variant is suported by engine */
-               sprintf(buf, "Variant %s not supported by %s", name, first.tidy);
-               DisplayError(buf, 0);
-//             NewVariantPopDown();
-               return; /* ignore OK if first engine does not support it */
-           } else
-           if (second.initDone && second.protocolVersion > 1 && StrStr(second.variants, name) == NULL) {
-               sprintf(buf, "Warning: second engine (%s) does not support this!", second.tidy);
-               DisplayError(buf, 0);   /* use of second engine is optional; only warn user */
-           }
-       }
-
-       gameInfo.variant = v;
-       appData.variant = VariantName(v);
-
-       shuffleOpenings = FALSE; /* [HGM] shuffle: possible shuffle reset when we switch */
-       startedFromPositionFile = FALSE; /* [HGM] loadPos: no longer valid in new variant */
-       appData.pieceToCharTable = NULL;
-       Reset(True, True);
-        NewVariantPopDown();
-        return;
-    }
-}
-
-void NewVariantPopUp()
-{
-    Arg args[16];
-    Widget popup, layout, dialog, edit, form, last = NULL, b_ok, b_cancel;
-    Window root, child;
-    int x, y, i, j;
-    int win_x, win_y;
-    unsigned int mask;
-    char def[80];
-    XrmValue vFrom, vTo;
-
-    i = 0;
-    XtSetArg(args[i], XtNresizable, True); i++;
-//    XtSetArg(args[i], XtNwidth, 250); i++;
-//    XtSetArg(args[i], XtNheight, 300); i++;
-    NewVariantShell = popup =
-      XtCreatePopupShell("NewVariant Menu", transientShellWidgetClass,
-                        shellWidget, args, i);
-    
-    layout =
-      XtCreateManagedWidget(layoutName, formWidgetClass, popup,
-                           layoutArgs, XtNumber(layoutArgs));
-  
-    form =
-      XtCreateManagedWidget("form", formWidgetClass, layout,
-                           formArgs, XtNumber(formArgs));
-  
-    for(i = 0; buttonDesc[i].name != NULL; i++) {
-       Pixel buttonColor;
-       if (!appData.monoMode) {
-           vFrom.addr = (caddr_t) buttonDesc[i].color;
-           vFrom.size = strlen(buttonDesc[i].color);
-           XtConvert(shellWidget, XtRString, &vFrom, XtRPixel, &vTo);
-           if (vTo.addr == NULL) {
-               buttonColor = (Pixel) -1;
-           } else {
-               buttonColor = *(Pixel *) vTo.addr;
-           }
-       }
-    
-       j = 0;
-       XtSetArg(args[j], XtNradioGroup, last); j++;
-       XtSetArg(args[j], XtNwidth, 125); j++;
-//     XtSetArg(args[j], XtNheight, 16); j++;
-       XtSetArg(args[j], XtNfromVert, i == 15 ? NULL : last); j++;
-       XtSetArg(args[j], XtNfromHoriz, i < 15 ? NULL : buttonDesc[i-15].handle); j++;
-       XtSetArg(args[j], XtNradioData, i+1); j++;
-       XtSetArg(args[j], XtNbackground, buttonColor); j++;
-       XtSetArg(args[j], XtNstate, gameInfo.variant == buttonDesc[i].variant); j++;
-       buttonDesc[i].handle = last =
-           XtCreateManagedWidget(buttonDesc[i].name, toggleWidgetClass, form, args, j);
-    }
-
-    j=0;
-    XtSetArg(args[j], XtNfromVert, buttonDesc[12].handle);  j++;
-    XtSetArg(args[j], XtNfromHoriz, buttonDesc[12].handle);  j++;
-    XtSetArg(args[j], XtNheight, 35); j++;
-//    XtSetArg(args[j], XtNwidth, 60); j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    b_cancel= XtCreateManagedWidget("CANCEL", commandWidgetClass, form, args, j);   
-    XtAddCallback(b_cancel, XtNcallback, NewVariantPopDown, (XtPointer) 0);
-
-    j=0;
-    XtSetArg(args[j], XtNfromHoriz, b_cancel);  j++;
-    XtSetArg(args[j], XtNfromVert, buttonDesc[12].handle);  j++;
-    XtSetArg(args[j], XtNheight, 35); j++;
-//    XtSetArg(args[j], XtNwidth, 60); j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    b_ok= XtCreateManagedWidget("  OK  ", commandWidgetClass, form, args, j);   
-    XtAddCallback(b_ok, XtNcallback, NewVariantCallback, (XtPointer) 0);
-
-    XtRealizeWidget(popup);
-    CatchDeleteWindow(popup, "NewVariantPopDown");
-    
-    XQueryPointer(xDisplay, xBoardWindow, &root, &child,
-                 &x, &y, &win_x, &win_y, &mask);
-    
-    XtSetArg(args[0], XtNx, x - 10);
-    XtSetArg(args[1], XtNy, y - 30);
-    XtSetValues(popup, args, 2);
-    
-    XtPopup(popup, XtGrabExclusive);
-    NewVariantUp = True;
-}
-
-void NewVariantProc(w, event, prms, nprms)
-     Widget w;
-     XEvent *event;
-     String *prms;
-     Cardinal *nprms;
-{
-   NewVariantPopUp();
-}
-
-//--------------------------- UCI Menu Popup ------------------------------------------
-int UciUp;
-Widget UciShell;
-
-struct UciControl {
-  char *name;
-  Widget handle;
-  void *ptr;
-};
-
-struct UciControl controlDesc[] = {
-  {"maximum nr of CPUs:", 0, &appData.smpCores},
-  {"Polyglot Directory:", 0, &appData.polyglotDir},
-  {"Hash Size (MB):",     0, &appData.defaultHashSize},
-  {"EGTB Path:",          0, &appData.defaultPathEGTB},
-  {"EGTB Cache (MB):",    0, &appData.defaultCacheSizeEGTB},
-  {"Polyglot Book:",      0, &appData.polyglotBook},
-  {NULL, 0, NULL},
-};
-
-void UciPopDown()
-{
-    if (!UciUp) return;
-    XtPopdown(UciShell);
-    XtDestroyWidget(UciShell);
-    UciUp = False;
-    ModeHighlight();
-}
-
-void UciCallback(w, client_data, call_data)
-     Widget w;
-     XtPointer client_data, call_data;
-{
-    String name;
-    Arg args[16];
-    char buf[80];
-    int oldCores = appData.smpCores, ponder = 0;
-    
-    XtSetArg(args[0], XtNlabel, &name);
-    XtGetValues(w, args, 1);
-    
-    if (strcmp(name, "OK") == 0) {
-       int nr, i, j; String name;
-       for(i=0; i<6; i++) {
-           XtSetArg(args[0], XtNstring, &name);
-           XtGetValues(controlDesc[i].handle, args, 1);
-           if(i&1) {
-               if(name)
-                   *(char**) controlDesc[i].ptr = strdup(name);
-           } else {
-               if(sscanf(name, "%d", &j) == 1) 
-                   *(int*) controlDesc[i].ptr = j;
-           }
-       }
-       XtSetArg(args[0], XtNstate, &appData.usePolyglotBook);
-       XtGetValues(w1, args, 1);
-       XtSetArg(args[0], XtNstate, &appData.firstHasOwnBookUCI);
-       XtGetValues(w2, args, 1);
-       XtSetArg(args[0], XtNstate, &appData.secondHasOwnBookUCI);
-       XtGetValues(w3, args, 1);
-       XtSetArg(args[0], XtNstate, &ponder);
-       XtGetValues(w4, args, 1);
-
-       // adjust setting in other menu for duplicates 
-       // (perhaps duplicates should be removed from general Option Menu?)
-       XtSetArg(args[0], XtNleftBitmap, ponder ? xMarkPixmap : None);
-       XtSetValues(XtNameToWidget(menuBarWidget,
-                                  "menuOptions.Ponder Next Move"), args, 1);
-
-       // make sure changes are sent to first engine by re-initializing it
-       // if it was already started pre-emptively at end of previous game
-       if(gameMode == BeginningOfGame) Reset(True, True); else {
-           // Some changed setting need immediate sending always.
-           PonderNextMoveEvent(ponder);
-           if(oldCores != appData.smpCores)
-               NewSettingEvent(False, "cores", appData.smpCores);
-      }
-      UciPopDown();
-      return;
-    }
-}
-
-void UciPopUp()
-{
-    Arg args[16];
-    Widget popup, layout, dialog, edit, form, b_ok, b_cancel, last = NULL, new, upperLeft;
-    Window root, child;
-    int x, y, i, j;
-    int win_x, win_y;
-    unsigned int mask;
-    char def[80];
-    
-    i = 0;
-    XtSetArg(args[i], XtNresizable, True); i++;
-//    XtSetArg(args[i], XtNwidth, 300); i++;
-    UciShell = popup =
-      XtCreatePopupShell("Engine Settings", transientShellWidgetClass,
-                        shellWidget, args, i);
-    
-    layout =
-      XtCreateManagedWidget(layoutName, formWidgetClass, popup,
-                           layoutArgs, XtNumber(layoutArgs));
-  
-    
-    form =
-      XtCreateManagedWidget("form", formWidgetClass, layout,
-                           formArgs, XtNumber(formArgs));
-  
-    j = 0;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-//    XtSetArg(args[j], XtNheight, 20); j++;
-    for(i = 0; controlDesc[i].name != NULL; i++) {
-       j = 3;
-       XtSetArg(args[j], XtNfromVert, last); j++;
-//     XtSetArg(args[j], XtNwidth, 130); j++;
-       XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;
-       XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-       XtSetArg(args[j], XtNborderWidth, 0); j++;
-       new = XtCreateManagedWidget(controlDesc[i].name, labelWidgetClass, form, args, j);
-       if(i==0) upperLeft = new;
-
-       j = 4;
-       XtSetArg(args[j], XtNborderWidth, 1); j++;
-       XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-       XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-       XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-       XtSetArg(args[j], XtNright, XtChainRight);  j++;
-       XtSetArg(args[j], XtNresizable, True);  j++;
-       XtSetArg(args[j], XtNwidth, i&1 ? 245 : 50); j++;
-       if(i&1) {
-           XtSetArg(args[j], XtNstring, * (char**) controlDesc[i].ptr ? 
-                                        * (char**) controlDesc[i].ptr : ""); j++;
-       } else {
-           sprintf(def, "%d", * (int*) controlDesc[i].ptr);
-           XtSetArg(args[j], XtNstring, def); j++;
-       }
-       XtSetArg(args[j], XtNfromHoriz, upperLeft); j++;
-       controlDesc[i].handle = last =
-           XtCreateManagedWidget("text", asciiTextWidgetClass, form, args, j);
-       XtAddEventHandler(last, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-    }
-
-    j=0;
-    XtSetArg(args[j], XtNfromHoriz, controlDesc[0].handle);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
-    XtSetArg(args[j], XtNleft, XtChainRight);  j++;
-    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    XtSetArg(args[j], XtNstate, appData.ponderNextMove);  j++;
-    w4 = XtCreateManagedWidget("Ponder", toggleWidgetClass, form, args, j);   
-
-    j=0;
-    XtSetArg(args[j], XtNfromVert, last);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    b_ok = XtCreateManagedWidget("OK", commandWidgetClass, form, args, j);   
-    XtAddCallback(b_ok, XtNcallback, UciCallback, (XtPointer) 0);
-
-    XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;
-    b_cancel = XtCreateManagedWidget("cancel", commandWidgetClass, form, args, j);   
-    XtAddCallback(b_cancel, XtNcallback, UciPopDown, (XtPointer) 0);
-
-    j = 5;
-    XtSetArg(args[j], XtNfromHoriz, upperLeft);  j++;
-    XtSetArg(args[j], XtNstate, appData.usePolyglotBook);  j++;
-    w1 = XtCreateManagedWidget(" use book ", toggleWidgetClass, form, args, j);   
-//    XtAddCallback(w1, XtNcallback, UciCallback, (XtPointer) 0);
-
-    j = 5;
-    XtSetArg(args[j], XtNfromHoriz, w1);  j++;
-    XtSetArg(args[j], XtNstate, appData.firstHasOwnBookUCI);  j++;
-    w2 = XtCreateManagedWidget("own book 1", toggleWidgetClass, form, args, j);   
-//    XtAddCallback(w2, XtNcallback, UciCallback, (XtPointer) 0);
-
-    j = 5;
-    XtSetArg(args[j], XtNfromHoriz, w2);  j++;
-    XtSetArg(args[j], XtNstate, appData.secondHasOwnBookUCI);  j++;
-    w3 = XtCreateManagedWidget("own book 2", toggleWidgetClass, form, args, j);   
-//    XtAddCallback(w3, XtNcallback, UciCallback, (XtPointer) 0);
-
-    XtRealizeWidget(popup);
-    CatchDeleteWindow(popup, "UciPopDown");
-    
-    XQueryPointer(xDisplay, xBoardWindow, &root, &child,
-                 &x, &y, &win_x, &win_y, &mask);
-    
-    XtSetArg(args[0], XtNx, x - 10);
-    XtSetArg(args[1], XtNy, y - 30);
-    XtSetValues(popup, args, 2);
-    
-    XtPopup(popup, XtGrabExclusive);
-    UciUp = True;
-
-    previous = NULL;
-    SetFocus(controlDesc[2].handle, popup, (XEvent*) NULL, False);
-//    XtSetKeyboardFocus(popup, controlDesc[1].handle);
-}
-
-void UciMenuProc(w, event, prms, nprms)
-     Widget w;
-     XEvent *event;
-     String *prms;
-     Cardinal *nprms;
-{
-   UciPopUp();
-}
-
-//--------------------------- Engine-specific options menu ----------------------------------
-
-int SettingsUp;
-Widget SettingsShell;
-int values[MAX_OPTIONS];
-ChessProgramState *currentCps;
-
-void SettingsPopDown()
-{
-    if (!SettingsUp) return;
-    XtPopdown(SettingsShell);
-    XtDestroyWidget(SettingsShell);
-    SettingsUp = False;
-    ModeHighlight();
-}
-
-void SpinCallback(w, client_data, call_data)
-     Widget w;
-     XtPointer client_data, call_data;
-{
-    String name, val;
-    Widget w2;
-    Arg args[16];
-    char buf[MSG_SIZ];
-    int i, j;
-    
-    XtSetArg(args[0], XtNlabel, &name);
-    XtGetValues(w, args, 1);
-    
-    j = 0;
-    XtSetArg(args[0], XtNstring, &val);
-    XtGetValues(currentCps->option[(int)client_data].handle, args, 1);
-    sscanf(val, "%d", &j);
-    if (strcmp(name, "+") == 0) {
-       if(++j > currentCps->option[(int)client_data].max) return;
-    } else
-    if (strcmp(name, "-") == 0) {
-       if(--j < currentCps->option[(int)client_data].min) return;
-    } else return;
-    sprintf(buf, "%d", j);
-    XtSetArg(args[0], XtNstring, buf);
-    XtSetValues(currentCps->option[(int)client_data].handle, args, 1);
-}
-
-void SettingsCallback(w, client_data, call_data)
-     Widget w;
-     XtPointer client_data, call_data;
-{
-    String name, val;
-    Widget w2;
-    Arg args[16];
-    char buf[MSG_SIZ];
-    int i, j;
-    
-    XtSetArg(args[0], XtNlabel, &name);
-    XtGetValues(w, args, 1);
-    
-    if (strcmp(name, "cancel") == 0) {
-        SettingsPopDown();
-        return;
-    }
-    if (strcmp(name, "OK") == 0 || (int)client_data) { // save buttons imply OK
-       int nr;
-
-       for(i=0; i<currentCps->nrOptions; i++) { // send all options that had to be OK-ed to engine
-           switch(currentCps->option[i].type) {
-               case TextBox:
-                   XtSetArg(args[0], XtNstring, &val);
-                   XtGetValues(currentCps->option[i].handle, args, 1);
-                   if(strcmp(currentCps->option[i].textValue, val)) {
-                       strcpy(currentCps->option[i].textValue, val);
-                       sprintf(buf, "option %s %s\n", currentCps->option[i].name, val);
-                       SendToProgram(buf, currentCps);
-                   }
-                   break;
-               case Spin:
-                   XtSetArg(args[0], XtNstring, &val);
-                   XtGetValues(currentCps->option[i].handle, args, 1);
-                   sscanf(val, "%d", &j);
-                   if(j > currentCps->option[i].max) j = currentCps->option[i].max;
-                   if(j < currentCps->option[i].min) j = currentCps->option[i].min;
-                   if(currentCps->option[i].value != j) {
-                       currentCps->option[i].value = j;
-                       sprintf(buf, "option %s %d\n", currentCps->option[i].name, j);
-                       SendToProgram(buf, currentCps);
-                   }
-                   break;
-               case CheckBox:
-                   j = 0;
-                   XtSetArg(args[0], XtNstate, &j);
-                   XtGetValues(currentCps->option[i].handle, args, 1);
-                   if(currentCps->option[i].value != j) {
-                       currentCps->option[i].value = j;
-                       sprintf(buf, "option %s %d\n", currentCps->option[i].name, j);
-                       SendToProgram(buf, currentCps);
-                   }
-                   break;
-               case ComboBox:
-                   if(currentCps->option[i].value != values[i]) {
-                       currentCps->option[i].value = values[i];
-                       sprintf(buf, "option %s %s\n", currentCps->option[i].name, 
-                               ((char**)currentCps->option[i].textValue)[values[i]]);
-                       SendToProgram(buf, currentCps);
-                   }
-                   break;
-           }
-       }
-       if((int)client_data) { // send save-button command to engine
-           sprintf(buf, "option %s\n", name);
-           SendToProgram(buf, currentCps);
-       }
-        SettingsPopDown();
-        return;
-    }
-    sprintf(buf, "option %s\n", name);
-    SendToProgram(buf, currentCps);
-}
-
-void ComboSelect(w, addr, index) // callback for all combo items
+/*\r
+ * xoptions.c -- Move list window, part of X front end for XBoard\r
+ *\r
+ * Copyright 2000 Free Software Foundation, Inc.\r
+ *\r
+ * The following terms apply to the enhanced version of XBoard distributed\r
+ * by the Free Software Foundation:\r
+ * ------------------------------------------------------------------------\r
+ * This program is free software; you can redistribute it and/or modify\r
+ * it under the terms of the GNU General Public License as published by\r
+ * the Free Software Foundation; either version 2 of the License, or\r
+ * (at your option) any later version.\r
+ *\r
+ * This program is distributed in the hope that it will be useful,\r
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
+ * GNU General Public License for more details.\r
+ *\r
+ * You should have received a copy of the GNU General Public License\r
+ * along with this program; if not, write to the Free Software\r
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.\r
+ * ------------------------------------------------------------------------\r
+ *\r
+ * See the file ChangeLog for a revision history.\r
+ */\r
+\r
+// [HGM] this file is the counterpart of woptions.c, containing xboard popup menus\r
+// similar to those of WinBoard, to set the most common options interactively.\r
+\r
+#include "config.h"\r
+\r
+#include <stdio.h>\r
+#include <ctype.h>\r
+#include <errno.h>\r
+#include <sys/types.h>\r
+\r
+#if STDC_HEADERS\r
+# include <stdlib.h>\r
+# include <string.h>\r
+#else /* not STDC_HEADERS */\r
+extern char *getenv();\r
+# if HAVE_STRING_H\r
+#  include <string.h>\r
+# else /* not HAVE_STRING_H */\r
+#  include <strings.h>\r
+# endif /* not HAVE_STRING_H */\r
+#endif /* not STDC_HEADERS */\r
+\r
+#if HAVE_UNISTD_H\r
+# include <unistd.h>\r
+#endif\r
+\r
+#include <X11/Intrinsic.h>\r
+#include <X11/StringDefs.h>\r
+#include <X11/Shell.h>\r
+#include <X11/Xaw/Dialog.h>\r
+#include <X11/Xaw/Form.h>\r
+#include <X11/Xaw/List.h>\r
+#include <X11/Xaw/Label.h>\r
+#include <X11/Xaw/SimpleMenu.h>\r
+#include <X11/Xaw/SmeBSB.h>\r
+#include <X11/Xaw/SmeLine.h>\r
+#include <X11/Xaw/Box.h>\r
+#include <X11/Xaw/Paned.h>\r
+#include <X11/Xaw/MenuButton.h>\r
+#include <X11/cursorfont.h>\r
+#include <X11/Xaw/Text.h>\r
+#include <X11/Xaw/AsciiText.h>\r
+#include <X11/Xaw/Viewport.h>\r
+#include <X11/Xaw/Toggle.h>\r
+\r
+#include "common.h"\r
+#include "backend.h"\r
+#include "xboard.h"\r
+#include "gettext.h"\r
+\r
+#ifdef ENABLE_NLS\r
+# define  _(s) gettext (s)\r
+# define N_(s) gettext_noop (s)\r
+#else\r
+# define  _(s) (s)\r
+# define N_(s)  s\r
+#endif\r
+\r
+extern Widget formWidget, shellWidget, boardWidget, menuBarWidget;\r
+extern Display *xDisplay;\r
+extern int squareSize;\r
+extern Pixmap xMarkPixmap;\r
+extern char *layoutName;\r
+extern Window xBoardWindow;\r
+extern Arg layoutArgs[2], formArgs[2];\r
+Pixel timerForegroundPixel, timerBackgroundPixel;\r
+\r
+// [HGM] the following code for makng menu popups was cloned from the FileNamePopUp routines\r
+\r
+static Widget previous = NULL;\r
+\r
+void SetFocus(Widget w, XtPointer data, XEvent *event, Boolean *b)\r
+{\r
+    Arg args;\r
+\r
+    if(previous) {\r
+       XtSetArg(args, XtNdisplayCaret, False);\r
+       XtSetValues(previous, &args, 1);\r
+    }\r
+    XtSetArg(args, XtNdisplayCaret, True);\r
+    XtSetValues(w, &args, 1);\r
+    XtSetKeyboardFocus((Widget) data, w);\r
+    previous = w;\r
+}\r
+\r
+//--------------------------- New Shuffle Game --------------------------------------------\r
+extern int shuffleOpenings;\r
+extern int startedFromPositionFile;\r
+int shuffleUp;\r
+Widget shuffleShell;\r
+\r
+void ShufflePopDown()\r
+{\r
+    if (!shuffleUp) return;\r
+    XtPopdown(shuffleShell);\r
+    XtDestroyWidget(shuffleShell);\r
+    shuffleUp = False;\r
+    ModeHighlight();\r
+}\r
+\r
+void ShuffleCallback(w, client_data, call_data)\r
+     Widget w;\r
+     XtPointer client_data, call_data;\r
+{\r
+    String name;\r
+    Widget w2;\r
+    Arg args[16];\r
+    char buf[80];\r
+    \r
+    XtSetArg(args[0], XtNlabel, &name);\r
+    XtGetValues(w, args, 1);\r
+    \r
+    if (strcmp(name, _("cancel")) == 0) {\r
+        ShufflePopDown();\r
+        return;\r
+    }\r
+    if (strcmp(name, _("off")) == 0) {\r
+        ShufflePopDown();\r
+       shuffleOpenings = False; // [HGM] should be moved to New Variant menu, once we have it!\r
+       ResetGameEvent();\r
+       AnalysisPopDown();\r
+        return;\r
+    }\r
+    if (strcmp(name, _("random")) == 0) {\r
+       sprintf(buf, "%d", rand());\r
+       XtSetArg(args[0],XtNvalue, buf); // erase bad (non-numeric) value\r
+       XtSetValues(XtParent(w), args, 1);\r
+        return;\r
+    }\r
+    if (strcmp(name, _("ok")) == 0) {\r
+       int nr; String name;\r
+        name = XawDialogGetValueString(w2 = XtParent(w));\r
+       if(sscanf(name ,"%d",&nr) != 1) {\r
+           sprintf(buf, "%d", appData.defaultFrcPosition);\r
+           XtSetArg(args[0],XtNvalue, buf); // erase bad (non-numeric) value\r
+           XtSetValues(w2, args, 1);\r
+           return;\r
+       }\r
+       appData.defaultFrcPosition = nr;\r
+       shuffleOpenings = True;\r
+        ShufflePopDown();\r
+       ResetGameEvent();\r
+       AnalysisPopDown();\r
+        return;\r
+    }\r
+}\r
+\r
+void ShufflePopUp()\r
+{\r
+    Arg args[16];\r
+    Widget popup, layout, dialog, edit;\r
+    Window root, child;\r
+    int x, y, i;\r
+    int win_x, win_y;\r
+    unsigned int mask;\r
+    char def[80];\r
+    \r
+    i = 0;\r
+    XtSetArg(args[i], XtNresizable, True); i++;\r
+    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;\r
+    shuffleShell = popup =\r
+      XtCreatePopupShell(_("New Shuffle Game"), transientShellWidgetClass,\r
+                        shellWidget, args, i);\r
+    \r
+    layout =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, popup,\r
+                           layoutArgs, XtNumber(layoutArgs));\r
+  \r
+    sprintf(def, "%d\n", appData.defaultFrcPosition);\r
+    i = 0;\r
+    XtSetArg(args[i], XtNlabel, _("Start-position number:")); i++;\r
+    XtSetArg(args[i], XtNvalue, def); i++;\r
+    XtSetArg(args[i], XtNborderWidth, 0); i++;\r
+    dialog = XtCreateManagedWidget(_("Shuffle"), dialogWidgetClass,\r
+                                  layout, args, i);\r
+    \r
+//    XtSetArg(args[0], XtNeditType, XawtextEdit);  // [HGM] can't get edit to work decently\r
+//    XtSetArg(args[1], XtNuseStringInPlace, False);\r
+//    XtSetValues(dialog, args, 2);\r
+\r
+    XawDialogAddButton(dialog, _("ok"), ShuffleCallback, (XtPointer) dialog);\r
+    XawDialogAddButton(dialog, _("cancel"), ShuffleCallback, (XtPointer) dialog);\r
+    XawDialogAddButton(dialog, _("random"), ShuffleCallback, (XtPointer) dialog);\r
+    XawDialogAddButton(dialog, _("off"), ShuffleCallback, (XtPointer) dialog);\r
+    \r
+    XtRealizeWidget(popup);\r
+    CatchDeleteWindow(popup, "ShufflePopDown");\r
+    \r
+    XQueryPointer(xDisplay, xBoardWindow, &root, &child,\r
+                 &x, &y, &win_x, &win_y, &mask);\r
+    \r
+    XtSetArg(args[0], XtNx, x - 10);\r
+    XtSetArg(args[1], XtNy, y - 30);\r
+    XtSetValues(popup, args, 2);\r
+    \r
+    XtPopup(popup, XtGrabExclusive);\r
+    shuffleUp = True;\r
+    \r
+    edit = XtNameToWidget(dialog, "*value");\r
+\r
+    XtSetKeyboardFocus(popup, edit);\r
+}\r
+\r
+void ShuffleMenuProc(w, event, prms, nprms)\r
+     Widget w;\r
+     XEvent *event;\r
+     String *prms;\r
+     Cardinal *nprms;\r
+{\r
+//    if (gameMode == AnalyzeMode || gameMode == AnalyzeFile) {\r
+//     Reset(FALSE, TRUE);\r
+//    }\r
+    ShufflePopUp();\r
+}\r
+\r
+//--------------------------- Time-Control Menu Popup ----------------------------------\r
+int TimeControlUp;\r
+Widget TimeControlShell;\r
+int tcInc;\r
+Widget tcMess1, tcMess2, tcData, tcTime, tcOdds1, tcOdds2;\r
+int tcIncrement, tcMoves;\r
+\r
+void TimeControlPopDown()\r
+{\r
+    if (!TimeControlUp) return;\r
+    XtPopdown(TimeControlShell);\r
+    XtDestroyWidget(TimeControlShell);\r
+    TimeControlUp = False;\r
+    ModeHighlight();\r
+}\r
+\r
+void TimeControlCallback(w, client_data, call_data)\r
+     Widget w;\r
+     XtPointer client_data, call_data;\r
+{\r
+    String name, txt;\r
+    Widget w2;\r
+    Arg args[16];\r
+    char buf[80];\r
+    int j;\r
+\r
+    XtSetArg(args[0], XtNlabel, &name);\r
+    XtGetValues(w, args, 1);\r
+    \r
+    if (strcmp(name, _("classical")) == 0) {\r
+       if(!tcInc) return;\r
+       j=0;\r
+       XtSetArg(args[j], XtNlabel, _("minutes for each")); j++;\r
+       XtSetValues(tcMess1, args, j);\r
+       j=0;\r
+       XtSetArg(args[j], XtNlabel, _("moves")); j++;\r
+       XtSetValues(tcMess2, args, j);\r
+       j=0;\r
+       XtSetArg(args[j], XtNstring, &name); j++;\r
+       XtGetValues(tcData, args, j);\r
+       tcIncrement = 0; sscanf(name, "%d", &tcIncrement);\r
+       sprintf(buf, "%d", tcMoves);\r
+       j=0;\r
+       XtSetArg(args[j], XtNstring, buf); j++;\r
+       XtSetValues(tcData, args, j);\r
+       tcInc = False;\r
+        return;\r
+    }\r
+    if (strcmp(name, _("incremental")) == 0) {\r
+       if(tcInc) return;\r
+       j=0;\r
+       XtSetArg(args[j], XtNlabel, _("minutes, plus")); j++;\r
+       XtSetValues(tcMess1, args, j);\r
+       j=0;\r
+       XtSetArg(args[j], XtNlabel, _("sec/move")); j++;\r
+       XtSetValues(tcMess2, args, j);\r
+       j=0;\r
+       XtSetArg(args[j], XtNstring, &name); j++;\r
+       XtGetValues(tcData, args, j);\r
+       tcMoves = appData.movesPerSession; sscanf(name, "%d", &tcMoves);\r
+       sprintf(buf, "%d", tcIncrement);\r
+       j=0;\r
+       XtSetArg(args[j], XtNstring, buf); j++;\r
+       XtSetValues(tcData, args, j);\r
+       tcInc = True;\r
+        return;\r
+    }\r
+    if (strcmp(name, _(" OK ")) == 0) {\r
+       int inc, mps, tc, ok;\r
+       XtSetArg(args[0], XtNstring, &txt);\r
+       XtGetValues(tcData, args, 1);\r
+       if(tcInc) {\r
+           ok = sscanf(txt, "%d", &inc); mps = 0;\r
+           if(!ok && txt[0] == 0) { inc = 0; ok = 1; } // accept empty string as zero\r
+           ok &= (inc >= 0);\r
+       } else {\r
+           ok = sscanf(txt, "%d", &mps); inc = -1;\r
+           ok &= (mps > 0);\r
+       }\r
+       if(ok != 1) {\r
+           XtSetArg(args[0], XtNstring, ""); // erase any offending input\r
+           XtSetValues(tcData, args, 1);\r
+           return;\r
+       }\r
+       XtSetArg(args[0], XtNstring, &txt);\r
+       XtGetValues(tcTime, args, 1);\r
+       if(!ParseTimeControl(txt, inc, mps)) {\r
+           XtSetArg(args[0], XtNstring, ""); // erase any offending input\r
+           XtSetValues(tcTime, args, 1);\r
+           DisplayError(_("Bad Time-Control String"), 0);\r
+           return;\r
+       }\r
+       appData.movesPerSession = mps;\r
+       appData.timeIncrement = inc;\r
+       appData.timeControl = strdup(txt);\r
+       XtSetArg(args[0], XtNstring, &txt);\r
+       XtGetValues(tcOdds1, args, 1);\r
+       appData.firstTimeOdds = first.timeOdds \r
+               = (sscanf(txt, "%d", &j) == 1 && j > 0) ? j : 1;\r
+       XtGetValues(tcOdds2, args, 1);\r
+       appData.secondTimeOdds = second.timeOdds \r
+               = (sscanf(txt, "%d", &j) == 1 && j > 0) ? j : 1;\r
+\r
+       Reset(True, True);\r
+        TimeControlPopDown();\r
+        return;\r
+    }\r
+}\r
+\r
+void TimeControlPopUp()\r
+{\r
+    Arg args[16];\r
+    Widget popup, layout, form, edit, b_ok, b_cancel, b_clas, b_inc, mess;\r
+    Window root, child;\r
+    int x, y, i, j;\r
+    int win_x, win_y;\r
+    unsigned int mask;\r
+    char def[80];\r
+    \r
+    tcInc = (appData.timeIncrement >= 0);\r
+    tcMoves = appData.movesPerSession; tcIncrement = appData.timeIncrement;\r
+    if(!tcInc) tcIncrement = 0;\r
+    sprintf(def, "%d", tcInc ? tcIncrement : tcMoves);\r
+\r
+    i = 0;\r
+    XtSetArg(args[i], XtNresizable, True); i++;\r
+//    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;\r
+    TimeControlShell = popup =\r
+      XtCreatePopupShell(_("TimeControl Menu"), transientShellWidgetClass,\r
+                        shellWidget, args, i);\r
+    \r
+    layout =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, popup,\r
+                           layoutArgs, XtNumber(layoutArgs));\r
+  \r
+    form =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, layout,\r
+                           formArgs, XtNumber(formArgs));\r
+  \r
+    j = 0;\r
+//    XtSetArg(args[j], XtNwidth,     (XtArgVal) 300); j++;\r
+//    XtSetArg(args[j], XtNheight,    (XtArgVal) 85); j++;\r
+    XtSetValues(popup, args, j);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+    XtSetArg(args[j], XtNstring, appData.timeControl);  j++;\r
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNresizable, True);  j++;\r
+    XtSetArg(args[j], XtNwidth,  85);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcTime = XtCreateManagedWidget("TC", asciiTextWidgetClass, form, args, j);\r
+    XtAddEventHandler(tcTime, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNlabel, tcInc ? _("   minutes, plus   ") : _("minutes for each")); j++;\r
+    XtSetArg(args[j], XtNborderWidth, 0); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, tcTime); j++;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+  //  XtSetArg(args[j], XtNwidth,  100);  j++;\r
+  //  XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcMess1 = XtCreateManagedWidget("TCtext", labelWidgetClass, form, args, j);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, tcMess1); j++;\r
+    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+    XtSetArg(args[j], XtNstring, def);  j++;\r
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNresizable, True);  j++;\r
+    XtSetArg(args[j], XtNwidth,  40);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcData = XtCreateManagedWidget("MPS", asciiTextWidgetClass, form, args, j);\r
+    XtAddEventHandler(tcData, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNlabel, tcInc ? _("sec/move") : _("moves     ")); j++;\r
+    XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;\r
+    XtSetArg(args[j], XtNborderWidth, 0); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, tcData); j++;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+//    XtSetArg(args[j], XtNwidth,  80);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcMess2 = XtCreateManagedWidget("MPStext", labelWidgetClass,\r
+                                  form, args, j);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+    XtSetArg(args[j], XtNfromVert, tcTime); j++;\r
+    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+    XtSetArg(args[j], XtNstring, "1");  j++;\r
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNresizable, True);  j++;\r
+    XtSetArg(args[j], XtNwidth,  40);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcOdds1 = XtCreateManagedWidget("Odds1", asciiTextWidgetClass, form, args, j);\r
+    XtAddEventHandler(tcOdds1, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+    XtSetArg(args[j], XtNfromVert, tcTime); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, tcOdds1); j++;\r
+    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+    XtSetArg(args[j], XtNstring, "1");  j++;\r
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNresizable, True);  j++;\r
+    XtSetArg(args[j], XtNwidth,  40);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcOdds2 = XtCreateManagedWidget("Odds2", asciiTextWidgetClass, form, args, j);\r
+    XtAddEventHandler(tcOdds2, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNlabel, _("Engine #1 and #2 Time-Odds Factors")); j++;\r
+    XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;\r
+    XtSetArg(args[j], XtNborderWidth, 0); j++;\r
+    XtSetArg(args[j], XtNfromVert, tcTime); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, tcOdds2); j++;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+//    XtSetArg(args[j], XtNwidth,  200);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    mess = XtCreateManagedWidget("Oddstext", labelWidgetClass,\r
+                                  form, args, j);\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    b_clas= XtCreateManagedWidget(_("classical"), commandWidgetClass,\r
+                                  form, args, j);   \r
+    XtAddCallback(b_clas, XtNcallback, TimeControlCallback, (XtPointer) 0);\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;\r
+    XtSetArg(args[j], XtNfromHoriz, b_clas);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    b_inc = XtCreateManagedWidget(_("incremental"), commandWidgetClass,\r
+                                  form, args, j);   \r
+    XtAddCallback(b_inc, XtNcallback, TimeControlCallback, (XtPointer) 0);\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;\r
+    XtSetArg(args[j], XtNfromHoriz, tcData);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    b_ok= XtCreateManagedWidget(_(" OK "), commandWidgetClass,\r
+                                  form, args, j);   \r
+    XtAddCallback(b_ok, XtNcallback, TimeControlCallback, (XtPointer) 0);\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;\r
+    XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    b_cancel= XtCreateManagedWidget(_("cancel"), commandWidgetClass,\r
+                                  form, args, j);   \r
+    XtAddCallback(b_cancel, XtNcallback, TimeControlPopDown, (XtPointer) 0);\r
+\r
+    XtRealizeWidget(popup);\r
+    CatchDeleteWindow(popup, "TimeControlPopDown");\r
+    \r
+    XQueryPointer(xDisplay, xBoardWindow, &root, &child,\r
+                 &x, &y, &win_x, &win_y, &mask);\r
+    \r
+    XtSetArg(args[0], XtNx, x - 10);\r
+    XtSetArg(args[1], XtNy, y - 30);\r
+    XtSetValues(popup, args, 2);\r
+    \r
+    XtPopup(popup, XtGrabExclusive);\r
+    TimeControlUp = True;\r
+    \r
+    previous = NULL;\r
+    SetFocus(tcTime, popup, (XEvent*) NULL, False);\r
+//    XtSetKeyboardFocus(popup, tcTime);\r
+}\r
+\r
+void TimeControlProc(w, event, prms, nprms)\r
+     Widget w;\r
+     XEvent *event;\r
+     String *prms;\r
+     Cardinal *nprms;\r
+{\r
+   TimeControlPopUp();\r
+}\r
+\r
+//--------------------------- Engine-Options Menu Popup ----------------------------------\r
+int EngineUp;\r
+Widget EngineShell;\r
+extern int adjudicateLossThreshold;\r
+\r
+Widget engDrawMoves, engThreshold, engRule, engRepeat;\r
+\r
+void EnginePopDown()\r
+{\r
+    if (!EngineUp) return;\r
+    XtPopdown(EngineShell);\r
+    XtDestroyWidget(EngineShell);\r
+    EngineUp = False;\r
+    ModeHighlight();\r
+}\r
+\r
+int ReadToggle(Widget w)\r
+{\r
+    Arg args; Boolean res;\r
+\r
+    XtSetArg(args, XtNstate, &res);\r
+    XtGetValues(w, &args, 1);\r
+\r
+    return res;\r
+}\r
+\r
+Widget w1, w2, w3, w4, w5, w6, w7, w8;\r
+\r
+void EngineCallback(w, client_data, call_data)\r
+     Widget w;\r
+     XtPointer client_data, call_data;\r
+{\r
+    String name;\r
+    Widget s2;\r
+    Arg args[16];\r
+    char buf[80];\r
+    int j;\r
+    \r
+    XtSetArg(args[0], XtNlabel, &name);\r
+    XtGetValues(w, args, 1);\r
+    \r
+    if (strcmp(name, _("OK")) == 0) {\r
+       // read all switches\r
+       appData.periodicUpdates = ReadToggle(w1);\r
+//     appData.hideThinkingFromHuman = ReadToggle(w2);\r
+       appData.firstScoreIsAbsolute  = ReadToggle(w3);\r
+       appData.secondScoreIsAbsolute = ReadToggle(w4);\r
+       appData.testClaims    = ReadToggle(w5);\r
+       appData.checkMates    = ReadToggle(w6);\r
+       appData.materialDraws = ReadToggle(w7);\r
+       appData.trivialDraws  = ReadToggle(w8);\r
+\r
+       // adjust setting in other menu for duplicates \r
+       // (perhaps duplicates should be removed from general Option Menu?)\r
+//     XtSetArg(args[0], XtNleftBitmap, appData.showThinking ? xMarkPixmap : None);\r
+//     XtSetValues(XtNameToWidget(menuBarWidget,\r
+//                                "menuOptions.Show Thinking"), args, 1);\r
+\r
+       // read out numeric controls, simply ignore bad formats for now\r
+       XtSetArg(args[0], XtNstring, &name);\r
+       XtGetValues(engDrawMoves, args, 1);\r
+       if(sscanf(name, "%d", &j) == 1) appData.adjudicateDrawMoves = j;\r
+       XtGetValues(engThreshold, args, 1);\r
+       if(sscanf(name, "%d", &j) == 1) \r
+               adjudicateLossThreshold = appData.adjudicateLossThreshold = -j; // inverted!\r
+       XtGetValues(engRule, args, 1);\r
+       if(sscanf(name, "%d", &j) == 1) appData.ruleMoves = j;\r
+       XtGetValues(engRepeat, args, 1);\r
+       if(sscanf(name, "%d", &j) == 1) appData.drawRepeats = j;\r
+\r
+        EnginePopDown();\r
+       ShowThinkingEvent(); // [HGM] thinking: score adjudication might need thinking output\r
+        return;\r
+    }\r
+}\r
+\r
+void EnginePopUp()\r
+{\r
+    Arg args[16];\r
+    Widget popup, layout, form, edit, b_ok, b_cancel, b_clas, b_inc, s1; \r
+    Window root, child;\r
+    int x, y, i, j, width;\r
+    int win_x, win_y;\r
+    unsigned int mask;\r
+    char def[80];\r
+    \r
+    tcInc = (appData.timeIncrement >= 0);\r
+    tcMoves = appData.movesPerSession; tcIncrement = appData.timeIncrement;\r
+    if(!tcInc) tcIncrement = 0;\r
+    sprintf(def, "%d", tcInc ? tcIncrement : tcMoves);\r
+\r
+    i = 0;\r
+    XtSetArg(args[i], XtNresizable, True); i++;\r
+//    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;\r
+    EngineShell = popup =\r
+      XtCreatePopupShell(_("Adjudications"), transientShellWidgetClass,\r
+                        shellWidget, args, i);\r
+    \r
+    layout =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, popup,\r
+                           layoutArgs, XtNumber(layoutArgs));\r
+  \r
+    form =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, layout,\r
+                           formArgs, XtNumber(formArgs));\r
+  \r
+    j = 0;\r
+//    XtSetArg(args[j], XtNwidth,     (XtArgVal) 250); j++;\r
+//    XtSetArg(args[j], XtNheight,    (XtArgVal) 400); j++;\r
+//    XtSetValues(popup, args, j);\r
+\r
+    j = 0;\r
+//    XtSetArg(args[j], XtNwidth,       (XtArgVal) 250); j++;\r
+//    XtSetArg(args[j], XtNheight,      (XtArgVal) 20); j++;\r
+    XtSetArg(args[j], XtNleft,        (XtArgVal) XtChainLeft); j++;\r
+    XtSetArg(args[j], XtNright,       (XtArgVal) XtChainRight); j++;\r
+    XtSetArg(args[j], XtNstate,       appData.periodicUpdates); j++;\r
+//    XtSetArg(args[j], XtNjustify,     (XtArgVal) XtJustifyLeft); j++;\r
+    w1 = XtCreateManagedWidget(_("Periodic Updates (Analysis Mode)"), toggleWidgetClass, form, args, j);\r
+\r
+    XtSetArg(args[j], XtNwidth,       (XtArgVal) &width);\r
+    XtGetValues(w1, &args[j], 1);\r
+\r
+//    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w1);\r
+//    XtSetArg(args[j-3], XtNstate,       appData.hideThinkingFromHuman);\r
+//    w2 = XtCreateManagedWidget(_("Hide Thinking from Human"), toggleWidgetClass, form, args, j);\r
+\r
+    XtSetArg(args[j], XtNwidth,       (XtArgVal) width); j++;\r
+    XtSetArg(args[j-2], XtNstate,     appData.firstScoreIsAbsolute);\r
+    XtSetArg(args[j], XtNfromVert,    (XtArgVal) w1); j++;\r
+    w3 = XtCreateManagedWidget(_("Engine #1 Score is Absolute"), toggleWidgetClass, form, args, j);\r
+\r
+    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w3);\r
+    XtSetArg(args[j-3], XtNstate,       appData.secondScoreIsAbsolute);\r
+    w4 = XtCreateManagedWidget(_("Engine #2 Score is Absolute"), toggleWidgetClass, form, args, j);\r
+\r
+    s1 = XtCreateManagedWidget(_("\nEngine-Engine Adjudications:"), labelWidgetClass, form, args, 3);\r
+\r
+    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) s1);\r
+    XtSetArg(args[j-3], XtNstate,       appData.testClaims);\r
+    w5 = XtCreateManagedWidget(_("Verify Engine Result Claims"), toggleWidgetClass, form, args, j);\r
+\r
+    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w5);\r
+    XtSetArg(args[j-3], XtNstate,       appData.checkMates);\r
+    w6 = XtCreateManagedWidget(_("Detect All Mates"), toggleWidgetClass, form, args, j);\r
+\r
+    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w6);\r
+    XtSetArg(args[j-3], XtNstate,       appData.materialDraws);\r
+    w7 = XtCreateManagedWidget(_("Draw when Insuff. Mating Material"), toggleWidgetClass, form, args, j);\r
+\r
+    XtSetArg(args[j-1], XtNfromVert,  (XtArgVal) w7);\r
+    XtSetArg(args[j-3], XtNstate,       appData.trivialDraws);\r
+    w8 = XtCreateManagedWidget(_("Adjudicate Trivial Draws"), toggleWidgetClass, form, args, j);\r
+\r
+    XtSetArg(args[0], XtNfromVert,  (XtArgVal) w4);\r
+    XtSetArg(args[1], XtNborderWidth, (XtArgVal) 0);\r
+    XtSetValues(s1, args, 2);\r
+\r
+    sprintf(def, "%d", appData.adjudicateDrawMoves);\r
+    j= 0;\r
+    XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+    XtSetArg(args[j], XtNfromVert, w8); j++;\r
+    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+    XtSetArg(args[j], XtNstring, def);  j++;\r
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNresizable, True);  j++;\r
+    XtSetArg(args[j], XtNwidth,  60);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    engDrawMoves = XtCreateManagedWidget("Length", asciiTextWidgetClass, form, args, j);\r
+    XtAddEventHandler(engDrawMoves, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNlabel, _(" moves maximum, then draw")); j++;\r
+    XtSetArg(args[j], XtNjustify,     (XtArgVal) XtJustifyLeft); j++;\r
+    XtSetArg(args[j], XtNborderWidth, 0); j++;\r
+    XtSetArg(args[j], XtNfromVert, w8); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, engDrawMoves); j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+//    XtSetArg(args[j], XtNwidth,  170);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcMess1 = XtCreateManagedWidget("TCtext", labelWidgetClass, form, args, j);\r
+\r
+    sprintf(def, "%d", -appData.adjudicateLossThreshold); // inverted!\r
+    j= 0;\r
+    XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+    XtSetArg(args[j], XtNfromVert, engDrawMoves); j++;\r
+    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+    XtSetArg(args[j], XtNstring, def);  j++;\r
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNresizable, True);  j++;\r
+    XtSetArg(args[j], XtNwidth,  60);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    engThreshold = XtCreateManagedWidget("Threshold", asciiTextWidgetClass, form, args, j);\r
+    XtAddEventHandler(engThreshold, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNlabel, _("-centiPawn lead is win")); j++;\r
+    XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;\r
+    XtSetArg(args[j], XtNborderWidth, 0); j++;\r
+    XtSetArg(args[j], XtNfromVert, engDrawMoves); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, engThreshold); j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+//    XtSetArg(args[j], XtNwidth,  150);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcMess2 = XtCreateManagedWidget("MPStext", labelWidgetClass, form, args, j);\r
+\r
+    sprintf(def, "%d", appData.ruleMoves);\r
+    j= 0;\r
+    XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+    XtSetArg(args[j], XtNfromVert, engThreshold); j++;\r
+    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+    XtSetArg(args[j], XtNstring, def);  j++;\r
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNresizable, True);  j++;\r
+    XtSetArg(args[j], XtNwidth,  30);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    engRule = XtCreateManagedWidget("Rule", asciiTextWidgetClass, form, args, j);\r
+    XtAddEventHandler(engRule, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNlabel, _("-move rule applied")); j++;\r
+    XtSetArg(args[j], XtNjustify,     (XtArgVal) XtJustifyLeft); j++;\r
+    XtSetArg(args[j], XtNborderWidth, 0); j++;\r
+    XtSetArg(args[j], XtNfromVert, engThreshold); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, engRule); j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+//    XtSetArg(args[j], XtNwidth,  130);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcMess1 = XtCreateManagedWidget("TCtext", labelWidgetClass, form, args, j);\r
+\r
+    sprintf(def, "%d", appData.drawRepeats);\r
+    j= 0;\r
+    XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+    XtSetArg(args[j], XtNfromVert, engRule); j++;\r
+    XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+    XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+    XtSetArg(args[j], XtNstring, def);  j++;\r
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNresizable, True);  j++;\r
+    XtSetArg(args[j], XtNwidth,  30);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    engRepeat = XtCreateManagedWidget("Repeats", asciiTextWidgetClass, form, args, j);\r
+    XtAddEventHandler(engRepeat, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+\r
+    j= 0;\r
+    XtSetArg(args[j], XtNlabel, _("-fold repeat is draw")); j++;\r
+    XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;\r
+    XtSetArg(args[j], XtNborderWidth, 0); j++;\r
+    XtSetArg(args[j], XtNfromVert, engRule); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, engRepeat); j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+//    XtSetArg(args[j], XtNwidth,  130);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20);  j++;\r
+    tcMess2 = XtCreateManagedWidget("MPStext", labelWidgetClass, form, args, j);\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, engRepeat);  j++;\r
+    XtSetArg(args[j], XtNfromHoriz, tcMess2);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    b_ok= XtCreateManagedWidget(_("OK"), commandWidgetClass, form, args, j);   \r
+    XtAddCallback(b_ok, XtNcallback, EngineCallback, (XtPointer) 0);\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, engRepeat);  j++;\r
+    XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    b_cancel= XtCreateManagedWidget(_("cancel"), commandWidgetClass,\r
+                                  form, args, j);   \r
+    XtAddCallback(b_cancel, XtNcallback, EnginePopDown, (XtPointer) 0);\r
+\r
+    XtRealizeWidget(popup);\r
+    CatchDeleteWindow(popup, "EnginePopDown");\r
+    \r
+    XQueryPointer(xDisplay, xBoardWindow, &root, &child,\r
+                 &x, &y, &win_x, &win_y, &mask);\r
+    \r
+    XtSetArg(args[0], XtNx, x - 10);\r
+    XtSetArg(args[1], XtNy, y - 30);\r
+    XtSetValues(popup, args, 2);\r
+    \r
+    XtPopup(popup, XtGrabExclusive);\r
+    EngineUp = True;\r
+    \r
+    previous = NULL;\r
+    SetFocus(engThreshold, popup, (XEvent*) NULL, False);\r
+}\r
+\r
+void EngineMenuProc(w, event, prms, nprms)\r
+     Widget w;\r
+     XEvent *event;\r
+     String *prms;\r
+     Cardinal *nprms;\r
+{\r
+   EnginePopUp();\r
+}\r
+\r
+//--------------------------- New-Variant Menu PopUp -----------------------------------\r
+struct NewVarButton {\r
+  char   *name;\r
+  char *color;\r
+  Widget handle;\r
+  VariantClass variant;\r
+};\r
+\r
+struct NewVarButton buttonDesc[] = {\r
+    {N_("normal"),            "#FFFFFF", 0, VariantNormal},\r
+    {N_("FRC"),               "#FFFFFF", 0, VariantFischeRandom},\r
+    {N_("wild castle"),       "#FFFFFF", 0, VariantWildCastle},\r
+    {N_("no castle"),         "#FFFFFF", 0, VariantNoCastle},\r
+    {N_("knightmate"),        "#FFFFFF", 0, VariantKnightmate},\r
+    {N_("berolina"),          "#FFFFFF", 0, VariantBerolina},\r
+    {N_("cylinder"),          "#FFFFFF", 0, VariantCylinder},\r
+    {N_("shatranj"),          "#FFFFFF", 0, VariantShatranj},\r
+    {N_("atomic"),            "#FFFFFF", 0, VariantAtomic},\r
+    {N_("two kings"),         "#FFFFFF", 0, VariantTwoKings},\r
+    {N_("3-checks"),          "#FFFFFF", 0, Variant3Check},\r
+    {N_("suicide"),           "#FFFFBF", 0, VariantSuicide},\r
+    {N_("give-away"),         "#FFFFBF", 0, VariantGiveaway},\r
+    {N_("losers"),            "#FFFFBF", 0, VariantLosers},\r
+    {N_("fairy"),             "#BFBFBF", 0, VariantFairy},\r
+    {N_("Superchess"),        "#FFBFBF", 0, VariantSuper},\r
+    {N_("crazyhouse"),        "#FFBFBF", 0, VariantCrazyhouse},\r
+    {N_("bughouse"),          "#FFBFBF", 0, VariantBughouse},\r
+    {N_("shogi (9x9)"),       "#BFFFFF", 0, VariantShogi},\r
+    {N_("xiangqi (9x10)"),    "#BFFFFF", 0, VariantXiangqi},\r
+    {N_("courier (12x8)"),    "#BFFFBF", 0, VariantCourier},\r
+    {N_("janus (10x8)"),      "#BFBFFF", 0, VariantJanus},\r
+    {N_("Capablanca (10x8)"), "#BFBFFF", 0, VariantCapablanca},\r
+    {N_("CRC (10x8)"),        "#BFBFFF", 0, VariantCapaRandom},\r
+#ifdef GOTHIC\r
+    {N_("Gothic (10x8)"),     "#BFBFFF", 0, VariantGothic},\r
+#endif\r
+#ifdef FALCON\r
+    {N_("Falcon (10x8)"),     "#BFBFFF", 0, VariantFalcon},\r
+#endif\r
+    {NULL,                0, 0, (VariantClass) 0}\r
+};\r
+\r
+int NewVariantUp;\r
+Widget NewVariantShell;\r
+\r
+void NewVariantPopDown()\r
+{\r
+    if (!NewVariantUp) return;\r
+    XtPopdown(NewVariantShell);\r
+    XtDestroyWidget(NewVariantShell);\r
+    NewVariantUp = False;\r
+    ModeHighlight();\r
+}\r
+\r
+void NewVariantCallback(w, client_data, call_data)\r
+     Widget w;\r
+     XtPointer client_data, call_data;\r
+{\r
+    String name;\r
+    Widget w2;\r
+    Arg args[16];\r
+    char buf[80];\r
+    VariantClass v;\r
+    \r
+    XtSetArg(args[0], XtNlabel, &name);\r
+    XtGetValues(w, args, 1);\r
+    \r
+    if (strcmp(name, _("  OK  ")) == 0) {\r
+       int nr = (int) XawToggleGetCurrent(buttonDesc[0].handle) - 1;\r
+       if(nr < 0) return;\r
+       v = buttonDesc[nr].variant;\r
+       if(!appData.noChessProgram) { \r
+           char *name = VariantName(v), buf[MSG_SIZ];\r
+           if (first.protocolVersion > 1 && StrStr(first.variants, name) == NULL) {\r
+               /* [HGM] in protocol 2 we check if variant is suported by engine */\r
+               sprintf(buf, _("Variant %s not supported by %s"), name, first.tidy);\r
+               DisplayError(buf, 0);\r
+//             NewVariantPopDown();\r
+               return; /* ignore OK if first engine does not support it */\r
+           } else\r
+           if (second.initDone && second.protocolVersion > 1 && StrStr(second.variants, name) == NULL) {\r
+               sprintf(buf, _("Warning: second engine (%s) does not support this!"), second.tidy);\r
+               DisplayError(buf, 0);   /* use of second engine is optional; only warn user */\r
+           }\r
+       }\r
+\r
+       gameInfo.variant = v;\r
+       appData.variant = VariantName(v);\r
+\r
+       shuffleOpenings = FALSE; /* [HGM] shuffle: possible shuffle reset when we switch */\r
+       startedFromPositionFile = FALSE; /* [HGM] loadPos: no longer valid in new variant */\r
+       appData.pieceToCharTable = NULL;\r
+       Reset(True, True);\r
+        NewVariantPopDown();\r
+        return;\r
+    }\r
+}\r
+\r
+void NewVariantPopUp()\r
+{\r
+    Arg args[16];\r
+    Widget popup, layout, dialog, edit, form, last = NULL, b_ok, b_cancel;\r
+    Window root, child;\r
+    int x, y, i, j;\r
+    int win_x, win_y;\r
+    unsigned int mask;\r
+    char def[80];\r
+    XrmValue vFrom, vTo;\r
+\r
+    i = 0;\r
+    XtSetArg(args[i], XtNresizable, True); i++;\r
+//    XtSetArg(args[i], XtNwidth, 250); i++;\r
+//    XtSetArg(args[i], XtNheight, 300); i++;\r
+    NewVariantShell = popup =\r
+      XtCreatePopupShell(_("NewVariant Menu"), transientShellWidgetClass,\r
+                        shellWidget, args, i);\r
+    \r
+    layout =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, popup,\r
+                           layoutArgs, XtNumber(layoutArgs));\r
+  \r
+    form =\r
+      XtCreateManagedWidget("form", formWidgetClass, layout,\r
+                           formArgs, XtNumber(formArgs));\r
+  \r
+    for(i = 0; buttonDesc[i].name != NULL; i++) {\r
+       Pixel buttonColor;\r
+       if (!appData.monoMode) {\r
+           vFrom.addr = (caddr_t) buttonDesc[i].color;\r
+           vFrom.size = strlen(buttonDesc[i].color);\r
+           XtConvert(shellWidget, XtRString, &vFrom, XtRPixel, &vTo);\r
+           if (vTo.addr == NULL) {\r
+               buttonColor = (Pixel) -1;\r
+           } else {\r
+               buttonColor = *(Pixel *) vTo.addr;\r
+           }\r
+       }\r
+    \r
+       j = 0;\r
+       XtSetArg(args[j], XtNradioGroup, last); j++;\r
+       XtSetArg(args[j], XtNwidth, 125); j++;\r
+//     XtSetArg(args[j], XtNheight, 16); j++;\r
+       XtSetArg(args[j], XtNfromVert, i == 15 ? NULL : last); j++;\r
+       XtSetArg(args[j], XtNfromHoriz, i < 15 ? NULL : buttonDesc[i-15].handle); j++;\r
+       XtSetArg(args[j], XtNradioData, i+1); j++;\r
+       XtSetArg(args[j], XtNbackground, buttonColor); j++;\r
+       XtSetArg(args[j], XtNstate, gameInfo.variant == buttonDesc[i].variant); j++;\r
+       buttonDesc[i].handle = last =\r
+           XtCreateManagedWidget(buttonDesc[i].name, toggleWidgetClass, form, args, j);\r
+    }\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, buttonDesc[12].handle);  j++;\r
+    XtSetArg(args[j], XtNfromHoriz, buttonDesc[12].handle);  j++;\r
+    XtSetArg(args[j], XtNheight, 35); j++;\r
+//    XtSetArg(args[j], XtNwidth, 60); j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    b_cancel= XtCreateManagedWidget(_("CANCEL"), commandWidgetClass, form, args, j);   \r
+    XtAddCallback(b_cancel, XtNcallback, NewVariantPopDown, (XtPointer) 0);\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromHoriz, b_cancel);  j++;\r
+    XtSetArg(args[j], XtNfromVert, buttonDesc[12].handle);  j++;\r
+    XtSetArg(args[j], XtNheight, 35); j++;\r
+//    XtSetArg(args[j], XtNwidth, 60); j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    b_ok= XtCreateManagedWidget(_("  OK  "), commandWidgetClass, form, args, j);   \r
+    XtAddCallback(b_ok, XtNcallback, NewVariantCallback, (XtPointer) 0);\r
+\r
+    XtRealizeWidget(popup);\r
+    CatchDeleteWindow(popup, "NewVariantPopDown");\r
+    \r
+    XQueryPointer(xDisplay, xBoardWindow, &root, &child,\r
+                 &x, &y, &win_x, &win_y, &mask);\r
+    \r
+    XtSetArg(args[0], XtNx, x - 10);\r
+    XtSetArg(args[1], XtNy, y - 30);\r
+    XtSetValues(popup, args, 2);\r
+    \r
+    XtPopup(popup, XtGrabExclusive);\r
+    NewVariantUp = True;\r
+}\r
+\r
+void NewVariantProc(w, event, prms, nprms)\r
+     Widget w;\r
+     XEvent *event;\r
+     String *prms;\r
+     Cardinal *nprms;\r
+{\r
+   NewVariantPopUp();\r
+}\r
+\r
+//--------------------------- UCI Menu Popup ------------------------------------------\r
+int UciUp;\r
+Widget UciShell;\r
+\r
+struct UciControl {\r
+  char *name;\r
+  Widget handle;\r
+  void *ptr;\r
+};\r
+\r
+struct UciControl controlDesc[] = {\r
+  {N_("maximum nr of CPUs:"), 0, &appData.smpCores},\r
+  {N_("Polyglot Directory:"), 0, &appData.polyglotDir},\r
+  {N_("Hash Size (MB):"),     0, &appData.defaultHashSize},\r
+  {N_("EGTB Path:"),          0, &appData.defaultPathEGTB},\r
+  {N_("EGTB Cache (MB):"),    0, &appData.defaultCacheSizeEGTB},\r
+  {N_("Polyglot Book:"),      0, &appData.polyglotBook},\r
+  {NULL, 0, NULL},\r
+};\r
+\r
+void UciPopDown()\r
+{\r
+    if (!UciUp) return;\r
+    XtPopdown(UciShell);\r
+    XtDestroyWidget(UciShell);\r
+    UciUp = False;\r
+    ModeHighlight();\r
+}\r
+\r
+void UciCallback(w, client_data, call_data)\r
+     Widget w;\r
+     XtPointer client_data, call_data;\r
+{\r
+    String name;\r
+    Arg args[16];\r
+    char buf[80];\r
+    int oldCores = appData.smpCores, ponder = 0;\r
+    \r
+    XtSetArg(args[0], XtNlabel, &name);\r
+    XtGetValues(w, args, 1);\r
+    \r
+    if (strcmp(name, _("OK")) == 0) {\r
+       int nr, i, j; String name;\r
+       for(i=0; i<6; i++) {\r
+           XtSetArg(args[0], XtNstring, &name);\r
+           XtGetValues(controlDesc[i].handle, args, 1);\r
+           if(i&1) {\r
+               if(name)\r
+                   *(char**) controlDesc[i].ptr = strdup(name);\r
+           } else {\r
+               if(sscanf(name, "%d", &j) == 1) \r
+                   *(int*) controlDesc[i].ptr = j;\r
+           }\r
+       }\r
+       XtSetArg(args[0], XtNstate, &appData.usePolyglotBook);\r
+       XtGetValues(w1, args, 1);\r
+       XtSetArg(args[0], XtNstate, &appData.firstHasOwnBookUCI);\r
+       XtGetValues(w2, args, 1);\r
+       XtSetArg(args[0], XtNstate, &appData.secondHasOwnBookUCI);\r
+       XtGetValues(w3, args, 1);\r
+       XtSetArg(args[0], XtNstate, &ponder);\r
+       XtGetValues(w4, args, 1);\r
+\r
+       // adjust setting in other menu for duplicates \r
+       // (perhaps duplicates should be removed from general Option Menu?)\r
+       XtSetArg(args[0], XtNleftBitmap, ponder ? xMarkPixmap : None);\r
+       XtSetValues(XtNameToWidget(menuBarWidget,\r
+                                  "menuOptions.Ponder Next Move"), args, 1);\r
+\r
+       // make sure changes are sent to first engine by re-initializing it\r
+       // if it was already started pre-emptively at end of previous game\r
+       if(gameMode == BeginningOfGame) Reset(True, True); else {\r
+           // Some changed setting need immediate sending always.\r
+           PonderNextMoveEvent(ponder);\r
+           if(oldCores != appData.smpCores)\r
+               NewSettingEvent(False, "cores", appData.smpCores);\r
+      }\r
+      UciPopDown();\r
+      return;\r
+    }\r
+}\r
+\r
+void UciPopUp()\r
+{\r
+    Arg args[16];\r
+    Widget popup, layout, dialog, edit, form, b_ok, b_cancel, last = NULL, new, upperLeft;\r
+    Window root, child;\r
+    int x, y, i, j;\r
+    int win_x, win_y;\r
+    unsigned int mask;\r
+    char def[80];\r
+    \r
+    i = 0;\r
+    XtSetArg(args[i], XtNresizable, True); i++;\r
+//    XtSetArg(args[i], XtNwidth, 300); i++;\r
+    UciShell = popup =\r
+      XtCreatePopupShell(_("Engine Settings"), transientShellWidgetClass,\r
+                        shellWidget, args, i);\r
+    \r
+    layout =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, popup,\r
+                           layoutArgs, XtNumber(layoutArgs));\r
+  \r
+    \r
+    form =\r
+      XtCreateManagedWidget("form", formWidgetClass, layout,\r
+                           formArgs, XtNumber(formArgs));\r
+  \r
+    j = 0;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+//    XtSetArg(args[j], XtNheight, 20); j++;\r
+    for(i = 0; controlDesc[i].name != NULL; i++) {\r
+       j = 3;\r
+       XtSetArg(args[j], XtNfromVert, last); j++;\r
+//     XtSetArg(args[j], XtNwidth, 130); j++;\r
+       XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;\r
+       XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+       XtSetArg(args[j], XtNborderWidth, 0); j++;\r
+       new = XtCreateManagedWidget(controlDesc[i].name, labelWidgetClass, form, args, j);\r
+       if(i==0) upperLeft = new;\r
+\r
+       j = 4;\r
+       XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+       XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+       XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+       XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+       XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+       XtSetArg(args[j], XtNresizable, True);  j++;\r
+       XtSetArg(args[j], XtNwidth, i&1 ? 245 : 50); j++;\r
+       if(i&1) {\r
+           XtSetArg(args[j], XtNstring, * (char**) controlDesc[i].ptr ? \r
+                                        * (char**) controlDesc[i].ptr : ""); j++;\r
+       } else {\r
+           sprintf(def, "%d", * (int*) controlDesc[i].ptr);\r
+           XtSetArg(args[j], XtNstring, def); j++;\r
+       }\r
+       XtSetArg(args[j], XtNfromHoriz, upperLeft); j++;\r
+       controlDesc[i].handle = last =\r
+           XtCreateManagedWidget("text", asciiTextWidgetClass, form, args, j);\r
+       XtAddEventHandler(last, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+    }\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromHoriz, controlDesc[0].handle);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    XtSetArg(args[j], XtNstate, appData.ponderNextMove);  j++;\r
+    w4 = XtCreateManagedWidget(_("Ponder"), toggleWidgetClass, form, args, j);   \r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, last);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    b_ok = XtCreateManagedWidget(_("OK"), commandWidgetClass, form, args, j);   \r
+    XtAddCallback(b_ok, XtNcallback, UciCallback, (XtPointer) 0);\r
+\r
+    XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;\r
+    b_cancel = XtCreateManagedWidget(_("cancel"), commandWidgetClass, form, args, j);   \r
+    XtAddCallback(b_cancel, XtNcallback, UciPopDown, (XtPointer) 0);\r
+\r
+    j = 5;\r
+    XtSetArg(args[j], XtNfromHoriz, upperLeft);  j++;\r
+    XtSetArg(args[j], XtNstate, appData.usePolyglotBook);  j++;\r
+    w1 = XtCreateManagedWidget(_(" use book "), toggleWidgetClass, form, args, j);   \r
+//    XtAddCallback(w1, XtNcallback, UciCallback, (XtPointer) 0);\r
+\r
+    j = 5;\r
+    XtSetArg(args[j], XtNfromHoriz, w1);  j++;\r
+    XtSetArg(args[j], XtNstate, appData.firstHasOwnBookUCI);  j++;\r
+    w2 = XtCreateManagedWidget(_("own book 1"), toggleWidgetClass, form, args, j);   \r
+//    XtAddCallback(w2, XtNcallback, UciCallback, (XtPointer) 0);\r
+\r
+    j = 5;\r
+    XtSetArg(args[j], XtNfromHoriz, w2);  j++;\r
+    XtSetArg(args[j], XtNstate, appData.secondHasOwnBookUCI);  j++;\r
+    w3 = XtCreateManagedWidget(_("own book 2"), toggleWidgetClass, form, args, j);   \r
+//    XtAddCallback(w3, XtNcallback, UciCallback, (XtPointer) 0);\r
+\r
+    XtRealizeWidget(popup);\r
+    CatchDeleteWindow(popup, "UciPopDown");\r
+    \r
+    XQueryPointer(xDisplay, xBoardWindow, &root, &child,\r
+                 &x, &y, &win_x, &win_y, &mask);\r
+    \r
+    XtSetArg(args[0], XtNx, x - 10);\r
+    XtSetArg(args[1], XtNy, y - 30);\r
+    XtSetValues(popup, args, 2);\r
+    \r
+    XtPopup(popup, XtGrabExclusive);\r
+    UciUp = True;\r
+\r
+    previous = NULL;\r
+    SetFocus(controlDesc[2].handle, popup, (XEvent*) NULL, False);\r
+//    XtSetKeyboardFocus(popup, controlDesc[1].handle);\r
+}\r
+\r
+void UciMenuProc(w, event, prms, nprms)\r
+     Widget w;\r
+     XEvent *event;\r
+     String *prms;\r
+     Cardinal *nprms;\r
+{\r
+   UciPopUp();\r
+}\r
+\r
+//--------------------------- Engine-specific options menu ----------------------------------\r
+\r
+int SettingsUp;\r
+Widget SettingsShell;\r
+int values[MAX_OPTIONS];\r
+ChessProgramState *currentCps;\r
+\r
+void SettingsPopDown()\r
+{\r
+    if (!SettingsUp) return;\r
+    XtPopdown(SettingsShell);\r
+    XtDestroyWidget(SettingsShell);\r
+    SettingsUp = False;\r
+    ModeHighlight();\r
+}\r
+\r
+void SpinCallback(w, client_data, call_data)\r
+     Widget w;\r
+     XtPointer client_data, call_data;\r
+{\r
+    String name, val;\r
+    Widget w2;\r
+    Arg args[16];\r
+    char buf[MSG_SIZ];\r
+    int i, j;\r
+    \r
+    XtSetArg(args[0], XtNlabel, &name);\r
+    XtGetValues(w, args, 1);\r
+    \r
+    j = 0;\r
+    XtSetArg(args[0], XtNstring, &val);\r
+    XtGetValues(currentCps->option[(int)client_data].handle, args, 1);\r
+    sscanf(val, "%d", &j);\r
+    if (strcmp(name, "+") == 0) {\r
+       if(++j > currentCps->option[(int)client_data].max) return;\r
+    } else\r
+    if (strcmp(name, "-") == 0) {\r
+       if(--j < currentCps->option[(int)client_data].min) return;\r
+    } else return;\r
+    sprintf(buf, "%d", j);\r
+    XtSetArg(args[0], XtNstring, buf);\r
+    XtSetValues(currentCps->option[(int)client_data].handle, args, 1);\r
+}\r
+\r
+void SettingsCallback(w, client_data, call_data)\r
+     Widget w;\r
+     XtPointer client_data, call_data;\r
+{\r
+    String name, val;\r
+    Widget w2;\r
+    Arg args[16];\r
+    char buf[MSG_SIZ];\r
+    int i, j;\r
+    \r
+    XtSetArg(args[0], XtNlabel, &name);\r
+    XtGetValues(w, args, 1);\r
+    \r
+    if (strcmp(name, _("cancel")) == 0) {\r
+        SettingsPopDown();\r
+        return;\r
+    }\r
+    if (strcmp(name, _("OK")) == 0 || (int)client_data) { // save buttons imply OK\r
+       int nr;\r
+\r
+       for(i=0; i<currentCps->nrOptions; i++) { // send all options that had to be OK-ed to engine\r
+           switch(currentCps->option[i].type) {\r
+               case TextBox:\r
+                   XtSetArg(args[0], XtNstring, &val);\r
+                   XtGetValues(currentCps->option[i].handle, args, 1);\r
+                   if(strcmp(currentCps->option[i].textValue, val)) {\r
+                       strcpy(currentCps->option[i].textValue, val);\r
+                       sprintf(buf, _("option %s %s\n"), currentCps->option[i].name, val);\r
+                       SendToProgram(buf, currentCps);\r
+                   }\r
+                   break;\r
+               case Spin:\r
+                   XtSetArg(args[0], XtNstring, &val);\r
+                   XtGetValues(currentCps->option[i].handle, args, 1);\r
+                   sscanf(val, "%d", &j);\r
+                   if(j > currentCps->option[i].max) j = currentCps->option[i].max;\r
+                   if(j < currentCps->option[i].min) j = currentCps->option[i].min;\r
+                   if(currentCps->option[i].value != j) {\r
+                       currentCps->option[i].value = j;\r
+                       sprintf(buf, _("option %s %d\n"), currentCps->option[i].name, j);\r
+                       SendToProgram(buf, currentCps);\r
+                   }\r
+                   break;\r
+               case CheckBox:\r
+                   j = 0;\r
+                   XtSetArg(args[0], XtNstate, &j);\r
+                   XtGetValues(currentCps->option[i].handle, args, 1);\r
+                   if(currentCps->option[i].value != j) {\r
+                       currentCps->option[i].value = j;\r
+                       sprintf(buf, _("option %s %d\n"), currentCps->option[i].name, j);\r
+                       SendToProgram(buf, currentCps);\r
+                   }\r
+                   break;\r
+               case ComboBox:\r
+                   if(currentCps->option[i].value != values[i]) {\r
+                       currentCps->option[i].value = values[i];\r
+                       sprintf(buf, _("option %s %s\n"), currentCps->option[i].name, \r
+                               ((char**)currentCps->option[i].textValue)[values[i]]);\r
+                       SendToProgram(buf, currentCps);\r
+                   }\r
+                   break;\r
+           }\r
+       }\r
+       if((int)client_data) { // send save-button command to engine\r
+           sprintf(buf, _("option %s\n"), name);\r
+           SendToProgram(buf, currentCps);\r
+       }\r
+        SettingsPopDown();\r
+        return;\r
+    }\r
+    sprintf(buf, _("option %s\n"), name);\r
+    SendToProgram(buf, currentCps);\r
+}\r
+\r
+void ComboSelect(w, addr, index) // callback for all combo items\r
      Widget w;\r
      caddr_t addr;\r
      caddr_t index;\r
-{
-    Arg args[16];
-    int i = ((int)addr)>>8;
-    int j = 255 & (int) addr;
-
-    values[i] = j; // store in temporary, for transfer at OK
-    XtSetArg(args[0], XtNlabel, ((char**)currentCps->option[i].textValue)[j]);
+{\r
+    Arg args[16];\r
+    int i = ((int)addr)>>8;\r
+    int j = 255 & (int) addr;\r
+\r
+    values[i] = j; // store in temporary, for transfer at OK\r
+    XtSetArg(args[0], XtNlabel, ((char**)currentCps->option[i].textValue)[j]);\r
     XtSetValues(currentCps->option[i].handle, args, 1);\r
-}
-
+}\r
+\r
 void CreateComboPopup(parent, name, n, mb)\r
-     Widget parent;
-     String name;
+     Widget parent;\r
+     String name;\r
      int n;\r
      char *mb[];\r
 {\r
@@ -1439,9 +1448,9 @@ void CreateComboPopup(parent, name, n, mb)
     menu = XtCreatePopupShell(name, simpleMenuWidgetClass,\r
                              parent, NULL, 0);\r
     j = 0;\r
-    XtSetArg(args[j], XtNwidth, 100);  j++;
-//    XtSetArg(args[j], XtNright, XtChainRight);  j++;
-    while (mb[i] != NULL) {
+    XtSetArg(args[j], XtNwidth, 100);  j++;\r
+//    XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+    while (mb[i] != NULL) {\r
            entry = XtCreateManagedWidget(mb[i], smeBSBObjectClass,\r
                                          menu, args, j);\r
            XtAddCallback(entry, XtNcallback,\r
@@ -1451,273 +1460,273 @@ void CreateComboPopup(parent, name, n, mb)
     }\r
 }      \r
 \r
-void SettingsPopUp(ChessProgramState *cps)
-{
-    Arg args[16];
-    Widget popup, layout, dialog, edit, form, oldform, last, b_ok, b_cancel;
-    Window root, child;
-    int x, y, i, j;
-    int win_x, win_y;
-    unsigned int mask;
-    char def[80], *p, *q;
-
-    // to do: start up second engine if needed
-    if(!cps->initDone || !cps->nrOptions) return; // nothing to be done
-    currentCps = cps;
-
-    i = 0;
-    XtSetArg(args[i], XtNresizable, True); i++;
-    SettingsShell = popup =
-      XtCreatePopupShell("Settings Menu", transientShellWidgetClass,
-                        shellWidget, args, i);
-    
-    layout =
-      XtCreateManagedWidget(layoutName, formWidgetClass, popup,
-                           layoutArgs, XtNumber(layoutArgs));
-  
-    form =
-      XtCreateManagedWidget(layoutName, formWidgetClass, layout,
-                           formArgs, XtNumber(formArgs));
-  
-    last = NULL;
-    for(i=0; i<cps->nrOptions; i++) {
-       Widget box;
-       switch(cps->option[i].type) {
-         case Spin:
-           sprintf(def, "%d", cps->option[i].value);
-         case TextBox:
-           j=0;
-           XtSetArg(args[j], XtNfromVert, last);  j++;
-           XtSetArg(args[j], XtNborderWidth, 0);  j++;
-           XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
-           dialog = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);   
-           j=0;
-           XtSetArg(args[j], XtNfromVert, last);  j++;
-           XtSetArg(args[j], XtNfromHoriz, dialog);  j++;
-           XtSetArg(args[j], XtNborderWidth, 1); j++;
-           XtSetArg(args[j], XtNwidth, cps->option[i].type == Spin ? 40 : 100); j++;
-           XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
-           XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
-           XtSetArg(args[j], XtNdisplayCaret, False);  j++;
-           XtSetArg(args[j], XtNright, XtChainRight);  j++;
-           XtSetArg(args[j], XtNresizable, True);  j++;
-           XtSetArg(args[j], XtNstring, cps->option[i].type==Spin ? def : cps->option[i].textValue);  j++;
-           edit = last;
-           cps->option[i].handle = (void*)
-               (last = XtCreateManagedWidget("text", asciiTextWidgetClass, form, args, j));   
-           XtAddEventHandler(box, ButtonPressMask, False, SetFocus, (XtPointer) popup);
-           if(cps->option[i].type == TextBox) break;
-           // add increment and decrement controls for spin
-           j=0;
-           XtSetArg(args[j], XtNfromVert, edit);  j++;
-           XtSetArg(args[j], XtNfromHoriz, box);  j++;
-           XtSetArg(args[j], XtNheight, 10);  j++;
-           XtSetArg(args[j], XtNwidth, 20);  j++;
-           edit = XtCreateManagedWidget("+", commandWidgetClass, form, args, j);
-           XtAddCallback(edit, XtNcallback, SpinCallback, (XtPointer) i);
-           j=0;
-           XtSetArg(args[j], XtNfromVert, edit);  j++;
-           XtSetArg(args[j], XtNfromHoriz, last);  j++;
-           XtSetArg(args[j], XtNheight, 10);  j++;
-           XtSetArg(args[j], XtNwidth, 20);  j++;
-           last = XtCreateManagedWidget("-", commandWidgetClass, form, args, j);
-           XtAddCallback(last, XtNcallback, SpinCallback, (XtPointer) i);
-           break;
-         case CheckBox:
-           j=0;
-           XtSetArg(args[j], XtNfromVert, last);  j++;
-           XtSetArg(args[j], XtNwidth, 10);  j++;
-           XtSetArg(args[j], XtNheight, 10);  j++;
-           XtSetArg(args[j], XtNstate, cps->option[i].value);  j++;
-           cps->option[i].handle = (void*) 
-               (dialog = XtCreateManagedWidget(" ", toggleWidgetClass, form, args, j));   
-           j=0;
-           XtSetArg(args[j], XtNfromVert, last);  j++;
-           XtSetArg(args[j], XtNfromHoriz, dialog);  j++;
-           XtSetArg(args[j], XtNborderWidth, 0);  j++;
-           XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
-           last = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);
-           break;
-         case SaveButton:
-         case Button:
-           j=0;
-           XtSetArg(args[j], XtNfromVert, last);  j++;
-           XtSetArg(args[j], XtNstate, cps->option[i].value);  j++;
-           cps->option[i].handle = (void*) 
-               (last = XtCreateManagedWidget(cps->option[i].name, commandWidgetClass, form, args, j));   
-           XtAddCallback(last, XtNcallback, SettingsCallback, (XtPointer) (cps->option[i].type == SaveButton));
-           break;
-         case ComboBox:
-           j=0;
-           XtSetArg(args[j], XtNfromVert, last);  j++;
-           XtSetArg(args[j], XtNborderWidth, 0);  j++;
-           XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
-           dialog = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);
-
-           j=0;
-           XtSetArg(args[j], XtNfromVert, last);  j++;
-           XtSetArg(args[j], XtNfromHoriz, dialog);  j++;
-           XtSetArg(args[j], XtNwidth, 100);  j++;
-           XtSetArg(args[j], XtNmenuName, XtNewString(cps->option[i].name));  j++;
-           XtSetArg(args[j], XtNlabel, ((char**)cps->option[i].textValue)[cps->option[i].value]);  j++;
-           cps->option[i].handle = (void*) 
-               (last = XtCreateManagedWidget(" ", menuButtonWidgetClass, form, args, j));   
-           CreateComboPopup(last, cps->option[i].name, i, (char **) cps->option[i].textValue);
-           values[i] = cps->option[i].value;
-           break;
-       }
-    }
-
-    j=0;
-    XtSetArg(args[j], XtNfromVert, last);  j++;
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
-    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
-    XtSetArg(args[j], XtNright, XtChainLeft);  j++;
-    b_ok = XtCreateManagedWidget("OK", commandWidgetClass, form, args, j);   
-    XtAddCallback(b_ok, XtNcallback, SettingsCallback, (XtPointer) 0);
-
-    XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;
-    b_cancel = XtCreateManagedWidget("cancel", commandWidgetClass, form, args, j);   
-    XtAddCallback(b_cancel, XtNcallback, SettingsPopDown, (XtPointer) 0);
-
-    XtRealizeWidget(popup);
-    CatchDeleteWindow(popup, "SettingsPopDown");
-    
-    XQueryPointer(xDisplay, xBoardWindow, &root, &child,
-                 &x, &y, &win_x, &win_y, &mask);
-    
-    XtSetArg(args[0], XtNx, x - 10);
-    XtSetArg(args[1], XtNy, y - 30);
-    XtSetValues(popup, args, 2);
-    
-    XtPopup(popup, XtGrabExclusive);
-    SettingsUp = True;
-
-    previous = NULL;
-    SetFocus(edit, popup, (XEvent*) NULL, False);
-}
-
-void FirstSettingsProc(w, event, prms, nprms)
-     Widget w;
-     XEvent *event;
-     String *prms;
-     Cardinal *nprms;
-{
-   SettingsPopUp(&first);
-}
-
-void SecondSettingsProc(w, event, prms, nprms)
-     Widget w;
-     XEvent *event;
-     String *prms;
-     Cardinal *nprms;
-{
-   SettingsPopUp(&second);
-}
-
-//--------------------------- General Popup for Cloning ----------------------------------
-#if 0
-int XXXUp;
-Widget XXXShell;
-
-void XXXPopDown()
-{
-    if (!XXXUp) return;
-    XtPopdown(XXXShell);
-    XtDestroyWidget(XXXShell);
-    XXXUp = False;
-    ModeHighlight();
-}
-
-void XXXCallback(w, client_data, call_data)
-     Widget w;
-     XtPointer client_data, call_data;
-{
-    String name;
-    Widget w2;
-    Arg args[16];
-    char buf[80];
-    
-    XtSetArg(args[0], XtNlabel, &name);
-    XtGetValues(w, args, 1);
-    
-    if (strcmp(name, "cancel") == 0) {
-        XXXPopDown();
-        return;
-    }
-    if (strcmp(name, "ok") == 0) {
-       int nr; String name;
-        name = XawDialogGetValueString(w2 = XtParent(w));
-       if(sscanf(name ,"%d",&nr) != 1) {
-           sprintf(buf, "%d", appData.defaultFrcPosition);
-           XtSetArg(args[0],XtNvalue, buf); // erase bad (non-numeric) value
-           XtSetValues(w2, args, 1);
-           return;
-       }
-        XXXPopDown();
-        return;
-    }
-}
-
-void XXXPopUp()
-{
-    Arg args[16];
-    Widget popup, layout, dialog, edit;
-    Window root, child;
-    int x, y, i;
-    int win_x, win_y;
-    unsigned int mask;
-    char def[80];
-    
-    i = 0;
-    XtSetArg(args[i], XtNresizable, True); i++;
-    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;
-    XXXShell = popup =
-      XtCreatePopupShell("XXX Menu", transientShellWidgetClass,
-                        shellWidget, args, i);
-    
-    layout =
-      XtCreateManagedWidget(layoutName, formWidgetClass, popup,
-                           layoutArgs, XtNumber(layoutArgs));
-  
-    sprintf(def, "%d\n", appData.defaultFrcPosition);
-    i = 0;
-    XtSetArg(args[i], XtNlabel, ""); i++;
-    XtSetArg(args[i], XtNvalue, def); i++;
-    XtSetArg(args[i], XtNborderWidth, 0); i++;
-    dialog = XtCreateManagedWidget("XXX", dialogWidgetClass,
-                                  layout, args, i);
-    
-    XawDialogAddButton(dialog, "ok", XXXCallback, (XtPointer) dialog);
-    XawDialogAddButton(dialog, "cancel", XXXCallback, (XtPointer) dialog);
-    
-    XtRealizeWidget(popup);
-    CatchDeleteWindow(popup, "XXXPopDown");
-    
-    XQueryPointer(xDisplay, xBoardWindow, &root, &child,
-                 &x, &y, &win_x, &win_y, &mask);
-    
-    XtSetArg(args[0], XtNx, x - 10);
-    XtSetArg(args[1], XtNy, y - 30);
-    XtSetValues(popup, args, 2);
-    
-    XtPopup(popup, XtGrabExclusive);
-    XXXUp = True;
-    
-    edit = XtNameToWidget(dialog, "*value");
-
-    previous = NULL;
-    SetFocus(engThreshold, popup, (XEvent*) NULL, False);
-}
-
-void XXXMenuProc(w, event, prms, nprms)
-     Widget w;
-     XEvent *event;
-     String *prms;
-     Cardinal *nprms;
-{
-   XXXPopUp();
-}
-#endif
-
+void SettingsPopUp(ChessProgramState *cps)\r
+{\r
+    Arg args[16];\r
+    Widget popup, layout, dialog, edit, form, oldform, last, b_ok, b_cancel;\r
+    Window root, child;\r
+    int x, y, i, j;\r
+    int win_x, win_y;\r
+    unsigned int mask;\r
+    char def[80], *p, *q;\r
+\r
+    // to do: start up second engine if needed\r
+    if(!cps->initDone || !cps->nrOptions) return; // nothing to be done\r
+    currentCps = cps;\r
+\r
+    i = 0;\r
+    XtSetArg(args[i], XtNresizable, True); i++;\r
+    SettingsShell = popup =\r
+      XtCreatePopupShell(_("Settings Menu"), transientShellWidgetClass,\r
+                        shellWidget, args, i);\r
+    \r
+    layout =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, popup,\r
+                           layoutArgs, XtNumber(layoutArgs));\r
+  \r
+    form =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, layout,\r
+                           formArgs, XtNumber(formArgs));\r
+  \r
+    last = NULL;\r
+    for(i=0; i<cps->nrOptions; i++) {\r
+       Widget box;\r
+       switch(cps->option[i].type) {\r
+         case Spin:\r
+           sprintf(def, "%d", cps->option[i].value);\r
+         case TextBox:\r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, last);  j++;\r
+           XtSetArg(args[j], XtNborderWidth, 0);  j++;\r
+           XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;\r
+           dialog = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);   \r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, last);  j++;\r
+           XtSetArg(args[j], XtNfromHoriz, dialog);  j++;\r
+           XtSetArg(args[j], XtNborderWidth, 1); j++;\r
+           XtSetArg(args[j], XtNwidth, cps->option[i].type == Spin ? 40 : 100); j++;\r
+           XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
+           XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
+           XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
+           XtSetArg(args[j], XtNright, XtChainRight);  j++;\r
+           XtSetArg(args[j], XtNresizable, True);  j++;\r
+           XtSetArg(args[j], XtNstring, cps->option[i].type==Spin ? def : cps->option[i].textValue);  j++;\r
+           edit = last;\r
+           cps->option[i].handle = (void*)\r
+               (last = XtCreateManagedWidget("text", asciiTextWidgetClass, form, args, j));   \r
+           XtAddEventHandler(box, ButtonPressMask, False, SetFocus, (XtPointer) popup);\r
+           if(cps->option[i].type == TextBox) break;\r
+           // add increment and decrement controls for spin\r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, edit);  j++;\r
+           XtSetArg(args[j], XtNfromHoriz, box);  j++;\r
+           XtSetArg(args[j], XtNheight, 10);  j++;\r
+           XtSetArg(args[j], XtNwidth, 20);  j++;\r
+           edit = XtCreateManagedWidget("+", commandWidgetClass, form, args, j);\r
+           XtAddCallback(edit, XtNcallback, SpinCallback, (XtPointer) i);\r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, edit);  j++;\r
+           XtSetArg(args[j], XtNfromHoriz, last);  j++;\r
+           XtSetArg(args[j], XtNheight, 10);  j++;\r
+           XtSetArg(args[j], XtNwidth, 20);  j++;\r
+           last = XtCreateManagedWidget("-", commandWidgetClass, form, args, j);\r
+           XtAddCallback(last, XtNcallback, SpinCallback, (XtPointer) i);\r
+           break;\r
+         case CheckBox:\r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, last);  j++;\r
+           XtSetArg(args[j], XtNwidth, 10);  j++;\r
+           XtSetArg(args[j], XtNheight, 10);  j++;\r
+           XtSetArg(args[j], XtNstate, cps->option[i].value);  j++;\r
+           cps->option[i].handle = (void*) \r
+               (dialog = XtCreateManagedWidget(" ", toggleWidgetClass, form, args, j));   \r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, last);  j++;\r
+           XtSetArg(args[j], XtNfromHoriz, dialog);  j++;\r
+           XtSetArg(args[j], XtNborderWidth, 0);  j++;\r
+           XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;\r
+           last = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);\r
+           break;\r
+         case SaveButton:\r
+         case Button:\r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, last);  j++;\r
+           XtSetArg(args[j], XtNstate, cps->option[i].value);  j++;\r
+           cps->option[i].handle = (void*) \r
+               (last = XtCreateManagedWidget(cps->option[i].name, commandWidgetClass, form, args, j));   \r
+           XtAddCallback(last, XtNcallback, SettingsCallback, (XtPointer) (cps->option[i].type == SaveButton));\r
+           break;\r
+         case ComboBox:\r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, last);  j++;\r
+           XtSetArg(args[j], XtNborderWidth, 0);  j++;\r
+           XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;\r
+           dialog = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);\r
+\r
+           j=0;\r
+           XtSetArg(args[j], XtNfromVert, last);  j++;\r
+           XtSetArg(args[j], XtNfromHoriz, dialog);  j++;\r
+           XtSetArg(args[j], XtNwidth, 100);  j++;\r
+           XtSetArg(args[j], XtNmenuName, XtNewString(cps->option[i].name));  j++;\r
+           XtSetArg(args[j], XtNlabel, ((char**)cps->option[i].textValue)[cps->option[i].value]);  j++;\r
+           cps->option[i].handle = (void*) \r
+               (last = XtCreateManagedWidget(" ", menuButtonWidgetClass, form, args, j));   \r
+           CreateComboPopup(last, cps->option[i].name, i, (char **) cps->option[i].textValue);\r
+           values[i] = cps->option[i].value;\r
+           break;\r
+       }\r
+    }\r
+\r
+    j=0;\r
+    XtSetArg(args[j], XtNfromVert, last);  j++;\r
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNtop, XtChainBottom);  j++;\r
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;\r
+    XtSetArg(args[j], XtNright, XtChainLeft);  j++;\r
+    b_ok = XtCreateManagedWidget(_("OK"), commandWidgetClass, form, args, j);   \r
+    XtAddCallback(b_ok, XtNcallback, SettingsCallback, (XtPointer) 0);\r
+\r
+    XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;\r
+    b_cancel = XtCreateManagedWidget(_("cancel"), commandWidgetClass, form, args, j);   \r
+    XtAddCallback(b_cancel, XtNcallback, SettingsPopDown, (XtPointer) 0);\r
+\r
+    XtRealizeWidget(popup);\r
+    CatchDeleteWindow(popup, "SettingsPopDown");\r
+    \r
+    XQueryPointer(xDisplay, xBoardWindow, &root, &child,\r
+                 &x, &y, &win_x, &win_y, &mask);\r
+    \r
+    XtSetArg(args[0], XtNx, x - 10);\r
+    XtSetArg(args[1], XtNy, y - 30);\r
+    XtSetValues(popup, args, 2);\r
+    \r
+    XtPopup(popup, XtGrabExclusive);\r
+    SettingsUp = True;\r
+\r
+    previous = NULL;\r
+    SetFocus(edit, popup, (XEvent*) NULL, False);\r
+}\r
+\r
+void FirstSettingsProc(w, event, prms, nprms)\r
+     Widget w;\r
+     XEvent *event;\r
+     String *prms;\r
+     Cardinal *nprms;\r
+{\r
+   SettingsPopUp(&first);\r
+}\r
+\r
+void SecondSettingsProc(w, event, prms, nprms)\r
+     Widget w;\r
+     XEvent *event;\r
+     String *prms;\r
+     Cardinal *nprms;\r
+{\r
+   SettingsPopUp(&second);\r
+}\r
+\r
+//--------------------------- General Popup for Cloning ----------------------------------\r
+#if 0\r
+int XXXUp;\r
+Widget XXXShell;\r
+\r
+void XXXPopDown()\r
+{\r
+    if (!XXXUp) return;\r
+    XtPopdown(XXXShell);\r
+    XtDestroyWidget(XXXShell);\r
+    XXXUp = False;\r
+    ModeHighlight();\r
+}\r
+\r
+void XXXCallback(w, client_data, call_data)\r
+     Widget w;\r
+     XtPointer client_data, call_data;\r
+{\r
+    String name;\r
+    Widget w2;\r
+    Arg args[16];\r
+    char buf[80];\r
+    \r
+    XtSetArg(args[0], XtNlabel, &name);\r
+    XtGetValues(w, args, 1);\r
+    \r
+    if (strcmp(name, _("cancel")) == 0) {\r
+        XXXPopDown();\r
+        return;\r
+    }\r
+    if (strcmp(name, _("ok")) == 0) {\r
+       int nr; String name;\r
+        name = XawDialogGetValueString(w2 = XtParent(w));\r
+       if(sscanf(name ,"%d",&nr) != 1) {\r
+           sprintf(buf, "%d", appData.defaultFrcPosition);\r
+           XtSetArg(args[0],XtNvalue, buf); // erase bad (non-numeric) value\r
+           XtSetValues(w2, args, 1);\r
+           return;\r
+       }\r
+        XXXPopDown();\r
+        return;\r
+    }\r
+}\r
+\r
+void XXXPopUp()\r
+{\r
+    Arg args[16];\r
+    Widget popup, layout, dialog, edit;\r
+    Window root, child;\r
+    int x, y, i;\r
+    int win_x, win_y;\r
+    unsigned int mask;\r
+    char def[80];\r
+    \r
+    i = 0;\r
+    XtSetArg(args[i], XtNresizable, True); i++;\r
+    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;\r
+    XXXShell = popup =\r
+      XtCreatePopupShell(_("XXX Menu"), transientShellWidgetClass,\r
+                        shellWidget, args, i);\r
+    \r
+    layout =\r
+      XtCreateManagedWidget(layoutName, formWidgetClass, popup,\r
+                           layoutArgs, XtNumber(layoutArgs));\r
+  \r
+    sprintf(def, "%d\n", appData.defaultFrcPosition);\r
+    i = 0;\r
+    XtSetArg(args[i], XtNlabel, ""); i++;\r
+    XtSetArg(args[i], XtNvalue, def); i++;\r
+    XtSetArg(args[i], XtNborderWidth, 0); i++;\r
+    dialog = XtCreateManagedWidget("XXX", dialogWidgetClass,\r
+                                  layout, args, i);\r
+    \r
+    XawDialogAddButton(dialog, _("ok"), XXXCallback, (XtPointer) dialog);\r
+    XawDialogAddButton(dialog, _("cancel"), XXXCallback, (XtPointer) dialog);\r
+    \r
+    XtRealizeWidget(popup);\r
+    CatchDeleteWindow(popup, "XXXPopDown");\r
+    \r
+    XQueryPointer(xDisplay, xBoardWindow, &root, &child,\r
+                 &x, &y, &win_x, &win_y, &mask);\r
+    \r
+    XtSetArg(args[0], XtNx, x - 10);\r
+    XtSetArg(args[1], XtNy, y - 30);\r
+    XtSetValues(popup, args, 2);\r
+    \r
+    XtPopup(popup, XtGrabExclusive);\r
+    XXXUp = True;\r
+    \r
+    edit = XtNameToWidget(dialog, "*value");\r
+\r
+    previous = NULL;\r
+    SetFocus(engThreshold, popup, (XEvent*) NULL, False);\r
+}\r
+\r
+void XXXMenuProc(w, event, prms, nprms)\r
+     Widget w;\r
+     XEvent *event;\r
+     String *prms;\r
+     Cardinal *nprms;\r
+{\r
+   XXXPopUp();\r
+}\r
+#endif\r
+\r