Insert autoKibitz continuation lines at end of line
[xboard.git] / xengineoutput.c
index 72b6e26..de62d98 100644 (file)
@@ -1,24 +1,30 @@
-/*\r
- * Engine output (PV)\r
- *\r
- * Author: Alessandro Scotti (Dec 2005)\r
- *\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., 675 Mass Ave, Cambridge, MA 02139, USA.\r
- * ------------------------------------------------------------------------\r
- */\r
+/*
+ * Engine output (PV)
+ *
+ * Author: Alessandro Scotti (Dec 2005)
+ *
+ * Copyright 2005 Alessandro Scotti
+ *
+ * Enhancements Copyright 2009, 2010 Free Software Foundation, Inc.
+ *
+ * ------------------------------------------------------------------------
+ *
+ * GNU XBoard 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 3 of the License, or (at
+ * your option) any later version.
+ *
+ * GNU XBoard 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, see http://www.gnu.org/licenses/.
+ *
+ * ------------------------------------------------------------------------
+ ** See the file ChangeLog for a revision history.  */
+
 #include "config.h"
 
 #include <stdio.h>
 #include "config.h"
 
 #include <stdio.h>
@@ -59,14 +65,25 @@ extern char *getenv();
 #include <X11/Xaw/Text.h>
 #include <X11/Xaw/AsciiText.h>
 #include <X11/Xaw/Viewport.h>
 #include <X11/Xaw/Text.h>
 #include <X11/Xaw/AsciiText.h>
 #include <X11/Xaw/Viewport.h>
+#include <X11/Xatom.h>
+#include <X11/Xmu/Atoms.h>
 
 #include "common.h"
 #include "frontend.h"
 #include "backend.h"
 #include "xboard.h"
 
 #include "common.h"
 #include "frontend.h"
 #include "backend.h"
 #include "xboard.h"
-// Add xengineo.h later
+#include "engineoutput.h"
+#include "gettext.h"
+
+#ifdef ENABLE_NLS
+# define  _(s) gettext (s)
+# define N_(s) gettext_noop (s)
+#else
+# define  _(s) (s)
+# define N_(s)  s
+#endif
 
 
-#include <X11/xpm.h>\r
+#include <X11/xpm.h>
 
 // [HGM] pixmaps of some ICONS used in the engine-outut window
 #include "pixmaps/WHITE_14.xpm"
 
 // [HGM] pixmaps of some ICONS used in the engine-outut window
 #include "pixmaps/WHITE_14.xpm"
@@ -77,8 +94,8 @@ extern char *getenv();
 #include "pixmaps/PONDER_14.xpm"
 #include "pixmaps/ANALYZING_14.xpm"
 
 #include "pixmaps/PONDER_14.xpm"
 #include "pixmaps/ANALYZING_14.xpm"
 
-#ifdef SNAP\r
-#include "wsnap.h"\r
+#ifdef SNAP
+#include "wsnap.h"
 #endif
 
 #define _LL_ 100
 #endif
 
 #define _LL_ 100
@@ -91,1163 +108,482 @@ extern int squareSize;
 extern Pixmap xMarkPixmap, wIconPixmap, bIconPixmap;
 extern char *layoutName;
 
 extern Pixmap xMarkPixmap, wIconPixmap, bIconPixmap;
 extern char *layoutName;
 
-// temporary kludge to avoid compile errors untill all Windows code has been replaced
-#define HICON int *
-#define HWND  int *
-\r
-// [HGM] define numbers to indicate icons, for referring to them in platform-independent way\r
-#define nColorBlack   1\r
-#define nColorWhite   2\r
-#define nColorUnknown 3\r
-#define nClear        4\r
-#define nPondering    5\r
-#define nThinking     6\r
-#define nAnalyzing    7\r
-\r
-Pixmap icons[8]; // [HGM] this front-end array translates back-end icon indicator to handle\r
-\r
-// [HGM] same for output fields (note that there are two of each type, one per color)\r
-#define nColorIcon 1\r
-#define nStateIcon 2\r
-#define nLabel     3\r
-#define nStateData 4\r
-#define nLabelNPS  5\r
-#define nMemo      6\r
-\r
-Widget outputField[2][7]; // [HGM] front-end array to translate output field to window handle\r
-\r
-void EngineOutputPopDown();\r
-void engineOutputPopUp(char *title, char *text);\r
-int  EngineOutputIsUp();\r
-static void SetEngineColorIcon( int which );\r
-\r
-#define SHOW_PONDERING\r
-\r
-/* Imports from backend.c */\r
-char * SavePart(char *str);\r
-\r
-/* Imports from winboard.c */\r
-//extern HWND engineOutputDialog;\r
-extern Arg layoutArgs[2], formArgs[2], messageArgs[4];\r
-\r
-//extern WindowPlacement wpEngineOutput;\r
+Pixmap icons[8]; // [HGM] this front-end array translates back-end icon indicator to handle
+Widget outputField[2][7]; // [HGM] front-end array to translate output field to window handle
+
+void EngineOutputPopDown();
+void engineOutputPopUp();
+int  EngineOutputIsUp();
+void SetEngineColorIcon( int which );
+
+/* Imports from backend.c */
+extern int opponentKibitzes;
+
+/* Imports from xboard.c */
+extern Arg layoutArgs[2], formArgs[2], messageArgs[4];
+
+//extern WindowPlacement wpEngineOutput;
 
 Position engineOutputX = -1, engineOutputY = -1;
 Dimension engineOutputW, engineOutputH;
 Widget engineOutputShell;
 
 Position engineOutputX = -1, engineOutputY = -1;
 Dimension engineOutputW, engineOutputH;
 Widget engineOutputShell;
-int engineOutputDialogUp;
-
-/* Module variables */\r
-#define H_MARGIN            2\r
-#define V_MARGIN            2\r
-#define LABEL_V_DISTANCE    1   /* Distance between label and memo */\r
-#define SPLITTER_SIZE       4   /* Distance between first memo and second label */\r
-\r
-#define ICON_SIZE           14\r
-\r
-#define STATE_UNKNOWN   -1\r
-#define STATE_THINKING   0\r
-#define STATE_IDLE       1\r
-#define STATE_PONDERING  2\r
-#define STATE_ANALYZING  3\r
-\r
-static int  windowMode = 1;\r
-\r
-static int  needInit = TRUE;\r
-\r
-static int  lastDepth[2] = { -1, -1 };\r
-static int  lastForwardMostMove[2] = { -1, -1 };\r
-static int  engineState[2] = { -1, -1 };\r
-\r
-typedef struct {\r
-    char * name;\r
-    int which;\r
-    int depth;\r
-    unsigned long nodes;\r
-    int score;\r
-    int time;\r
-    char * pv;\r
-    char * hint;\r
-    int an_move_index;\r
-    int an_move_count;\r
-} EngineOutputData;\r
-\r
-static VerifyDisplayMode();\r
-static void UpdateControls( EngineOutputData * ed );\r
-static SetEngineState( int which, int state, char * state_data );\r
+static int engineOutputDialogUp;
+
+/* Module variables */
+int  windowMode = 1;
+
+typedef struct {
+    char * name;
+    int which;
+    int depth;
+    u64 nodes;
+    int score;
+    int time;
+    char * pv;
+    char * hint;
+    int an_move_index;
+    int an_move_count;
+} EngineOutputData;
+
+//static void UpdateControls( EngineOutputData * ed );
 
 void ReadIcon(char *pixData[], int iconNr)
 {
     int r;
 
 
 void ReadIcon(char *pixData[], int iconNr)
 {
     int r;
 
-       if ((r=XpmCreatePixmapFromData(xDisplay, XtWindow(outputField[0][nColorIcon]),\r
-                                      pixData,\r
-                                      &(icons[iconNr]),\r
-                                      NULL, NULL /*&attr*/)) != 0) {\r
-         fprintf(stderr, "Error %d loading icon image\n", r);\r
-         exit(1); \r
-       }       \r
+       if ((r=XpmCreatePixmapFromData(xDisplay, XtWindow(outputField[0][nColorIcon]),
+                                      pixData,
+                                      &(icons[iconNr]),
+                                      NULL, NULL /*&attr*/)) != 0) {
+         fprintf(stderr, _("Error %d loading icon image\n"), r);
+         exit(1); 
+       }       
 }
 
 }
 
