dialogs.c

   1 /*
   2  * dialogs.c -- platform-independent code for dialogs of XBoard
   3  *
   4  * Copyright 2000, 2009, 2010, 2011, 2012 Free Software Foundation, Inc.
   5  * ------------------------------------------------------------------------
   6  *
   7  * GNU XBoard is free software: you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation, either version 3 of the License, or (at
  10  * your option) any later version.
  11  *
  12  * GNU XBoard is distributed in the hope that it will be useful, but
  13  * WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  15  * General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program. If not, see http://www.gnu.org/licenses/.  *
  19  *
  20  *------------------------------------------------------------------------
  21  ** See the file ChangeLog for a revision history.  */
  22
  23 // [HGM] this file is the counterpart of woptions.c, containing xboard popup menus
  24 // similar to those of WinBoard, to set the most common options interactively.
  25
  26 #include "config.h"
  27
  28 #include <stdio.h>
  29 #include <ctype.h>
  30 #include <errno.h>
  31 #include <sys/types.h>
  32
  33 #if STDC_HEADERS
  34 # include <stdlib.h>
  35 # include <string.h>
  36 #else /* not STDC_HEADERS */
  37 extern char *getenv();
  38 # if HAVE_STRING_H
  39 #  include <string.h>
  40 # else /* not HAVE_STRING_H */
  41 #  include <strings.h>
  42 # endif /* not HAVE_STRING_H */
  43 #endif /* not STDC_HEADERS */
  44
  45 #if HAVE_UNISTD_H
  46 # include <unistd.h>
  47 #endif
  48 #include <stdint.h>
  49
  50 #include "common.h"
  51 #include "backend.h"
  52 #include "xboard.h"
  53 #include "menus.h"
  54 #include "dialogs.h"
  55 #include "gettext.h"
  56
  57 #ifdef ENABLE_NLS
  58 # define  _(s) gettext (s)
  59 # define N_(s) gettext_noop (s)
  60 #else
  61 # define  _(s) (s)
  62 # define N_(s)  s
  63 #endif
  64
  65
  66 int values[MAX_OPTIONS];
  67 ChessProgramState *currentCps;
  68
  69 //----------------------------Generic dialog --------------------------------------------
  70
  71 // cloned from Engine Settings dialog (and later merged with it)
  72
  73 char *marked[NrOfDialogs];
  74 Boolean shellUp[NrOfDialogs];
  75
  76 void
  77 MarkMenu (char *item, int dlgNr)
  78 {
  79     MarkMenuItem(marked[dlgNr] = item, True);
  80 }
  81
  82 void
  83 AddLine (Option *opt, char *s)
  84 {
  85     AppendText(opt, s);
  86     AppendText(opt, "\n");
  87 }
  88
  89 //---------------------------------------------- Update dialog controls ------------------------------------
  90
  91 int
  92 SetCurrentComboSelection (Option *opt)
  93 {
  94     int j;
  95     if(!opt->textValue) opt->value = *(int*)opt->target; /* numeric */else {
  96         for(j=0; opt->choice[j]; j++) // look up actual value in list of possible values, to get selection nr
  97             if(*(char**)opt->target && !strcmp(*(char**)opt->target, ((char**)opt->textValue)[j])) break;
  98         opt->value = j + (opt->choice[j] == NULL);
  99     }
 100     return opt->value;
 101 }
 102
 103 void
 104 GenericUpdate (Option *opts, int selected)
 105 {
 106     int i, j;
 107     char buf[MSG_SIZ];
 108     float x;
 109         for(i=0; ; i++) {
 110             if(selected >= 0) { if(i < selected) continue; else if(i > selected) break; }
 111             switch(opts[i].type) {
 112                 case TextBox:
 113                 case FileName:
 114                 case PathName:
 115                     SetWidgetText(&opts[i],  *(char**) opts[i].target, -1);
 116                     break;
 117                 case Spin:
 118                     sprintf(buf, "%d", *(int*) opts[i].target);
 119                     SetWidgetText(&opts[i], buf, -1);
 120                     break;
 121                 case Fractional:
 122                     sprintf(buf, "%4.2f", *(float*) opts[i].target);
 123                     SetWidgetText(&opts[i], buf, -1);
 124                     break;
 125                 case CheckBox:
 126                     SetWidgetState(&opts[i],  *(Boolean*) opts[i].target);
 127                     break;
 128                 case ComboBox:
 129                   if(opts[i].min & COMBO_CALLBACK) break;
 130                   SetCurrentComboSelection(opts+i);
 131                     // TODO: actually display this (but it is never used that way...)
 132                     break;
 133                 case EndMark:
 134                     return;
 135             default:
 136                 printf("GenericUpdate: unexpected case in switch.\n");
 137                 case ListBox:
 138                 case Button:
 139                 case SaveButton:
 140                 case Label:
 141                 case Break:
 142               break;
 143             }
 144         }
 145 }
 146
 147 //------------------------------------------- Read out dialog controls ------------------------------------
 148
 149 int
 150 GenericReadout (Option *opts, int selected)
 151 {
 152     int i, j, res=1;
 153     char *val;
 154     char buf[MSG_SIZ], **dest;
 155     float x;
 156         for(i=0; ; i++) { // send all options that had to be OK-ed to engine
 157             if(selected >= 0) { if(i < selected) continue; else if(i > selected) break; }
 158             switch(opts[i].type) {
 159                 case TextBox:
 160                 case FileName:
 161                 case PathName:
 162                     GetWidgetText(&opts[i], &val);
 163                     dest = currentCps ? &(opts[i].textValue) : (char**) opts[i].target;
 164                     if(*dest == NULL || strcmp(*dest, val)) {
 165                         if(currentCps) {
 166                             snprintf(buf, MSG_SIZ,  "option %s=%s\n", opts[i].name, val);
 167                             SendToProgram(buf, currentCps);
 168                         } else {
 169                             if(*dest) free(*dest);
 170                             *dest = malloc(strlen(val)+1);
 171                         }
 172                         safeStrCpy(*dest, val, MSG_SIZ - (*dest - opts[i].name)); // copy text there
 173                     }
 174                     break;
 175                 case Spin:
 176                 case Fractional:
 177                     GetWidgetText(&opts[i], &val);
 178                     x = 0.0; // Initialise because sscanf() will fail if non-numeric text is entered
 179                     sscanf(val, "%f", &x);
 180                     if(x > opts[i].max) x = opts[i].max;
 181                     if(x < opts[i].min) x = opts[i].min;
 182                     if(opts[i].type == Fractional)
 183                         *(float*) opts[i].target = x; // engines never have float options!
 184                     else if(opts[i].value != x) {
 185                         opts[i].value = x;
 186                         if(currentCps) {
 187                             snprintf(buf, MSG_SIZ,  "option %s=%.0f\n", opts[i].name, x);
 188                             SendToProgram(buf, currentCps);
 189                         } else *(int*) opts[i].target = x;
 190                     }
 191                     break;
 192                 case CheckBox:
 193                     j = 0;
 194                     GetWidgetState(&opts[i], &j);
 195                     if(opts[i].value != j) {
 196                         opts[i].value = j;
 197                         if(currentCps) {
 198                             snprintf(buf, MSG_SIZ,  "option %s=%d\n", opts[i].name, j);
 199                             SendToProgram(buf, currentCps);
 200                         } else *(Boolean*) opts[i].target = j;
 201                     }
 202                     break;
 203                 case ComboBox:
 204                     if(opts[i].min & COMBO_CALLBACK) break;
 205                     if(!opts[i].textValue) { *(int*)opts[i].target == opts[i].value; break; } // numeric
 206                     val = ((char**)opts[i].textValue)[values[i]];
 207                     if(currentCps) {
 208                         if(opts[i].value == values[i]) break; // not changed
 209                         opts[i].value = values[i];
 210                         snprintf(buf, MSG_SIZ,  "option %s=%s\n", opts[i].name, opts[i].choice[values[i]]);
 211                         SendToProgram(buf, currentCps);
 212                     } else if(val && (*(char**) opts[i].target == NULL || strcmp(*(char**) opts[i].target, val))) {
 213                       if(*(char**) opts[i].target) free(*(char**) opts[i].target);
 214                       *(char**) opts[i].target = strdup(val);
 215                     }
 216                     break;
 217                 case EndMark:
 218                     if(opts[i].target) // callback for implementing necessary actions on OK (like redraw)
 219                         res = ((OKCallback*) opts[i].target)(i);
 220                     break;
 221             default:
 222                 printf("GenericReadout: unexpected case in switch.\n");
 223                 case ListBox:
 224                 case Button:
 225                 case SaveButton:
 226                 case Label:
 227                 case Break:
 228               break;
 229             }
 230             if(opts[i].type == EndMark) break;
 231         }
 232         return res;
 233 }
 234
 235 //------------------------------------------- Match Options ------------------------------------------------------
 236
 237 char *engineName, *engineChoice, *tfName;
 238 char *engineList[MAXENGINES] = {" "}, *engineMnemonic[MAXENGINES] = {""};
 239
 240 static void AddToTourney P((int n));
 241 static void CloneTourney P((void));
 242 static void ReplaceParticipant P((void));
 243 static void UpgradeParticipant P((void));
 244
 245 static int
 246 MatchOK (int n)
 247 {
 248     ASSIGN(appData.participants, engineName);
 249     if(!CreateTourney(tfName) || matchMode) return matchMode || !appData.participants[0];
 250     PopDown(TransientDlg); // early popdown to prevent FreezeUI called through MatchEvent from causing XtGrab warning
 251     MatchEvent(2); // start tourney
 252     return FALSE;  // no double PopDown!
 253 }
 254
 255 static Option matchOptions[] = {
 256 { 0,  0,          0, NULL, (void*) &tfName, ".trn", NULL, FileName, N_("Tournament file:") },
 257 { 0,  0,          0, NULL, (void*) &appData.roundSync, "", NULL, CheckBox, N_("Sync after round") },
 258 { 0, SAME_ROW|LL, 0, NULL, NULL, "", NULL, Label, N_("    (for concurrent playing of a single") },
 259 { 0,  0,          0, NULL, (void*) &appData.cycleSync, "", NULL, CheckBox, N_("Sync after cycle") },
 260 { 0, SAME_ROW|LL, 0, NULL, NULL, "", NULL, Label, N_("      tourney with multiple XBoards)") },
 261 { 0,  LR,       200, NULL, NULL, "", NULL, Label, N_("Tourney participants:") },
 262 { 0, SAME_ROW|RR, 0, NULL, NULL, "", NULL, Label, N_("Select Engine:") },
 263 { 150, T_VSCRL | T_FILL | T_WRAP,
 264                 175, NULL, (void*) &engineName, "", NULL, TextBox, "" },
 265 { 150, SAME_ROW|RR,
 266                 175, NULL, (void*) (engineMnemonic+1), (char*) &AddToTourney, NULL, ListBox, "" },
 267 //{ 0,  COMBO_CALLBACK | NO_GETTEXT,
 268 //                0, NULL, (void*) &AddToTourney, (char*) (engineMnemonic+1), (engineMnemonic+1), ComboBox, N_("Select Engine:") },
 269 { 0,  0,         10, NULL, (void*) &appData.tourneyType, "", NULL, Spin, N_("Tourney type (0 = round-robin, 1 = gauntlet):") },
 270 { 0,  1, 1000000000, NULL, (void*) &appData.tourneyCycles, "", NULL, Spin, N_("Number of tourney cycles (or Swiss rounds):") },
 271 { 0,  1, 1000000000, NULL, (void*) &appData.defaultMatchGames, "", NULL, Spin, N_("Default Number of Games in Match (or Pairing):") },
 272 { 0,  0, 1000000000, NULL, (void*) &appData.matchPause, "", NULL, Spin, N_("Pause between Match Games (msec):") },
 273 { 0,  0,          0, NULL, (void*) &appData.saveGameFile, ".pgn", NULL, FileName, N_("Save Tourney Games on:") },
 274 { 0,  0,          0, NULL, (void*) &appData.loadGameFile, ".pgn", NULL, FileName, N_("Game File with Opening Lines:") },
 275 { 0, -2, 1000000000, NULL, (void*) &appData.loadGameIndex, "", NULL, Spin, N_("Game Number (-1 or -2 = Auto-Increment):") },
 276 { 0,  0,          0, NULL, (void*) &appData.loadPositionFile, ".fen", NULL, FileName, N_("File with Start Positions:") },
 277 { 0, -2, 1000000000, NULL, (void*) &appData.loadPositionIndex, "", NULL, Spin, N_("Position Number (-1 or -2 = Auto-Increment):") },
 278 { 0,  0, 1000000000, NULL, (void*) &appData.rewindIndex, "", NULL, Spin, N_("Rewind Index after this many Games (0 = never):") },
 279 { 0,  0,          0, NULL, (void*) &appData.defNoBook, "", NULL, CheckBox, N_("Disable own engine books by default") },
 280 { 0,  0,          0, NULL, (void*) &ReplaceParticipant, NULL, NULL, Button, N_("Replace Engine") },
 281 { 0, SAME_ROW,    0, NULL, (void*) &UpgradeParticipant, NULL, NULL, Button, N_("Upgrade Engine") },
 282 { 0, SAME_ROW,    0, NULL, (void*) &CloneTourney, NULL, NULL, Button, N_("Clone Tourney") },
 283 { 0, SAME_ROW,    0, NULL, (void*) &MatchOK, "", NULL, EndMark , "" }
 284 };
 285
 286 static void
 287 ReplaceParticipant ()
 288 {
 289     GenericReadout(matchOptions, 7);
 290     Substitute(strdup(engineName), True);
 291 }
 292
 293 static void
 294 UpgradeParticipant ()
 295 {
 296     GenericReadout(matchOptions, 7);
 297     Substitute(strdup(engineName), False);
 298 }
 299
 300 static void
 301 CloneTourney ()
 302 {
 303     FILE *f;
 304     char *name;
 305     GetWidgetText(matchOptions, &name);
 306     if(name && name[0] && (f = fopen(name, "r")) ) {
 307         char *saveSaveFile;
 308         saveSaveFile = appData.saveGameFile; appData.saveGameFile = NULL; // this is a persistent option, protect from change
 309         ParseArgsFromFile(f);
 310         engineName = appData.participants; GenericUpdate(matchOptions, -1);
 311         FREE(appData.saveGameFile); appData.saveGameFile = saveSaveFile;
 312     } else DisplayError(_("First you must specify an existing tourney file to clone"), 0);
 313 }
 314
 315 static void
 316 AddToTourney (int n)
 317 {
 318     AddLine(&matchOptions[7], engineMnemonic[SelectedListBoxItem(&matchOptions[8])+1]);
 319 }
 320
 321 void
 322 MatchOptionsProc ()
 323 {
 324    NamesToList(firstChessProgramNames, engineList, engineMnemonic, "all");
 325    matchOptions[9].min = -(appData.pairingEngine[0] != NULLCHAR); // with pairing engine, allow Swiss
 326    ASSIGN(tfName, appData.tourneyFile[0] ? appData.tourneyFile : MakeName(appData.defName));
 327    ASSIGN(engineName, appData.participants);
 328    GenericPopUp(matchOptions, _("Match Options"), TransientDlg, BoardWindow, MODAL, 0);
 329 }
 330
 331 // ------------------------------------------- General Options --------------------------------------------------
 332
 333 static int oldShow, oldBlind, oldPonder;
 334
 335 static int
 336 GeneralOptionsOK (int n)
 337 {
 338         int newPonder = appData.ponderNextMove;
 339         appData.ponderNextMove = oldPonder;
 340         PonderNextMoveEvent(newPonder);
 341         if(!appData.highlightLastMove) ClearHighlights(), ClearPremoveHighlights();
 342         if(oldShow != appData.showCoords || oldBlind != appData.blindfold) DrawPosition(TRUE, NULL);
 343         return 1;
 344 }
 345
 346 static Option generalOptions[] = {
 347 { 0,  0, 0, NULL, (void*) &appData.whitePOV, "", NULL, CheckBox, N_("Absolute Analysis Scores") },
 348 { 0,  0, 0, NULL, (void*) &appData.sweepSelect, "", NULL, CheckBox, N_("Almost Always Queen (Detour Under-Promote)") },
 349 { 0,  0, 0, NULL, (void*) &appData.animateDragging, "", NULL, CheckBox, N_("Animate Dragging") },
 350 { 0,  0, 0, NULL, (void*) &appData.animate, "", NULL, CheckBox, N_("Animate Moving") },
 351 { 0,  0, 0, NULL, (void*) &appData.autoCallFlag, "", NULL, CheckBox, N_("Auto Flag") },
 352 { 0,  0, 0, NULL, (void*) &appData.autoFlipView, "", NULL, CheckBox, N_("Auto Flip View") },
 353 { 0,  0, 0, NULL, (void*) &appData.blindfold, "", NULL, CheckBox, N_("Blindfold") },
 354 { 0,  0, 0, NULL, (void*) &appData.dropMenu, "", NULL, CheckBox, N_("Drop Menu") },
 355 { 0,  0, 0, NULL, (void*) &appData.hideThinkingFromHuman, "", NULL, CheckBox, N_("Hide Thinking from Human") },
 356 { 0,  0, 0, NULL, (void*) &appData.highlightLastMove, "", NULL, CheckBox, N_("Highlight Last Move") },
 357 { 0,  0, 0, NULL, (void*) &appData.highlightMoveWithArrow, "", NULL, CheckBox, N_("Highlight with Arrow") },
 358 { 0,  0, 0, NULL, (void*) &appData.ringBellAfterMoves, "", NULL, CheckBox, N_("Move Sound") },
 359 { 0,  0, 0, NULL, (void*) &appData.oneClick, "", NULL, CheckBox, N_("One-Click Moving") },
 360 { 0,  0, 0, NULL, (void*) &appData.periodicUpdates, "", NULL, CheckBox, N_("Periodic Updates (in Analysis Mode)") },
 361 { 0,  0, 0, NULL, (void*) &appData.ponderNextMove, "", NULL, CheckBox, N_("Ponder Next Move") },
 362 { 0,  0, 0, NULL, (void*) &appData.popupExitMessage, "", NULL, CheckBox, N_("Popup Exit Messages") },
 363 { 0,  0, 0, NULL, (void*) &appData.popupMoveErrors, "", NULL, CheckBox, N_("Popup Move Errors") },
 364 { 0,  0, 0, NULL, (void*) &appData.showEvalInMoveHistory, "", NULL, CheckBox, N_("Scores in Move List") },
 365 { 0,  0, 0, NULL, (void*) &appData.showCoords, "", NULL, CheckBox, N_("Show Coordinates") },
 366 { 0,  0, 0, NULL, (void*) &appData.markers, "", NULL, CheckBox, N_("Show Target Squares") },
 367 { 0,  0, 0, NULL, (void*) &appData.useStickyWindows, "", NULL, CheckBox, N_("Sticky Windows") },
 368 { 0,  0, 0, NULL, (void*) &appData.testLegality, "", NULL, CheckBox, N_("Test Legality") },
 369 { 0,  0, 0, NULL, (void*) &appData.topLevel, "", NULL, CheckBox, N_("Top-Level Dialogs") },
 370 { 0, 0,10,  NULL, (void*) &appData.flashCount, "", NULL, Spin, N_("Flash Moves (0 = no flashing):") },
 371 { 0, 1,10,  NULL, (void*) &appData.flashRate, "", NULL, Spin, N_("Flash Rate (high = fast):") },
 372 { 0, 5,100, NULL, (void*) &appData.animSpeed, "", NULL, Spin, N_("Animation Speed (high = slow):") },
 373 { 0, 1,5,   NULL, (void*) &appData.zoom, "", NULL, Spin, N_("Zoom factor in Evaluation Graph:") },
 374 { 0,  0, 0, NULL, (void*) &GeneralOptionsOK, "", NULL, EndMark , "" }
 375 };
 376
 377 void
 378 OptionsProc ()
 379 {
 380    oldPonder = appData.ponderNextMove;
 381    oldShow = appData.showCoords; oldBlind = appData.blindfold;
 382    GenericPopUp(generalOptions, _("General Options"), TransientDlg, BoardWindow, MODAL, 0);
 383 }
 384
 385 //---------------------------------------------- New Variant ------------------------------------------------
 386
 387 static void Pick P((int n));
 388
 389 static char warning[MSG_SIZ];
 390
 391 static Option variantDescriptors[] = {
 392 { 0, 0, 275, NULL, NULL, NULL, NULL, Label, warning },
 393 { VariantNormal,        0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("normal")},
 394 { VariantFairy,  SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFBF", NULL, Button, N_("fairy")},
 395 { VariantFischeRandom,  0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("FRC")},
 396 { VariantSChess, SAME_ROW, 135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("Seirawan")},
 397 { VariantWildCastle,    0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("wild castle")},
 398 { VariantSuper,  SAME_ROW, 135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("Superchess")},
 399 { VariantNoCastle,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("no castle")},
 400 { VariantCrazyhouse,SAME_ROW,135,NULL,(void*) &Pick, "#FFBFBF", NULL, Button, N_("crazyhouse")},
 401 { VariantKnightmate,    0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("knightmate")},
 402 { VariantBughouse,SAME_ROW,135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("bughouse")},
 403 { VariantBerolina,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("berolina")},
 404 { VariantShogi,  SAME_ROW, 135, NULL, (void*) &Pick, "#BFFFFF", NULL, Button, N_("shogi (9x9)")},
 405 { VariantCylinder,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("cylinder")},
 406 { VariantXiangqi, SAME_ROW,135, NULL, (void*) &Pick, "#BFFFFF", NULL, Button, N_("xiangqi (9x10)")},
 407 { VariantShatranj,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("shatranj")},
 408 { VariantCourier, SAME_ROW,135, NULL, (void*) &Pick, "#BFFFBF", NULL, Button, N_("courier (12x8)")},
 409 { VariantMakruk,        0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("makruk")},
 410 { VariantGreat,  SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("Great Shatranj (10x8)")},
 411 { VariantAtomic,        0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("atomic")},
 412 { VariantFalcon, SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("falcon (10x8)")},
 413 { VariantTwoKings,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("two kings")},
 414 { VariantCapablanca,SAME_ROW,135,NULL,(void*) &Pick, "#BFBFFF", NULL, Button, N_("Capablanca (10x8)")},
 415 { Variant3Check,        0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("3-checks")},
 416 { VariantGothic, SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("Gothic (10x8)")},
 417 { VariantSuicide,       0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("suicide")},
 418 { VariantJanus,  SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("janus (10x8)")},
 419 { VariantGiveaway,      0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("give-away")},
 420 { VariantCapaRandom,SAME_ROW,135,NULL,(void*) &Pick, "#BFBFFF", NULL, Button, N_("CRC (10x8)")},
 421 { VariantLosers,        0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("losers")},
 422 { VariantGrand,  SAME_ROW, 135, NULL, (void*) &Pick, "#5070FF", NULL, Button, N_("grand (10x10)")},
 423 { VariantSpartan,       0, 135, NULL, (void*) &Pick, "#FF0000", NULL, Button, N_("Spartan")},
 424 { 0, 0, 0, NULL, NULL, NULL, NULL, Label, N_("Board size ( -1 = default for selected variant):")},
 425 { 0, -1, BOARD_RANKS-1, NULL, (void*) &appData.NrRanks, "", NULL, Spin, N_("Number of Board Ranks:") },
 426 { 0, -1, BOARD_FILES, NULL, (void*) &appData.NrFiles, "", NULL, Spin, N_("Number of Board Files:") },
 427 { 0, -1, BOARD_RANKS-1, NULL, (void*) &appData.holdingsSize, "", NULL, Spin, N_("Holdings Size:") },
 428 { 0, 0, 0, NULL, NULL, NULL, NULL, Label,
 429                                 N_("WARNING: variants with un-orthodox\n"
 430                                   "pieces only have built-in bitmaps\n"
 431                                   "for -boardSize middling, bulky and\n"
 432                                   "petite, and substitute king or amazon\n"
 433                                   "for missing bitmaps. (See manual.)")},
 434 { 0, NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
 435 };
 436
 437 static void
 438 Pick (int n)
 439 {
 440         VariantClass v = variantDescriptors[n].value;
 441         if(!appData.noChessProgram) {
 442             char *name = VariantName(v), buf[MSG_SIZ];
 443             if (first.protocolVersion > 1 && StrStr(first.variants, name) == NULL) {
 444                 /* [HGM] in protocol 2 we check if variant is suported by engine */
 445               snprintf(buf, MSG_SIZ,  _("Variant %s not supported by %s"), name, first.tidy);
 446                 DisplayError(buf, 0);
 447                 return; /* ignore OK if first engine does not support it */
 448             } else
 449             if (second.initDone && second.protocolVersion > 1 && StrStr(second.variants, name) == NULL) {
 450               snprintf(buf, MSG_SIZ,  _("Warning: second engine (%s) does not support this!"), second.tidy);
 451                 DisplayError(buf, 0);   /* use of second engine is optional; only warn user */
 452             }
 453         }
 454
 455         GenericReadout(variantDescriptors, -1); // make sure ranks and file settings are read
 456
 457         gameInfo.variant = v;
 458         appData.variant = VariantName(v);
 459
 460         shuffleOpenings = FALSE; /* [HGM] shuffle: possible shuffle reset when we switch */
 461         startedFromPositionFile = FALSE; /* [HGM] loadPos: no longer valid in new variant */
 462         appData.pieceToCharTable = NULL;
 463         appData.pieceNickNames = "";
 464         appData.colorNickNames = "";
 465         Reset(True, True);
 466         PopDown(TransientDlg);
 467         return;
 468 }
 469
 470 void
 471 NewVariantProc ()
 472 {
 473    sprintf(warning, _("All variants not supported by first engine\n(currently %s) are disabled"), first.tidy);
 474    GenericPopUp(variantDescriptors, _("New Variant"), TransientDlg, BoardWindow, MODAL, 0);
 475 }
 476
 477 //------------------------------------------- Common Engine Options -------------------------------------
 478
 479 static int oldCores;
 480
 481 static int
 482 CommonOptionsOK (int n)
 483 {
 484         int newPonder = appData.ponderNextMove;
 485         // make sure changes are sent to first engine by re-initializing it
 486         // if it was already started pre-emptively at end of previous game
 487         if(gameMode == BeginningOfGame) Reset(True, True); else {
 488             // Some changed setting need immediate sending always.
 489             if(oldCores != appData.smpCores)
 490                 NewSettingEvent(False, &(first.maxCores), "cores", appData.smpCores);
 491             appData.ponderNextMove = oldPonder;
 492             PonderNextMoveEvent(newPonder);
 493         }
 494         return 1;
 495 }
 496
 497 static Option commonEngineOptions[] = {
 498 { 0,  0,    0, NULL, (void*) &appData.ponderNextMove, "", NULL, CheckBox, N_("Ponder Next Move") },
 499 { 0,  0, 1000, NULL, (void*) &appData.smpCores, "", NULL, Spin, N_("Maximum Number of CPUs per Engine:") },
 500 { 0,  0,    0, NULL, (void*) &appData.polyglotDir, "", NULL, PathName, N_("Polygot Directory:") },
 501 { 0,  0,16000, NULL, (void*) &appData.defaultHashSize, "", NULL, Spin, N_("Hash-Table Size (MB):") },
 502 { 0,  0,    0, NULL, (void*) &appData.defaultPathEGTB, "", NULL, PathName, N_("Nalimov EGTB Path:") },
 503 { 0,  0, 1000, NULL, (void*) &appData.defaultCacheSizeEGTB, "", NULL, Spin, N_("EGTB Cache Size (MB):") },
 504 { 0,  0,    0, NULL, (void*) &appData.usePolyglotBook, "", NULL, CheckBox, N_("Use GUI Book") },
 505 { 0,  0,    0, NULL, (void*) &appData.polyglotBook, ".bin", NULL, FileName, N_("Opening-Book Filename:") },
 506 { 0,  0,  100, NULL, (void*) &appData.bookDepth, "", NULL, Spin, N_("Book Depth (moves):") },
 507 { 0,  0,  100, NULL, (void*) &appData.bookStrength, "", NULL, Spin, N_("Book Variety (0) vs. Strength (100):") },
 508 { 0,  0,    0, NULL, (void*) &appData.firstHasOwnBookUCI, "", NULL, CheckBox, N_("Engine #1 Has Own Book") },
 509 { 0,  0,    0, NULL, (void*) &appData.secondHasOwnBookUCI, "", NULL, CheckBox, N_("Engine #2 Has Own Book          ") },
 510 { 0,SAME_ROW,0,NULL, (void*) &CommonOptionsOK, "", NULL, EndMark , "" }
 511 };
 512
 513 void
 514 UciMenuProc ()
 515 {
 516    oldCores = appData.smpCores;
 517    oldPonder = appData.ponderNextMove;
 518    GenericPopUp(commonEngineOptions, _("Common Engine Settings"), TransientDlg, BoardWindow, MODAL, 0);
 519 }
 520
 521 //------------------------------------------ Adjudication Options --------------------------------------
 522
 523 static Option adjudicationOptions[] = {
 524 { 0, 0,    0, NULL, (void*) &appData.checkMates, "", NULL, CheckBox, N_("Detect all Mates") },
 525 { 0, 0,    0, NULL, (void*) &appData.testClaims, "", NULL, CheckBox, N_("Verify Engine Result Claims") },
 526 { 0, 0,    0, NULL, (void*) &appData.materialDraws, "", NULL, CheckBox, N_("Draw if Insufficient Mating Material") },
 527 { 0, 0,    0, NULL, (void*) &appData.trivialDraws, "", NULL, CheckBox, N_("Adjudicate Trivial Draws (3-Move Delay)") },
 528 { 0, 0,100,   NULL, (void*) &appData.ruleMoves, "", NULL, Spin, N_("N-Move Rule:") },
 529 { 0, 0,    6, NULL, (void*) &appData.drawRepeats, "", NULL, Spin, N_("N-fold Repeats:") },
 530 { 0, 0,1000,  NULL, (void*) &appData.adjudicateDrawMoves, "", NULL, Spin, N_("Draw after N Moves Total:") },
 531 { 0, -5000,0, NULL, (void*) &appData.adjudicateLossThreshold, "", NULL, Spin, N_("Win / Loss Threshold:") },
 532 { 0, 0,    0, NULL, (void*) &first.scoreIsAbsolute, "", NULL, CheckBox, N_("Negate Score of Engine #1") },
 533 { 0, 0,    0, NULL, (void*) &second.scoreIsAbsolute, "", NULL, CheckBox, N_("Negate Score of Engine #2") },
 534 { 0,SAME_ROW, 0, NULL, NULL, "", NULL, EndMark , "" }
 535 };
 536
 537 void
 538 EngineMenuProc ()
 539 {
 540    GenericPopUp(adjudicationOptions, _("Adjudicate non-ICS Games"), TransientDlg, BoardWindow, MODAL, 0);
 541 }
 542
 543 //--------------------------------------------- ICS Options ---------------------------------------------
 544
 545 static int
 546 IcsOptionsOK (int n)
 547 {
 548     ParseIcsTextColors();
 549     return 1;
 550 }
 551
 552 Option icsOptions[] = {
 553 { 0, 0, 0, NULL, (void*) &appData.autoKibitz, "",  NULL, CheckBox, N_("Auto-Kibitz") },
 554 { 0, 0, 0, NULL, (void*) &appData.autoComment, "", NULL, CheckBox, N_("Auto-Comment") },
 555 { 0, 0, 0, NULL, (void*) &appData.autoObserve, "", NULL, CheckBox, N_("Auto-Observe") },
 556 { 0, 0, 0, NULL, (void*) &appData.autoRaiseBoard, "", NULL, CheckBox, N_("Auto-Raise Board") },
 557 { 0, 0, 0, NULL, (void*) &appData.bgObserve, "",   NULL, CheckBox, N_("Background Observe while Playing") },
 558 { 0, 0, 0, NULL, (void*) &appData.dualBoard, "",   NULL, CheckBox, N_("Dual Board for Background-Observed Game") },
 559 { 0, 0, 0, NULL, (void*) &appData.getMoveList, "", NULL, CheckBox, N_("Get Move List") },
 560 { 0, 0, 0, NULL, (void*) &appData.quietPlay, "",   NULL, CheckBox, N_("Quiet Play") },
 561 { 0, 0, 0, NULL, (void*) &appData.seekGraph, "",   NULL, CheckBox, N_("Seek Graph") },
 562 { 0, 0, 0, NULL, (void*) &appData.autoRefresh, "", NULL, CheckBox, N_("Auto-Refresh Seek Graph") },
 563 { 0, 0, 0, NULL, (void*) &appData.premove, "",     NULL, CheckBox, N_("Premove") },
 564 { 0, 0, 0, NULL, (void*) &appData.premoveWhite, "", NULL, CheckBox, N_("Premove for White") },
 565 { 0, 0, 0, NULL, (void*) &appData.premoveWhiteText, "", NULL, TextBox, N_("First White Move:") },
 566 { 0, 0, 0, NULL, (void*) &appData.premoveBlack, "", NULL, CheckBox, N_("Premove for Black") },
 567 { 0, 0, 0, NULL, (void*) &appData.premoveBlackText, "", NULL, TextBox, N_("First Black Move:") },
 568 { 0, SAME_ROW, 0, NULL, NULL, NULL, NULL, Break, "" },
 569 { 0, 0, 0, NULL, (void*) &appData.icsAlarm, "", NULL, CheckBox, N_("Alarm") },
 570 { 0, 0, 100000000, NULL, (void*) &appData.icsAlarmTime, "", NULL, Spin, N_("Alarm Time (msec):") },
 571 //{ 0, 0, 0, NULL, (void*) &appData.chatBoxes, "", NULL, TextBox, N_("Startup Chat Boxes:") },
 572 { 0, 0, 0, NULL, (void*) &appData.colorize, "", NULL, CheckBox, N_("Colorize Messages") },
 573 { 0, 0, 0, NULL, (void*) &appData.colorShout, "", NULL, TextBox, N_("Shout Text Colors:") },
 574 { 0, 0, 0, NULL, (void*) &appData.colorSShout, "", NULL, TextBox, N_("S-Shout Text Colors:") },
 575 { 0, 0, 0, NULL, (void*) &appData.colorChannel1, "", NULL, TextBox, N_("Channel #1 Text Colors:") },
 576 { 0, 0, 0, NULL, (void*) &appData.colorChannel, "", NULL, TextBox, N_("Other Channel Text Colors:") },
 577 { 0, 0, 0, NULL, (void*) &appData.colorKibitz, "", NULL, TextBox, N_("Kibitz Text Colors:") },
 578 { 0, 0, 0, NULL, (void*) &appData.colorTell, "", NULL, TextBox, N_("Tell Text Colors:") },
 579 { 0, 0, 0, NULL, (void*) &appData.colorChallenge, "", NULL, TextBox, N_("Challenge Text Colors:") },
 580 { 0, 0, 0, NULL, (void*) &appData.colorRequest, "", NULL, TextBox, N_("Request Text Colors:") },
 581 { 0, 0, 0, NULL, (void*) &appData.colorSeek, "", NULL, TextBox, N_("Seek Text Colors:") },
 582 { 0, 0, 0, NULL, (void*) &IcsOptionsOK, "", NULL, EndMark , "" }
 583 };
 584
 585 void
 586 IcsOptionsProc ()
 587 {
 588    GenericPopUp(icsOptions, _("ICS Options"), TransientDlg, BoardWindow, MODAL, 0);
 589 }
 590
 591 //-------------------------------------------- Load Game Options ---------------------------------
 592
 593 static char *modeNames[] = { N_("Exact position match"), N_("Shown position is subset"), N_("Same material with exactly same Pawn chain"),
 594                       N_("Same material"), N_("Material range (top board half optional)"), N_("Material difference (optional stuff balanced)"), NULL };
 595 static char *modeValues[] = { "1", "2", "3", "4", "5", "6" };
 596 static char *searchMode;
 597
 598 static int
 599 LoadOptionsOK ()
 600 {
 601     appData.searchMode = atoi(searchMode);
 602     return 1;
 603 }
 604
 605 static Option loadOptions[] = {
 606 { 0,  0, 0,     NULL, (void*) &appData.autoDisplayTags, "", NULL, CheckBox, N_("Auto-Display Tags") },
 607 { 0,  0, 0,     NULL, (void*) &appData.autoDisplayComment, "", NULL, CheckBox, N_("Auto-Display Comment") },
 608 { 0, LR, 0,     NULL, NULL, NULL, NULL, Label, N_("Auto-Play speed of loaded games\n(0 = instant, -1 = off):") },
 609 { 0, -1,10000000, NULL, (void*) &appData.timeDelay, "", NULL, Fractional, N_("Seconds per Move:") },
 610 { 0, LR, 0,     NULL, NULL, NULL, NULL, Label,  N_("\noptions to use in game-viewer mode:") },
 611 { 0, 0,300,     NULL, (void*) &appData.viewerOptions, "", NULL, TextBox,  "" },
 612 { 0, LR,  0,    NULL, NULL, NULL, NULL, Label,  N_("\nThresholds for position filtering in game list:") },
 613 { 0, 0,5000,    NULL, (void*) &appData.eloThreshold1, "", NULL, Spin, N_("Elo of strongest player at least:") },
 614 { 0, 0,5000,    NULL, (void*) &appData.eloThreshold2, "", NULL, Spin, N_("Elo of weakest player at least:") },
 615 { 0, 0,5000,    NULL, (void*) &appData.dateThreshold, "", NULL, Spin, N_("No games before year:") },
 616 { 0, 1,50,      NULL, (void*) &appData.stretch, "", NULL, Spin, N_("Minimum nr consecutive positions:") },
 617 { 0, 0,205,     NULL, (void*) &searchMode, (char*) modeValues, modeNames, ComboBox, N_("Search mode:") },
 618 { 0, 0, 0,      NULL, (void*) &appData.ignoreColors, "", NULL, CheckBox, N_("Also match reversed colors") },
 619 { 0, 0, 0,      NULL, (void*) &appData.findMirror, "", NULL, CheckBox, N_("Also match left-right flipped position") },
 620 { 0,  0, 0,     NULL, (void*) &LoadOptionsOK, "", NULL, EndMark , "" }
 621 };
 622
 623 void
 624 LoadOptionsPopUp (DialogClass parent)
 625 {
 626    ASSIGN(searchMode, modeValues[appData.searchMode-1]);
 627    GenericPopUp(loadOptions, _("Load Game Options"), TransientDlg, parent, MODAL, 0);
 628 }
 629
 630 void
 631 LoadOptionsProc ()
 632 {   // called from menu
 633     LoadOptionsPopUp(BoardWindow);
 634 }
 635
 636 //------------------------------------------- Save Game Options --------------------------------------------
 637
 638 static Option saveOptions[] = {
 639 { 0, 0, 0, NULL, (void*) &appData.autoSaveGames, "", NULL, CheckBox, N_("Auto-Save Games") },
 640 { 0, 0, 0, NULL, (void*) &appData.saveGameFile, ".pgn", NULL, FileName,  N_("Save Games on File:") },
 641 { 0, 0, 0, NULL, (void*) &appData.savePositionFile, ".fen", NULL, FileName,  N_("Save Final Positions on File:") },
 642 { 0, 0, 0, NULL, (void*) &appData.pgnEventHeader, "", NULL, TextBox,  N_("PGN Event Header:") },
 643 { 0, 0, 0, NULL, (void*) &appData.oldSaveStyle, "", NULL, CheckBox, N_("Old Save Style (as opposed to PGN)") },
 644 { 0, 0, 0, NULL, (void*) &appData.numberTag, "", NULL, CheckBox, N_("Include Number Tag in tourney PGN") },
 645 { 0, 0, 0, NULL, (void*) &appData.saveExtendedInfoInPGN, "", NULL, CheckBox, N_("Save Score/Depth Info in PGN") },
 646 { 0, 0, 0, NULL, (void*) &appData.saveOutOfBookInfo, "", NULL, CheckBox, N_("Save Out-of-Book Info in PGN           ") },
 647 { 0, SAME_ROW, 0, NULL, NULL, "", NULL, EndMark , "" }
 648 };
 649
 650 void
 651 SaveOptionsProc ()
 652 {
 653    GenericPopUp(saveOptions, _("Save Game Options"), TransientDlg, BoardWindow, MODAL, 0);
 654 }
 655
 656 //----------------------------------------------- Sound Options ---------------------------------------------
 657
 658 static void Test P((int n));
 659 static char *trialSound;
 660
 661 static char *soundNames[] = {
 662         N_("No Sound"),
 663         N_("Default Beep"),
 664         N_("Above WAV File"),
 665         N_("Car Horn"),
 666         N_("Cymbal"),
 667         N_("Ding"),
 668         N_("Gong"),
 669         N_("Laser"),
 670         N_("Penalty"),
 671         N_("Phone"),
 672         N_("Pop"),
 673         N_("Slap"),
 674         N_("Wood Thunk"),
 675         NULL,
 676         N_("User File")
 677 };
 678
 679 static char *soundFiles[] = { // sound files corresponding to above names
 680         "",
 681         "$",
 682         NULL, // kludge alert: as first thing in the dialog readout this is replaced with the user-given .WAV filename
 683         "honkhonk.wav",
 684         "cymbal.wav",
 685         "ding1.wav",
 686         "gong.wav",
 687         "laser.wav",
 688         "penalty.wav",
 689         "phone.wav",
 690         "pop2.wav",
 691         "slap.wav",
 692         "woodthunk.wav",
 693         NULL,
 694         NULL
 695 };
 696
 697 static Option soundOptions[] = {
 698 { 0, 0, 0, NULL, (void*) &appData.soundProgram, "", NULL, TextBox, N_("Sound Program:") },
 699 { 0, 0, 0, NULL, (void*) &appData.soundDirectory, "", NULL, PathName, N_("Sounds Directory:") },
 700 { 0, 0, 0, NULL, (void*) (soundFiles+2) /* kludge! */, ".wav", NULL, FileName, N_("User WAV File:") },
 701 { 0, 0, 0, NULL, (void*) &trialSound, (char*) soundFiles, soundNames, ComboBox, N_("Try-Out Sound:") },
 702 { 0, SAME_ROW, 0, NULL, (void*) &Test, NULL, NULL, Button, N_("Play") },
 703 { 0, 0, 0, NULL, (void*) &appData.soundMove, (char*) soundFiles, soundNames, ComboBox, N_("Move:") },
 704 { 0, 0, 0, NULL, (void*) &appData.soundIcsWin, (char*) soundFiles, soundNames, ComboBox, N_("Win:") },
 705 { 0, 0, 0, NULL, (void*) &appData.soundIcsLoss, (char*) soundFiles, soundNames, ComboBox, N_("Lose:") },
 706 { 0, 0, 0, NULL, (void*) &appData.soundIcsDraw, (char*) soundFiles, soundNames, ComboBox, N_("Draw:") },
 707 { 0, 0, 0, NULL, (void*) &appData.soundIcsUnfinished, (char*) soundFiles, soundNames, ComboBox, N_("Unfinished:") },
 708 { 0, 0, 0, NULL, (void*) &appData.soundIcsAlarm, (char*) soundFiles, soundNames, ComboBox, N_("Alarm:") },
 709 { 0, 0, 0, NULL, (void*) &appData.soundShout, (char*) soundFiles, soundNames, ComboBox, N_("Shout:") },
 710 { 0, 0, 0, NULL, (void*) &appData.soundSShout, (char*) soundFiles, soundNames, ComboBox, N_("S-Shout:") },
 711 { 0, 0, 0, NULL, (void*) &appData.soundChannel, (char*) soundFiles, soundNames, ComboBox, N_("Channel:") },
 712 { 0, 0, 0, NULL, (void*) &appData.soundChannel1, (char*) soundFiles, soundNames, ComboBox, N_("Channel 1:") },
 713 { 0, 0, 0, NULL, (void*) &appData.soundTell, (char*) soundFiles, soundNames, ComboBox, N_("Tell:") },
 714 { 0, 0, 0, NULL, (void*) &appData.soundKibitz, (char*) soundFiles, soundNames, ComboBox, N_("Kibitz:") },
 715 { 0, 0, 0, NULL, (void*) &appData.soundChallenge, (char*) soundFiles, soundNames, ComboBox, N_("Challenge:") },
 716 { 0, 0, 0, NULL, (void*) &appData.soundRequest, (char*) soundFiles, soundNames, ComboBox, N_("Request:") },
 717 { 0, 0, 0, NULL, (void*) &appData.soundSeek, (char*) soundFiles, soundNames, ComboBox, N_("Seek:") },
 718 { 0, SAME_ROW, 0, NULL, NULL, "", NULL, EndMark , "" }
 719 };
 720
 721 static void
 722 Test (int n)
 723 {
 724     GenericReadout(soundOptions, 2);
 725     if(soundFiles[values[3]]) PlaySound(soundFiles[values[3]]);
 726 }
 727
 728 void
 729 SoundOptionsProc ()
 730 {
 731    free(soundFiles[2]);
 732    soundFiles[2] = strdup("*");
 733    GenericPopUp(soundOptions, _("Sound Options"), TransientDlg, BoardWindow, MODAL, 0);
 734 }
 735
 736 //--------------------------------------------- Board Options --------------------------------------
 737
 738 static void DefColor P((int n));
 739 static void AdjustColor P((int i));
 740
 741 static int
 742 BoardOptionsOK (int n)
 743 {
 744     if(appData.overrideLineGap >= 0) lineGap = appData.overrideLineGap; else lineGap = defaultLineGap;
 745     useImages = useImageSqs = 0;
 746     InitDrawingParams();
 747     InitDrawingSizes(-1, 0);
 748     DrawPosition(True, NULL);
 749     return 1;
 750 }
 751
 752 static Option boardOptions[] = {
 753 { 0,          0, 70, NULL, (void*) &appData.whitePieceColor, "", NULL, TextBox, N_("White Piece Color:") },
 754 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#FFFFCC", Button, "      " },
 755 /* TRANSLATORS: R = single letter for the color red */
 756 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 757 /* TRANSLATORS: G = single letter for the color green */
 758 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 759 /* TRANSLATORS: B = single letter for the color blue */
 760 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 761 /* TRANSLATORS: D = single letter to make a color darker */
 762 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 763 { 0,          0, 70, NULL, (void*) &appData.blackPieceColor, "", NULL, TextBox, N_("Black Piece Color:") },
 764 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#202020", Button, "      " },
 765 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 766 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 767 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 768 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 769 { 0,          0, 70, NULL, (void*) &appData.lightSquareColor, "", NULL, TextBox, N_("Light Square Color:") },
 770 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#C8C365", Button, "      " },
 771 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 772 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 773 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 774 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 775 { 0,          0, 70, NULL, (void*) &appData.darkSquareColor, "", NULL, TextBox, N_("Dark Square Color:") },
 776 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#77A26D", Button, "      " },
 777 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 778 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 779 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 780 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 781 { 0,          0, 70, NULL, (void*) &appData.highlightSquareColor, "", NULL, TextBox, N_("Highlight Color:") },
 782 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#FFFF00", Button, "      " },
 783 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 784 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 785 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 786 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 787 { 0,          0, 70, NULL, (void*) &appData.premoveHighlightColor, "", NULL, TextBox, N_("Premove Highlight Color:") },
 788 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#FF0000", Button, "      " },
 789 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 790 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 791 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 792 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 793 { 0, 0, 0, NULL, (void*) &appData.upsideDown, "", NULL, CheckBox, N_("Flip Pieces Shogi Style        (Colored buttons restore default)") },
 794 //{ 0, 0, 0, NULL, (void*) &appData.allWhite, "", NULL, CheckBox, N_("Use Outline Pieces for Black") },
 795 { 0, 0, 0, NULL, (void*) &appData.monoMode, "", NULL, CheckBox, N_("Mono Mode") },
 796 { 0,-1, 5, NULL, (void*) &appData.overrideLineGap, "", NULL, Spin, N_("Line Gap ( -1 = default for board size):") },
 797 { 0, 0, 0, NULL, (void*) &appData.useBitmaps, "", NULL, CheckBox, N_("Use Board Textures") },
 798 { 0, 0, 0, NULL, (void*) &appData.liteBackTextureFile, ".xpm", NULL, FileName, N_("Light-Squares Texture File:") },
 799 { 0, 0, 0, NULL, (void*) &appData.darkBackTextureFile, ".xpm", NULL, FileName, N_("Dark-Squares Texture File:") },
 800 { 0, 0, 0, NULL, (void*) &appData.bitmapDirectory, "", NULL, PathName, N_("Directory with Bitmap Pieces:") },
 801 { 0, 0, 0, NULL, (void*) &appData.pixmapDirectory, "", NULL, PathName, N_("Directory with Pixmap Pieces:") },
 802 { 0, 0, 0, NULL, (void*) &BoardOptionsOK, "", NULL, EndMark , "" }
 803 };
 804
 805 static void
 806 SetColorText (int n, char *buf)
 807 {
 808     SetWidgetText(&boardOptions[n-1], buf, TransientDlg);
 809     SetColor(buf, &boardOptions[n]);
 810 }
 811
 812 static void
 813 DefColor (int n)
 814 {
 815     SetColorText(n, (char*) boardOptions[n].choice);
 816 }
 817
 818 void
 819 RefreshColor (int source, int n)
 820 {
 821     int col, j, r, g, b, step = 10;
 822     char *s, buf[MSG_SIZ]; // color string
 823     GetWidgetText(&boardOptions[source], &s);
 824     if(sscanf(s, "#%x", &col) != 1) return;   // malformed
 825     b = col & 0xFF; g = col & 0xFF00; r = col & 0xFF0000;
 826     switch(n) {
 827         case 1: r += 0x10000*step;break;
 828         case 2: g += 0x100*step;  break;
 829         case 3: b += step;        break;
 830         case 4: r -= 0x10000*step; g -= 0x100*step; b -= step; break;
 831     }
 832     if(r < 0) r = 0; if(g < 0) g = 0; if(b < 0) b = 0;
 833     if(r > 0xFF0000) r = 0xFF0000; if(g > 0xFF00) g = 0xFF00; if(b > 0xFF) b = 0xFF;
 834     col = r | g | b;
 835     snprintf(buf, MSG_SIZ, "#%06x", col);
 836     for(j=1; j<7; j++) if(buf[j] >= 'a') buf[j] -= 32; // capitalize
 837     SetColorText(source+1, buf);
 838 }
 839
 840 static void
 841 AdjustColor (int i)
 842 {
 843     int n = boardOptions[i].value;
 844     RefreshColor(i-n-1, n);
 845 }
 846
 847 void
 848 BoardOptionsProc ()
 849 {
 850    GenericPopUp(boardOptions, _("Board Options"), TransientDlg, BoardWindow, MODAL, 0);
 851 }
 852
 853 //-------------------------------------------- ICS Text Menu Options ------------------------------
 854
 855 Option textOptions[100];
 856 static void PutText P((char *text, int pos));
 857
 858 void
 859 SendString (char *p)
 860 {
 861     char buf[MSG_SIZ], *q;
 862     if(q = strstr(p, "$input")) {
 863         if(!shellUp[TextMenuDlg]) return;
 864         strncpy(buf, p, MSG_SIZ);
 865         strncpy(buf + (q-p), q+6, MSG_SIZ-(q-p));
 866         PutText(buf, q-p);
 867         return;
 868     }
 869     snprintf(buf, MSG_SIZ, "%s\n", p);
 870     SendToICS(buf);
 871 }
 872
 873 void
 874 IcsTextProc ()
 875 {
 876    int i=0, j;
 877    char *p, *q, *r;
 878    if((p = icsTextMenuString) == NULL) return;
 879    do {
 880         q = r = p; while(*p && *p != ';') p++;
 881         for(j=0; j<p-q; j++) textOptions[i].name[j] = *r++;
 882         textOptions[i].name[j++] = 0;
 883         if(!*p) break;
 884         if(*++p == '\n') p++; // optional linefeed after button-text terminating semicolon
 885         q = p;
 886         textOptions[i].choice = (char**) (r = textOptions[i].name + j);
 887         while(*p && (*p != ';' || p[1] != '\n')) textOptions[i].name[j++] = *p++;
 888         textOptions[i].name[j++] = 0;
 889         if(*p) p += 2;
 890         textOptions[i].max = 135;
 891         textOptions[i].min = i&1;
 892         textOptions[i].handle = NULL;
 893         textOptions[i].target = &SendText;
 894         textOptions[i].textValue = strstr(r, "$input") ? "#80FF80" : strstr(r, "$name") ? "#FF8080" : "#FFFFFF";
 895         textOptions[i].type = Button;
 896    } while(++i < 99 && *p);
 897    if(i == 0) return;
 898    textOptions[i].type = EndMark;
 899    textOptions[i].target = NULL;
 900    textOptions[i].min = 2;
 901    MarkMenu("View.ICStextmenu", TextMenuDlg);
 902    GenericPopUp(textOptions, _("ICS text menu"), TextMenuDlg, BoardWindow, NONMODAL, 1);
 903 }
 904
 905 //---------------------------------------------------- Edit Comment -----------------------------------
 906
 907 static char *commentText;
 908 static int commentIndex;
 909 static void ClearComment P((int n));
 910 static void SaveChanges P((int n));
 911
 912 static int
 913 NewComCallback (int n)
 914 {
 915     ReplaceComment(commentIndex, commentText);
 916     return 1;
 917 }
 918
 919 Option commentOptions[] = {
 920 { 200, T_VSCRL | T_FILL | T_WRAP | T_TOP, 250, NULL, (void*) &commentText, "", NULL, TextBox, "" },
 921 { 0,     0,     50, NULL, (void*) &ClearComment, NULL, NULL, Button, N_("clear") },
 922 { 0, SAME_ROW, 100, NULL, (void*) &SaveChanges, NULL, NULL, Button, N_("save changes") },
 923 { 0, SAME_ROW,  0,  NULL, (void*) &NewComCallback, "", NULL, EndMark , "" }
 924 };
 925
 926 static void
 927 SaveChanges (int n)
 928 {
 929     GenericReadout(commentOptions, 0);
 930     ReplaceComment(commentIndex, commentText);
 931 }
 932
 933 static void
 934 ClearComment (int n)
 935 {
 936     SetWidgetText(&commentOptions[0], "", CommentDlg);
 937 }
 938
 939 void
 940 NewCommentPopup (char *title, char *text, int index)
 941 {
 942     if(DialogExists(CommentDlg)) { // if already exists, alter title and content
 943         SetDialogTitle(CommentDlg, title);
 944         SetWidgetText(&commentOptions[0], text, CommentDlg);
 945     }
 946     if(commentText) free(commentText); commentText = strdup(text);
 947     commentIndex = index;
 948     MarkMenu("View.Comments", CommentDlg);
 949     if(GenericPopUp(commentOptions, title, CommentDlg, BoardWindow, NONMODAL, 1))
 950         AddHandler(&commentOptions[0], 1);
 951 }
 952
 953 void
 954 EditCommentProc ()
 955 {
 956     int j;
 957     if (PopDown(CommentDlg)) { // popdown succesful
 958 //      MarkMenuItem("Edit.EditComment", False);
 959 //      MarkMenuItem("View.Comments", False);
 960     } else // was not up
 961         EditCommentEvent();
 962 }
 963
 964 //------------------------------------------------------ Edit Tags ----------------------------------
 965
 966 static void changeTags P((int n));
 967 static char *tagsText;
 968
 969 static int
 970 NewTagsCallback (int n)
 971 {
 972     ReplaceTags(tagsText, &gameInfo);
 973     return 1;
 974 }
 975
 976 static Option tagsOptions[] = {
 977 {   0,   0,   0, NULL, NULL, NULL, NULL, Label,  NULL },
 978 { 200, T_VSCRL | T_FILL | T_WRAP | T_TOP, 200, NULL, (void*) &tagsText, "", NULL, TextBox, "" },
 979 {   0,   0, 100, NULL, (void*) &changeTags, NULL, NULL, Button, N_("save changes") },
 980 { 0,SAME_ROW, 0, NULL, (void*) &NewTagsCallback, "", NULL, EndMark , "" }
 981 };
 982
 983 static void
 984 changeTags (int n)
 985 {
 986     GenericReadout(tagsOptions, 1);
 987     if(bookUp) SaveToBook(tagsText); else
 988     ReplaceTags(tagsText, &gameInfo);
 989 }
 990
 991 void
 992 NewTagsPopup (char *text, char *msg)
 993 {
 994     char *title = bookUp ? _("Edit book") : _("Tags");
 995
 996     if(DialogExists(TagsDlg)) { // if already exists, alter title and content
 997         SetWidgetText(&tagsOptions[1], text, TagsDlg);
 998         SetDialogTitle(TagsDlg, title);
 999     }
1000     if(tagsText) free(tagsText); tagsText = strdup(text);
1001     tagsOptions[0].name = msg;
1002     MarkMenu("View.Tags", TagsDlg);
1003     GenericPopUp(tagsOptions, title, TagsDlg, BoardWindow, NONMODAL, 1);
1004 }
1005
1006 //---------------------------------------------- ICS Input Box ----------------------------------
1007
1008 char *icsText;
1009
1010 // [HGM] code borrowed from winboard.c (which should thus go to backend.c!)
1011 #define HISTORY_SIZE 64
1012 static char *history[HISTORY_SIZE];
1013 static int histIn = 0, histP = 0;
1014
1015 static void
1016 SaveInHistory (char *cmd)
1017 {
1018   if (history[histIn] != NULL) {
1019     free(history[histIn]);
1020     history[histIn] = NULL;
1021   }
1022   if (*cmd == NULLCHAR) return;
1023   history[histIn] = StrSave(cmd);
1024   histIn = (histIn + 1) % HISTORY_SIZE;
1025   if (history[histIn] != NULL) {
1026     free(history[histIn]);
1027     history[histIn] = NULL;
1028   }
1029   histP = histIn;
1030 }
1031
1032 static char *
1033 PrevInHistory (char *cmd)
1034 {
1035   int newhp;
1036   if (histP == histIn) {
1037     if (history[histIn] != NULL) free(history[histIn]);
1038     history[histIn] = StrSave(cmd);
1039   }
1040   newhp = (histP - 1 + HISTORY_SIZE) % HISTORY_SIZE;
1041   if (newhp == histIn || history[newhp] == NULL) return NULL;
1042   histP = newhp;
1043   return history[histP];
1044 }
1045
1046 static char *
1047 NextInHistory ()
1048 {
1049   if (histP == histIn) return NULL;
1050   histP = (histP + 1) % HISTORY_SIZE;
1051   return history[histP];
1052 }
1053 // end of borrowed code
1054
1055 Option boxOptions[] = {
1056 {  30,  0,  400, NULL, (void*) &icsText, "", NULL, TextBox, "" },
1057 {  0,SAME_ROW | NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
1058 };
1059
1060 void
1061 ICSInputSendText ()
1062 {
1063     char *val;
1064
1065     GetWidgetText(&boxOptions[0], &val);
1066     SaveInHistory(val);
1067     SendMultiLineToICS(val);
1068     SetWidgetText(&boxOptions[0], val, InputBoxDlg);
1069 }
1070
1071 void
1072 IcsKey (int n)
1073 {   // [HGM] input: let up-arrow recall previous line from history
1074     char *val;
1075
1076     if (!shellUp[InputBoxDlg]) return;
1077     switch(n) {
1078       case 0:
1079         ICSInputSendText();
1080         return;
1081       case 1:
1082         GetWidgetText(&boxOptions[0], &val);
1083         val = PrevInHistory(val);
1084         break;
1085       case -1:
1086         val = NextInHistory();
1087     }
1088     SetWidgetText(&boxOptions[0], val ? val : "", InputBoxDlg);
1089 }
1090
1091 static void
1092 PutText (char *text, int pos)
1093 {
1094     char buf[MSG_SIZ], *p;
1095
1096     if(strstr(text, "$add ") == text) {
1097         GetWidgetText(&boxOptions[0], &p);
1098         snprintf(buf, MSG_SIZ, "%s%s", p, text+5); text = buf;
1099         pos += strlen(p) - 5;
1100     }
1101     SetWidgetText(&boxOptions[0], text, TextMenuDlg);
1102     SetInsertPos(&boxOptions[0], pos);
1103 }
1104
1105 void
1106 ICSInputBoxPopUp ()
1107 {
1108     MarkMenu("View.ICSInputBox", InputBoxDlg);
1109     if(GenericPopUp(boxOptions, _("ICS input box"), InputBoxDlg, BoardWindow, NONMODAL, 0))
1110         AddHandler(&boxOptions[0], 3);
1111 }
1112
1113 void
1114 IcsInputBoxProc ()
1115 {
1116     if (!PopDown(InputBoxDlg)) ICSInputBoxPopUp();
1117 }
1118
1119 //--------------------------------------------- Move Type In ------------------------------------------
1120
1121 static int TypeInOK P((int n));
1122
1123 Option typeOptions[] = {
1124 { 30,  0,            400, NULL, (void*) &icsText, "", NULL, TextBox, "" },
1125 { 0, SAME_ROW | NO_OK, 0, NULL, (void*) &TypeInOK, "", NULL, EndMark , "" }
1126 };
1127
1128 static int
1129 TypeInOK (int n)
1130 {
1131     TypeInDoneEvent(icsText);
1132     return TRUE;
1133 }
1134
1135 void
1136 PopUpMoveDialog (char firstchar)
1137 {
1138     static char buf[2];
1139     buf[0] = firstchar; ASSIGN(icsText, buf);
1140     if(GenericPopUp(typeOptions, _("Type a move"), TransientDlg, BoardWindow, MODAL, 0))
1141         AddHandler(&typeOptions[0], 2);
1142 }
1143
1144 void
1145 BoxAutoPopUp (char *buf)
1146 {
1147         if(appData.icsActive) { // text typed to board in ICS mode: divert to ICS input box
1148             if(DialogExists(InputBoxDlg)) { // box already exists: append to current contents
1149                 char *p, newText[MSG_SIZ];
1150                 GetWidgetText(&boxOptions[0], &p);
1151                 snprintf(newText, MSG_SIZ, "%s%c", p, *buf);
1152                 SetWidgetText(&boxOptions[0], newText, InputBoxDlg);
1153                 if(shellUp[InputBoxDlg]) HardSetFocus (&boxOptions[0]); //why???
1154             } else icsText = buf; // box did not exist: make sure it pops up with char in it
1155             ICSInputBoxPopUp();
1156         } else PopUpMoveDialog(*buf);
1157 }
1158
1159 //------------------------------------------ Engine Settings ------------------------------------
1160
1161 void
1162 SettingsPopUp (ChessProgramState *cps)
1163 {
1164    currentCps = cps;
1165    GenericPopUp(cps->option, _("Engine Settings"), TransientDlg, BoardWindow, MODAL, 0);
1166 }
1167
1168 void
1169 FirstSettingsProc ()
1170 {
1171     SettingsPopUp(&first);
1172 }
1173
1174 void
1175 SecondSettingsProc ()
1176 {
1177    if(WaitForEngine(&second, SettingsMenuIfReady)) return;
1178    SettingsPopUp(&second);
1179 }
1180
1181 //----------------------------------------------- Load Engine --------------------------------------
1182
1183 char *engineDir, *engineLine, *nickName, *params;
1184 Boolean isUCI, hasBook, storeVariant, v1, addToList, useNick, secondEng;
1185
1186 static void EngSel P((int n, int sel));
1187 static int InstallOK P((int n));
1188
1189 static Option installOptions[] = {
1190 {   0,LR|T2T, 0, NULL, NULL, NULL, NULL, Label, N_("Select engine from list:") },
1191 { 300,LR|TB,200, NULL, (void*) engineMnemonic, (char*) &EngSel, NULL, ListBox, "" },
1192 { 0,SAME_ROW, 0, NULL, NULL, NULL, NULL, Break, NULL },
1193 {   0,  LR,   0, NULL, NULL, NULL, NULL, Label, N_("or specify one below:") },
1194 {   0,  0,    0, NULL, (void*) &nickName, NULL, NULL, TextBox, N_("Nickname (optional):") },
1195 {   0,  0,    0, NULL, (void*) &useNick, NULL, NULL, CheckBox, N_("Use nickname in PGN player tags of engine-engine games") },
1196 {   0,  0,    0, NULL, (void*) &engineDir, NULL, NULL, PathName, N_("Engine Directory:") },
1197 {   0,  0,    0, NULL, (void*) &engineName, NULL, NULL, FileName, N_("Engine Command:") },
1198 {   0,  LR,   0, NULL, NULL, NULL, NULL, Label, N_("(Directory will be derived from engine path when empty)") },
1199 {   0,  0,    0, NULL, (void*) &isUCI, NULL, NULL, CheckBox, N_("UCI") },
1200 {   0,  0,    0, NULL, (void*) &v1, NULL, NULL, CheckBox, N_("WB protocol v1 (do not wait for engine features)") },
1201 {   0,  0,    0, NULL, (void*) &hasBook, NULL, NULL, CheckBox, N_("Must not use GUI book") },
1202 {   0,  0,    0, NULL, (void*) &addToList, NULL, NULL, CheckBox, N_("Add this engine to the list") },
1203 {   0,  0,    0, NULL, (void*) &storeVariant, NULL, NULL, CheckBox, N_("Force current variant with this engine") },
1204 {   0,  0,    0, NULL, (void*) &InstallOK, "", NULL, EndMark , "" }
1205 };
1206
1207 static int
1208 InstallOK (int n)
1209 {
1210     if(n && (n = SelectedListBoxItem(&installOptions[1])) > 0) { // called by pressing OK, and engine selected
1211         ASSIGN(engineLine, engineList[n]);
1212     }
1213     PopDown(TransientDlg); // early popdown, to allow FreezeUI to instate grab
1214     if(!secondEng) Load(&first, 0); else Load(&second, 1);
1215     return FALSE; // no double PopDown!
1216 }
1217
1218 static void
1219 EngSel (int n, int sel)
1220 {
1221     if(sel < 1) return;
1222     ASSIGN(engineLine, engineList[sel]);
1223     InstallOK(0);
1224 }
1225
1226 static void
1227 LoadEngineProc (int engineNr, char *title)
1228 {
1229    isUCI = storeVariant = v1 = useNick = False; addToList = hasBook = True; // defaults
1230    secondEng = engineNr;
1231    if(engineLine)   free(engineLine);   engineLine = strdup("");
1232    if(engineDir)    free(engineDir);    engineDir = strdup("");
1233    if(nickName)     free(nickName);     nickName = strdup("");
1234    if(params)       free(params);       params = strdup("");
1235    NamesToList(firstChessProgramNames, engineList, engineMnemonic, "all");
1236    GenericPopUp(installOptions, title, TransientDlg, BoardWindow, MODAL, 0);
1237 }
1238
1239 void
1240 LoadEngine1Proc ()
1241 {
1242     LoadEngineProc (0, _("Load first engine"));
1243 }
1244
1245 void
1246 LoadEngine2Proc ()
1247 {
1248     LoadEngineProc (1, _("Load second engine"));
1249 }
1250
1251 //----------------------------------------------------- Edit Book -----------------------------------------
1252
1253 void
1254 EditBookProc ()
1255 {
1256     EditBookEvent();
1257 }
1258
1259 //--------------------------------------------------- New Shuffle Game ------------------------------
1260
1261 static void SetRandom P((int n));
1262
1263 static int
1264 ShuffleOK (int n)
1265 {
1266     ResetGameEvent();
1267     return 1;
1268 }
1269
1270 static Option shuffleOptions[] = {
1271   {   0,  0,   50, NULL, (void*) &shuffleOpenings, NULL, NULL, CheckBox, N_("shuffle") },
1272   { 0,-1,2000000000, NULL, (void*) &appData.defaultFrcPosition, "", NULL, Spin, N_("Start-position number:") },
1273   {   0,  0,    0, NULL, (void*) &SetRandom, NULL, NULL, Button, N_("randomize") },
1274   {   0,  SAME_ROW,    0, NULL, (void*) &SetRandom, NULL, NULL, Button, N_("pick fixed") },
1275   { 0,SAME_ROW, 0, NULL, (void*) &ShuffleOK, "", NULL, EndMark , "" }
1276 };
1277
1278 static void
1279 SetRandom (int n)
1280 {
1281     int r = n==2 ? -1 : random() & (1<<30)-1;
1282     char buf[MSG_SIZ];
1283     snprintf(buf, MSG_SIZ,  "%d", r);
1284     SetWidgetText(&shuffleOptions[1], buf, TransientDlg);
1285     SetWidgetState(&shuffleOptions[0], True);
1286 }
1287
1288 void
1289 ShuffleMenuProc ()
1290 {
1291     GenericPopUp(shuffleOptions, _("New Shuffle Game"), TransientDlg, BoardWindow, MODAL, 0);
1292 }
1293
1294 //------------------------------------------------------ Time Control -----------------------------------
1295
1296 static int TcOK P((int n));
1297 int tmpMoves, tmpTc, tmpInc, tmpOdds1, tmpOdds2, tcType;
1298
1299 static void
1300 ShowTC (int n)
1301 {
1302 }
1303
1304 static void SetTcType P((int n));
1305
1306 static char *
1307 Value (int n)
1308 {
1309         static char buf[MSG_SIZ];
1310         snprintf(buf, MSG_SIZ, "%d", n);
1311         return buf;
1312 }
1313
1314 static Option tcOptions[] = {
1315 {   0,  0,    0, NULL, (void*) &SetTcType, NULL, NULL, Button, N_("classical") },
1316 {   0,SAME_ROW,0,NULL, (void*) &SetTcType, NULL, NULL, Button, N_("incremental") },
1317 {   0,SAME_ROW,0,NULL, (void*) &SetTcType, NULL, NULL, Button, N_("fixed max") },
1318 {   0,  0,  200, NULL, (void*) &tmpMoves, NULL, NULL, Spin, N_("Moves per session:") },
1319 {   0,  0,10000, NULL, (void*) &tmpTc,    NULL, NULL, Spin, N_("Initial time (min):") },
1320 {   0, 0, 10000, NULL, (void*) &tmpInc,   NULL, NULL, Spin, N_("Increment or max (sec/move):") },
1321 {   0,  0,    0, NULL, NULL, NULL, NULL, Label, N_("Time-Odds factors:") },
1322 {   0,  1, 1000, NULL, (void*) &tmpOdds1, NULL, NULL, Spin, N_("Engine #1") },
1323 {   0,  1, 1000, NULL, (void*) &tmpOdds2, NULL, NULL, Spin, N_("Engine #2 / Human") },
1324 {   0,  0,    0, NULL, (void*) &TcOK, "", NULL, EndMark , "" }
1325 };
1326
1327 static int
1328 TcOK (int n)
1329 {
1330     char *tc;
1331     if(tcType == 0 && tmpMoves <= 0) return 0;
1332     if(tcType == 2 && tmpInc <= 0) return 0;
1333     GetWidgetText(&tcOptions[4], &tc); // get original text, in case it is min:sec
1334     searchTime = 0;
1335     switch(tcType) {
1336       case 0:
1337         if(!ParseTimeControl(tc, -1, tmpMoves)) return 0;
1338         appData.movesPerSession = tmpMoves;
1339         ASSIGN(appData.timeControl, tc);
1340         appData.timeIncrement = -1;
1341         break;
1342       case 1:
1343         if(!ParseTimeControl(tc, tmpInc, 0)) return 0;
1344         ASSIGN(appData.timeControl, tc);
1345         appData.timeIncrement = tmpInc;
1346         break;
1347       case 2:
1348         searchTime = tmpInc;
1349     }
1350     appData.firstTimeOdds = first.timeOdds = tmpOdds1;
1351     appData.secondTimeOdds = second.timeOdds = tmpOdds2;
1352     Reset(True, True);
1353     return 1;
1354 }
1355
1356 static void
1357 SetTcType (int n)
1358 {
1359     switch(tcType = n) {
1360       case 0:
1361         SetWidgetText(&tcOptions[3], Value(tmpMoves), TransientDlg);
1362         SetWidgetText(&tcOptions[4], Value(tmpTc), TransientDlg);
1363         SetWidgetText(&tcOptions[5], _("Unused"), TransientDlg);
1364         break;
1365       case 1:
1366         SetWidgetText(&tcOptions[3], _("Unused"), TransientDlg);
1367         SetWidgetText(&tcOptions[4], Value(tmpTc), TransientDlg);
1368         SetWidgetText(&tcOptions[5], Value(tmpInc), TransientDlg);
1369         break;
1370       case 2:
1371         SetWidgetText(&tcOptions[3], _("Unused"), TransientDlg);
1372         SetWidgetText(&tcOptions[4], _("Unused"), TransientDlg);
1373         SetWidgetText(&tcOptions[5], Value(tmpInc), TransientDlg);
1374     }
1375 }
1376
1377 void
1378 TimeControlProc ()
1379 {
1380    tmpMoves = appData.movesPerSession;
1381    tmpInc = appData.timeIncrement; if(tmpInc < 0) tmpInc = 0;
1382    tmpOdds1 = tmpOdds2 = 1; tcType = 0;
1383    tmpTc = atoi(appData.timeControl);
1384    GenericPopUp(tcOptions, _("Time Control"), TransientDlg, BoardWindow, MODAL, 0);
1385 }
1386
1387 //------------------------------- Ask Question -----------------------------------------
1388
1389 int SendReply P((int n));
1390 char pendingReplyPrefix[MSG_SIZ];
1391 ProcRef pendingReplyPR;
1392 char *answer;
1393
1394 Option askOptions[] = {
1395 { 0, 0, 0, NULL, NULL, NULL, NULL, Label,  NULL },
1396 { 0, 0, 0, NULL, (void*) &answer, "", NULL, TextBox, "" },
1397 { 0, 0, 0, NULL, (void*) &SendReply, "", NULL, EndMark , "" }
1398 };
1399
1400 int
1401 SendReply (int n)
1402 {
1403     char buf[MSG_SIZ];
1404     int err;
1405     char *reply=answer;
1406 //    GetWidgetText(&askOptions[1], &reply);
1407     safeStrCpy(buf, pendingReplyPrefix, sizeof(buf)/sizeof(buf[0]) );
1408     if (*buf) strncat(buf, " ", MSG_SIZ - strlen(buf) - 1);
1409     strncat(buf, reply, MSG_SIZ - strlen(buf) - 1);
1410     strncat(buf, "\n",  MSG_SIZ - strlen(buf) - 1);
1411     OutputToProcess(pendingReplyPR, buf, strlen(buf), &err); // does not go into debug file??? => bug
1412     if (err) DisplayFatalError(_("Error writing to chess program"), err, 0);
1413     return TRUE;
1414 }
1415
1416 void
1417 AskQuestion (char *title, char *question, char *replyPrefix, ProcRef pr)
1418 {
1419     safeStrCpy(pendingReplyPrefix, replyPrefix, sizeof(pendingReplyPrefix)/sizeof(pendingReplyPrefix[0]) );
1420     pendingReplyPR = pr;
1421     ASSIGN(answer, "");
1422     askOptions[0].name = question;
1423     if(GenericPopUp(askOptions, title, AskDlg, BoardWindow, MODAL, 0))
1424         AddHandler(&askOptions[1], 2);
1425 }
1426
1427 //---------------------------- Promotion Popup --------------------------------------
1428
1429 static int count;
1430
1431 static void PromoPick P((int n));
1432
1433 static Option promoOptions[] = {
1434 {   0,         0,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1435 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1436 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1437 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1438 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1439 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1440 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1441 {   0, SAME_ROW | NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
1442 };
1443
1444 static void
1445 PromoPick (int n)
1446 {
1447     int promoChar = promoOptions[n+count].value;
1448
1449     PopDown(PromoDlg);
1450
1451     if (promoChar == 0) fromX = -1;
1452     if (fromX == -1) return;
1453
1454     if (! promoChar) {
1455         fromX = fromY = -1;
1456         ClearHighlights();
1457         return;
1458     }
1459     UserMoveEvent(fromX, fromY, toX, toY, promoChar);
1460
1461     if (!appData.highlightLastMove || gotPremove) ClearHighlights();
1462     if (gotPremove) SetPremoveHighlights(fromX, fromY, toX, toY);
1463     fromX = fromY = -1;
1464 }
1465
1466 static void
1467 SetPromo (char *name, int nr, char promoChar)
1468 {
1469     safeStrCpy(promoOptions[nr].name, name, MSG_SIZ);
1470     promoOptions[nr].value = promoChar;
1471 }
1472
1473 void
1474 PromotionPopUp ()
1475 { // choice depends on variant: prepare dialog acordingly
1476   count = 7;
1477   SetPromo(_("Cancel"), --count, 0); // Beware: GenericPopUp cannot handle user buttons named "cancel" (lowe case)!
1478   if(gameInfo.variant != VariantShogi) {
1479     if (!appData.testLegality || gameInfo.variant == VariantSuicide ||
1480         gameInfo.variant == VariantSpartan && !WhiteOnMove(currentMove) ||
1481         gameInfo.variant == VariantGiveaway) {
1482       SetPromo(_("King"), --count, 'k');
1483     }
1484     if(gameInfo.variant == VariantSpartan && !WhiteOnMove(currentMove)) {
1485       SetPromo(_("Captain"), --count, 'c');
1486       SetPromo(_("Lieutenant"), --count, 'l');
1487       SetPromo(_("General"), --count, 'g');
1488       SetPromo(_("Warlord"), --count, 'w');
1489     } else {
1490       SetPromo(_("Knight"), --count, 'n');
1491       SetPromo(_("Bishop"), --count, 'b');
1492       SetPromo(_("Rook"), --count, 'r');
1493       if(gameInfo.variant == VariantCapablanca ||
1494          gameInfo.variant == VariantGothic ||
1495          gameInfo.variant == VariantCapaRandom) {
1496         SetPromo(_("Archbishop"), --count, 'a');
1497         SetPromo(_("Chancellor"), --count, 'c');
1498       }
1499       SetPromo(_("Queen"), --count, 'q');
1500     }
1501   } else // [HGM] shogi
1502   {
1503       SetPromo(_("Defer"), --count, '=');
1504       SetPromo(_("Promote"), --count, '+');
1505   }
1506   GenericPopUp(promoOptions + count, "Promotion", PromoDlg, BoardWindow, NONMODAL, 0);
1507 }
1508
1509 //---------------------------- Chat Windows ----------------------------------------------
1510
1511 void
1512 OutputChatMessage (int partner, char *mess)
1513 {
1514     return; // dummy
1515 }
1516
1517 //--------------------------------- Game-List options dialog ------------------------------------------
1518
1519 char *strings[LPUSERGLT_SIZE];
1520 int stringPtr;
1521
1522 void
1523 GLT_ClearList ()
1524 {
1525     strings[0] = NULL;
1526     stringPtr = 0;
1527 }
1528
1529 void
1530 GLT_AddToList (char *name)
1531 {
1532     strings[stringPtr++] = name;
1533     strings[stringPtr] = NULL;
1534 }
1535
1536 Boolean
1537 GLT_GetFromList (int index, char *name)
1538 {
1539   safeStrCpy(name, strings[index], MSG_SIZ);
1540   return TRUE;
1541 }
1542
1543 void
1544 GLT_DeSelectList ()
1545 {
1546 }
1547
1548 static void GLT_Button P((int n));
1549 static int GLT_OK P((int n));
1550
1551 static Option listOptions[] = {
1552 { 0, LR|TB,  200, NULL, (void*) strings, "", NULL, ListBox, "" },
1553 { 0,    0,     0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("factory") },
1554 { 0, SAME_ROW, 0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("up") },
1555 { 0, SAME_ROW, 0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("down") },
1556 { 0, SAME_ROW, 0, NULL, (void*) &GLT_OK, "", NULL, EndMark , "" }
1557 };
1558
1559 static int
1560 GLT_OK (int n)
1561 {
1562     GLT_ParseList();
1563     appData.gameListTags = strdup(lpUserGLT);
1564     return 1;
1565 }
1566
1567 static void
1568 GLT_Button (int n)
1569 {
1570     int index = SelectedListBoxItem (&listOptions[0]);
1571     char *p;
1572     if (index < 0) {
1573         DisplayError(_("No tag selected"), 0);
1574         return;
1575     }
1576     p = strings[index];
1577     if (n == 3) {
1578         if(index >= strlen(GLT_ALL_TAGS)) return;
1579         strings[index] = strings[index+1];
1580         strings[++index] = p;
1581     } else
1582     if (n == 2) {
1583         if(index == 0) return;
1584         strings[index] = strings[index-1];
1585         strings[--index] = p;
1586     } else
1587     if (n == 1) {
1588       safeStrCpy(lpUserGLT, GLT_DEFAULT_TAGS, LPUSERGLT_SIZE);
1589       GLT_TagsToList(lpUserGLT);
1590       index = 0;
1591       LoadListBox(&listOptions[0], "?"); // Note: the others don't need this, as the highlight switching redraws the change items
1592     }
1593     HighlightListBoxItem(&listOptions[0], index);
1594 }
1595
1596 void
1597 GameListOptionsPopUp (DialogClass parent)
1598 {
1599     safeStrCpy(lpUserGLT, appData.gameListTags, LPUSERGLT_SIZE);
1600     GLT_TagsToList(lpUserGLT);
1601
1602     GenericPopUp(listOptions, _("Game-list options"), TransientDlg, parent, MODAL, 0);
1603 }
1604
1605 void
1606 GameListOptionsProc ()
1607 {
1608     GameListOptionsPopUp(BoardWindow);
1609 }
1610
1611 //----------------------------- Error popup in various uses -----------------------------
1612
1613 /*
1614  * [HGM] Note:
1615  * XBoard has always had some pathologic behavior with multiple simultaneous error popups,
1616  * (which can occur even for modal popups when asynchrounous events, e.g. caused by engine, request a popup),
1617  * and this new implementation reproduces that as well:
1618  * Only the shell of the last instance is remembered in shells[ErrorDlg] (which replaces errorShell),
1619  * so that PopDowns ordered from the code always refer to that instance, and once that is down,
1620  * have no clue as to how to reach the others. For the Delete Window button calling PopDown this
1621  * has now been repaired, as the action routine assigned to it gets the shell passed as argument.
1622  */
1623
1624 int errorUp = False;
1625
1626 void
1627 ErrorPopDown ()
1628 {
1629     if (!errorUp) return;
1630     dialogError = errorUp = False;
1631     PopDown(ErrorDlg); PopDown(FatalDlg); // on explicit request we pop down any error dialog
1632     if (errorExitStatus != -1) ExitEvent(errorExitStatus);
1633 }
1634
1635 static int
1636 ErrorOK (int n)
1637 {
1638     dialogError = errorUp = False;
1639     PopDown(n == 1 ? FatalDlg : ErrorDlg); // kludge: non-modal dialogs have one less (dummy) option
1640     if (errorExitStatus != -1) ExitEvent(errorExitStatus);
1641     return FALSE; // prevent second Popdown !
1642 }
1643
1644 static Option errorOptions[] = {
1645 {   0,  0,    0, NULL, NULL, NULL, NULL, Label,  NULL }, // dummy option: will never be displayed
1646 {   0,  0,    0, NULL, NULL, NULL, NULL, Label,  NULL }, // textValue field will be set before popup
1647 { 0,NO_CANCEL,0, NULL, (void*) &ErrorOK, "", NULL, EndMark , "" }
1648 };
1649
1650 void
1651 ErrorPopUp (char *title, char *label, int modal)
1652 {
1653     errorUp = True;
1654     errorOptions[1].name = label;
1655     if(dialogError = shellUp[TransientDlg])
1656         GenericPopUp(errorOptions+1, title, FatalDlg, TransientDlg, MODAL, 0); // pop up as daughter of the transient dialog
1657     else
1658         GenericPopUp(errorOptions+modal, title, modal ? FatalDlg: ErrorDlg, BoardWindow, modal, 0); // kludge: option start address indicates modality
1659 }
1660
1661 void
1662 DisplayError (String message, int error)
1663 {
1664     char buf[MSG_SIZ];
1665
1666     if (error == 0) {
1667         if (appData.debugMode || appData.matchMode) {
1668             fprintf(stderr, "%s: %s\n", programName, message);
1669         }
1670     } else {
1671         if (appData.debugMode || appData.matchMode) {
1672             fprintf(stderr, "%s: %s: %s\n",
1673                     programName, message, strerror(error));
1674         }
1675         snprintf(buf, sizeof(buf), "%s: %s", message, strerror(error));
1676         message = buf;
1677     }
1678     ErrorPopUp(_("Error"), message, FALSE);
1679 }
1680
1681
1682 void
1683 DisplayMoveError (String message)
1684 {
1685     fromX = fromY = -1;
1686     ClearHighlights();
1687     DrawPosition(FALSE, NULL);
1688     if (appData.debugMode || appData.matchMode) {
1689         fprintf(stderr, "%s: %s\n", programName, message);
1690     }
1691     if (appData.popupMoveErrors) {
1692         ErrorPopUp(_("Error"), message, FALSE);
1693     } else {
1694         DisplayMessage(message, "");
1695     }
1696 }
1697
1698
1699 void
1700 DisplayFatalError (String message, int error, int status)
1701 {
1702     char buf[MSG_SIZ];
1703
1704     errorExitStatus = status;
1705     if (error == 0) {
1706         fprintf(stderr, "%s: %s\n", programName, message);
1707     } else {
1708         fprintf(stderr, "%s: %s: %s\n",
1709                 programName, message, strerror(error));
1710         snprintf(buf, sizeof(buf), "%s: %s", message, strerror(error));
1711         message = buf;
1712     }
1713     if (appData.popupExitMessage && boardWidget && XtIsRealized(boardWidget)) {
1714       ErrorPopUp(status ? _("Fatal Error") : _("Exiting"), message, TRUE);
1715     } else {
1716       ExitEvent(status);
1717     }
1718 }
1719
1720 void
1721 DisplayInformation (String message)
1722 {
1723     ErrorPopDown();
1724     ErrorPopUp(_("Information"), message, TRUE);
1725 }
1726
1727 void
1728 DisplayNote (String message)
1729 {
1730     ErrorPopDown();
1731     ErrorPopUp(_("Note"), message, FALSE);
1732 }
1733
1734 void
1735 DisplayTitle (char *text)
1736 {
1737     char title[MSG_SIZ];
1738     char icon[MSG_SIZ];
1739
1740     if (text == NULL) text = "";
1741
1742     if (*text != NULLCHAR) {
1743       safeStrCpy(icon, text, sizeof(icon)/sizeof(icon[0]) );
1744       safeStrCpy(title, text, sizeof(title)/sizeof(title[0]) );
1745     } else if (appData.icsActive) {
1746         snprintf(icon, sizeof(icon), "%s", appData.icsHost);
1747         snprintf(title, sizeof(title), "%s: %s", programName, appData.icsHost);
1748     } else if (appData.cmailGameName[0] != NULLCHAR) {
1749         snprintf(icon, sizeof(icon), "%s", "CMail");
1750         snprintf(title,sizeof(title), "%s: %s", programName, "CMail");
1751 #ifdef GOTHIC
1752     // [HGM] license: This stuff should really be done in back-end, but WinBoard already had a pop-up for it
1753     } else if (gameInfo.variant == VariantGothic) {
1754       safeStrCpy(icon,  programName, sizeof(icon)/sizeof(icon[0]) );
1755       safeStrCpy(title, GOTHIC,     sizeof(title)/sizeof(title[0]) );
1756 #endif
1757 #ifdef FALCON
1758     } else if (gameInfo.variant == VariantFalcon) {
1759       safeStrCpy(icon, programName, sizeof(icon)/sizeof(icon[0]) );
1760       safeStrCpy(title, FALCON, sizeof(title)/sizeof(title[0]) );
1761 #endif
1762     } else if (appData.noChessProgram) {
1763       safeStrCpy(icon, programName, sizeof(icon)/sizeof(icon[0]) );
1764       safeStrCpy(title, programName, sizeof(title)/sizeof(title[0]) );
1765     } else {
1766       safeStrCpy(icon, first.tidy, sizeof(icon)/sizeof(icon[0]) );
1767         snprintf(title,sizeof(title), "%s: %s", programName, first.tidy);
1768     }
1769     SetWindowTitle(text, title, icon);
1770 }
1771
1772 void
1773 DisplayWhiteClock (long timeRemaining, int highlight)
1774 {
1775     if(appData.noGUI) return;
1776     DisplayTimerLabel(11, _("White"), timeRemaining, highlight);
1777     if(highlight) SetClockIcon(0);
1778 }
1779
1780 void
1781 DisplayBlackClock (long timeRemaining, int highlight)
1782 {
1783     if(appData.noGUI) return;
1784     DisplayTimerLabel(12, _("Black"), timeRemaining, highlight);
1785     if(highlight) SetClockIcon(1);
1786 }
1787
1788 #define PAUSE_BUTTON "P"
1789 #define PIECE_MENU_SIZE 18
1790 static String pieceMenuStrings[2][PIECE_MENU_SIZE+1] = {
1791     { N_("White"), "----", N_("Pawn"), N_("Knight"), N_("Bishop"), N_("Rook"),
1792       N_("Queen"), N_("King"), "----", N_("Elephant"), N_("Cannon"),
1793       N_("Archbishop"), N_("Chancellor"), "----", N_("Promote"), N_("Demote"),
1794       N_("Empty square"), N_("Clear board"), NULL },
1795     { N_("Black"), "----", N_("Pawn"), N_("Knight"), N_("Bishop"), N_("Rook"),
1796       N_("Queen"), N_("King"), "----", N_("Elephant"), N_("Cannon"),
1797       N_("Archbishop"), N_("Chancellor"), "----", N_("Promote"), N_("Demote"),
1798       N_("Empty square"), N_("Clear board"), NULL }
1799 };
1800 /* must be in same order as pieceMenuStrings! */
1801 static ChessSquare pieceMenuTranslation[2][PIECE_MENU_SIZE] = {
1802     { WhitePlay, (ChessSquare) 0, WhitePawn, WhiteKnight, WhiteBishop,
1803         WhiteRook, WhiteQueen, WhiteKing, (ChessSquare) 0, WhiteAlfil,
1804         WhiteCannon, WhiteAngel, WhiteMarshall, (ChessSquare) 0,
1805         PromotePiece, DemotePiece, EmptySquare, ClearBoard },
1806     { BlackPlay, (ChessSquare) 0, BlackPawn, BlackKnight, BlackBishop,
1807         BlackRook, BlackQueen, BlackKing, (ChessSquare) 0, BlackAlfil,
1808         BlackCannon, BlackAngel, BlackMarshall, (ChessSquare) 0,
1809         PromotePiece, DemotePiece, EmptySquare, ClearBoard },
1810 };
1811
1812 #define DROP_MENU_SIZE 6
1813 static String dropMenuStrings[DROP_MENU_SIZE+1] = {
1814     "----", N_("Pawn"), N_("Knight"), N_("Bishop"), N_("Rook"), N_("Queen"), NULL
1815   };
1816 /* must be in same order as dropMenuStrings! */
1817 static ChessSquare dropMenuTranslation[DROP_MENU_SIZE] = {
1818     (ChessSquare) 0, WhitePawn, WhiteKnight, WhiteBishop,
1819     WhiteRook, WhiteQueen
1820 };
1821
1822 // [HGM] experimental code to pop up window just like the main window, using GenercicPopUp
1823
1824 static Option *Exp P((int n, int x, int y));
1825 void MenuCallback P((int n));
1826 void SizeKludge P((int n));
1827
1828 static int pmFromX = -1, pmFromY = -1;
1829
1830 static void
1831 PMSelect (int n)
1832 {   // user callback for board context menus
1833     if (pmFromX < 0 || pmFromY < 0) return;
1834     if(n == 25) DropMenuEvent(dropMenuTranslation[values[n]], pmFromX, pmFromY);
1835     else EditPositionMenuEvent(pieceMenuTranslation[n-23][values[n]], pmFromX, pmFromY);
1836 }
1837
1838 int
1839 CCB (int n)
1840 {
1841     shiftKey = (ShiftKeys() & 3) != 0;
1842     ClockClick(n == 12);
1843 }
1844
1845 Option mainOptions[] = { // description of main window in terms of generic dialog creator
1846 { 0, 0xCA, 0, NULL, NULL, "", NULL, BoxBegin, "" }, // menu bar
1847   { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("File") },
1848   { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Edit") },
1849   { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("View") },
1850   { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Mode") },
1851   { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Action") },
1852   { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Engine") },
1853   { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Options") },
1854   { 0, COMBO_CALLBACK, 0, NULL, (void*)&MenuCallback, NULL, NULL, DropDown, N_("Help") },
1855 { 0, 0, 0, NULL, (void*)&SizeKludge, "", NULL, BoxEnd, "" },
1856 { 0, LR|T2T|BORDER|SAME_ROW, 0, NULL, NULL, "", NULL, Label, "1" }, // optional title in window
1857 { 0, L2L|T2T,              200, NULL, (void*) &CCB, NULL, NULL, Label, "White" }, // white clock
1858 { 0, R2R|T2T|SAME_ROW,     200, NULL, (void*) &CCB, NULL, NULL, Label, "Black" }, // black clock
1859 { 0, LR|T2T|BORDER,        401, NULL, NULL, "", NULL, -1, "2" }, // backup for title in window (if no room for other)
1860 { 0, LR|T2T|BORDER,        270, NULL, NULL, "", NULL, Label, "message" }, // message field
1861 { 0, RR|TT|SAME_ROW,       125, NULL, NULL, "", NULL, BoxBegin, "" }, // (optional) button bar
1862   { 0,    0,     0, NULL, (void*) &ToStartEvent, NULL, NULL, Button, N_("<<") },
1863   { 0, SAME_ROW, 0, NULL, (void*) &BackwardEvent, NULL, NULL, Button, N_("<") },
1864   { 0, SAME_ROW, 0, NULL, (void*) &PauseEvent, NULL, NULL, Button, N_(PAUSE_BUTTON) },
1865   { 0, SAME_ROW, 0, NULL, (void*) &ForwardEvent, NULL, NULL, Button, N_(">") },
1866   { 0, SAME_ROW, 0, NULL, (void*) &ToEndEvent, NULL, NULL, Button, N_(">>") },
1867 { 0, 0, 0, NULL, NULL, "", NULL, BoxEnd, "" },
1868 { 401, LR|TT, 401, NULL, (char*) &Exp, NULL, NULL, Graph, "shadow board" }, // board
1869   { 2, COMBO_CALLBACK, 0, NULL, (void*) &PMSelect, NULL, pieceMenuStrings[0], PopUp, "menuW" },
1870   { 2, COMBO_CALLBACK, 0, NULL, (void*) &PMSelect, NULL, pieceMenuStrings[1], PopUp, "menuB" },
1871   { -1, COMBO_CALLBACK, 0, NULL, (void*) &PMSelect, NULL, dropMenuStrings, PopUp, "menuD" },
1872 { 0,  NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
1873 };
1874
1875 void
1876 SizeKludge (int n)
1877 {   // callback called by GenericPopUp immediately after sizing the menu bar
1878     int width = BOARD_WIDTH*(squareSize + lineGap) + lineGap;
1879     int w = width - 44 - mainOptions[n].min;
1880     mainOptions[10].max = w; // width left behind menu bar
1881     if(w < 0.4*width) // if no reasonable amount of space for title, force small layout
1882         mainOptions[13].type = mainOptions[10].type, mainOptions[10].type = -1;
1883 }
1884
1885 void
1886 MenuCallback (int n)
1887 {
1888     MenuProc *proc = (MenuProc *) (((MenuItem*)(mainOptions[n].choice))[values[n]].proc);
1889
1890     (proc)();
1891 }
1892
1893 static Option *
1894 Exp (int n, int x, int y)
1895 {
1896     static int but1, but3;
1897     int menuNr = -3;
1898
1899     if(n == 0) { // motion
1900         if(SeekGraphClick(Press, x, y, 1)) return NULL;
1901         if(but1 && !PromoScroll(x, y)) DragPieceMove(x, y);
1902         if(but3) MovePV(x, y, lineGap + BOARD_HEIGHT * (squareSize + lineGap));
1903         return NULL;
1904     }
1905     shiftKey = (ShiftKeys() & 3) != 0;
1906     switch(n) {
1907         case  1: LeftClick(Press,   x, y), but1 = 1; break;
1908         case -1: LeftClick(Release, x, y), but1 = 0; break;
1909         case  2: shiftKey = !shiftKey;
1910         case  3: menuNr = RightClick(Press,   x, y, &pmFromX, &pmFromY), but3 = 1; break;
1911         case -2: shiftKey = !shiftKey;
1912         case -3: menuNr = RightClick(Release, x, y, &pmFromX, &pmFromY), but3 = 0; break;
1913         case 10:
1914             DrawPosition(True, NULL);
1915             if(twoBoards) { // [HGM] dual: draw other board in other orientation
1916                 flipView = !flipView; partnerUp = !partnerUp;
1917                 DrawPosition(True, NULL);
1918                 flipView = !flipView; partnerUp = !partnerUp;
1919             }
1920         default:
1921             return NULL;
1922     }
1923
1924     switch(menuNr) {
1925       case 0: return &mainOptions[shiftKey ? 23: 24];
1926       case 1: SetupDropMenu(); return &mainOptions[25];
1927       case 2:
1928       case -1: ErrorPopDown();
1929       case -2:
1930       default: break; // -3, so no clicks caught
1931     }
1932     return NULL;
1933 }
1934
1935 Option *
1936 BoardPopUp (int squareSize, int lineGap, void *clockFontThingy)
1937 {
1938     extern Option *dialogOptions[];
1939     int i, size = BOARD_WIDTH*(squareSize + lineGap) + lineGap;
1940     mainOptions[11].choice = (char**) clockFontThingy;
1941     mainOptions[12].choice = (char**) clockFontThingy;
1942     mainOptions[22].value = BOARD_HEIGHT*(squareSize + lineGap) + lineGap;
1943     mainOptions[22].max = mainOptions[13].max = size; // board size
1944     mainOptions[13].max = size - 2; // board title (subtract border!)
1945     mainOptions[12].max = mainOptions[11].max = size/2-3; // clock width
1946     mainOptions[14].max = appData.showButtonBar ? size-130 : size-2; // message
1947     mainOptions[0].max = size-40; // menu bar
1948     mainOptions[10].type = appData.titleInWindow ? Label : -1 ;
1949     if(!appData.showButtonBar) for(i=15; i<22; i++) mainOptions[i].type = -1;
1950     for(i=0; i<8; i++) mainOptions[i+1].choice = (char**) menuBar[i].mi;
1951     GenericPopUp(mainOptions, "XBoard", BoardWindow, BoardWindow, NONMODAL, 1);
1952     return mainOptions;
1953 }
1954
1955 void
1956 DisplayMessage (char *message, char *extMessage)
1957 {
1958   /* display a message in the message widget */
1959
1960   char buf[MSG_SIZ];
1961
1962   if (extMessage)
1963     {
1964       if (*message)
1965         {
1966           snprintf(buf, sizeof(buf), "%s  %s", message, extMessage);
1967           message = buf;
1968         }
1969       else
1970         {
1971           message = extMessage;
1972         };
1973     };
1974
1975     safeStrCpy(lastMsg, message, MSG_SIZ); // [HGM] make available
1976
1977   /* need to test if messageWidget already exists, since this function
1978      can also be called during the startup, if for example a Xresource
1979      is not set up correctly */
1980   if(mainOptions[14].handle)
1981     SetWidgetLabel(&mainOptions[14], message);
1982
1983   return;
1984 }
1985
1986