Fix multi-leg promotions
[xboard.git] / winboard / wengineoutput.c
index bb51525..b9d13f5 100644 (file)
@@ -5,6 +5,9 @@
  *\r
  * Copyright 2005 Alessandro Scotti\r
  *\r
+ * Enhancements Copyright 2009, 2010, 2011, 2012, 2013, 2014, 2015,\r
+ * 2016 Free Software Foundation, Inc.\r
+ *\r
  * ------------------------------------------------------------------------\r
  *\r
  * GNU XBoard is free software: you can redistribute it and/or modify\r
@@ -223,12 +226,40 @@ void ResizeWindowControls( int mode )
     InvalidateRect( GetDlgItem(hDlg,IDC_EngineMemo2), NULL, FALSE );\r
 }\r
 \r
+static int currentPV;\r
+int highTextStart[2], highTextEnd[2];\r
+extern RECT boardRect;\r
+\r
+VOID\r
+GetMemoLine(HWND hDlg, int x, int y)\r
+{      // [HGM] pv: translate click to PV line, and load it for display\r
+       char buf[10000];\r
+       int index, start, end, memo;\r
+       POINT pt;\r
+\r
+       pt.x = x; pt.y = y;\r
+       memo = currentPV ? IDC_EngineMemo2 : IDC_EngineMemo1;\r
+       index = SendDlgItemMessage( hDlg, memo, EM_CHARFROMPOS, 0, (LPARAM) &pt );\r
+       GetDlgItemText(hDlg, memo, buf, sizeof(buf));\r
+       if(LoadMultiPV(x, y, buf, index, &start, &end, currentPV)) {\r
+           SetCapture(hDlg);\r
+           SendMessage( outputField[currentPV][nMemo], EM_SETSEL, (WPARAM)start, (LPARAM)end );\r
+           highTextStart[currentPV] = start; highTextEnd[currentPV] = end;\r
+           SetFocus(outputField[currentPV][nMemo]);\r
+       }\r
+}\r
+\r
 // front end. Actual printing of PV lines into the output field\r
 void InsertIntoMemo( int which, char * text, int where )\r
 {\r
     SendMessage( outputField[which][nMemo], EM_SETSEL, where, where ); // [HGM] multivar: choose insertion point\r
 \r
     SendMessage( outputField[which][nMemo], EM_REPLACESEL, (WPARAM) FALSE, (LPARAM) text );\r
+    if(where < highTextStart[which]) { // [HGM] multiPVdisplay: move highlighting\r
+       int len = strlen(text);\r
+       highTextStart[which] += len; highTextEnd[which] += len;\r
+       SendMessage( outputField[which][nMemo], EM_SETSEL, highTextStart[which], highTextEnd[which] );\r
+    }\r
 }\r
 \r
 // front end. Associates an icon with an output field ("control" in Windows jargon).\r
@@ -247,6 +278,11 @@ void DoSetWindowText(int which, int field, char *s_label)
     SetWindowText( outputField[which][field], s_label );\r
 }\r
 \r
+void SetEngineOutputTitle(char *title)\r
+{\r
+    SetWindowText( engineOutputDialog, title );\r
+}\r
+\r
 // This seems pure front end\r
 LRESULT CALLBACK EngineOutputProc( HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam )\r
 {\r
@@ -257,10 +293,14 @@ LRESULT CALLBACK EngineOutputProc( HWND hDlg, UINT message, WPARAM wParam, LPARA
         if( engineOutputDialog == NULL ) {\r
             engineOutputDialog = hDlg;\r
 \r
+            Translate(hDlg, DLG_EngineOutput);\r
             RestoreWindowPlacement( hDlg, &wpEngineOutput ); /* Restore window placement */\r
 \r
             ResizeWindowControls( windowMode );\r
 \r
+            SendDlgItemMessage( hDlg, IDC_EngineMemo1, EM_SETEVENTMASK, 0, ENM_MOUSEEVENTS );\r
+            SendDlgItemMessage( hDlg, IDC_EngineMemo2, EM_SETEVENTMASK, 0, ENM_MOUSEEVENTS );\r
+\r
            /* Set font */\r
            SendDlgItemMessage( engineOutputDialog, IDC_EngineMemo1, WM_SETFONT, (WPARAM)font[boardSize][MOVEHISTORY_FONT]->hf, MAKELPARAM(TRUE, 0 ));\r
            SendDlgItemMessage( engineOutputDialog, IDC_EngineMemo2, WM_SETFONT, (WPARAM)font[boardSize][MOVEHISTORY_FONT]->hf, MAKELPARAM(TRUE, 0 ));\r
@@ -287,6 +327,28 @@ LRESULT CALLBACK EngineOutputProc( HWND hDlg, UINT message, WPARAM wParam, LPARA
 \r
         break;\r
 \r
+    case WM_MOUSEMOVE:\r
+        MovePV(LOWORD(lParam) - boardRect.left, HIWORD(lParam) - boardRect.top, boardRect.bottom - boardRect.top);\r
+        break;\r
+\r
+    case WM_RBUTTONUP:\r
+        ReleaseCapture();\r
+        SendMessage( outputField[currentPV][nMemo], EM_SETSEL, 0, 0 );\r
+        highTextStart[currentPV] = highTextEnd[currentPV] = 0;\r
+        UnLoadPV();\r
+        break;\r
+\r
+    case WM_NOTIFY:\r
+        if( wParam == IDC_EngineMemo1 || wParam == IDC_EngineMemo2 ) {\r
+            MSGFILTER * lpMF = (MSGFILTER *) lParam;\r
+            if( lpMF->msg == WM_RBUTTONDOWN && (lpMF->wParam & (MK_CONTROL)) == 0 ) {\r
+               shiftKey = (lpMF->wParam & MK_SHIFT) != 0; // [HGM] remember last shift status\r
+                currentPV = (wParam == IDC_EngineMemo2);\r
+                GetMemoLine(hDlg, LOWORD(lpMF->lParam), HIWORD(lpMF->lParam));\r
+            }\r
+        }\r
+        break;\r
+\r
     case WM_GETMINMAXINFO:\r
         {\r
             MINMAXINFO * mmi = (MINMAXINFO *) lParam;\r