-static void InitializeEngineOutput()\r
+static void InitializeEngineOutput()
 { int i;
 
 { int i;
 
-        ReadIcon(WHITE_14,   nColorWhite);\r
-        ReadIcon(BLACK_14,   nColorBlack);\r
-        ReadIcon(UNKNOWN_14, nColorUnknown);\r
-
-        ReadIcon(CLEAR_14,   nClear);\r
-        ReadIcon(PONDER_14,  nPondering);\r
-        ReadIcon(THINK_14,   nThinking);\r
-        ReadIcon(ANALYZE_14, nAnalyzing);\r
-//        icons[nClear]       = wIconPixmap;\r
-//        icons[nPondering]   = bIconPixmap;\r//        icons[nThinking]    = wIconPixmap;\r
-//        icons[nAnalyzing]   = bIconPixmap;\r}
-
-#if 0
-// Windows routines commented out
-\r
-// front end\r
-static HICON LoadIconEx( int id )\r
-{\r
-    return LoadImage( hInst, MAKEINTRESOURCE(id), IMAGE_ICON, ICON_SIZE, ICON_SIZE, 0 );\r
-}\r
-\r
-// [HGM] the platform-dependent way of indicating where output should go is now all\r
-// concentrated here, where a table of platform-dependent handles are initialized.\r
-// This cleanses most other routines of front-end stuff, so they can go into the back end.\r
-static void InitializeEngineOutput()\r
-{\r
- //   if( needInit ) { // needInit was already tested before call\r
-       // [HGM] made this into a table, rather than separate global variables\r
-        icons[nColorBlack]   = LoadIconEx( IDI_BLACK_14 );\r
-        icons[nColorWhite]   = LoadIconEx( IDI_WHITE_14 );\r
-        icons[nColorUnknown] = LoadIconEx( IDI_UNKNOWN_14 );\r
-        icons[nClear]        = LoadIconEx( IDI_TRANS_14 );\r
-        icons[nPondering]    = LoadIconEx( IDI_PONDER_14 );\r
-        icons[nThinking]     = LoadIconEx( IDI_CLOCK_14 );\r
-        icons[nAnalyzing]    = LoadIconEx( IDI_ANALYZE2_14 );\r
-\r
-       // [HGM] also make a table of handles to output controls\r
-       // Note that engineOutputDialog must be defined first!\r
-        outputField[0][nColorIcon] = GetDlgItem( engineOutputDialog, IDC_Color1 );\r
-        outputField[0][nLabel]     = GetDlgItem( engineOutputDialog, IDC_EngineLabel1 );\r
-        outputField[0][nStateIcon] = GetDlgItem( engineOutputDialog, IDC_StateIcon1 );\r
-        outputField[0][nStateData] = GetDlgItem( engineOutputDialog, IDC_StateData1 );\r
-        outputField[0][nLabelNPS]  = GetDlgItem( engineOutputDialog, IDC_Engine1_NPS );\r
-        outputField[0][nMemo]      = GetDlgItem( engineOutputDialog, IDC_EngineMemo1 );\r
-\r
-        outputField[1][nColorIcon] = GetDlgItem( engineOutputDialog, IDC_Color2 );\r
-        outputField[1][nLabel]     = GetDlgItem( engineOutputDialog, IDC_EngineLabel2 );\r
-        outputField[1][nStateIcon] = GetDlgItem( engineOutputDialog, IDC_StateIcon2 );\r
-        outputField[1][nStateData] = GetDlgItem( engineOutputDialog, IDC_StateData2 );\r
-        outputField[1][nLabelNPS]  = GetDlgItem( engineOutputDialog, IDC_Engine2_NPS );\r
-        outputField[1][nMemo]      = GetDlgItem( engineOutputDialog, IDC_EngineMemo2 );\r
-//        needInit = FALSE;\r
-//    }\r
-}\r
-\r
-// front end\r
-static void SetControlPos( HWND hDlg, int id, int x, int y, int width, int height )\r
-{\r
-    HWND hControl = GetDlgItem( hDlg, id );\r
-\r
-    SetWindowPos( hControl, HWND_TOP, x, y, width, height, SWP_NOZORDER );\r
-}\r
-\r
-#define HIDDEN_X    20000\r
-#define HIDDEN_Y    20000\r
-\r
-// front end\r
-static void HideControl( HWND hDlg, int id )\r
-{\r
-    HWND hControl = GetDlgItem( hDlg, id );\r
-    RECT rc;\r
-\r
-    GetWindowRect( hControl, &rc );\r
-\r
-    /* \r
-        Avoid hiding an already hidden control, because that causes many\r
-        unnecessary WM_ERASEBKGND messages!\r
-    */\r
-    if( rc.left != HIDDEN_X || rc.top != HIDDEN_Y ) {\r
-        SetControlPos( hDlg, id, 20000, 20000, 100, 100 );\r
-    }\r
-}\r
-\r
-// front end, although we might make GetWindowRect front end instead\r
-static int GetControlWidth( HWND hDlg, int id )\r
-{\r
-    RECT rc;\r
-\r
-    GetWindowRect( GetDlgItem( hDlg, id ), &rc );\r
-\r
-    return rc.right - rc.left;\r
-}\r
-\r
-// front end?\r
-static int GetControlHeight( HWND hDlg, int id )\r
-{\r
-    RECT rc;\r
-\r
-    GetWindowRect( GetDlgItem( hDlg, id ), &rc );\r
-\r
-    return rc.bottom - rc.top;\r
-}\r
-\r
-static int GetHeaderHeight()\r
-{\r
-    int result = GetControlHeight( engineOutputDialog, IDC_EngineLabel1 );\r
-\r
-    if( result < ICON_SIZE ) result = ICON_SIZE;\r
-\r
-    return result;\r
-}\r
-\r
-// The size calculations should be backend? If setControlPos is a platform-dependent way of doing things,\r
-// a platform-independent wrapper for it should be supplied.\r
-static void PositionControlSet( HWND hDlg, int x, int y, int clientWidth, int memoHeight, int idColor, int idEngineLabel, int idNPS, int idMemo, int idStateIcon, int idStateData )\r
-{\r
-    int label_x = x + ICON_SIZE + H_MARGIN;\r
-    int label_h = GetControlHeight( hDlg, IDC_EngineLabel1 );\r
-    int label_y = y + ICON_SIZE - label_h;\r
-    int nps_w = GetControlWidth( hDlg, IDC_Engine1_NPS );\r
-    int nps_x = clientWidth - H_MARGIN - nps_w;\r
-    int state_data_w = GetControlWidth( hDlg, IDC_StateData1 );\r
-    int state_data_x = nps_x - H_MARGIN - state_data_w;\r
-    int state_icon_x = state_data_x - ICON_SIZE - 2;\r
-    int max_w = clientWidth - 2*H_MARGIN;\r
-    int memo_y = y + ICON_SIZE + LABEL_V_DISTANCE;\r
-\r
-    SetControlPos( hDlg, idColor, x, y, ICON_SIZE, ICON_SIZE );\r
-    SetControlPos( hDlg, idEngineLabel, label_x, label_y, state_icon_x - label_x, label_h );\r
-    SetControlPos( hDlg, idStateIcon, state_icon_x, y, ICON_SIZE, ICON_SIZE );\r
-    SetControlPos( hDlg, idStateData, state_data_x, label_y, state_data_w, label_h );\r
-    SetControlPos( hDlg, idNPS, nps_x, label_y, nps_w, label_h );\r
-    SetControlPos( hDlg, idMemo, x, memo_y, max_w, memoHeight );\r
-}\r
-\r
-// Also here some of the size calculations should go to the back end, and their actual application to a front-end routine\r
-static void ResizeWindowControls( HWND hDlg, int mode )\r
-{\r
-    RECT rc;\r
-    int headerHeight = GetHeaderHeight();\r
-    int labelHeight = GetControlHeight( hDlg, IDC_EngineLabel1 );\r
-    int labelOffset = H_MARGIN + ICON_SIZE + H_MARGIN;\r
-    int labelDeltaY = ICON_SIZE - labelHeight;\r
-    int clientWidth;\r
-    int clientHeight;\r
-    int maxControlWidth;\r
-    int npsWidth;\r
-\r
-    /* Initialize variables */\r
-    GetClientRect( hDlg, &rc );\r
-\r
-    clientWidth = rc.right - rc.left;\r
-    clientHeight = rc.bottom - rc.top;\r
-\r
-    maxControlWidth = clientWidth - 2*H_MARGIN;\r
-\r
-    npsWidth = GetControlWidth( hDlg, IDC_Engine1_NPS );\r
-\r
-    /* Resize controls */\r
-    if( mode == 0 ) {\r
-        /* One engine */\r
-        PositionControlSet( hDlg, H_MARGIN, V_MARGIN, \r
-            clientWidth, \r
-            clientHeight - V_MARGIN - LABEL_V_DISTANCE - headerHeight- V_MARGIN,\r
-            IDC_Color1, IDC_EngineLabel1, IDC_Engine1_NPS, IDC_EngineMemo1, IDC_StateIcon1, IDC_StateData1 );\r
-\r
-        /* Hide controls for the second engine */\r
-        HideControl( hDlg, IDC_Color2 );\r
-        HideControl( hDlg, IDC_EngineLabel2 );\r
-        HideControl( hDlg, IDC_StateIcon2 );\r
-        HideControl( hDlg, IDC_StateData2 );\r
-        HideControl( hDlg, IDC_Engine2_NPS );\r
-        HideControl( hDlg, IDC_EngineMemo2 );\r
-        SendDlgItemMessage( hDlg, IDC_EngineMemo2, WM_SETTEXT, 0, (LPARAM) "" );\r
-        /* TODO: we should also hide/disable them!!! what about tab stops?!?! */\r
-    }\r
-    else {\r
-        /* Two engines */\r
-        int memo_h = (clientHeight - headerHeight*2 - V_MARGIN*2 - LABEL_V_DISTANCE*2 - SPLITTER_SIZE) / 2;\r
-        int header1_y = V_MARGIN;\r
-        int header2_y = V_MARGIN + headerHeight + LABEL_V_DISTANCE + memo_h + SPLITTER_SIZE;\r
-\r
-        PositionControlSet( hDlg, H_MARGIN, header1_y, clientWidth, memo_h,\r
-            IDC_Color1, IDC_EngineLabel1, IDC_Engine1_NPS, IDC_EngineMemo1, IDC_StateIcon1, IDC_StateData1 );\r
-\r
-        PositionControlSet( hDlg, H_MARGIN, header2_y, clientWidth, memo_h,\r
-            IDC_Color2, IDC_EngineLabel2, IDC_Engine2_NPS, IDC_EngineMemo2, IDC_StateIcon2, IDC_StateData2 );\r
-    }\r
-\r
-    InvalidateRect( GetDlgItem(hDlg,IDC_EngineMemo1), NULL, FALSE );\r
-    InvalidateRect( GetDlgItem(hDlg,IDC_EngineMemo2), NULL, FALSE );\r
-}\r
-\r
-// front end. Actual printing of PV lines into the output field\r
-static void InsertIntoMemo( int which, char * text )\r
-{\r
-    SendMessage( outputField[which][nMemo], EM_SETSEL, 0, 0 );\r
-\r
-    SendMessage( outputField[which][nMemo], EM_REPLACESEL, (WPARAM) FALSE, (LPARAM) text );\r
-}\r
-\r
-// front end. Associates an icon with an output field ("control" in Windows jargon).\r
-// [HGM] let it find out the output field from the 'which' number by itself\r
-static void SetIcon( int which, int field, int nIcon )\r
-{\r
-\r
-    if( nIcon != 0 ) {\r
-        SendMessage( outputField[which][field], STM_SETICON, (WPARAM) icons[nIcon], 0 );\r
-    }\r
-}\r
-\r
-// front end wrapper for SetWindowText, taking control number in stead of handle\r
-void DoSetWindowText(int which, int field, char *s_label)\r
-{\r
-    SetWindowText( outputField[which][field], s_label );\r
-}\r
-#endif
+        ReadIcon(WHITE_14,   nColorWhite);
+        ReadIcon(BLACK_14,   nColorBlack);
+        ReadIcon(UNKNOWN_14, nColorUnknown);
+
+        ReadIcon(CLEAR_14,   nClear);
+        ReadIcon(PONDER_14,  nPondering);
+        ReadIcon(THINK_14,   nThinking);
+        ReadIcon(ANALYZE_14, nAnalyzing);
+}
 
 
-void DoSetWindowText(int which, int field, char *s_label)\r
-{ \r
-       Arg arg;\r
-\r
-       XtSetArg(arg, XtNlabel, (XtArgVal) s_label);\r
-       XtSetValues(outputField[which][field], &arg, 1);\r
-}\r
+void DoSetWindowText(int which, int field, char *s_label)
+{ 
+       Arg arg;
 
 
-static void InsertIntoMemo( int which, char * text )\r
+       XtSetArg(arg, XtNlabel, (XtArgVal) s_label);
+       XtSetValues(outputField[which][field], &arg, 1);
+}
+
+void InsertIntoMemo( int which, char * text, int where )
 {
        Arg arg; XawTextBlock t; Widget edit;
 
 {
        Arg arg; XawTextBlock t; Widget edit;
 
-       t.ptr = text; t.firstPos = 0; t.length = strlen(text); t.format = XawFmt8Bit;\r
-       edit = XtNameToWidget(engineOutputShell, which ? "*form2.text" : "*form.text");\r
-       XawTextReplace(edit, 0, 0, &t);
-//     XtSetArg(arg, XtNstring, (XtArgVal) text);\r
-//     XtSetValues(outputField[which][nMemo], &arg, 1);\r
-}\r
+       /* the backend adds \r\n, which is needed for winboard, 
+        * for xboard we delete them again over here */
+       if(t.ptr = strchr(text, '\r')) *t.ptr = ' ';
 
 
-static void SetIcon( int which, int field, int nIcon )
+       t.ptr = text; t.firstPos = 0; t.length = strlen(text); t.format = XawFmt8Bit;
+       edit = XtNameToWidget(engineOutputShell, which ? "*form2.text" : "*form.text");
+       XawTextReplace(edit, where, where, &t);
+//     XtSetArg(arg, XtNstring, (XtArgVal) text);
+//     XtSetValues(outputField[which][nMemo], &arg, 1);
+}
+
+void SetIcon( int which, int field, int nIcon )
 {
     Arg arg;
 {
     Arg arg;
-\r
-    if( nIcon != 0 ) {\r
-       XtSetArg(arg, XtNleftBitmap, (XtArgVal) icons[nIcon]);\r
-       XtSetValues(outputField[which][field], &arg, 1);\r
-    }\r
+
+    if( nIcon != 0 ) {
+       XtSetArg(arg, XtNleftBitmap, (XtArgVal) icons[nIcon]);
+       XtSetValues(outputField[which][field], &arg, 1);
+    }
+}
+
+void DoClearMemo(int which)
+{ 
+    Arg args[16];
+    int j;
+    Widget edit;
+
+       edit = XtNameToWidget(engineOutputShell, which ? "*form2.text" : "*form.text");
+       XtCallActionProc(edit, "select-all", NULL, NULL, 0);
+       XtCallActionProc(edit, "kill-selection", NULL, NULL, 0);
 }
 
 }
 
-void DoClearMemo(int which)\r\r    Arg args[16];\r
-    int j;\r
-    Widget edit;\r
+// cloned from CopyPositionProc. Abuse selected_fen_position to hold selection
 
 
-       edit = XtNameToWidget(engineOutputShell, which ? "*form2.text" : "*form.text");\r
-       XtCallActionProc(edit, "select-all", NULL, NULL, 0);\r
-       XtCallActionProc(edit, "kill-selection", NULL, NULL, 0);\r
+extern char *selected_fen_position;
+
+Boolean SendPositionSelection(Widget w, Atom *selection, Atom *target,
+                Atom *type_return, XtPointer *value_return,
+                unsigned long *length_return, int *format_return); // from xboard.c
+void SetFocus(Widget w, XtPointer data, XEvent *event, Boolean *b); // from xoptions.c
+
+char memoTranslations[] =
+":Ctrl<Key>c: CopyMemoProc() \n";
+
+static void
+MemoCB(Widget w, XtPointer client_data, Atom *selection,
+          Atom *type, XtPointer value, unsigned long *len, int *format)
+{
+  if (value==NULL || *len==0) return; /* nothing had been selected to copy */
+  selected_fen_position = value;
+  selected_fen_position[*len]='\0'; /* normally this string is terminated, but be safe */
+    XtOwnSelection(menuBarWidget, XA_CLIPBOARD(xDisplay),
+                  CurrentTime,
+                  SendPositionSelection,
+                  NULL/* lose_ownership_proc */ ,
+                  NULL/* transfer_done_proc */);
 }
 }
-\r
-// The following routines are mutated clones of the commentPopUp routines\r
-\r
-void PositionControlSet(which, form, bw_width)\r
-     int which;\r
-     Widget form;\r
-     Dimension bw_width;\r{\r
-    Arg args[16];\r
-    Widget edit, NameWidget, ColorWidget, ModeWidget, MoveWidget, NodesWidget;\r
-    int j, mutable=1;\r
-    j = 0;\r
+
+void CopyMemoProc(w, event, prms, nprms)
+  Widget w;
+  XEvent *event;
+  String *prms;
+  Cardinal *nprms;
+{
+    if(appData.pasteSelection) return;
+    if (selected_fen_position) free(selected_fen_position);
+    XtGetSelectionValue(menuBarWidget, 
+      XA_PRIMARY, XA_STRING,
+      /* (XtSelectionCallbackProc) */ MemoCB,
+      NULL, /* client_data passed to PastePositionCB */
+
+      /* better to use the time field from the event that triggered the
+       * call to this function, but that isn't trivial to get
+       */
+      CurrentTime
+    );
+}
+
+// The following routines are mutated clones of the commentPopUp routines
+
+void PositionControlSet(which, shell, form, bw_width)
+     int which;
+     Widget shell, form;
+     Dimension bw_width;
+{
+    Arg args[16];
+    Widget edit, NameWidget, ColorWidget, ModeWidget, MoveWidget, NodesWidget;
+    int j, mutable=1;
+    j = 0;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
-    XtSetArg(args[j], XtNlabel,     (XtArgVal) ""); 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], XtNheight,    (XtArgVal) 16); j++;\r
-    XtSetArg(args[j], XtNwidth,     (XtArgVal) 17); j++;\r
+    XtSetArg(args[j], XtNlabel,     (XtArgVal) ""); 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], XtNheight,    (XtArgVal) 16); j++;
+    XtSetArg(args[j], XtNwidth,     (XtArgVal) 17); j++;
     outputField[which][nColorIcon] = ColorWidget =
     outputField[which][nColorIcon] = ColorWidget =
-      XtCreateManagedWidget("Color", labelWidgetClass,\r
-                    form, args, j);\r
+      XtCreateManagedWidget("Color", labelWidgetClass,
+                    form, args, j);
 
 
-    j = 0;\r
+    j = 0;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
     XtSetArg(args[j], XtNjustify,   (XtArgVal) XtJustifyLeft); j++;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
     XtSetArg(args[j], XtNjustify,   (XtArgVal) XtJustifyLeft); j++;
-    XtSetArg(args[j], XtNfromHoriz, (XtArgVal) ColorWidget); 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], XtNheight,    (XtArgVal) 16); j++;\r
-    XtSetArg(args[j], XtNwidth,     (XtArgVal) bw_width/2 - 57); j++;\r
+    XtSetArg(args[j], XtNfromHoriz, (XtArgVal) ColorWidget); j++;
+    XtSetArg(args[j], XtNtop,       XtChainTop); j++;
+    XtSetArg(args[j], XtNbottom,    XtChainTop); j++;
+    XtSetArg(args[j], XtNleft,      XtChainLeft); j++;
+    XtSetArg(args[j], XtNheight,    (XtArgVal) 16); j++;
+    XtSetArg(args[j], XtNwidth,     (XtArgVal) bw_width/2 - 57); j++;
     outputField[which][nLabel] = NameWidget =
     outputField[which][nLabel] = NameWidget =
-      XtCreateManagedWidget("Engine", labelWidgetClass,\r
-                    form, args, j);\r
+      XtCreateManagedWidget("Engine", labelWidgetClass,
+                    form, args, j);
 
 
-    j = 0;\r
+    j = 0;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
-    XtSetArg(args[j], XtNlabel,     (XtArgVal) ""); j++;\r
-    XtSetArg(args[j], XtNfromHoriz, (XtArgVal) NameWidget); j++;\r
-    XtSetArg(args[j], XtNtop,       XtChainTop); j++;\r
-    XtSetArg(args[j], XtNbottom,    XtChainTop); j++;\r
-    XtSetArg(args[j], XtNheight,    (XtArgVal) 16); j++;\r
-    XtSetArg(args[j], XtNwidth,     (XtArgVal) 20); j++;\r
+    XtSetArg(args[j], XtNlabel,     (XtArgVal) ""); j++;
+    XtSetArg(args[j], XtNfromHoriz, (XtArgVal) NameWidget); j++;
+    XtSetArg(args[j], XtNtop,       XtChainTop); j++;
+    XtSetArg(args[j], XtNbottom,    XtChainTop); j++;
+    XtSetArg(args[j], XtNheight,    (XtArgVal) 16); j++;
+    XtSetArg(args[j], XtNwidth,     (XtArgVal) 20); j++;
     outputField[which][nStateIcon] = ModeWidget =
     outputField[which][nStateIcon] = ModeWidget =
-      XtCreateManagedWidget("Mode", labelWidgetClass,\r
-                    form, args, j);\r
+      XtCreateManagedWidget("Mode", labelWidgetClass,
+                    form, args, j);
 
 
-    j = 0;\r
+    j = 0;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
     XtSetArg(args[j], XtNjustify,   (XtArgVal) XtJustifyLeft); j++;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
     XtSetArg(args[j], XtNjustify,   (XtArgVal) XtJustifyLeft); j++;
-    XtSetArg(args[j], XtNlabel,     (XtArgVal) ""); j++;\r
-    XtSetArg(args[j], XtNfromHoriz, (XtArgVal) ModeWidget); j++;\r
-    XtSetArg(args[j], XtNtop,       XtChainTop); j++;\r
-    XtSetArg(args[j], XtNbottom,    XtChainTop); j++;\r
-    XtSetArg(args[j], XtNright,     XtChainRight); j++;\r    XtSetArg(args[j], XtNheight,    (XtArgVal) 16); j++;\r
-    XtSetArg(args[j], XtNwidth,     (XtArgVal) bw_width/2 - 102); j++;\r
+    XtSetArg(args[j], XtNlabel,     (XtArgVal) ""); j++;
+    XtSetArg(args[j], XtNfromHoriz, (XtArgVal) ModeWidget); j++;
+    XtSetArg(args[j], XtNtop,       XtChainTop); j++;
+    XtSetArg(args[j], XtNbottom,    XtChainTop); j++;
+    XtSetArg(args[j], XtNright,     XtChainRight); j++;
+    XtSetArg(args[j], XtNheight,    (XtArgVal) 16); j++;
+    XtSetArg(args[j], XtNwidth,     (XtArgVal) bw_width/2 - 102); j++;
     outputField[which][nStateData] = MoveWidget =
     outputField[which][nStateData] = MoveWidget =
-      XtCreateManagedWidget("Move", labelWidgetClass,\r
-                    form, args, j);\r
+      XtCreateManagedWidget("Move", labelWidgetClass,
+                    form, args, j);
 
 
-    j = 0;\r
+    j = 0;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
     XtSetArg(args[j], XtNborderWidth, (XtArgVal) 0); j++;
-    XtSetArg(args[j], XtNjustify,   (XtArgVal) XtJustifyRight); j++;\r
-    XtSetArg(args[j], XtNlabel,     (XtArgVal) "NPS"); j++;\r
-    XtSetArg(args[j], XtNfromHoriz, (XtArgVal) MoveWidget); 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], XtNheight,    (XtArgVal) 16); j++;\r
-    XtSetArg(args[j], XtNwidth,     (XtArgVal) 100); j++;\r
+    XtSetArg(args[j], XtNjustify,   (XtArgVal) XtJustifyRight); j++;
+    XtSetArg(args[j], XtNlabel,     (XtArgVal) _("NPS")); j++;
+    XtSetArg(args[j], XtNfromHoriz, (XtArgVal) MoveWidget); 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], XtNheight,    (XtArgVal) 16); j++;
+    XtSetArg(args[j], XtNwidth,     (XtArgVal) 100); j++;
     outputField[which][nLabelNPS] = NodesWidget =
     outputField[which][nLabelNPS] = NodesWidget =
-      XtCreateManagedWidget("Nodes", labelWidgetClass,\r
-                    form, args, j);\r
+      XtCreateManagedWidget("Nodes", labelWidgetClass,
+                    form, args, j);
 
     // create "text" within "form"
 
     // create "text" within "form"
-    j = 0;\r
-    if (mutable) {\r
-       XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;\r
-       XtSetArg(args[j], XtNuseStringInPlace, False);  j++;\r
-    }\r
-    XtSetArg(args[j], XtNstring, "");  j++;\r
-    XtSetArg(args[j], XtNdisplayCaret, False);  j++;\r
-    XtSetArg(args[j], XtNtop, XtChainTop);  j++;\r
-    XtSetArg(args[j], XtNbottom, XtChainBottom);  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, bw_width);  j++; /*force wider than buttons*/\r
-#if 0\r
-    XtSetArg(args[j], XtNscrollVertical, XawtextScrollWhenNeeded);  j++;\r
-#else\r
-    /* !!Work around an apparent bug in XFree86 4.0.1 (X11R6.4.3) */\r
-    XtSetArg(args[j], XtNscrollVertical, XawtextScrollAlways);  j++;\r
-    XtSetArg(args[j], XtNscrollHorizontal, XawtextScrollWhenNeeded);  j++;\r#endif\r
-//    XtSetArg(args[j], XtNautoFill, True);  j++;\r
-//    XtSetArg(args[j], XtNwrap, XawtextWrapWord); j++;\r
-    outputField[which][nMemo] = edit =\r
-      XtCreateManagedWidget("text", asciiTextWidgetClass, form, args, j);\r
-\r
-    j = 0;\r
-    XtSetArg(args[j], XtNfromVert, ColorWidget); j++;\r
-//    XtSetArg(args[j], XtNresizable, (XtArgVal) True); j++;\r
-    XtSetValues(edit, args, j);\r
-}\r
-\r
-Widget EngineOutputCreate(name, text)\r
-     char *name, *text;\r
-{\r
-    Arg args[16];\r
+    j = 0;
+    if (mutable) {
+       XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
+       XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
+    }
+    XtSetArg(args[j], XtNstring, "");  j++;
+    XtSetArg(args[j], XtNdisplayCaret, False);  j++;
+    XtSetArg(args[j], XtNtop, XtChainTop);  j++;
+    XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
+    XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
+    XtSetArg(args[j], XtNright, XtChainRight);  j++;
+    XtSetArg(args[j], XtNresizable, True);  j++;
+    XtSetArg(args[j], XtNwidth, bw_width);  j++; /*force wider than buttons*/
+    /* !!Work around an apparent bug in XFree86 4.0.1 (X11R6.4.3) */
+    XtSetArg(args[j], XtNscrollVertical, XawtextScrollAlways);  j++;
+    XtSetArg(args[j], XtNscrollHorizontal, XawtextScrollWhenNeeded);  j++;
+//    XtSetArg(args[j], XtNautoFill, True);  j++;
+//    XtSetArg(args[j], XtNwrap, XawtextWrapWord); j++;
+    outputField[which][nMemo] = edit =
+      XtCreateManagedWidget("text", asciiTextWidgetClass, form, args, j);
+
+    XtOverrideTranslations(edit, XtParseTranslationTable(memoTranslations));
+    XtAddEventHandler(edit, ButtonPressMask, False, SetFocus, (XtPointer) shell);
+
+    j = 0;
+    XtSetArg(args[j], XtNfromVert, ColorWidget); j++;
+//    XtSetArg(args[j], XtNresizable, (XtArgVal) True); j++;
+    XtSetValues(edit, args, j);
+}
+
+Widget EngineOutputCreate(name, text)
+     char *name, *text;
+{
+    Arg args[16];
     Widget shell, layout, form, form2, edit;
     Widget shell, layout, form, form2, edit;
-    Dimension bw_width, bw_height;\r
-    int j;\r
-\r
+    Dimension bw_width, bw_height;
+    int j;
+
     // get board width
     // get board width
-    j = 0;\r
-    XtSetArg(args[j], XtNwidth,  &bw_width);  j++;\r    XtSetArg(args[j], XtNheight, &bw_height);  j++;\r    XtGetValues(boardWidget, args, j);\r
-\r
+    j = 0;
+    XtSetArg(args[j], XtNwidth,  &bw_width);  j++;
+    XtSetArg(args[j], XtNheight, &bw_height);  j++;
+    XtGetValues(boardWidget, args, j);
+
     // define form within layout within shell.
     // define form within layout within shell.
-    j = 0;\r
-    XtSetArg(args[j], XtNresizable, True);  j++;\r
-    shell =\r
-      XtCreatePopupShell(name, transientShellWidgetClass,\r
-                        shellWidget, args, j);\r
-    layout =\r
-      XtCreateManagedWidget(layoutName, formWidgetClass, shell,\r
-                           layoutArgs, XtNumber(layoutArgs));\r
+    j = 0;
+    XtSetArg(args[j], XtNresizable, True);  j++;
+    shell =
+#if TOPLEVEL 
+     XtCreatePopupShell(name, topLevelShellWidgetClass,
+#else
+      XtCreatePopupShell(name, transientShellWidgetClass,
+#endif
+                        shellWidget, args, j);
+    layout =
+      XtCreateManagedWidget(layoutName, formWidgetClass, shell,
+                           layoutArgs, XtNumber(layoutArgs));
     // divide window vertically into two equal parts, by creating two forms
     // divide window vertically into two equal parts, by creating two forms
-    form =\r
-      XtCreateManagedWidget("form", formWidgetClass, layout,\r
-                           formArgs, XtNumber(formArgs));\r
-    form2 =\r
-      XtCreateManagedWidget("form2", formWidgetClass, layout,\r
-                           formArgs, XtNumber(formArgs));\r
-    j = 0;\r    XtSetArg(args[j], XtNfromVert,  (XtArgVal) form); j++;\r    XtSetValues(form2, args, j);\r
+    form =
+      XtCreateManagedWidget("form", formWidgetClass, layout,
+                           formArgs, XtNumber(formArgs));
+    form2 =
+      XtCreateManagedWidget("form2", formWidgetClass, layout,
+                           formArgs, XtNumber(formArgs));
+    j = 0;
+    XtSetArg(args[j], XtNfromVert,  (XtArgVal) form); j++;
+    XtSetValues(form2, args, j);
     // make sure width is known in advance, for better placement of child widgets
     // make sure width is known in advance, for better placement of child widgets
-    j = 0;\r    XtSetArg(args[j], XtNwidth,     (XtArgVal) bw_width-16); j++;\r    XtSetArg(args[j], XtNheight,    (XtArgVal) bw_height/2); j++;\r    XtSetValues(shell, args, j);\r
+    j = 0;
+    XtSetArg(args[j], XtNwidth,     (XtArgVal) bw_width-16); j++;
+    XtSetArg(args[j], XtNheight,    (XtArgVal) bw_height/2); j++;
+    XtSetValues(shell, args, j);
 
     // fill up both forms with control elements
 
     // fill up both forms with control elements
-    PositionControlSet(0, form,  bw_width);
-    PositionControlSet(1, form2, bw_width);
-\r
-    XtRealizeWidget(shell);\r
-
-    if (engineOutputX == -1) {\r
-       int xx, yy;\r
-       Window junk;\r
-       Dimension pw_height;\r
-       Dimension ew_height;\r
-#if 0\r
-       j = 0;\r
-       XtSetArg(args[j], XtNheight, &ew_height);  j++;\r
-       XtGetValues(edit, args, j);\r
-\r
-       j = 0;\r
-       XtSetArg(args[j], XtNheight, &pw_height);  j++;\r
-       XtGetValues(shell, args, j);\r
-       engineOutputH = pw_height + (lines - 1) * ew_height;\r
-       engineOutputW = bw_width - 16;
-#else
-       engineOutputH = bw_height/2;\r   engineOutputW = bw_width-16;\r#endif
-\r
-       XSync(xDisplay, False);\r
-#ifdef NOTDEF\r
-       /* This code seems to tickle an X bug if it is executed too soon\r
-          after xboard starts up.  The coordinates get transformed as if\r
-          the main window was positioned at (0, 0).\r
-          */\r
-       XtTranslateCoords(shellWidget,\r
-                         (bw_width - engineOutputW) / 2, 0 - engineOutputH / 2,\r
-                         &engineOutputX, &engineOutputY);\r
-#else  /*!NOTDEF*/\r
-        XTranslateCoordinates(xDisplay, XtWindow(shellWidget),\r
-                             RootWindowOfScreen(XtScreen(shellWidget)),\r
-                             (bw_width - engineOutputW) / 2, 0 - engineOutputH / 2,\r
-                             &xx, &yy, &junk);\r
-       engineOutputX = xx;\r
-       engineOutputY = yy;\r
-#endif /*!NOTDEF*/\r
-       if (engineOutputY < 0) engineOutputY = 0; /*avoid positioning top offscreen*/\r
-    }\r
-    j = 0;\r
-    XtSetArg(args[j], XtNheight, engineOutputH);  j++;\r    XtSetArg(args[j], XtNwidth, engineOutputW);  j++;\r
-    XtSetArg(args[j], XtNx, engineOutputX);  j++;\r
-    XtSetArg(args[j], XtNy, engineOutputY);  j++;\r
-    XtSetValues(shell, args, j);\r
-//    XtSetKeyboardFocus(shell, edit);\r
-\r
-    return shell;\r
-}\r
-\r
-void ResizeWindowControls(shell, mode)
-       Widget shell;
+    PositionControlSet(0, shell, form,  bw_width);
+    PositionControlSet(1, shell, form2, bw_width);
+
+    XtRealizeWidget(shell);
+
+    if(wpEngineOutput.width > 0) {
+      engineOutputW = wpEngineOutput.width;
+      engineOutputH = wpEngineOutput.height;
+      engineOutputX = wpEngineOutput.x;
+      engineOutputY = wpEngineOutput.y;
+    }
+
+    if (engineOutputX == -1) {
+       int xx, yy;
+       Window junk;
+       Dimension pw_height;
+       Dimension ew_height;
+       engineOutputH = bw_height/2;
+       engineOutputW = bw_width-16;
+
+       XSync(xDisplay, False);
+#ifdef NOTDEF
+       /* This code seems to tickle an X bug if it is executed too soon
+          after xboard starts up.  The coordinates get transformed as if
+          the main window was positioned at (0, 0).
+          */
+       XtTranslateCoords(shellWidget,
+                         (bw_width - engineOutputW) / 2, 0 - engineOutputH / 2,
+                         &engineOutputX, &engineOutputY);
+#else  /*!NOTDEF*/
+        XTranslateCoordinates(xDisplay, XtWindow(shellWidget),
+                             RootWindowOfScreen(XtScreen(shellWidget)),
+                             (bw_width - engineOutputW) / 2, 0 - engineOutputH / 2,
+                             &xx, &yy, &junk);
+       engineOutputX = xx;
+       engineOutputY = yy;
+#endif /*!NOTDEF*/
+       if (engineOutputY < 0) engineOutputY = 0; /*avoid positioning top offscreen*/
+    }
+    j = 0;
+    XtSetArg(args[j], XtNheight, engineOutputH);  j++;
+    XtSetArg(args[j], XtNwidth, engineOutputW);  j++;
+    XtSetArg(args[j], XtNx, engineOutputX);  j++;
+    XtSetArg(args[j], XtNy, engineOutputY);  j++;
+    XtSetValues(shell, args, j);
+//    XtSetKeyboardFocus(shell, edit);
+
+    return shell;
+}
+
+void ResizeWindowControls(mode)
        int mode;
 {
     Widget form1, form2;
     Arg args[16];
     int j;
     Dimension ew_height, tmp;
        int mode;
 {
     Widget form1, form2;
     Arg args[16];
     int j;
     Dimension ew_height, tmp;
+    Widget shell = engineOutputShell;
 
 
-    form1 = XtNameToWidget(shell, "*form");\r
+    form1 = XtNameToWidget(shell, "*form");
     form2 = XtNameToWidget(shell, "*form2");
 
     j = 0;
     form2 = XtNameToWidget(shell, "*form2");
 
     j = 0;
-    XtSetArg(args[j], XtNheight, (XtArgVal) &ew_height); j++;\r    XtGetValues(form1, args, j);
+    XtSetArg(args[j], XtNheight, (XtArgVal) &ew_height); j++;
+    XtGetValues(form1, args, j);
     j = 0;
     j = 0;
-    XtSetArg(args[j], XtNheight, (XtArgVal) &tmp); j++;\r    XtGetValues(form2, args, j);
+    XtSetArg(args[j], XtNheight, (XtArgVal) &tmp); j++;
+    XtGetValues(form2, args, j);
     ew_height += tmp; // total height
     ew_height += tmp; // total height
-\r
-    if(mode==0) {\r
+
+    if(mode==0) {
        j = 0;
        j = 0;
-       XtSetArg(args[j], XtNheight, (XtArgVal) 5); j++;\r
+       XtSetArg(args[j], XtNheight, (XtArgVal) 5); j++;
        XtSetValues(form2, args, j);
        j = 0;
        XtSetValues(form2, args, j);
        j = 0;
-       XtSetArg(args[j], XtNheight, (XtArgVal) (ew_height-5)); j++;\r
+       XtSetArg(args[j], XtNheight, (XtArgVal) (ew_height-5)); j++;
        XtSetValues(form1, args, j);
     } else {
        j = 0;
        XtSetValues(form1, args, j);
     } else {
        j = 0;
-       XtSetArg(args[j], XtNheight, (XtArgVal) (ew_height/2)); j++;\r
+       XtSetArg(args[j], XtNheight, (XtArgVal) (ew_height/2)); j++;
        XtSetValues(form1, args, j);
        j = 0;
        XtSetValues(form1, args, j);
        j = 0;
-       XtSetArg(args[j], XtNheight, (XtArgVal) (ew_height/2)); j++;\r
+       XtSetArg(args[j], XtNheight, (XtArgVal) (ew_height/2)); j++;
        XtSetValues(form2, args, j);
        XtSetValues(form2, args, j);
-    }\r
+    }
 }
 
 }
 
-#if 0\r
-void EngineOutputCallback(w, client_data, call_data)\r
-     Widget w;\r
-     XtPointer client_data, call_data;\r
-{\r
-    String name;\r
-    Arg args[16];\r
-    int j;\r
-\r
-    j = 0;\r
-    XtSetArg(args[j], XtNlabel, &name);  j++;\r
-    XtGetValues(w, args, j);\r
-\r
-    if (strcmp(name, "close") == 0) {\r
-       EngineOutputPopDown();\r
-    } else if (strcmp(name, "edit") == 0) {\r
-       EngineOutputPopDown();\r
-       EditCommentEvent();\r
-    }\r
-}\r
-#endif
-\r
-#if 0\r
-// This seems pure front end\r
-LRESULT CALLBACK EngineOutputProc( HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam )\r
-{\r
-    static SnapData sd;\r
-\r
-    switch (message) {\r
-    case WM_INITDIALOG:\r
-        if( engineOutputDialog == NULL ) {\r
-            engineOutputDialog = hDlg;\r
-\r
-            RestoreWindowPlacement( hDlg, &wpEngineOutput ); /* Restore window placement */\r
-\r
-            ResizeWindowControls( hDlg, windowMode );\r
-\r
-            SetEngineState( 0, STATE_IDLE, "" );\r
-            SetEngineState( 1, STATE_IDLE, "" );\r
-        }\r
-\r
-        return FALSE;\r
-\r
-    case WM_COMMAND:\r
-        switch (LOWORD(wParam)) {\r
-        case IDOK:\r
-          EndDialog(hDlg, TRUE);\r
-          return TRUE;\r
-\r
-        case IDCANCEL:\r
-          EndDialog(hDlg, FALSE);\r
-          return TRUE;\r
-\r
-        default:\r
-          break;\r
-        }\r
-\r
-        break;\r
-\r
-    case WM_GETMINMAXINFO:\r
-        {\r
-            MINMAXINFO * mmi = (MINMAXINFO *) lParam;\r
-        \r
-            mmi->ptMinTrackSize.x = 100;\r
-            mmi->ptMinTrackSize.y = 160;\r
-        }\r
-        break;\r
-\r
-    case WM_CLOSE:\r
-        EngineOutputPopDown();\r
-        break;\r
-\r
-    case WM_SIZE:\r
-        ResizeWindowControls( hDlg, windowMode );\r
-        break;\r
-\r
-    case WM_ENTERSIZEMOVE:\r
-        return OnEnterSizeMove( &sd, hDlg, wParam, lParam );\r
-\r
-    case WM_SIZING:\r
-        return OnSizing( &sd, hDlg, wParam, lParam );\r
-\r
-    case WM_MOVING:\r
-        return OnMoving( &sd, hDlg, wParam, lParam );\r
-\r
-    case WM_EXITSIZEMOVE:\r
-        return OnExitSizeMove( &sd, hDlg, wParam, lParam );\r
-    }\r
-\r
-    return FALSE;\r
-}\r
-#endif
-\r
-void EngineOutputPopUp(title, text)\r
-     char *title, *text;\r
-{\r
-    Arg args[16];\r
-    int j;\r
-    Widget edit;\r
-\r
-    if (engineOutputShell == NULL) {\r
-       engineOutputShell =\r
-         EngineOutputCreate(title, text);\r
-       XtRealizeWidget(engineOutputShell);\r
-       CatchDeleteWindow(engineOutputShell, "EngineOutputPopDown");\r
-       if( needInit ) {\r
-           InitializeEngineOutput();\r
-           needInit = FALSE;\r  }\r
-        SetEngineColorIcon( 0 );\r
-        SetEngineColorIcon( 1 );\r
-        SetEngineState( 0, STATE_IDLE, "" );\r
-        SetEngineState( 1, STATE_IDLE, "" );\r
+void 
+EngineOutputPopUp()
+{
+    Arg args[16];
+    int j;
+    Widget edit;
+    static int  needInit = TRUE;
+    static char *title = _("Engine output"), *text = _("This feature is experimental");
+
+    if (engineOutputShell == NULL) {
+       engineOutputShell =
+         EngineOutputCreate(title, text);
+       XtRealizeWidget(engineOutputShell);
+       CatchDeleteWindow(engineOutputShell, "EngineOutputPopDown");
+       if( needInit ) {
+           InitializeEngineOutput();
+           needInit = FALSE;
+       }
+        SetEngineColorIcon( 0 );
+        SetEngineColorIcon( 1 );
+        SetEngineState( 0, STATE_IDLE, "" );
+        SetEngineState( 1, STATE_IDLE, "" );
     } else {
     } else {
-       edit = XtNameToWidget(engineOutputShell, "*form.text");\r
-       j = 0;\r
-       XtSetArg(args[j], XtNstring, text); j++;\r
-       XtSetValues(edit, args, j);\r
-       j = 0;\r
-       XtSetArg(args[j], XtNiconName, (XtArgVal) title);   j++;\r
-       XtSetArg(args[j], XtNtitle, (XtArgVal) title);      j++;\r
-       XtSetValues(engineOutputShell, args, j);\r
-    }\r
-\r
-    XtPopup(engineOutputShell, XtGrabNone);\r
-    XSync(xDisplay, False);\r
-\r
+       edit = XtNameToWidget(engineOutputShell, "*form.text");
+       j = 0;
+       XtSetArg(args[j], XtNstring, text); j++;
+       XtSetValues(edit, args, j);
+       j = 0;
+       XtSetArg(args[j], XtNiconName, (XtArgVal) title);   j++;
+       XtSetArg(args[j], XtNtitle, (XtArgVal) title);      j++;
+       XtSetValues(engineOutputShell, args, j);
+    }
+
+    XtPopup(engineOutputShell, XtGrabNone);
+    XSync(xDisplay, False);
+
     j=0;
     XtSetArg(args[j], XtNleftBitmap, xMarkPixmap); j++;
     XtSetValues(XtNameToWidget(menuBarWidget, "menuMode.Show Engine Output"),
                args, j);
 
     j=0;
     XtSetArg(args[j], XtNleftBitmap, xMarkPixmap); j++;
     XtSetValues(XtNameToWidget(menuBarWidget, "menuMode.Show Engine Output"),
                args, j);
 
-    engineOutputDialogUp = True;\r
+    engineOutputDialogUp = True;
     ShowThinkingEvent(); // [HGM] thinking: might need to prompt engine for thinking output
     ShowThinkingEvent(); // [HGM] thinking: might need to prompt engine for thinking output
-}\r
-
-#if 0\r
-// front end\r
-void EngineOutputPopUp()\r
-{\r
-  FARPROC lpProc;\r
-  \r
-  CheckMenuItem(GetMenu(hwndMain), IDM_ShowEngineOutput, MF_CHECKED);\r
-\r
-  if( engineOutputDialog ) {\r
-    SendMessage( engineOutputDialog, WM_INITDIALOG, 0, 0 );\r
-\r
-    if( ! engineOutputDialogUp ) {\r
-        ShowWindow(engineOutputDialog, SW_SHOW);\r
-    }\r
-  }\r
-  else {\r
-    lpProc = MakeProcInstance( (FARPROC) EngineOutputProc, hInst );\r
-\r
-    /* Note to self: dialog must have the WS_VISIBLE style set, otherwise it's not shown! */\r
-    CreateDialog( hInst, MAKEINTRESOURCE(DLG_EngineOutput), hwndMain, (DLGPROC)lpProc );\r
-\r
-    FreeProcInstance(lpProc);\r
-  }\r
-\r
-  // [HGM] displaced to after creation of dialog, to allow initialization of output fields\r
-  if( needInit ) {\r
-      InitializeEngineOutput();\r
-      needInit = FALSE;\r
-  }\r
-\r
-  engineOutputDialogUp = TRUE;\r
-}\r
-#endif
-\r
-void EngineOutputPopDown()\r
-{\r
-    Arg args[16];\r
-    int j;\r
-\r
-    if (!engineOutputDialogUp) return;\r
-    j = 0;\r
-    XtSetArg(args[j], XtNx, &engineOutputX); j++;\r
-    XtSetArg(args[j], XtNy, &engineOutputY); j++;\r
-    XtSetArg(args[j], XtNwidth, &engineOutputW); j++;\r
-    XtSetArg(args[j], XtNheight, &engineOutputH); j++;\r
-    XtGetValues(engineOutputShell, args, j);\r
-    XtPopdown(engineOutputShell);\r
+}
+
+void EngineOutputPopDown()
+{
+    Arg args[16];
+    int j;
+
+    if (!engineOutputDialogUp) return;
+    DoClearMemo(1);
+    j = 0;
+    XtSetArg(args[j], XtNx, &engineOutputX); j++;
+    XtSetArg(args[j], XtNy, &engineOutputY); j++;
+    XtSetArg(args[j], XtNwidth, &engineOutputW); j++;
+    XtSetArg(args[j], XtNheight, &engineOutputH); j++;
+    XtGetValues(engineOutputShell, args, j);
+    wpEngineOutput.x = engineOutputX - 4;
+    wpEngineOutput.y = engineOutputY - 23;
+    wpEngineOutput.width = engineOutputW;
+    wpEngineOutput.height = engineOutputH;
+    XtPopdown(engineOutputShell);
     XSync(xDisplay, False);
     j=0;
     XtSetArg(args[j], XtNleftBitmap, None); j++;
     XtSetValues(XtNameToWidget(menuBarWidget, "menuMode.Show Engine Output"),
                args, j);
     XSync(xDisplay, False);
     j=0;
     XtSetArg(args[j], XtNleftBitmap, None); j++;
     XtSetValues(XtNameToWidget(menuBarWidget, "menuMode.Show Engine Output"),
                args, j);
-\r
-    engineOutputDialogUp = False;\r
+
+    engineOutputDialogUp = False;
     ShowThinkingEvent(); // [HGM] thinking: might need to shut off thinking output
     ShowThinkingEvent(); // [HGM] thinking: might need to shut off thinking output
-}\r
-\r
-#if 0
-// front end\r
-void EngineOutputPopDown()\r
-{\r
-  CheckMenuItem(GetMenu(hwndMain), IDM_ShowEngineOutput, MF_UNCHECKED);\r
-\r
-  if( engineOutputDialog ) {\r
-      ShowWindow(engineOutputDialog, SW_HIDE);\r
-  }\r
-\r
-  engineOutputDialogUp = FALSE;\r
-}\r
-\r
-// front end. [HGM] Takes handle of output control from table, so only number is passed\r
-void DoClearMemo(int which)\r
-{\r
-        SendMessage( outputField[which][nMemo], WM_SETTEXT, 0, (LPARAM) "" );\r
-}\r
-#endif
+}
 
 
-//------------------------ pure back-end routines -------------------------------\r
-\r
-\r
-// back end, due to front-end wrapper for SetWindowText, and new SetIcon arguments\r
-static SetEngineState( int which, int state, char * state_data )\r
-{\r
-    int x_which = 1 - which;\r
-\r
-    if( engineState[ which ] != state ) {\r
-        engineState[ which ] = state;\r
-\r
-        switch( state ) {\r
-        case STATE_THINKING:\r
-            SetIcon( which, nStateIcon, nThinking );\r
-            if( engineState[ x_which ] == STATE_THINKING ) {\r
-                SetEngineState( x_which, STATE_IDLE, "" );\r
-            }\r
-            break;\r
-        case STATE_PONDERING:\r
-            SetIcon( which, nStateIcon, nPondering );\r
-            break;\r
-        case STATE_ANALYZING:\r
-            SetIcon( which, nStateIcon, nAnalyzing );\r
-            break;\r
-        default:\r
-            SetIcon( which, nStateIcon, nClear );\r
-            break;\r
-        }\r
-    }\r
-\r
-    if( state_data != 0 ) {\r
-        DoSetWindowText( which, nStateData, state_data );\r
-    }\r
-}\r
-\r
-// back end, now the front-end wrapper ClearMemo is used, and ed no longer contains handles.\r
-void EngineOutputUpdate( FrontEndProgramStats * stats )\r
-{\r
-    EngineOutputData ed;\r
-    int clearMemo = FALSE;\r
-    int which;\r
-    int depth;\r
-\r
-    if( stats == 0 ) {\r
-        SetEngineState( 0, STATE_IDLE, "" );\r
-        SetEngineState( 1, STATE_IDLE, "" );\r
-        return;\r
-    }\r
-\r
-    which = stats->which;\r
-    depth = stats->depth;\r
-\r
-    if( which < 0 || which > 1 || depth < 0 || stats->time < 0 || stats->pv == 0 ) {\r
-        return;\r
-    }\r
-\r
-    if( engineOutputShell == NULL ) {\r
-        return;\r
-    }\r
-\r
-    VerifyDisplayMode();\r
-\r
-    ed.which = which;\r
-    ed.depth = depth;\r
-    ed.nodes = stats->nodes;\r
-    ed.score = stats->score;\r
-    ed.time = stats->time;\r
-    ed.pv = stats->pv;\r
-    ed.hint = stats->hint;\r
-    ed.an_move_index = stats->an_move_index;\r
-    ed.an_move_count = stats->an_move_count;\r
-\r
-    /* Get target control. [HGM] this is moved to front end, which get them from a table */\r
-    if( which == 0 ) {\r
-        ed.name = first.tidy;\r
-    }\r
-    else {\r
-        ed.name = second.tidy;\r
-    }\r
-\r
-    /* Clear memo if needed */\r
-    if( lastDepth[which] > depth || (lastDepth[which] == depth && depth <= 1) ) {\r
-        clearMemo = TRUE;\r
-    }\r
-\r
-    if( lastForwardMostMove[which] != forwardMostMove ) {\r
-        clearMemo = TRUE;\r
-    }\r
-\r
-    if( clearMemo ) DoClearMemo(which);\r
-\r
-    /* Update */\r
-    lastDepth[which] = depth;\r
-    lastForwardMostMove[which] = forwardMostMove;\r
-\r
-    if( ed.pv != 0 && ed.pv[0] == ' ' ) {\r
-        if( strncmp( ed.pv, " no PV", 6 ) == 0 ) { /* Hack on hack! :-O */\r
-            ed.pv = "";\r
-        }\r
-    }\r
-\r
-    UpdateControls( &ed );\r
-}\r
-\r
-#define ENGINE_COLOR_WHITE      'w'\r
-#define ENGINE_COLOR_BLACK      'b'\r
-#define ENGINE_COLOR_UNKNOWN    ' '\r
-\r
-// pure back end\r
-char GetEngineColor( int which )\r
-{\r
-    char result = ENGINE_COLOR_UNKNOWN;\r
-\r
-    if( which == 0 || which == 1 ) {\r
-        ChessProgramState * cps;\r
-\r
-        switch (gameMode) {\r
-        case MachinePlaysBlack:\r
-        case IcsPlayingBlack:\r
-            result = ENGINE_COLOR_BLACK;\r
-            break;\r
-        case MachinePlaysWhite:\r
-        case IcsPlayingWhite:\r
-            result = ENGINE_COLOR_WHITE;\r
-            break;\r
-        case AnalyzeMode:\r
-        case AnalyzeFile:\r
-            result = WhiteOnMove(forwardMostMove) ? ENGINE_COLOR_WHITE : ENGINE_COLOR_BLACK;\r
-            break;\r
-        case TwoMachinesPlay:\r
-            cps = (which == 0) ? &first : &second;\r
-            result = cps->twoMachinesColor[0];\r
-            result = result == 'w' ? ENGINE_COLOR_WHITE : ENGINE_COLOR_BLACK;\r
-            break;\r
-        }\r
-    }\r
-\r
-    return result;\r
-}\r
-\r
-// pure back end\r
-char GetActiveEngineColor()\r
-{\r
-    char result = ENGINE_COLOR_UNKNOWN;\r
-\r
-    if( gameMode == TwoMachinesPlay ) {\r
-        result = WhiteOnMove(forwardMostMove) ? ENGINE_COLOR_WHITE : ENGINE_COLOR_BLACK;\r
-    }\r
-\r
-    return result;\r
-}\r
-\r
-// pure back end\r
-static int IsEnginePondering( int which )\r
-{\r
-    int result = FALSE;\r
-\r
-    switch (gameMode) {\r
-    case MachinePlaysBlack:\r
-    case IcsPlayingBlack:\r
-        if( WhiteOnMove(forwardMostMove) ) result = TRUE;\r
-        break;\r
-    case MachinePlaysWhite:\r
-    case IcsPlayingWhite:\r
-        if( ! WhiteOnMove(forwardMostMove) ) result = TRUE;\r
-        break;\r
-    case TwoMachinesPlay:\r
-        if( GetActiveEngineColor() != ENGINE_COLOR_UNKNOWN ) {\r
-            if( GetEngineColor( which ) != GetActiveEngineColor() ) result = TRUE;\r
-        }\r
-        break;\r
-    }\r
-\r
-    return result;\r
-}\r
-\r
-// back end\r
-static void SetDisplayMode( int mode )\r
-{\r
-    if( windowMode != mode ) {\r
-        windowMode = mode;\r
-\r
-        ResizeWindowControls( engineOutputShell, mode );\r
-    }\r
-}\r
-\r
-// pure back end\r
-static VerifyDisplayMode()\r
-{\r
-    int mode;\r
-\r
-    /* Get proper mode for current game */\r
-    switch( gameMode ) {\r
-    case AnalyzeMode:\r
-    case AnalyzeFile:\r
-    case MachinePlaysWhite:\r
-    case MachinePlaysBlack:\r
-    case IcsPlayingWhite:\r
-    case IcsPlayingBlack:\r
-        mode = 0;\r
-        break;\r
-    case TwoMachinesPlay:\r
-        mode = 1;\r
-        break;\r
-    default:\r
-        /* Do not change */\r
-        return;\r
-    }\r
-\r
-    SetDisplayMode( mode );\r
-}\r
-\r
-// back end. Determine what icon to se in the color-icon field, and print it\r
-static void SetEngineColorIcon( int which )\r
-{\r
-    char color = GetEngineColor(which);\r
-    int nicon = 0;\r
-\r
-    if( color == ENGINE_COLOR_BLACK )\r
-        nicon = nColorBlack;\r
-    else if( color == ENGINE_COLOR_WHITE )\r
-        nicon = nColorWhite;\r
-    else\r
-        nicon = nColorUnknown;\r
-\r
-    SetIcon( which, nColorIcon, nicon );\r
-}\r
-\r
-#define MAX_NAME_LENGTH 32\r
-\r
-// pure back end, now SetWindowText is called via wrapper DoSetWindowText\r
-static void UpdateControls( EngineOutputData * ed )\r
-{\r
-    int isPondering = FALSE;\r
-\r
-    char s_label[MAX_NAME_LENGTH + 32];\r
-    \r
-    char * name = ed->name;\r
-\r
-    /* Label */\r
-    if( name == 0 || *name == '\0' ) {\r
-        name = "?";\r
-    }\r
-\r
-    strncpy( s_label, name, MAX_NAME_LENGTH );\r
-    s_label[ MAX_NAME_LENGTH-1 ] = '\0';\r
-\r
-#ifdef SHOW_PONDERING\r
-    if( IsEnginePondering( ed->which ) ) {\r
-        char buf[8];\r
-\r
-        buf[0] = '\0';\r
-\r
-        if( ed->hint != 0 && *ed->hint != '\0' ) {\r
-            strncpy( buf, ed->hint, sizeof(buf) );\r
-            buf[sizeof(buf)-1] = '\0';\r
-        }\r
-        else if( ed->pv != 0 && *ed->pv != '\0' ) {\r
-            char * sep = strchr( ed->pv, ' ' );\r
-            int buflen = sizeof(buf);\r
-\r
-            if( sep != NULL ) {\r
-                buflen = sep - ed->pv + 1;\r
-                if( buflen > sizeof(buf) ) buflen = sizeof(buf);\r
-            }\r
-\r
-            strncpy( buf, ed->pv, buflen );\r
-            buf[ buflen-1 ] = '\0';\r
-        }\r
-\r
-        SetEngineState( ed->which, STATE_PONDERING, buf );\r
-    }\r
-    else if( gameMode == TwoMachinesPlay ) {\r
-        SetEngineState( ed->which, STATE_THINKING, "" );\r
-    }\r
-    else if( gameMode == AnalyzeMode || gameMode == AnalyzeFile ) {\r
-        char buf[64];\r
-        int time_secs = ed->time / 100;\r
-        int time_mins = time_secs / 60;\r
-\r
-        buf[0] = '\0';\r
-\r
-        if( ed->an_move_index != 0 && ed->an_move_count != 0 && *ed->hint != '\0' ) {\r
-            char mov[16];\r
-\r
-            strncpy( mov, ed->hint, sizeof(mov) );\r
-            mov[ sizeof(mov)-1 ] = '\0';\r
-\r
-            sprintf( buf, "%d/%d: %s [%02d:%02d:%02d]", ed->an_move_index, ed->an_move_count, mov, time_mins / 60, time_mins % 60, time_secs % 60 );\r
-        }\r
-\r
-        SetEngineState( ed->which, STATE_ANALYZING, buf );\r
-    }\r
-    else {\r
-        SetEngineState( ed->which, STATE_IDLE, "" );\r
-    }\r
-#endif\r
-\r
-    DoSetWindowText( ed->which, nLabel, s_label );\r
-\r
-    s_label[0] = '\0';\r
-\r
-    if( ed->time > 0 && ed->nodes > 0 ) {\r
-        unsigned long nps_100 = ed->nodes / ed->time;\r
-\r
-        if( nps_100 < 100000 ) {\r
-            sprintf( s_label, "NPS: %lu", nps_100 * 100 );\r
-        }\r
-        else {\r
-            sprintf( s_label, "NPS: %.1fk", nps_100 / 10.0 );\r
-        }\r
-    }\r
-\r
-    DoSetWindowText( ed->which, nLabelNPS, s_label );\r
-\r
-    /* Memo */\r
-    if( ed->pv != 0 && *ed->pv != '\0' ) {\r
-        char s_nodes[24];\r
-        char s_score[16];\r
-        char s_time[24];\r
-        char buf[256];\r
-        int buflen;\r
-        int time_secs = ed->time / 100;\r
-        int time_cent = ed->time % 100;\r
-\r
-        /* Nodes */\r
-        if( ed->nodes < 1000000 ) {\r
-            sprintf( s_nodes, "%lu", ed->nodes );\r
-        }\r
-        else {\r
-            sprintf( s_nodes, "%.1fM", ed->nodes / 1000000.0 );\r
-        }\r
-\r
-        /* Score */\r
-        if( ed->score > 0 ) {\r
-            sprintf( s_score, "+%.2f", ed->score / 100.0 );\r
-        } else\r
-            sprintf( s_score, "%.2f", ed->score / 100.0 );\r
-\r
-        /* Time */\r
-        sprintf( s_time, "%d:%02d.%02d", time_secs / 60, time_secs % 60, time_cent );\r
-\r
-        /* Put all together... */\r
-        sprintf( buf, "%3d  %s  %s\t%s\t", ed->depth, s_score, s_nodes, s_time );\r
-\r
-        /* Add PV */\r
-        buflen = strlen(buf);\r
-\r
-        strncpy( buf + buflen, ed->pv, sizeof(buf) - buflen );\r
-\r
-        buf[ sizeof(buf) - 3 ] = '\0';\r
-\r
-        strcat( buf + buflen, "\n" );\r
-\r
-        /* Update memo */\r
-        InsertIntoMemo( ed->which, buf );\r
-    }\r
-\r
-    /* Colors */\r
-    SetEngineColorIcon( ed->which );\r
-}\r
-\r
-// back end\r
-int EngineOutputIsUp()\r
-{\r
-    return engineOutputDialogUp;\r
-}\r
+int EngineOutputIsUp()
+{
+    return engineOutputDialogUp;
+}
+
+int EngineOutputDialogExists()
+{
+    return engineOutputShell != NULL;
+}
 
 void
 EngineOutputProc(w, event, prms, nprms)
 
 void
 EngineOutputProc(w, event, prms, nprms)
@@ -1259,8 +595,6 @@ EngineOutputProc(w, event, prms, nprms)
   if (engineOutputDialogUp) {
     EngineOutputPopDown();
   } else {
   if (engineOutputDialogUp) {
     EngineOutputPopDown();
   } else {
-    EngineOutputPopUp("engine output","This feature is experimental");
+    EngineOutputPopUp();
   }
   }
-//  ToNrEvent(currentMove);
 }
 }
-\r